COGV53 - Lancio Inserimento Ricevute Fiscali¶
Scopo¶
Programma di lancio (dispatcher) per l'inserimento delle ricevute fiscali. Legge una configurazione RNEWCONF per stabilire se e' attiva la versione grafica del programma e, di conseguenza, richiama il modulo effettivo di inserimento: COGV50W (versione GRAFICA) oppure COGV53C (versione classica su finestra di appoggio). Non gestisce direttamente dati: si limita a instradare verso il programma corretto.
Menu¶
Vendite > Fatturazione > Ricevute Fiscali > Inserimento
File e tabelle¶
Il programma non apre file di dominio. Utilizza esclusivamente:
| File | Tipo | Descrizione |
|---|---|---|
| RNEWCONF | Parametri | Configurazione di ambiente letta via chiamata a RNEWCONF |
Copybook¶
Working-storage standard¶
costanti.cpywgrave.cpy,wnscr.cpy,wopenf.cpy,wstato.cpy,cogazien.cpy
Utilita'¶
utilncnf.cpy— strutturautil-ncnfper la lettura configurazioni RNEWCONF
Linkage¶
wcont.cpy,wcont1.cpy(parametrostringhe)
Procedure¶
stato.cpy,stato1.cpy,winmsg.cpy,util1.cpy,mmsubw.cpy,appoggio.cpy
CALL¶
| Programma | Descrizione |
|---|---|
| RNEWCONF | Lettura configurazione uscite/versione-programmi-ddt (pacchetto "C") per determinare la versione |
| COGV50W | Modulo di inserimento ricevute in versione GRAFICA; invocato con wo-parametro = "RDI" |
| COGV53C | Modulo di inserimento ricevute in versione classica; invocato entro una finestra di appoggio |
Logica di elaborazione¶
apro: inizializzazione programma (z-99-init-program), lettura azienda (rd-azi), quindi lettura configurazioneversione-programmi-ddtdal gruppouscite(pacchettoC) tramiteRNEWCONF; il valore torna intm-cfg-versione.ela-00: setm-cfg-versione = "GRAFICA"chiamaCOGV50Wpassandowo-parametro = "RDI"; altrimenti apre la finestra di appoggio (set-win-appoggio), chiamaCOGV53C, poi chiude la finestra (close-win-appoggio). In entrambi i casi il modulo chiamato vieneCANCEL-ato dopo l'uso.fine/z-chiudi:z-99-exit-programeexit program.
Note tecniche¶
- Programma sottoprogramma (usa
mmsubw.cpy): riceve solo il parametrostringhein linkage. - La finestra di appoggio (
set-win-appoggio/close-win-appoggio, daappoggio.cpy) serve al ramo classicoCOGV53Cche presumibilmente e' un programma a interfaccia carattere incapsulato in finestra. - Il valore
wo-parametro = "RDI"distingue il tipo documento (Ricevuta fiscale / Documento Interno) per il modulo graficoCOGV50W.