COGDB7 - Cruscotto Liste da Modula
| Campo |
Valore |
| Sorgente |
cbl/cogdb7.cbl |
| Tipo |
Interattivo (doppia griglia: testate + dettaglio) |
| Richiamato da |
Menu |
Descrizione
Cruscotto di monitoraggio delle liste di prelievo/versamento per il magazzino automatico Modula. Presenta una maschera con due griglie affiancate: a sinistra le testate delle liste (tab2), a destra il dettaglio della lista selezionata (tab3). L'operatore puo' filtrare per tipo lista, periodo e stato di elaborazione.
File e tabelle
| File/Tabella |
Modalita' |
Descrizione |
| FEURTAB |
I-O |
File aziendale parametri |
| COGMDTES |
Input |
Testate liste Modula (lette in sequenza) |
| File tab2 (transito) |
I-O |
File di transito griglia testate |
| File tab3 (transito) |
I-O |
File di transito griglia dettaglio |
Copybook principali
| Copybook |
Sezione |
Descrizione |
cogdb7.select |
FILE-CONTROL |
Select dei file specifici |
cogdb7.fd |
FILE SECTION |
FD dei file specifici |
cogdb7.wrk |
WORKING-STORAGE |
Variabili generate da Screens |
cogdb7.tm |
WORKING-STORAGE |
Campi tab-maschera generati da Screens |
cogdb7-01.scr |
SCREEN SECTION |
Definizione maschera |
cogdb7.decla |
PROCEDURE |
Declaratives |
k-personal.cpy |
WORKING-STORAGE |
Costanti personalizzazione |
k-u10.cpy |
WORKING-STORAGE |
Costanti COGU10 |
utildlg.cpy |
WORKING-STORAGE |
Utility dialoghi |
wgrid.cpy |
WORKING-STORAGE |
Supporto griglie |
utilgdad.cpy |
WORKING-STORAGE |
Utility GRIDADMN |
utilncnf.cpy |
WORKING-STORAGE |
Utility RNEWCONF |
utilu10.cpy |
WORKING-STORAGE |
Utility COGU10W |
utilu20.cpy |
WORKING-STORAGE |
Utility COGU20 |
utils52.cpy |
WORKING-STORAGE |
Utility date (COGS52) |
utils68.cpy |
WORKING-STORAGE |
Utility COGS68 |
Logica di elaborazione
Inizializzazione
- Verifica abilitazione, apertura file, lettura dati azienda
- Carica configurazioni tramite
x99-confi (RNEWCONF)
- Determina divisa conto tramite
COGU10W con operazione "GetDivisaConto"
- Crea i due file di transito per le griglie testate e dettaglio
- Configura i pulsanti custom (F2 = "Cambia tabella")
- Crea menu popup contestuali per entrambe le griglie
- Ridimensiona le griglie in base alla dimensione della finestra (
z-resize-grid)
Filtri iniziali
- Tipo lista: default "P" (Prelievo)
- Stato lista: default "T" (Tutte)
Caricamento testate (carica-griglia-2)
- Legge COGMDTES in sequenza (
st-cogmdtes-notmin)
- Filtra in base allo stato lista selezionato:
- T (Tutte): accetta tutto
- M (Passate a Modula): stato "A" o " ", flag elaborazione " ", "N" o "S"
- E (In esecuzione): stato "A", flag elaborazione "E"
- C (Complete OK): stato "E", flag elaborazione "C"
- N (Complete non OK): stato "X", flag elaborazione "C"
Navigazione griglie
- F2: alterna il focus tra griglia testate e griglia dettaglio
- Selezione riga su griglia testate → carica dettaglio nella griglia destra
- Entrambe le griglie supportano ordinamento, filtro e popup contestuale
Ridimensionamento (z-resize-grid)
Le due griglie vengono dimensionate dinamicamente: la griglia testate occupa meta' della finestra, la griglia dettaglio occupa l'altra meta'.
Chiamate a sottoprogrammi
| Programma |
Funzione |
| COGU10W |
Recupero divisa conto |
| GRIDADMN |
Gestione avanzata griglie (configurazione, export, popup) |
| RNEWCONF |
Lettura configurazioni |