COGZ92 — Scadenziario lavori laboratorio
| Campo |
Valore |
| Sorgente |
cbl/cogz92.cbl |
| Program-ID |
cogz92 |
| Tipo |
Lista-griglia/visualizzazione (con stampa) |
| Posizione menu |
Lab.Odont. > Operativo > Visualizzazioni > Scadenziario Lavori |
Scopo
Visualizza lo scadenziario dei lavori del laboratorio odontotecnico ordinato per studio cliente. Carica, filtra e mostra in griglia le commesse/righe in scadenza secondo vari criteri (periodo per data consegna/uscita/esecuzione, stato commessa, studio, fornitore, azione, merce, agente, sede) permettendo la consultazione rapida dei lavori in sospeso, la gestione dei blocchi (laboratorio, rifacimenti) e la stampa. Da griglia si accede allo stato commessa (F5), allo sblocco (F2) e all'impegno (F6).
Struttura e flusso
Programma di visualizzazione che accetta i parametri di filtro nella testata, elabora i dati appoggiandosi a un file temporaneo indicizzato di lavoro COGTRANS e ne popola la griglia (tab-maschera, prefisso tm-, max 100 righe).
apri/a4: inizializzazione, apertura file (compreso il temporaneo COGTRANS in w-nome-trs e LODTMDES), caricamento bitmap/pulsanti custom (F5 stato commessa, F2 sblocca, F6 impegno), lettura configurazioni (x99-confi).- Sezione testata: accept dei parametri di filtro (tipo periodo, data inizio/fine, uscita/entrata, stato commessa, studio, fornitore, azione, merce, agente, sede, tipo selezione).
elabora/elabora-righe: loop di caricamento — scansione delle prescrizioni LODPRESC e delle righe commessa LODCMRIG, con applicazione dei filtri (stato, reparto/sottoreparto, periodo, impegni, prova paziente). Per ogni riga selezionata scrive un record sul file temporaneo COGTRANS.COGTRANS: file di lavoro indicizzato (chiave primaria trs-chia1 = commessa+riga; chiave secondaria trs-chia2 = studio + data uscita + ora uscita + commessa). L'ordinamento per studio e data uscita e' ottenuto leggendo COGTRANS sulla chiave secondaria.z-costruisci-grid: costruzione della griglia leggendo COGTRANS in ordine di chiave secondaria e riempiendo grid-record (grd-).a-grid: loop di accept sulla griglia, gestione tasti funzione (F2 sblocca, F5 stato commessa, F6 impegno, F9), paginazione e SF4 personalizzazione colonne (GRIDADMN).- Stampa: generazione documento (Word/testo) dei lavori a scadenziario in base alla configurazione modo-stampa.
fine/z-chiudi: chiusura file, delete file del temporaneo COGTRANS, exit program.
Tabelle utilizzate
| Tabella |
Accesso |
Descrizione |
COGTRANS (trs-) |
temporaneo indicizzato (scrittura/lettura, delete file) |
File di lavoro dello scadenziario, ordinato per studio + data uscita |
LODPRESC (lpm-) |
lettura (chiavi .k03/.k04) |
Testata prescrizione/commessa (stato, date, medico, paziente, cassetta, consegna) |
LODCMRIG (lcr-) |
lettura (chiavi .k04/.k07) |
Righe commessa (stato, esecuzione, reparto/sottoreparto, blocco, data inizio) |
LODCMTES (lct-) |
lettura |
Testata commessa (piano, blocco laboratorio, stato impegno) |
LODPNRIG (lpr-) |
lettura (chiave .k02) |
Righe piano/fase (reparto, sottoreparto, flag prova/consegna, azione) |
LODTMDES (lde-) |
temporaneo (i/o) |
Descrizioni di lavoro |
LODTRDES (ltr-) |
lettura |
Traduzioni descrizioni |
FLSTA (flsta.cpy) |
lettura |
File stato documenti |
COGGEANA (ana-) |
lettura |
Anagrafica studio/fornitore (nome, agente) |
COGTABEL (euta-) |
lettura |
Tabella generale (tipo 85 reparti) |
LODTABEL (lta-) |
lettura |
Tabella laboratorio (sottoreparti) |
COGMERCI (mer-) |
lettura |
Anagrafica articoli (descrizione per stampa/filtro merce) |
feurtab (cogfiles.cpy) |
— |
File tabelle Euro standard |
Nota: il programma legge inoltre, secondo il tipo di periodo e i filtri attivi, ulteriori tabelle di dettaglio commessa/subfornitura/movimenti (es. magazzino commessa, subfornitura, movimenti magazzino) per calcolare date e stati.
Programmi chiamati
| Programma |
Interfaccia |
Scopo |
GRIDADMN |
util-gdad |
Gestione/personalizzazione griglia (SF4) |
COGS65W |
util-s65 |
Aiuto/ricerca anagrafica (studio, fornitore, agente) |
COGS98W |
util-s98 |
Selezione/editor prescrizione |
COGU10W |
util-u10 |
Conversione valuta/divisa di conto |
COGZ50 |
util-z50 |
Stato commessa (da F5) |
COGZC8 |
util-cogzc8 |
Gestione impegno (da F6) |
WINZ03 |
util-wz03 |
Aiuto/ricerca azione |
RNEWCONF |
util-ncnf |
Lettura configurazioni |
DTPRG / PRGDT |
— |
Conversione data <-> progressivo giorni |
WORDMDL |
util-wordmdl |
Generazione documento Word (stampa) |
Copybook principali
| Copybook |
Ruolo |
cogz92.select/.fd/.wrk/.prc/.decla |
Definizioni generate |
cogz92-01.scr |
Screen section |
utilz92.cpy |
Linkage di chiamata |
utilz50/utilcogzc8/utilwz03/utils65/utils98/utilu10/utilgdad/utilncnf/utilwordmdl |
Linkage subroutine chiamate |
k-personal.cpy, k-u10.cpy, costanti-labod.cpy |
Costanti personalizzazioni, valuta, laboratorio |
lodtmdes.cpy/.fd, lodtrdes.cpy/.fd, flsta.cpy |
File di lavoro/stato |
Chiavi secondarie .k0x (cogtrans, lodpresc, lodcmrig, lodpnrig, …) |
Accessi alternativi |
mmmask.cpy |
Maschera GUI standalone |
Configurazioni RNEWCONF
| Gruppo |
Chiave |
Uso |
ODONTO |
NOTE-LAVORO-SU-SCADENZIARI |
Mostra le note lavoro sullo scadenziario |
abilita |
labod-impegni |
Gestione impegni (A/M/N) |
odonto |
pagamento-anticipato-cc |
Pagamento anticipato conto commessa |
odonto |
gestione-multi-sede |
Abilita filtro/gestione multisede |
labpresc |
vis-consegna-effettiva |
Visualizza la data di consegna effettiva |
odonto |
scad-usa-consegne-interne |
Considera anche le consegne interne (tipo "I") |
cogza0 |
modo-stampa |
Modalita' di stampa (Word o default) |
Storico modifiche
060923: aggiunto tipo periodo "U" (tutte le uscite) con lettura da clone righe commessa.160916: aggiunto filtro "escludi lavori consegnati/spediti".030625: aggiunte note interne (grd-note-interne).020724: rimossa la vecchia gestione azienda criptata (ENCRYPT).- Conversione Windows: Claudio, 28/02/2006. Autore originale: Borghesan Gian Luca (Eurosystem).
Note
- Lo scadenziario e' uno strumento di sola consultazione dei lavori in scadenza: non modifica direttamente le commesse, ma vi accede tramite i programmi collegati (stato commessa COGZ50, impegno COGZC8, sblocco).
- L'elenco completo delle tabelle di dettaglio lette dipende dai filtri attivi e dal tipo periodo selezionato; le principali sono elencate sopra.