COGH05 - Stampa Conti non Riclassificati (IV Direttiva C.E.E.)¶
Sorgente: cbl/cogh05.cbl | Program-ID: COGH05 | Tipo: Stampa
Menu: Contabilita' > Bilancio > Riclass. IV Direttiva C.E.E. > Stampe > Conti non Collegati
Descrizione¶
Stampa l'elenco dei conti del piano dei conti (COGPNCON) che non risultano collegati ad alcuna voce del modello di riclassificazione C.E.E. (COGPCCEE). Per ogni sottoconto non collegato stampa codice (mastro/conto/sottoconto) e descrizione. Utile per completare la mappatura della riclassificazione prima della stampa del bilancio C.E.E.
Tabelle utilizzate¶
| Tabella | Copybook | Accesso | Descrizione |
|---|---|---|---|
| FEURTAB | COGFILES.CPY | Random | Tabella generale di sistema |
| COGPNCON | (da cogh05.fd/select) | Dynamic | Piano dei conti |
| COGPCCEE | (da cogh05.fd/select) | Dynamic | Collegamento conti / voci C.E.E. |
| FLSTA | flsta.cpy | Output | File di stampa |
Flusso di elaborazione¶
- Maschera parametri: richiede il codice modello di riclassificazione (
tm-modello). Zero = tutti i modelli. - Selezione stampa: chiama
COGS54(larghezza 132 colonne). - Scansione COGPNCON: scansione completa del piano dei conti (start
notminsu chiave bassa). - Verifica collegamento: per ogni conto letto, tenta una ricerca su
COGPCCEEtramitecee-chia1(chiave mastro/conto/sottoconto). Se il conto e' trovato in COGPCCEE con il modello corrispondente, viene saltato (e' collegato). Se non trovato, viene stampato. - Filtro modello: se
tm-modello <> 0, la verifica su COGPCCEE controlla anche che il modello corrisponda. Un conto collegato ad un modello diverso da quello selezionato viene considerato "non collegato" per il modello richiesto. - Stampa righe: per ogni conto non collegato scrive la riga
rdet2(mastro/conto/sottoconto + descrizione).
Paragrafi principali¶
| Paragrafo | Funzione |
|---|---|
apri |
Inizializzazione, caricamento lingua e dati azienda |
a4 |
Reset maschera, caricamento data di sistema |
a-tm-modello |
Accept del codice modello |
a-riga-fine |
Conferma parametri, chiama COGS54, avvia scansione |
a007 |
Loop principale: legge COGPNCON e verifica collegamento |
a009/a010 |
Ricerca su COGPCCEE per il conto corrente |
a011 |
Stampa riga conto non collegato |
intesta |
Intestazione pagina stampa |
Chiamate a sottoprogrammi¶
| Programma | Scopo |
|---|---|
| COGS54 | Gestione stampa (selezione stampante / anteprima), larghezza 132 colonne |
Copybook principali¶
COGFILES.CPY- Layout FEURTABcogazien.cpy- Dati aziendautils54.cpy- Utilities stampawstato.cpy,wgrave.cpy,wopenf.cpy,wnscr.cpy- Working storage standard
Note implementative¶
- La maschera e' definita in
cogh05-01.scr(Screen Designer). - La logica di verifica usa
PERFORM THRUsui paragrafiintesta/cstato(codice legacy). - La condizione
pco-sconto = 0 and pco-tipoanagr = spacessalta i conti senza sottoconto e senza tipo anagrafica (conti di livello mastro/conto puri). - Larghezza stampa: 132 colonne.