Vai al contenuto

COGZ45 — Avanzamento commessa (step by step, lettura barcode)

Campo Valore
Sorgente cbl/cogz45.cbl
Program-ID cogz45
Tipo Maschera GUI interattiva (avanzamento a lettura codici a barre)
Posizione menu Lab.Odont. > Operativo > Avanzamento Commessa

Scopo

E' la funzione di avanzamento lavori "step by step" del laboratorio, pilotata dalla lettura di codici a barre da parte dell'operatore. Ad ogni lettura riconosce se e' stato letto un codice operatore, un comando o un codice commessa e, in base allo stato dell'operatore e dell'azione, apre/chiude/sospende/riapre le fasi della commessa aggiornando gli archivi di produzione. La maschera si riposiziona automaticamente sul campo di lettura dopo ogni operazione, per un flusso continuo da terminale di reparto.

Struttura e flusso

  • apri — init, open-files, caricamento bitmap/pulsanti custom (F6 dettaglio azione, F9 note lavoro, F4/S-F6 rapporti non conformita', F5 note reparto, S-F5 preparazione, F7 vis. prestazioni, F2 materiale consegnato, F10 chiusura, S-F7 fascicolo), x99-confi e x99-confi-operatore.
  • a-tm-lettura — accept del campo unico di lettura barcode; gestisce i tasti funzione contestuali (F6 COGZ23 dettaglio azione, F9 note lavoro, F4/S-F6 COGZ39 non conformita', F5 COGF14 note reparto, S-F5 COGZD1/COGZ41 preparazione, F7 COGZ42/COGZC1 prestazioni). Traccia ogni passo via gesdebug-write.
  • x-controlla-tm-letturariconoscimento del codice per lunghezza numerica:
  • 1 … 9999c-operatore (codice operatore)
  • 10000 … 999999d-comando (codice comando, es. sospensione, riapertura, note, ripartizione, progetto)
  • 1000000 … 9999999999e-commessa (codice commessa)
  • a-fine-intestazione — dispatch centrale. In base al comando letto (tm-cmd) e allo stato operatore/azione decide l'operazione: gestione prestazioni/materiali (d4-seleziona), note medico/lavoro/progetto, e sull'azione dell'operatore attivo apertura (d1-apertura), chiusura (d3-chiusura), sospensione (d2-sospensione) o riapertura. I comandi riservati (mod. operatore, inserimento/cancellazione azione) richiedono operatore responsabile di produzione (tm-ope-resp = "R").
  • a-20 — reset video e ritorno a a-tm-lettura.
  • a-grid / a-accept-grid — griglia delle azioni/fasi della commessa (sequenza, azione, operatore, stato, controllo, prestazioni/materiali, reparto/sede).
  • d1-apertura / d2-sospensione / d3-chiusura / d4-seleziona — motore di avanzamento: aggiornano LODCMRIG/LODCMDET, gestiscono materiali automatici (via COGZSA/COGZ60), impegni (COGZC5), piani di controllo (COGY23) e chiusura commessa.
  • z-chiudi — chiusura file, cancel subroutine, uscita.

Tabelle utilizzate

Tabella Accesso Descrizione
LODPRESC (lpm-) lettura (chia4) Prescrizione/commessa e relativo stato
LODCMTES (lct-) lettura Testata commessa (piano temporaneo)
LODCMRIG (lcr-) lettura/riscrittura Righe commessa/fase (stato, operatore, date)
LODCMDET (lcd-) lettura/riscrittura Dettaglio righe commessa
LODPNRIG (lpr-) lettura Righe piano temporaneo (azioni, controlli)
LODAZION (laz-) lettura Anagrafica azioni (descrizione, operatore, validazione)
LODRAPNC (lrn-) lettura (chia2,chia6) Rapporti di non conformita'
COGTABEL (euta-) lettura Descrizioni operatori/tabelle
PRNTOPER (ptop-) lettura Operatori di produzione
LODDESCR / LODTMDES (lde-/ltd-) i-o temporaneo Note lavoro/istruzioni/buoni (via COGZDEW)

Programmi chiamati

Programma Interfaccia Scopo
COGZ23 z23-* Dettaglio/gestione azione (F6)
COGZ39 util-z39 Rapporti di non conformita' (F4/S-F6)
COGF14 util-f14 Note reparto (F5)
COGZ41 / COGZD1 z41-* / zd1-* Preparazione commessa (S-F5)
COGZ42 / COGZC1 z42-* / util-zc1 Visualizzazione/modifica prestazioni (F7)
COGZ54 z54-* Materiale consegnato/reso (F2)
COGZ46 util-z46 Gestione materiali/prestazioni della fase
COGZ60 / COGZSA util-z60 / util-cogzsa Aggiornamento materiali automatici da prestazioni
COGZC5 util-cogzc5 Aggiornamento impegni laboratorio
COGY23 util-y23 Esecuzione piani di controllo
COGZDEW util-zde Editor note lavoro/istruzioni
COGZ88 util-z88 Stampa modulo controllo utente
DIALOGS util-dlg Menu di scelta
GRIDADMN util-gdad Gestione griglia
RNEWCONF util-ncnf Lettura configurazioni

Copybook principali

Copybook Ruolo
cogz45.wrk / cogz45.prc / cogz45-01.scr Costanti, working, procedure e screen
k-personal, costanti-tipi-documento Costanti personalizzazione cliente e tipi documento
utilz23/z39/z41/z42/z45/z46/z47/z48/z51/z54/z88/zd1 Interfacce ai programmi chiamati (linkage e working)
utilgesdebug / gesdebug Tracciamento diagnostico dei passi
utilncnf, utilgdad, utils52/s62/s93/s98, utildlg Utility standard config/griglia/campi
mmmask, cogazien, wstato, wopenf, wgrave Infrastruttura maschera GUI

Configurazioni (RNEWCONF)

Gruppo Chiave Uso
ODONTO GESTIONE-REPARTI Abilita note reparto (F5)
ODONTO QUANTITA-AVANZAMENTO Quantita' obbligatoria in avanzamento
ODONTO GESTIONE-SPEDIZIONI Gestione spedizioni
COLORI RIGA-GRIGLIA-WARNING Colore riga di warning in griglia
ODONTO Z45-VIS-RIG-OPE Visualizzazione riga operatore
ABILITA LABOD-IMPEGNI Gestione impegni ("A" = aggiornati)
ODONTO ESECUZIONE-PIANI-CONTROLLO Esecuzione piani di controllo
ODONTO AVANZAMENTO-TIPO-VIS-PRESTAZIONI "A" = COGZ42, "B" = COGZC1 su F7
LABAVANZ RICHIAMO-PREPARAZIONE Richiamo preparazione su S-F5
LABAVANZ MODIFICA-NOTE-LAVORO Consente modifica note lavoro
odonto gestione-multi-sede Multi-sede
APO AZIONE-RICONSEGNA-LAVORO Codice azione di riconsegna
LABAVANZ AVANZAMENTO-WEB Se "S" l'avanzamento avviene su web
apo operatore-clinica-su-lab (per operatore) Clinica di appartenenza dell'operatore

Note

  • Il riconoscimento del tipo di codice avviene esclusivamente per range di valore numerico della lettura (operatore/comando/commessa), non da un prefisso.
  • Il programma e' fittamente strumentato con gesdebug-write: ogni ramo del dispatch scrive una traccia diagnostica utile in produzione.
  • I comandi che modificano la struttura della commessa (mod. operatore, ins./canc. azione) sono consentiti solo all'operatore responsabile di produzione (tm-ope-resp = "R").