COGM62 - Sequenze di Creazione Merci Avanzate
Sorgente: cbl/cogm62.cbl | Program-ID: COGM62 | Tipo: Interattivo (gestione tabella con griglia)
Menu: Magazzino > Archivi & Tabelle > Gestione Avanzata > Sequenze di Creazione
Scopo
Definizione delle sequenze di composizione del codice e della descrizione delle merci avanzate. Per ogni classe articolo, permette di specificare l'ordine dei componenti (tabelle) che formano il codice e/o la descrizione dell'articolo, con prefissi e suffissi separatori.
File e tabelle
| File/Tabella |
Tipo |
Modalita' |
Descrizione |
| FEURTAB |
Tabella |
Input |
Tabella generale Eurosystem |
| COGTABEL |
Tabella |
I-O |
Tabella generale (classi = euta-tipo 61, sequenze = euta-tipo 37, tabelle avanzate = euta-tipo 62) |
I file acceduti sono quelli dichiarati in cogm62.select tramite Screen Designer.
Copybook utilizzate
| Copybook |
Descrizione |
cogfiles.cpy |
Struttura generica FEURTAB |
cogm62.select |
SELECT file generati da Screens |
cogm62.fd |
FD file generati da Screens |
cogm62.wrk |
Working storage generata da Screens |
cogm62-01.scr |
Maschera grafica |
cogm62.decla |
Declaratives |
cogm62.prc |
Procedure copy generate da Screens |
wstato.cpy |
Working stato |
wgrave.cpy |
Working errori gravi |
wgrid.cpy |
Working griglia |
wopenf.cpy |
Working apertura file |
wnscr.cpy |
Working screen |
cogazien.cpy |
Dati azienda |
utilgdad.cpy |
Interfaccia GRIDADMN |
utils21.cpy |
Utility generiche |
utilw74.cpy |
Interfaccia WIN074 |
utilw75.cpy |
Interfaccia WIN075 |
utilncnf.cpy |
Interfaccia RNEWCONF (configurazione) |
Linkage
| Copybook |
Descrizione |
wcont.cpy |
Contesto chiamante |
wcont1.cpy |
Contesto esteso |
Struttura del programma
Variabili della maschera (tab-maschera)
| Variabile |
PIC |
Descrizione |
tm-cla |
X(01) |
Classe articolo selezionata |
tm-cla-des |
X(30) |
Descrizione classe |
tm-cla-suf |
X(01) |
Suffisso classe |
tm-tip |
X(01) |
Tipo sequenza: "C" = Codice, "D" = Descrizione |
tm-sim |
X(30) |
Simulazione risultato composizione |
tm-pos |
X(01) |
Posizione nella sequenza |
tm-cod-tab |
X(02) |
Codice tabella componente |
tm-des |
X(30) |
Descrizione tabella |
tm-pre |
X(01) |
Prefisso separatore |
tm-suf |
X(01) |
Suffisso separatore |
Costanti
| Costante |
Valore |
Descrizione |
k-euta-tipo-clas |
61 |
Tipo COGTABEL per classi articolo |
k-euta-tipo-seq |
37 |
Tipo COGTABEL per sequenze composizione |
k-euta-tipo-tab |
62 |
Tipo COGTABEL per tabelle avanzate |
Flusso principale
- apri - Inizializzazione, apertura file, lettura configurazione RNEWCONF
- a-tm-cla - Accept classe articolo; caricamento sequenza esistente da COGTABEL (tipo 37)
- Griglia: visualizzazione/modifica dei componenti della sequenza
- Su conferma: salvataggio della sequenza in COGTABEL
Chiamate esterne
| Programma |
Modalita' |
Scopo |
| GRIDADMN |
CALL |
Gestione griglia |
| RNEWCONF |
CALL |
Lettura configurazione |
Note
- La sequenza e' memorizzata in COGTABEL con euta-tipo = 37. La chiave include la classe articolo.
- Ogni componente della sequenza referenzia una tabella avanzata (euta-tipo = 62) da cui il sistema preleva il valore per comporre codice/descrizione.
- Il campo "Simulazione" viene aggiornato in tempo reale concatenando i componenti secondo la sequenza definita.
- Massimo 20 componenti per sequenza (dimensione dell'occurs in tm-tab).