COGQA7 - Log Avanzamenti Produzione¶

Scopo¶

Consultazione del log avanzamenti di produzione per una commessa (anno+numero) e data di elaborazione. Per ogni evento di avanzamento espone fase, macchina, progressivo, data/ora, note, programma, operatore, valori previsti vs attivi (prd, sca, stato), differenze, codice lavorazione. Puo' essere usato standalone o come pop-up chiamato (linkage util-cogqa7).

Magazzino > Produzione > Stampaggio > Visualizzazioni > Log produzione

File e tabelle¶

File	Tipo	Descrizione
FEURTAB	Parametri	File parametri di ambiente
COGTRANS	Indicizzato temporaneo	File transito log (chiave `trs-chia1` = ccc-chia1 + trs-prog, alt key `trs-chia2 = trs-ord`)
FLSTA	Indicizzato	Stati di flusso
MASKPROG	Indicizzato	Anagrafica programmi maschere (`maskprog.arc`), aperto opzionalmente per descrizioni

Copybook¶

File e select¶

feurtab.fd, cogfiles.cpy
cogqa7.select, cogqa7.fd, cogqa7.wrk
cogqa7-01.scr, cogqa7.decla, cogqa7.prc
flsta.fd, flsta.cpy

Working-storage standard¶

wgrave.cpy, wnscr.cpy, wopenf.cpy, wstato.cpy, cogazien.cpy

Utilita'¶

utils54.cpy, wgrid.cpy, utilgdad.cpy
utils52.cpy, utils93.cpy, utilu20.cpy

Linkage¶

wcont.cpy, wcont1.cpy
utilcogqa7.cpy — Linkage del programma chiamato (cogqa7-called, cogqa7-caller, cogqa7-ope, cogqa7-commessa, cogqa7-data-ela)

Procedure¶

grave.cpy, mmmask.cpy, opengen.cpy, stato.cpy, stato1.cpy, winmsg.cpy

CALL¶

Programma	Descrizione
GRIDADMN	Gestione griglia (custom cell color, export Excel)

Logica di elaborazione¶

apri: rilevamento chiamata standalone vs called via cogqa7-called = "COGQA7-CALLED"; se chiamato copia parametri in w-dati-called. Apertura opzionale di maskprog.arc per descrizioni programmi. Setup F-keys (F3, Shift+F4, Shift+F5), titolo "Consultazione log avanzamenti". Nome dinamico di COGTRANS (#$cogqa7.<oper>).
Se chiamato: salta gli accept e va direttamente in a-richiesta-conferma.
a4: inizializza tab-maschera, attiva accept.
Accept: lotto commessa (anno+num) e data elaborazione.
a-richiesta-conferma -> elaborazione: lettura dei record di avanzamento dalle tabelle di base, costruzione COGTRANS, popolamento griglia (24+ colonne con confronto previsto/attivo).
Griglia: ordinata su trs-chia2 = trs-ord (chiave alternativa) per visualizzazione cronologica.

Note tecniche¶

Il file MASKPROG apre con apertura "tollerante": se non si riesce ad aprire, fl-maskprog-aperto = "N" e si procede senza descrizioni programma.
Il flag w-dc-called discrimina la modalita': in chiamata pop-up l'elaborazione parte automaticamente.
La chiave alternativa con trs-ord consente l'ordinamento cronologico per data/ora dell'evento.
Modulo strettamente di consultazione, nessuna scrittura sui dati di base.