COGDA6 - Esportazione fatture clienti verso DYLOG¶

Intestazione¶

Campo	Valore
Programma	COGDA6
Titolo	Esportazione fatture clienti verso DYLOG
Modulo	Sistema
Posizione menu	Sistema > Utility > Esportazioni > Fatture clienti vs. DYLOG

Scopo e logica generale¶

COGDA6 esporta le fatture e note accredito clienti create in AREA verso il software contabile DYLOG, producendo un file di testo a tracciati multipli (record "001", "010", "070", "073", "076", "079") secondo il tracciato "DylogTracciatoRecordImportazioneRel.01.15.00".

L'operatore seleziona in maschera GUI un intervallo di fatture (Tipo fattura, Anno, Da numero, A numero); il programma scorre COGFATTU nell'intervallo e, per ogni documento cliente, scrive nel file DYLOG i vari tipi record contabili (testata, contropartita cliente, partite/scadenze, contropartite IVA e di vendita, righe IVA per aliquota). Il file viene poi copiato dal server al client via COPIAF.

Prima dell'elaborazione il programma legge da COGTABEL le contropartite CO/GE e C/C per spese e bolli, l'anno contabile (tipo 66) e le descrizioni dei tipi documento (tipo 68), costruisce da COGGENER (gnr-tip = "cp") la tabella dei raccordi HOST per i codici pagamento, e legge da RNEWCONF (gruppo FATTCARICA e expimp-txt) la configurazione contabile (sezionale IVA, causali contabili, conti di spese/bolli/incasso).

I codici "esterni" (HOST) di conti e clienti sono ricavati da COGPCRAC (raccordo piano conti, chiave secondaria cogpcrac.k02) e da COGANAP2 (aap2-raccordo); le aliquote IVA HOST da COGTABEL tipo "FX". Se un raccordo obbligatorio manca, l'elaborazione si interrompe con messaggio d'errore.

Flusso principale¶

apri (main): z-99-init-program, ctr-abil, open-files, rd-azi, u-tipidoc. Legge la configurazione con x99-conf (RNEWCONF) e inizializza util-ncnf.
Legge da COGTABEL le contropartite CO/GE spese/bolli (tipo 16) e C/C spese/bolli (tipo 18) in tab-conti; se mancano imposta fl-nogo = 'S'.
a3: legge l'anno contabile (COGTABEL tipo 66) in conta-rec; se assente fl-nogo = 'S'.
Prepara la maschera (x-carica-lingua, titolo "Estrazione fatture Clienti vs. DYLOG", rd-msk-pop, z-costruisci-controlli), popolando la combo dei tipi documento dai codici azienda (az-tipo-*) validati su COGTABEL tipo 68; se tipi-doc-per-causale = "S" estende i tipi scorrendo COGBABEL.
a4 ... a-tm-a-numero: accept dei campi Tipo/Anno/Da numero/A numero, con controlli x-controlla-*; F1 rilegge la configurazione, F3 conferma, ESC esce.
a222: chiede conferma; verifica che il tipo scelto sia tm-tip-fat o tm-tip-nac (causali configurate). Costruisce la tabella pagamenti da COGGENER (gnr-tip = "cp").
Apre in output il file fatture_manager.txt in ext-tmp-dir e scrive i record di testata "001" (intestazione tracciato) e "010" (dati ditta/partita IVA).
ela-00-end / ela-20: posiziona COGFATTU (st-cogfattu-notmin) su tipo/anno/numero di partenza e scorre con rdnxt-cogfattu fino al numero di arrivo. Per ogni fattura:
"070" (testata): data movimento, sezionale IVA, causale contabile (tm-cod-fat/tm-cod-nac), numero fattura, cliente. Ricava il codice HOST conto cliente da COGPNCON + COGPCRAC, il codice cliente HOST da COGANAP2 (aap2-raccordo), importo totale (fat-importo(40)), currency.
"073" (contropartita cliente): mastro/conto/sottoconto HOST, descrizione da COGGEANA (ana-nome), importo/segno.
"079" (partite): chiama COGS09 per calcolare scadenze/rate; per ogni rata scrive un record con raccordo pagamento HOST (da tab-pagamenti), data e importo.
"073" (contropartita IVA): conto IVA HOST da COGPCRAC su fat-mastro/conto/sconto (39), descrizione da COGPNCON.
"073" (contropartite di vendita): un record per ogni riga contabile fat-mastro(k).
"076" (righe IVA): per ogni aliquota, ricava il codice IVA HOST scorrendo COGTABEL tipo "FX" (match su euta-riv-iva/euta-riv-art); scrive imponibile e imposta.
ela-50: chiude il file. Trasferisce il file dal server al client con COPIAF (fileinfo + convert-path), mostra "Creato archivio: ...".
fine / z-chiudi: z-close-files, chiude window, z-99-exit-program, exit program.

File e tabelle acceduti¶

File	Record	Modalita'	Uso
feurtab	`cogfiles.cpy`	I-O (da `open-files`)	File fisico generalizzato tabelle
COGTABEL	`euta-rec`	lettura	Contropartite (tipo 16/18), anno contabile (66), tipi doc (68), IVA HOST (tipo "FX")
COGBABEL	`euba-rec`	lettura (scan)	Estensione tipi documento se `tipi-doc-per-causale = "S"`
COGFATTU	`fat-rec`	lettura (scan intervallo)	Fatture/note accredito da esportare
COGGEANA	`ana-rec`	lettura	Anagrafica cliente (nome, rif. mastro/conto)
COGPNCON	`pco-rec`	lettura	Descrizione conto piano conti
COGPCRAC	`pcr-rec`	lettura (chiave sec. `cogpcrac.k02`)	Raccordo conti HOST (`pcr-conto-ext`)
COGANAP2	`aap2-rec`	lettura	Raccordo cliente HOST (`aap2-raccordo`)
COGGENER	`gnr-rec`	lettura (scan `gnr-tip = "cp"`)	Raccordi HOST codici pagamento
fatture (`fatture-rec`)	tracciati record DYLOG	output (binary sequential)	File esportazione `fatture_manager.txt`

Verbi di accesso (da cogda6.prc): rd-cogtabel, st-cogtabel-notmin/rdnxt-cogtabel, st-cogbabel-notmin/rdnxt-cogbabel, st-cogfattu-notmin/rdnxt-cogfattu, rd-coggeana, rd-cogpncon, st-cogpcrac-notmin-chia2/rdnxt-cogpcrac, rd-coganap2, st-coggener-notmin/rdnxt-coggener.

Copybook principali¶

Strutture dati / FD: - feurtab.fd, cogfiles.cpy - file fisico generalizzato tabelle. - k-personal.cpy, k-tipi-cogtabel.cpy - costanti (tipi cogtabel, personalizzazioni). - cogconta.cpy, wtipidoc.cpy - area contabile e tipi documento. - utils52.cpy, utils60w2.cpy, utils09.cpy - aree linkage per le subroutine COGS52/COGS60W2/COGS09. - utilu10.cpy - area per l'editing importi (COGU10W). - utilncnf.cpy - area per RNEWCONF. - l-copiaf.cpy (working) / u-copiaf.cpy (linkage) - area per COPIAF. - wgrave.cpy, wnscr.cpy, wopenf.cpy, wstato.cpy - working-storage standard.

Screen Designer (in cbl/screens/): cogda6.select, cogda6.fd, cogda6.wrk, cogda6.decla, cogda6.prc, cogda6-01.scr - artefatti generati; il .wrk contiene le variabili di maschera/messaggio, il .prc i verbi di accesso ai file.

Linkage: wcont.cpy (stringhe), u-copiaf.cpy (con overlay w-user-area), wcont1.cpy.

Routine finali: grave.cpy, mmmask.cpy, opengen.cpy, stato.cpy, stato1.cpy, winmsg.cpy, utipidoc.cpy, cogpcrac.k02.

Programmi chiamati (CALL)¶

Programma	Scopo
RNEWCONF	Lettura configurazione contabile (gruppi `FATTCARICA`, `contabil`, `expimp-txt`)
COGS09	Calcolo scadenze/rate del pagamento (per i record "079")
COGS60W2	Gestione combo tipi documento nella maschera
COGU10W	Editing/formattazione importi
COPIAF	Copia del file esportazione dal server al client (`fileinfo`, `convert-path`)

Nota: COGS52 (accept data) e' incluso tramite utils52.cpy; nel corpo letto le subroutine effettivamente chiamate sono COGS09, COGS60W2, COGU10W, RNEWCONF, COPIAF.

Note¶

Programma di esportazione a tracciato DYLOG multi-record ("001"/"010"/"070"/"073"/"076"/"079") con separatori CR/LF (rek01-cr/rek01-lf).
Nel flusso Sistema - Import/Export e' censito come "Fatture clienti vs DYLOG: riconciliazione complessa".
Prerequisiti dati critici: mancata configurazione (contropartite, sezionale IVA, causali) o mancanza di un raccordo HOST (conto, cliente, pagamento, aliquota IVA) interrompono l'elaborazione con messaggio; l'export e' quindi tutto-o-niente sui raccordi obbligatori.
Ampie porzioni di codice relative al tipo documento "N" (note) sono commentate: il programma tratta i tipi in modo unificato via la combo caricata da COGTABEL tipo 68.
Configurazioni RNEWCONF lette: gruppo FATTCARICA (conti spese/bolli/incasso), contabil (tipi-doc-per-causale), expimp-txt (sezionale-iva, causale-cont).

Documentazione tecnica -- creata 2026-08-06