COGV07 -- Variazione Fatture/Note Accredito¶
Sorgente: cbl/cogv07.cbl | Tipo: Interattivo | Program-ID: COGV07
Menu:
- Vendite > Fatturazione > A Singolo Cliente > Modifica
Scopo¶
Programma interattivo per la modifica dei dati di testata di fatture e note di accredito gia' emesse. Consente di variare data (nell'intervallo tra fattura precedente e successiva), condizioni di pagamento, banca, esenzione IVA, riferimenti amministrativi e altri dati di testata. Gestisce anche il ricalcolo del riepilogo IVA e delle scadenze.
File e tabelle¶
| File/Tabella | Tipo | Modalita' | Descrizione |
|---|---|---|---|
| FEURTAB | Indexed | Input | Tabella nomi file |
| cogv07.select/.fd | Screen-managed | I-O | File gestiti dalla screen (COGTESFA, COGIVAFF, COGPNCON, COGPNMOV, COGSCADE, COGGEANA, COGTABEL, COGMERCI, ecc.) |
| TRAN-V60 | Indexed | I-O | File di transito per appoggio dati |
| LODTMDES | Indexed | Input | Descrizioni template |
| COGRAGFA | External Indexed | I-O | Raggruppamenti fatture |
| COGRIFBO | External Indexed | I-O | Riferimenti bolle |
| COGRRESI | External Indexed | I-O | Residui |
Programmi chiamati¶
| Programma | Scopo |
|---|---|
| WIN067 | Gestione finestra 067 |
| WIN023 | Gestione finestra 023 |
| COGE67 | Gestione riepilogo IVA |
| COGE69 | Gestione scadenze |
| COGU06 | Utility di formattazione importi |
| COGD74 | Gestione dati aggiuntivi |
| DIALOGS | Gestione dialoghi conferma |
| COGP41 | Stampa documento |
| COGB50 | Gestione bolle associate |
| COGS60W2 | Selezione da lista (combo) |
| COGV61S | Gestione righe documento |
| COGU21 | Utility data |
| COGF26 | Gestione contropartite |
| COGZDEW | Gestione DDE |
| COGUB1 | Utility business |
| RNEWCONF | Lettura configurazione |
| COGS87.COB | Calcolo totali documento |
| COGS65W | Ricerca anagrafica |
| COGU10 | Utility divisa/cambio |
| COGV07D | Gestione DDT collegati alla fattura (tasto F7) |
Copybook principali¶
cogv07.wrk,cogv07.select,cogv07.fd(screen-managed)k-u10.cpy,utils87.cpy,k-tipi-cogtabel.cpywstato.cpy,wgrave.cpy,wopenf.cpy,wnscr.cpy,cogazien.cpyutilncnf.cpy(configurazione RNEWCONF)
Struttura del programma¶
Flusso principale¶
- apri: inizializzazione, apertura file, lettura azienda e configurazione tramite
x99-confi. Il parametrowo-parametrodetermina il tipo: "M" per fatture, "N" per note di accredito. - a4: inizializzazione maschera, display form.
- a-tm-tipo: accept del tipo fattura con validazione su tabella tipi.
- a-tm-anno / a-tm-numero: accept anno e numero documento. Lettura testata fattura da COGTESFA.
- a-tm-data: accept della data con controllo intervallo (tra fattura precedente e successiva nello stesso registro).
- a-tm-pag-cnd: accept condizione di pagamento con validazione.
- a-tm-banca: accept riferimenti bancari.
- a-tm-esenzione: accept esenzione IVA.
- a-fine-intestazione: validazione complessiva, ricalcolo IVA e scadenze, rewrite della testata.
- fine / z-chiudi: chiusura file e uscita.
Variabili principali¶
| Variabile | Tipo | Descrizione |
|---|---|---|
| tm-fn | PIC X(01) | Tipo documento: "M" fattura, "N" nota accredito |
| tm-tipo | PIC X(02) | Tipo fattura (codice da tabella) |
| tm-anno | PIC 9(04) | Anno del documento |
| tm-numero | PIC 9(07) | Numero del documento |
| tm-cli | PIC 9(05) | Codice cliente |
| tm-data | PIC 9(08) | Data del documento (AAAAMMGG) |
| tm-pag-cnd | PIC X(01) | Condizione di pagamento |
| tm-banca | Group | Riferimenti bancari (codice, ABI, CAB) |
| tm-esenzione | Group | Codice e articolo esenzione IVA |
| w-data-min / w-data-max | PIC 9(08) | Intervallo date consentito |
| tab-mas-cfg | Group | Configurazioni da RNEWCONF |
Gestione DDT collegati (F7)¶
A partire dalla modifica del 04/08/2026 la maschera espone un pulsante custom "Gestione DDT (F7)" (bitmap 29, eccezione k-f7), abilitato dopo l'inserimento della chiave documento (in a-fine-dati-chiave) e disabilitato in fase iniziale.
Premendo F7, COGV07 richiama il sottoprogramma COGV07D passando l'area util-cogv07d (copybook utilcogv07d.cpy): program-id chiamante/chiamato, nome del file di transito tran-v60 (trs-v60-name), tipo/anno/numero della fattura in esame. Prima della CALL il file tran-v60 viene chiuso, e riaperto i-o al ritorno; il sottoprogramma viene poi rilasciato con cancel "COGV07D".
Se COGV07D restituisce cogv07d-fl-blocco = "S" (sono stati scollegati DDT e quindi il transito e' stato modificato), COGV07 imposta il flag interno w-fl-call-cogv07d = "S": in z-99-exception-form l'uscita con ESC viene inibita finche' l'elaborazione non e' portata a termine, con avviso all'operatore ("Richiamato programma di gestione DDT: uscita NON abilitata, terminare elaborazione").
Variabili di controllo introdotte: w-fl-call-cogv07d (X01) e w-visible-f7-gestione-ddt (9(01), abilitazione del pulsante); costante k-f7-gestione-ddt (value 2); copybook utilcogv07d.cpy aggiunto alla catena di COPY.
Documentazione tecnica -- 2026-04-29 (agg. 2026-08-05)