COGD94 -- Memoria Addebiti per Cliente¶

Sorgente: cbl/cogd94.cbl | Tipo: Programma standalone | Program-ID: COGD94

Menu: - Contabilita' > Archivi & Tabelle > Varie > Memoria addebiti

Scopo¶

Gestione degli addebiti per cliente. Consente di memorizzare voci di tipo "prestazione" con importo e descrizione aggiuntiva su una struttura di buono di prelievo (BdP) identificato con un flag apposito. Questo BdP potra' essere incluso automaticamente durante l'evasione fatture (COGM88) e successivamente chiuso.

Interfaccia utente¶

Maschera¶

Campo	Descrizione
tm-ana-tip	Tipo anagrafica (C/F)
tm-ana-cod	Codice anagrafico
tm-nome	Denominazione
tm-bdp	Riferimento BdP (mag/anno/numero/mese/giorno)
tm-currency	Divisa

Griglia¶

Colonna	Descrizione
Merce	Codice merce (gru/sot/cod)
Importo	Importo dell'addebito
Note	Descrizione aggiuntiva (max 200 caratteri)

Tasti funzione¶

Tasto	Funzione
Invio	Modifica riga
F3	Conferma/Aggiorna
F8	Aiuto / Calendario
Shift+F4	Gestione griglia
Ctrl+A	Aggiungi riga
Ctrl+E	Elimina riga

File e Tabelle¶

File/Tabella	Copybook	Uso
FEURTAB	cogfiles.cpy	Archivio file di sistema

I file specifici sono gestiti tramite cogd94.select e cogd94.fd. Il programma lavora sulle tabelle COGTESBP (testata buono prelievo), COGRIGBP (righe buono prelievo), COGDESOR (descrizioni aggiuntive), COGMERCI (anagrafica merci).

Programmi chiamati¶

Programma	Scopo
COGS65W	Ricerca anagrafica
COGS52W	Gestione campo data
COGS68W	Gestione campo merce
COGS25	Numeratore documenti
GRIDADMN	Amministrazione griglia

Copybook principali¶

cogd94.wrk, cogd94.select, cogd94.fd, cogd94.prc
wstato.cpy, wgrave.cpy, wgrid.cpy, wopenf.cpy, wnscr.cpy
cogazien.cpy, utilgdad.cpy
utils25.cpy, utils52.cpy, utils65.cpy, utils68.cpy
utilu10.cpy, utilu20.cpy
wrk-u10.cpy, k-u10.cpy
utild94.cpy -- area di interscambio per chiamata esterna

Logica di Elaborazione¶

Ricerca BdP esistente¶

La funzione cerca un BdP di addebito aperto (tbp-fl-addeb = "S" e tbp-fl-cls = "A") per il cliente indicato. Se lo trova lo usa, altrimenti ne crea uno nuovo.

Creazione BdP (a21-crea-bdp)¶

Genera una testata buono di prelievo con: - Magazzino principale (az-main-mag) - Anno corrente, numero da COGS25 (codice numeratore 11) - Flag tbp-fl-addeb = "S" e tbp-fl-cls = "A" (aperto)

Aggiornamento righe (a2-aggiorna)¶

Cancella tutte le righe esistenti del BdP, comprese le descrizioni aggiuntive (COGDESOR tipo "BP")
Per ogni riga della griglia con merce valida:
Scrive la riga buono prelievo (COGRIGBP) con merce, importo, quantita' 1
Inserisce le descrizioni aggiuntive spezzando il campo note (max 200 char) in blocchi di 40 caratteri su COGDESOR

Chiamata esterna¶

Il programma supporta la chiamata con d94-called = "COGD94-CALLED", ricevendo tipo e codice anagrafico tramite utild94.cpy.

Configurazioni¶

Nessuna configurazione RNEWCONF dedicata.

Documentazione tecnica generata -- 2026-04-19