COGE20 — Accertamento Fatture Fornitori¶

Sorgente: cbl/coge20.cbl | Program-ID: COGE20 | Tipo: Programma di gestione interattivo multi-pagina

Menu: Contabilita' > Fatture Fornitori > Accertamento

Scopo¶

Gestisce l'accertamento delle fatture fornitori: confronto tra bolle di entrata e fattura, registrazione in prima nota, IVA, scadenze e centri di costo. Programma complesso con piu' griglie e pagine.

Struttura della maschera¶

Il programma usa Screen Designer con screen section (coge20-01.scr) e un layout multi-pagina:

Pagina 1 — Selezione fornitore e bolle¶

Griglia di selezione bolle (grid-record-sel) con colonne:

Colonna	Variabile	Descrizione
Fornitore	`grs-for-figlio`	Codice fornitore figlio
Descrizione	`grs-for-figlio-des`	Ragione sociale
Bolla entrata	`grs-be`	Riferimento bolla
Data bolla	`grs-data-be`	Data del documento
Doc. fornitore	`grs-doc-for`	Numero fattura fornitore
Data fornitore	`grs-data-for`	Data fattura fornitore
Ordine	`grs-ordine`	Riferimento ordine
Data valuta	`grs-data-val`	Data di valuta
Selezione	`grs-selezione`	Flag selezione

Pagina 2 — Dettaglio righe¶

Griglia righe (grid-record-righe):

Colonna	Variabile	Descrizione
Merce	`grr-merce`	Codice articolo (gru+sot+cod)
UM	`grr-um`	Unita' di misura
Qta'	`grr-qta`	Quantita'
Prezzo	`grr-pre`	Prezzo unitario
Imp. bolla	`grr-imp-bol`	Importo bolla
Imp. fattura	`grr-imp-fat`	Importo fattura
Imp. trasporto	`grr-imp-tr`	Quota trasporto
Differenza	`grr-diff`	Differenza bolla/fattura
Accertamento	`grr-accerto`	Stato accertamento

Pagina IVA¶

Griglia IVA (grid-record-iva): fino a 5 aliquote con imponibile, IVA, differenza, articolo esenzione, percentuale non detraibile.

Pagina scadenze¶

Griglia scadenze (grid-record-scad): fino a 36 rate con data e importo.

Campi testata principali¶

Campo	Variabile	Descrizione
Fornitore	`tm-for`	Codice fornitore (9(05))
Divisa	`tm-divisa`	Divisa fattura (x(02))
Data fattura	`tm-data`	Data fattura (9(08))
Data economica	`tm-data-econ`	Data competenza economica
Data fornitore	`tm-data-for`	Data documento fornitore
Nr. fattura	`tm-fat-num`	Numero fattura (9(06))
Fattura fornitore	`tm-fat-for`	Numero fattura fornitore (x(20))
Tipo documento	`tm-tip-doc`	Tipo documento IVA (x(02))
Registro IVA	`tm-reg-iva`	Registro IVA (x(02))
Condiz. pagamento	`tm-pag-1`	Codice pagamento (9(02))
Raggr. bolle	`tm-raggr`	Raggruppamento (x(01))
Esercizio prec.	`tm-fl-ese-pre`	Flag esercizio precedente
Beni/servizi	`tm-beni-servizi`	Classificazione INTRA (x(01))
Segno contrp.	`tm-segno-contr`	Segno contropartita (x(01))
Fatt. da ricevere	`tm-fatt-da-ricev`	Flag fattura da ricevere
Nr. prot. IVA	`tm-num-prot-iva`	Protocollo IVA (9(06))

Logica di elaborazione¶

Flusso principale¶

a000: init, apertura file, lettura config (COGTABEL tipo 66), configurazione CNF, creazione file temporanei
a4: inizializzazione maschera, accept fornitore
Selezione fornitore → caricamento bolle di entrata via a7-carica-bolle
Compilazione dati fattura (numero, data, divisa, pagamento)
Accertamento righe: confronto importi bolla vs fattura
Gestione IVA: aliquote, imponibili, differenze
Gestione scadenze di pagamento
Conferma → registrazione prima nota, protocollo IVA, partite aperte

Caricamento bolle (`a7-carica-bolle`)¶

Legge le bolle di entrata dal file COGRAGFF filtrate per fornitore e divisa. Le bolle vengono caricate nella tabella tm-bolle (max 2.000 elementi) e visualizzate nella griglia di selezione.

Accertamento righe¶

Per ogni riga delle bolle selezionate: - Carica i dati dalla tabella righe (tm-ele-righe, max 8.000 righe) - Confronta prezzo bolla (tm-a-pre-lor) con prezzo fattura - Calcola differenze (tm-diff-riga) - L'accertamento puo' essere automatico (configurazione tm-cfg-proporre-acc) o manuale

Gestione IVA¶

Fino a 5 aliquote (tm-ele-iva)
Supporto IVA non detraibile con percentuale configurabile
Gestione INTRA: IVA non detraibile come costo
Differenza IVA (tm-diff-iva): scostamento tra IVA calcolata e IVA indicata

Gestione scadenze¶

Rate calcolate dalla condizione di pagamento (tm-pag-1)
Max 36 scadenze
Possibilita' di gestione manuale (tm-fl-rate-man)

Gestione fatture da ricevere (TASK 290124)¶

Se configurata (tm-cfg-gest-auto-fatt-da-ricevere = "S"): - Controlla se la data fattura ricade nel periodo di gestione fatture da ricevere - Calcola la data massima basandosi su tm-cfg-fatt-da-ricev-nr-giorni - Utilizza il conto configurato (tm-cfg-cto-fatture-da-ricevere)

Ritenute d'acconto¶

Sezione dedicata (tm-pagina-rit) per: - IRPEF - Ritenuta previdenziale - Ritenuta SSN - Spese - Gestione separata contributo socio/collaboratore

File utilizzati¶

File	Accesso	Scopo
FEURTAB	Lettura	Tabella nomi file
COGRAGFF	I-O	Bolle di entrata / raggruppamento fatture fornitore
COGRAGF2	I-O	File temporaneo per confronto condizioni (ABI/CAB/prezzo/pag)
COGTRANS	I-O	File temporaneo per elaborazione (in `ext-tmp-dir`)
+ file da `coge20.select`/`coge20.fd`	Vari	COGPNONC, COGTABEL, COGGEANA, COGPNCON, COGFATTU, ecc.

File temporanei¶

$$trans$.arc: COGRAGFF temporaneo (in ext-tmp-dir)
#$coge20.arc: COGRAGF2 temporaneo (in ext-tmp-dir)

Programmi chiamati¶

Da coge20.wrk e sorgente, include almeno:

Programma	Scopo
COGU10W	Formattazione importi con divisa
COGU03W	Ricerca banche/sportelli
COGS52W	Gestione date (calendario)
COGS54	Gestione stampa/spooler
COGS65W	Ricerca anagrafica (clienti/fornitori)
COGS68W	Gestione merci/articoli
GRIDADMN	Gestione griglia evoluta
COGUB9	Interfaccia fatture elettroniche
WIN157	Selezione esercizio contabile

Copybook principali¶

coge20.select, coge20.fd, coge20.wrk, coge20.decla, coge20-01.scr, cogfiles.cpy, cogragff.cpy, cogconta.cpy, cogazien.cpy, wcont.cpy, wcont1.cpy, utilncnf.cpy

Configurazione CNF¶

Struttura tm-cfg con i seguenti parametri:

Campo	Descrizione
`tm-cfg-cc-trasp`	Centro di costo per trasporti
`tm-cfg-cc-spese`	Centro di costo per spese
`tm-cfg-cc-bolli`	Centro di costo per bolli
`tm-cfg-proponi-aliq`	Proponi aliquota IVA
`tm-cfg-prima-aliq`	Prima aliquota predefinita
`tm-cfg-aliq-nd`	Aliquota non detraibile
`tm-cfg-perc-nd`	Percentuale non detraibilita'
`tm-cfg-modifica-cp`	Consenti modifica contropartita
`tm-cfg-proporre-acc`	Proponi accertamento automatico
`tm-cfg-ges-cau-mag`	Gestione causale magazzino
`tm-cfg-agg-lfo`	Aggiornamento listino fornitore
`tm-cfg-gest-auto-fatt-da-ricevere`	Gestione automatica fatture da ricevere
`tm-cfg-cto-fatture-da-ricevere`	Conto fatture da ricevere (mas/con/sot)
`tm-cfg-rep-age`	Reparto agente
`tm-cfg-rit-cod`	Codice ritenuta

Note¶

Programma molto esteso (~6.500+ righe), uno dei piu' complessi del gestionale.
Supporta chiamata diretta da COGUB6 (fatture elettroniche) con parametri preimpostati (w-dc-called-fte).
Le tabelle interne hanno dimensioni elevate: 2.000 bolle, 8.000 righe dettaglio, 60 documenti variati.
I file COGRAGFF e COGRAGF2 sono file temporanei creati in ext-tmp-dir.
Gestione multi-divisa con conversione automatica via COGU10W.
La sezione ritenute d'acconto (tm-pagina-rit) e' stata aggiunta con TASK 090322.
La gestione fatture da ricevere e' stata aggiunta con TASK 290124.