COGZ14 — Visualizzazione impegni giornalieri
| Campo |
Valore |
| Sorgente |
cbl/cogz14.cbl |
| Program-ID |
cogz14 |
| Tipo |
Lista-griglia/visualizzazione (con stampa) |
| Posizione menu |
Lab.Odont. > Operativo > Visualizzazioni > Impegni giornalieri |
Scopo
Visualizza in forma aggregata gli impegni di produzione del laboratorio per reparto e sottoreparto, in un intervallo di date scelto dall'operatore. Per ciascun reparto/sottoreparto e data somma gli impegni attivati e li confronta con la capacita' disponibile, evidenziando il residuo. E' una funzione di consultazione con possibilita' di scomporre l'impegno per reparto o sottoreparto e di produrre una stampa riepilogativa in HP-GL/2.
Struttura e flusso
apri — init, open-files, rd-azi, definizione tasti funzione (F1 configura, S-F4 griglia, F3 conferma, F8 calendario/aiuto, F9 stampa), lettura divisa conto via COGU10W, x99-confi, caricamento bitmap/pulsanti custom (F5 Scomponi Sottoreparto, F7 Scomponi Reparto), preparazione griglia. Costruisce il nome del file di transito temporaneo COGTRANS.
a4 — reset griglia, apre in output/i-o il transito COGTRANS (lock di funzione per operatore), imposta date e sede di default (magazzino principale az-main-mag).
a-tm-data-ini / a-tm-data-fin / a-tm-sede — accept dei filtri (date inizio/fine tramite COGS52/calendario, sede tramite aiuto COGW36).
a-fine-intestazione — validazione, lettura configurazione is-modo per la sede, poi elabora e carica.
elabora — scandisce LODCARSP per data (chiave chia4) nel range; per ogni impegno, per i laboratori "lori" scarta le commesse chiuse (leggendo LODCMTES/LODPRESC); accumula gli impegni per reparto/sottoreparto/data nel record di transito COGTRANS. In modalita' "A" (is-modo) legge la capacita' massima da LODIMPRS; in modalita' "B" legge la disponibilita' reparto da LODIMPRS/LODIMPMD e calcola il residuo.
carica — riversa COGTRANS nella tabella di maschera (tm-righe occurs 900).
a-grid / a-accept-grid — loop di griglia; F5/F7 richiamano COGZ32 per scomporre l'impegno per sottoreparto o reparto, F9 avvia la stampa, S-F4 la personalizzazione colonne.
stampa / c-stampa / x4-format-page / d-rect — stampa HP-GL/2 del riepilogo impegni (via COGS54 per la scelta stampante), con testata, cornice e colonne condizionate da multi-sede e da is-modo.
fine / z-chiudi — chiusura file, cancellazione del transito temporaneo, uscita.
Tabelle utilizzate
| Tabella |
Accesso |
Descrizione |
LODCARSP (csp-) |
lettura (chiavi chia2,chia4) |
Carico/impegno per commessa, data, reparto/sottoreparto |
COGTRANS (trs-) |
file transito temporaneo, i-o |
Record aggregato per data/sede/reparto/sottoreparto |
LODCMTES (lct-) |
lettura |
Testata commessa (per esclusione commesse chiuse) |
LODPRESC (lpm-) |
lettura (chia4) |
Prescrizione/commessa (stato) |
LODIMPRS (irs-) |
lettura |
Impegno massimo reparto/sottoreparto |
LODIMPMD (irsp-) |
lettura |
Impegno reparto per periodo (modalita' "B") |
COGMAGAZ (magz-) |
lettura |
Anagrafica magazzino/sede |
COGTABEL (euta-) |
lettura |
Descrizione reparto (tipo 85) |
LODTABEL (lta-) |
lettura |
Descrizione sottoreparto (tipo 11) |
Programmi chiamati
| Programma |
Interfaccia |
Scopo |
COGZ32 |
util-z32 |
Scomposizione impegno per reparto/sottoreparto (F5/F7) |
COGU10W |
util-u10 |
Divisa conto ed editing importi |
COGS52 |
util-s52 |
Gestore campo data |
COGS54 |
util-s54 |
Scelta stampante / stampa |
COGW36 |
sendw36 |
Aiuto/ricerca sede |
GRIDADMN |
util-gdad |
Gestione e personalizzazione griglia |
RNEWCONF |
util-ncnf |
Lettura configurazioni |
Copybook principali
| Copybook |
Ruolo |
cogz14.wrk / cogz14.prc / cogz14-01.scr |
Costanti, working, procedure e screen |
cogz14.select / cogz14.fd, flsta.fd/.cpy |
Definizione file del programma e file di stampa |
cogtrans.k01, lodcarsp.k02/.k04, lodpresc.k04 |
Chiavi secondarie aggiunte manualmente |
utilz32, utilu10, utils52, utils54, utilw36 |
Interfacce ai programmi chiamati |
k-u10, k-personal, utilncnf, utilgdad |
Costanti e utility standard |
mmmask, cogazien, wstato, wopenf, wgrave |
Infrastruttura maschera GUI |
Configurazioni (RNEWCONF)
| Gruppo |
Chiave |
Uso |
odonto |
gestione-multi-sede |
Attiva le colonne/stampa per sede |
labimp |
is-modo |
Modalita' di calcolo impegni: "A" = impegno totale, "B" = disponibilita' reparto + residuo |
Note
- Il file
COGTRANS e' un transito temporaneo per operatore (nome con ext-tmp-dir + wo-oper): all'ingresso e' aperto in output per verificare che la funzione non sia gia' in uso dallo stesso operatore, e viene cancellato in uscita.
- Le colonne della griglia (impegno totale / disponibilita' reparto / residuo, colonne sede) sono mostrate condizionatamente da
is-modo e da multi-sede tramite vis-colonne (flag gdad-cst-vis).
Storico modifiche
- 10/10/2024 (marcatore
101024): aggiunta la gestione per data (trs-data, filtri data inizio/fine), la modalita' is-modo con disponibilita' reparto (trs-disp-rep) e residuo (trs-residuo) letti da LODIMPRS/LODIMPMD, e le relative colonne in griglia e in stampa.