COGM35 - Definizione Stampe Merci Avanzate¶
Sorgente: cbl/cogm35.cbl | Tipo: Programma a menu | Program-ID: COGM35
Menu: Magazzino > Archivi & Tabelle > Stampe > Merci Avanzate > Definizione
Scopo¶
Permette di definire e configurare le stampe parametrizzate del modulo Merci Avanzate. Le definizioni sono memorizzate su COGTABEL con codici di tipo dedicato:
- Titolo, rottura e ordinamento:
tipo 63, key0nnn100000(nnn = numero stampa) - Selezioni:
tipo 63, key0nnn2000pp(pp = progressivo selezione) - Dettaglio riga:
tipo 63, key0nnn30PPPP(PPPP = progressivo informazione)
File e Tabelle¶
| File/Tabella | Uso |
|---|---|
| FEURTAB (cogfiles) | Parametri generali |
| COGTABEL | Tabella generica gestita: tipo 63 per definizioni stampe Merci Avanzate |
Copybook principali¶
- File:
feurtab.fd,cogtabel.fd - Record:
cogfiles.cpy,cogtabel.cpy,cogdefst.cpy(definizione struttura stampe),cnfgsist.cpy - Standard:
wstato,wgrave,wopenf,wnscr,cogazien
Struttura dati principale¶
tab-maschera:
tm-cod 9(03) numero stampa
tm-tit X(40) titolo
tm-sub X(08) sottocodice
tm-tip-rig X(01) tipo riga
tm-lun-rig 9(03) lunghezza riga
tm-lun-fgl 9(02) lunghezza foglio
tm-int X(01) tipo intestazione
...
w-max-ord = 5 definisce il numero massimo di criteri di ordinamento.
Logica di elaborazione¶
- Apertura: lettura azienda, apertura COGTABEL.
- Selezione stampa: input del codice numerico identificativo della stampa (
tm-cod). - Lettura definizione esistente: scansione COGTABEL con
tipo = 63e chiave0nnn1...per recuperare titolo, rottura, ordinamento. - Modifica/Inserimento dei tre blocchi:
- Blocco 1 (titolo/rottura/ordinamento): aggiornamento del singolo record con chiave
0nnn100000 - Blocco 2 (selezioni): scrittura/lettura record
0nnn2000ppper ogni selezione configurata - Blocco 3 (dettaglio): scrittura/lettura record
0nnn30PPPPper ogni informazione di riga - Cancellazione: rimuove tutti i record di tipo 63 con prefisso
0nnn. - Salvataggio (F3): rewrite/write dei record COGTABEL.
Note¶
- E' una funzione di setup tecnico: la struttura dei record di tipo 63 e' definita da
cogdefst.cpy. - Le stampe parametrizzate del modulo Merci Avanzate leggono queste definizioni a runtime per costruire le rispettive maschere e report.
- Programma legacy con uso di
GO TOePERFORM ... THRU: convenzione del sorgente.