COGQA6 - Riepilogo Stampaggio in Corso (Artic Seals)¶

Scopo¶

Visualizzazione globale di tutte le lavorazioni di stampaggio "in macchina", riepilogando in un'unica griglia le righe di stampaggio attualmente attive (l'equivalente di aprire COGQ15 per tutte le macchine contemporaneamente). Personalizzazione Artic Seals.

Magazzino > Produzione > Stampaggio > Visualizzazioni > Riepilogo stampaggio

File e tabelle¶

File	Tipo	Descrizione
FEURTAB	Parametri	File parametri di ambiente
COGTRANS	Indicizzato temporaneo	File transito (chiave `trs-chia1`: mac-cod + slot); contiene lotto, merce, stampo, cliente, sedi, qta richiesta/stampata, battute residue, lotto MP
T-LOTTI	Indicizzato temporaneo	File transito per lotti (chiave `t-lot-ann + t-lot-num`)

Entrambi i file di transito hanno nomi dinamici #$cogqa6_<oper> / #$cogqa6b_<oper> in ext-tmp-dir.

Copybook¶

File e select¶

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

Working-storage standard¶

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

Utilita'¶

wgrid.cpy, utilgdad.cpy
utilu20.cpy, utils52.cpy, utilq65.cpy, utils68.cpy, utilncnf.cpy
utilcogq44.cpy — Linkage modulo COGQ44 (dettaglio produzione)

Linkage¶

wcont.cpy, wcont1.cpy

Procedure¶

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

CALL¶

Programma	Descrizione
COGQ44	Dettaglio produzione (F9)
GRIDADMN	Gestione griglia

Logica di elaborazione¶

apri: setup F-keys F8 dettaglio, Shift+F4 griglia; pulsanti custom F1 Refresh, F9 Situazione produzione. Bitmap custom da "varie" e "produz".
a4: pulisce i file di transito COGTRANS e T-LOTTI (nomi dinamici per utente), scansiona i record di stampaggio attivi dalle tabelle di base (cicli aperti, slot occupati) e li riversa nel file COGTRANS. Per ogni record vengono valorizzati: mac-cod, slot, descrizione macchina, lotto, merce, stampo, tipologia, data CNS, ordine cliente, lavoro, cliente, qta richiesta/stampata, battute residue, lotto MP.
Visualizzazione griglia: lettura sequenziale di COGTRANS e popolamento della griglia.
F1 Refresh: ripete a4 per aggiornare la situazione.
F9 Dettaglio produzione: chiama COGQ44 con util-cogq44 impostato sulla riga selezionata.

Note tecniche¶

Programma di sola lettura: scrive solo sui due file di transito personali.
La griglia rappresenta lo stato istantaneo: il refresh F1 e' la sola forma di aggiornamento.
Il file T-LOTTI ausiliario serve a contare le sedi attive per lotto.
Le bitmap "varie" e "produz" forniscono icone custom per i pulsanti F1 (refresh) e F9 (situazione).