COGZCB — Commesse per operatore/giorno
| Campo |
Valore |
| Sorgente |
cbl/cogzcb.cbl |
| Program-ID |
cogzcb |
| Tipo |
Maschera GUI con griglia (visualizzazione impegni per operatore) |
| Posizione menu |
Lab.Odont. > Operativo > Impegni > Commesse per oper./giorno |
Scopo
Variante di COGZC7 orientata all'operatore: visualizza tutte le fasi di commessa pianificate (impegnate) su un dato operatore in una specifica giornata. Filtrando per operatore, data e stato fase (non iniziate / aperte / sospese / completate), elenca in griglia gli impegni della giornata con commessa, studio, paziente, azione, stato, impegno in minuti, ora di lavorazione e i riferimenti all'operatore/data della fase precedente e successiva della stessa commessa. Serve a consultare l'agenda di lavoro di un singolo operatore e a navigare al giorno precedente/successivo (S-F5/S-F6) o all'operatore precedente/successivo con carico (S-F7/S-F8). Da griglia si accede alla gestione impegno (INVIO, COGZC9) e alla commessa completa (F5, COGZC8).
File e tabelle
| Tabella |
Accesso |
Descrizione |
COGTRANS (trs-) |
file transito temporaneo indicizzato (i-o, delete file in uscita) |
Elenco impegni della giornata per l'operatore, con riferimenti fase precedente/successiva (operatore + descrizione) |
LODIMPDT (imd-) |
lettura sequenziale (chiavi .k02 per commessa, .k03) |
Dettaglio impegni pianificati (operatore, data, ora da/a, commessa, riga) |
LODIMPMX (imx-) |
lettura sequenziale (chiave .k02) |
Impegni per reparto/sottoreparto/data (chiave secondaria dichiarata) |
LODCMRIG (lcr-) |
lettura |
Righe commessa (stato, azione, prescrizione, riferimento piano) |
LODCMTES (lct-) |
lettura |
Testata commessa (piano di lavoro) |
LODPNRIG (lpr-) |
lettura |
Righe piano (tipo "T"/"X"): sequenza fase, provvisorieta', flag check |
LODAZION (laz-) |
lettura |
Descrizione azione |
PRNTOPER (ptop-) |
lettura |
Anagrafica operatori (descrizione) |
COGGEANA (ana-) |
lettura |
Anagrafica studio (nome) |
COGTABEL (euta-) |
lettura (tipo 85) |
Descrizione reparto |
LODTABEL (lta-) |
lettura (tipo 11) |
Descrizione sottoreparto |
Copybook principali
| Copybook |
Ruolo |
cogzcb.select / .fd / .wrk / .prc / .decla |
Definizioni generate. La FD e i SELECT di COGTRANS sono dichiarati manualmente nel sorgente (trs-chia1, trs-chia2 = trattato + chia1) |
cogzcb-01.scr |
Screen section |
utilcogzcb.cpy |
Linkage di chiamata (operatore, data, flag ho-aggiornato) |
utilcogzc8.cpy / utilcogzc9.cpy |
Linkage delle chiamate a COGZC8 e COGZC9 |
utilwp04.cpy / sendwp04.cpy |
Aiuto/ricerca operatore |
utilw80.cpy / utilf12.cpy |
Linkage aiuti (reparto/sottoreparto, condivisi con lo schema COGZC7) |
utilgdad.cpy / wgrid.cpy / utilgrid.cpy |
Griglia |
utilncnf.cpy / utils52.cpy / utils93.cpy |
Configurazioni, campo data, controlli |
cogtrans.k01 / .k02, lodimpdt.k02 / .k03, lodimpmx.k02 |
Chiavi secondarie aggiunte manualmente |
mmmask.cpy, cogazien.cpy, wstato/wopenf/wgrave/wnscr |
Infrastruttura maschera GUI |
Programmi chiamati
| Programma |
Interfaccia |
Scopo |
COGZC8 |
util-cogzc8 |
Apertura della commessa completa (F5) |
COGZC9 |
util-cogzc9 |
Assegnazione/modifica impegno della singola fase (INVIO) |
COGP04/send-wp04 |
util-wp04 |
Aiuto/ricerca operatore (F8 sul campo operatore) |
GRIDADMN |
util-gdad |
Costruzione e personalizzazione griglia (S-F4) |
RNEWCONF |
util-ncnf |
Lettura configurazioni |
Logica di elaborazione
Il flusso e' analogo a COGZC7, con il filtro principale sull'operatore anziche' sul reparto/sottoreparto:
apri / a4 — inizializzazione, open-files, bitmap custom, lettura configurazioni; costruzione e apertura del transito COGTRANS (output per rilevare doppia esecuzione, poi i-o). Data di default = data odierna, tutti gli stati selezionati.- Testata — accept di operatore (
a-tm-ope, aiuto WP04) e data (a-tm-data, calendario S52), piu' le quattro spunte di stato, tutti validati in x-controlla-* (l'operatore e' verificato su PRNTOPER).
carica-griglia / carica-transito — carica-transito scandisce LODIMPDT per l'operatore e la data, applica il filtro stato leggendo LODCMRIG e scrive su COGTRANS; in seconda passata cerca la fase precedente e successiva della stessa commessa (cerca-prec/cerca-succ su LODIMPDT per commessa) registrando operatore, descrizione e date. carica-griglia riversa il transito nella tabella arricchendo con descrizione operatore (PRNTOPER), studio (COGGEANA), azione (LODAZION), sequenza e provvisorieta' (LODPNRIG), calcolando l'impegno in minuti dall'intervallo ora da/a.tasti-funz — calcola le etichette di navigazione: giorno precedente/successivo con carico e operatore precedente/successivo con carico.- Griglia — costruzione via GRIDADMN; colorazione righe completate e a priorita' 1 (impegno successivo nel giorno filtrato).
- Navigazione e azioni — S-F5/S-F6 spostano di giorno, S-F7/S-F8 spostano di operatore, INVIO chiama COGZC9, F5 chiama COGZC8.
fine / z-chiudi — chiusura file, close/delete file del transito, uscita.
Configurazioni (RNEWCONF)
| Gruppo |
Chiave |
Uso |
labimp |
assegnazione-operatori |
Modalita' di assegnazione impegni (letta e conservata; a differenza di COGZC7 il programma resta eseguibile) |
labimp |
cogzc7-colore-fasi-priorita-1 |
Colore riga per fasi con impegno successivo nel giorno filtrato (chiave condivisa con COGZC7) |
labimp |
colore riga completata |
Colore riga per fasi completate |
Note
- Struttura e transito
COGTRANS sono modellati su COGZC7 (il commento nel sorgente lo dichiara esplicitamente "Programma simile a COGZC7"); la differenza sostanziale e' la dimensione di filtro (operatore invece di reparto/sottoreparto) e i riferimenti precedente/successivo espressi in termini di operatore.
- Diversamente da COGZC7, il controllo iniziale che bloccava l'esecuzione in modalita' operatore mobile e' commentato: il programma e' pensato proprio per la vista per operatore.
- Richiama COGZC8/COGZC9 passando prescrizione + riga; con
ho-aggiornato = "S" la griglia viene ricostruita.