COGY61 -- Storno ricavi da C/fat. da emettere¶
Sorgente: cbl/cogy61.cbl | Program-ID: COGY61 | Tipo: Elaborazione interattiva / Generazione P.N.
Menu: Contabilita' > Bilancio > Utility > Storno ricavi da C/fat.da emettere
Scopo¶
Funzione complementare a COGY60. Analizza i buoni di consegna (COGTESBO) in un intervallo date per individuare quelli che risultano ora fatturati nell'anno corrente e che erano stati rilevati come "fatture da emettere". Genera movimenti di prima nota di storno (segno opposto a COGY60) per annullare la rilevazione precedente. La struttura del programma e' molto simile a COGY60, con differenze nella logica di selezione dei buoni e nel segno dei movimenti generati.
File e tabelle¶
| File/Tabella | Tipo | Modalita' | Descrizione |
|---|---|---|---|
| FEURTAB (COGTABEL) | Indicizzato | Input | Tabella generica (tipo 15: causali, tipo 16: conti COGE) |
| COGTESBO | Indicizzato | Input | Testata buoni di consegna (tes-*) |
| COGMOMAG | Indicizzato | Input | Righe movimenti magazzino (mag-*) |
| COGRACCO | Indicizzato | Input | Raccordi fatture (rac-*) |
| COGRACBB | Indicizzato | Input | Raccordi bolle (rbb-*) |
| LODPRESC | Indicizzato | Input | Prescrizioni/prestazioni (lpm-*) |
| COGPNONC | Indicizzato | I-O | Prima nota non contabilizzata (scrittura storno) |
| COGSLPCO | Indicizzato | Input | Saldi piano dei conti |
| COGPNCON | Indicizzato | Input | Piano dei conti |
| COGGEANA | Indicizzato | Input | Anagrafica generale |
| COGTRANS | Indicizzato | I-O | File transito partite (#$cogy61.{oper}) |
| COGTRANS2 | Indicizzato | I-O | File transito contropartite (#$cogy61-2.{oper}) |
| COGTRANS3 | Indicizzato | I-O | File transito totali (#$cogy61-3.{oper}) |
| COGTRANS4 | Indicizzato | I-O | File transito documenti (#$cogy61-4.{oper}) |
| FILEASC2 | Sequenziale | Output | File CSV esportazione Excel |
| FILELOG | Sequenziale | Output | Log operazioni |
| FLSTA | Sequenziale | Output | File di stampa |
| T-DETTAGLIO | Indicizzato | I-O | File transito prestazioni (#$cogy61_prestazioni.{oper}) |
Programmi chiamati¶
| Programma | Scopo |
|---|---|
| COGS54 | Gestione stampa |
| COGS52W | Gestione date con calendario |
| COGS25 | Numeratori progressivi |
| COGU10W | Conversione importi/divisa |
| COGU01 | Utility anagrafiche |
| COGU02 | Utility conti |
| RNEWCONF | Configurazione |
| GRIDTOXS | Apertura file Excel |
| COGS95 | Gestione check-box |
Copybook principali¶
| Copybook | Descrizione |
|---|---|
cogy61.wrk, .select, .fd, .decla, cogy61-01.scr |
Definizioni Screens |
cogfiles.cpy |
Record COGTABEL (euta-*) |
cogconta.cpy |
Struttura contabilita' (conta-*) |
cogzs5-t-dettaglio.fd, .cpy |
File transito dettaglio prestazioni |
flsta.fd, flsta.cpy |
File di stampa |
utilncnf.cpy |
Utility RNEWCONF |
utilp41.cpy, utils25.cpy, utils52.cpy, utils54.cpy |
Utility varie |
utilu01.cpy, utilu02.cpy, utilu10.cpy |
Utility anagrafiche/importi |
utilz61.cpy |
Linkage specifico |
utilzs1.cpy |
Utility commesse |
Struttura del programma¶
Parametri maschera¶
| Variabile | Campo | Descrizione |
|---|---|---|
| tm-divisa | Divisa | Codice divisa |
| tm-da-data | Da data | Data inizio analisi (AAAAMMGG) |
| tm-a-data | A data | Data fine analisi |
| tm-data-reg | Data reg. | Data registrazione storno P.N. |
| tm-prova | Prova | S = solo conteggio |
| tm-excel | Excel | S = genera CSV |
| tm-cli | Cliente | Filtro opzionale |
Configurazione RNEWCONF¶
Stessa configurazione di COGY60:
| Variabile | Descrizione |
|---|---|
| tm-cfg-fat-emettere | Sottoconto "Fatture da emettere" |
| tm-cfg-to | Tipo operazione per i movimenti P.N. |
| tm-cfg-tipo-mag | Tipo magazzino da escludere |
Flusso principale¶
Il flusso ricalca COGY60 con le seguenti differenze chiave:
- Selezione buoni (
ricerca-acconti-10): - Stessi filtri causale (tipo 15, uscita a cliente, con-fat = SI).
- Logica di fatturazione invertita: seleziona i buoni che risultano fatturati con tipo magazzino
tm-cfg-tipo-mag(li salta) oppure fatturati in anni precedenti all'anno corrente (li salta). In COGY60 la logica e' opposta. -
Non ha i campi
tm-fatturati/tm-non-fatturati(presenti in COGY60). -
Generazione storno (
aggiorna/agg-pno): -
Genera movimenti P.N. con segno opposto a COGY60: il conto ricavo viene addebitato (DARE) e il conto "Fatture da emettere" viene accreditato (AVERE).
-
Controlli comuni:
- Soglia minima 4: stessa logica di COGY60.
- Esclusione prestazioni con ora-cns 15/45: stessa logica.
Differenze rispetto a COGY60¶
| Aspetto | COGY60 (Conteggio) | COGY61 (Storno) |
|---|---|---|
| Scopo | Rileva ricavi non fatturati | Storna rilevazioni precedenti |
| Selezione buoni | Buoni NON fatturati o fatturati in esercizi successivi | Buoni fatturati nell'anno corrente |
| Segno P.N. conto ricavo | AVERE | DARE |
| Segno P.N. fatture da emettere | DARE | AVERE |
| Filtri fatturati/non fatt. | Presenti (tm-fatturati, tm-non-fatturati) | Non presenti |
Note¶
- I file transito (#$cogy61.*) sono separati per operatore.
- Il programma e' strutturalmente quasi identico a COGY60: stesse copybook, stessi programmi chiamati, stessa struttura dati transito.
- Il separatore CSV e' il carattere TAB (x'09').
Documentazione tecnica -- 2026-04-28