COGE89 — Stampa (Allegati Cli/For)¶

Sorgente: cbl/coge89.cbl | Program-ID: COGE89 | Tipo: Programma di stampa

Menu: Contabilita' > Allegati Cli/For > Stampa

Scopo¶

Stampa gli allegati IVA clienti, fornitori o soci a partire dall'archivio di transito FALLECF generato da COGE88. Produce un elenco dettagliato per soggetto con imponibile, IVA, operazioni esenti, non imponibili e totale, con intestazione per ogni soggetto e totalizzazioni progressive.

Logica di elaborazione¶

Flusso principale¶

Richiesta parametri: l'operatore seleziona il tipo elenco (C = Clienti, F = Fornitori, S = Soci) e puo' eseguire una prova di posizionamento foglio
Apertura archivio: apre in lettura il file FALLECF (FALLECF.ARC nella directory archivi), precedentemente creato da COGE88
Scansione sequenziale: legge FALLECF filtrando per tipo (al1-tipocf = rispclie)
Record intestazione (codice = 0): stampa i dati anagrafici del dichiarante (persona fisica o societa') con intestazione pagina
Record dettaglio (codice > 0): per ogni soggetto stampa nome, indirizzo, P.IVA, numero fatture, imponibile, IVA, esenti, non imponibili e totale
Arrotondamento Lire: se la divisa e' Lira ("L "), gli importi vengono arrotondati alle 100 lire
Bolle doganali: i record con al1-bdog = "BG" vengono totalizzati a parte nel contatore dogana e non stampati come righe dettaglio

Differenze clienti/fornitori¶

Fornitori e Soci: stampa con righe rd1/rd2/rd3 (3 righe per soggetto), con dettaglio attivo e passivo separato
Clienti: stampa con righe rd1/rd6/rd7 (3 righe per soggetto), con esenti e non imponibili accorpati

Totalizzazioni¶

Riporti: totali parziali per pagina
Totali: totali generali dell'elenco, stampati alla fine tramite rout-totali
Dogana: totali bolle doganali stampati separatamente

File utilizzati¶

File	Accesso	Scopo
FALLECF (COGALLE1)	Input	Archivio transito allegati (creato da COGE88)
COGTABEL	Input	Tabelle di sistema
FLSTA	Output	File spool stampa

Programmi chiamati¶

Programma	Scopo
COGU10	Formattazione importi con divisa
COGS54	Gestione stampa/spooler

Copybook principali¶

cogfiles.cpy, cogtabel.cpy, cogalle1.cpy, cogalle0.cpy, cogazien.cpy, utils54.cpy, utilu10.cpy, k-u10.cpy

Note¶

Prerequisito: il file FALLECF deve essere stato creato da COGE88 prima di eseguire la stampa.
Il programma e' di vecchia generazione (interfaccia a maschere LINE/COL, non screen section).
La prova di posizionamento foglio stampa una "X" sulla prima riga per verificare l'allineamento della stampante.
La larghezza di stampa e' 136 caratteri.