COGQ39 - Stampa programmazione manutenzioni stampi (riepilogo)¶

Intestazione¶

Campo	Valore
Programma	COGQ39
Titolo	Stampa programmazione manutenzioni / Riepilogo stampi
Tipo	Visualizzazione interattiva GUI con griglia evoluta
Menu	Magazzino > Produzione > Stampaggio > Visualizzazioni > Riepilogo stampi
Sorgente	`cbl/cogq39.cbl`

Scopo e logica generale¶

COGQ39 e' una visualizzazione a griglia evoluta del riepilogo stampi e relativa programmazione manutenzioni. Sebbene il commento di testata parli di "Stampa", il programma offre principalmente la consultazione su griglia con possibilita' di export Excel; revisione completa di Andrea del 21-03-23 per allinearlo allo standard delle griglie evolute (file di transito, ordinamento, popup menu).

Permette filtri per range stampo, range articolo, soglia, range date, tipo periodo, stato manutenzione. La griglia supporta ordinamento, personalizzazione colonne e popup contestuale.

Flusso principale¶

apri: init, lettura azienda, apertura file, caricamento bitmap pulsanti custom (icona "manut" per F7), popup menu, lookup articoli.
a4: init tab-maschera con defaults (tm-fl-tutti = "S", tm-tipo-periodo = "P", tm-stato = "T"), ordinamento iniziale, go to a-tm-soglia.
Sequenza accept: soglia → da/a stampo → da/a articolo → flag tutti → data da/a → tipo periodo → stato.
F3 / a-inizio-dati: validazione globale, costruzione transito, ordinamento, presentazione griglia.
a-grid-ini / a-grid: navigazione griglia con eventi (F7 per manutenzione stampo selezionato tramite COGQ42; popup contestuale).
fine / z-chiudi: chiusura, cancellazione transito.

File e tabelle acceduti¶

File logico	Modalita'	Uso
FEURTAB	Input	Tabella nomi file
(cogq39.fd: stampi, manutenzioni, contatori)	Input	Anagrafica stampi e programmazione manutenzioni
FLSTA	Output	File di stampa (se richiesta)
Transito griglia	I-O	File temporaneo della griglia (creato/eliminato per sessione)

Copybook inclusi¶

cogq39.select, cogq39.fd, cogq39.wrk, cogq39-01.scr, cogq39.decla, cogq39.prc
costanti-stampaggio.cpy
wgrave.cpy, wnscr.cpy, wopenf.cpy, wstato.cpy, cogazien.cpy
wgrid.cpy, utilgdad.cpy
utilcogq42.cpy (interfaccia manutenzioni stampo)
utilu20.cpy, utils52.cpy, utils54.cpy, utils68.cpy (lookup articoli), utilw77.cpy (lookup stampo)
Linkage: wcont.cpy, wcont1.cpy

Programmi chiamati (CALL)¶

Programma	Scopo
COGS52	Calendario (F8 sulle date)
COGS54	Stampa device
COGS68	Lookup articolo (range merce)
COGW77	Lookup stampo (range stampo)
COGQ42	Gestione manutenzioni stampo (F7)
GRIDADMN	Amministrazione griglia

Logica di business¶

Filtro range "Da/A stampo": codici stampo trattati come stringhe x(30); F8 apre lookup tramite COGW77.
Soglia: numero a 8 cifre (tm-soglia); con tm-fl-tutti = "S" viene mostrato tutto, altrimenti solo gli stampi che superano la soglia.
Tipo periodo (tm-tipo-periodo) e stato (tm-stato) sono combo con valori prelevati da liste interne (COGS60 standard).
Griglia: 900 righe massime (k-max-ele-tab), ordinamento iniziale gor-r-col(1) = gcn-r-pri-cod ascendente.
F7: apre gestione manutenzioni stampo selezionato passando i parametri via util-cogq42.
Read-only sulla griglia; modifiche solo attraverso la manutenzione richiamata.

Storico modifiche¶

Pagina creata in autodoc 2026-05-16.