COGY69 -- Destinazione IVA¶

Sorgente: cbl/cogy69.cbl | Tipo: Interattivo (gestione tabella con griglia) | Program-ID: COGY69

Menu:

Contabilita' > Archivi & Tabelle > Tabelle > Parametri Iva > Destinazione IVA

Scopo¶

Gestione della tabella delle destinazioni IVA. Presenta una griglia con l'elenco delle destinazioni (record COGTABEL con euta-tipo-x = "FQ"), permettendo inserimento, modifica e cancellazione. Puo' essere richiamato in modalita' "Selezione" da altri programmi tramite la copybook utilcogy69.cpy.

File e tabelle¶

File/Tabella	Tipo	Modalita'	Descrizione
FEURTAB (COGTABEL)	Indicizzato	I-O	Tabella generica: tipo "FQ" = destinazioni IVA

Programmi chiamati¶

Programma	Scopo
GRIDADMN	Gestione avanzata griglia (preparazione, personalizzazione colonne)

Copybook principali¶

cogy69.wrk, .select, .fd, .prc, .decla, cogy69-01.scr -- Definizioni Screens
cogfiles.cpy -- Definizione record COGTABEL (euta-*)
utilcogy69.cpy -- Parametri linkage per chiamata esterna (cogy69-called, cogy69-caller, cogy69-out-cod, cogy69-out-des)
wgrid.cpy -- Variabili gestione griglia
utilgdad.cpy -- Utility per GRIDADMN
wstato.cpy, wgrave.cpy, wopenf.cpy, wnscr.cpy -- Variabili standard
cogazien.cpy -- Dati azienda corrente
wcont.cpy, wcont1.cpy -- Struttura linkage standard

Struttura del programma¶

Flusso principale¶

apri: inizializzazione, apertura file, lettura azienda. Se richiamato come called (cogy69-called = k-program-id), imposta modalita' "S" (Selezione), altrimenti "A" (Aggiornamento).
a4: reset griglia e maschera.
a10-loop: caricamento destinazioni IVA da COGTABEL (euta-tipo-x = "FQ"). Per ogni record carica codice (euta-cod) e descrizione (euta-fe-des) nella griglia. Massimo 500 elementi.
a30: costruzione griglia e attivazione tasti funzione.
a-grid / a-accept-grid: ciclo griglia:
Invio in Selezione: restituisce cogy69-out-cod e cogy69-out-des
F3 in Aggiornamento: salva e chiude (o torna in Selezione se called)
F3 in Selezione: passa ad Aggiornamento
Ctrl+A: aggiunta riga
Ctrl+E: cancellazione riga con conferma (c1-ctrl-canc)
Shift+F4: GRIDADMN

Salvataggio (b-aggiorna)¶

Cancella tutti i record COGTABEL con euta-tipo-x = "FQ" esistenti
Riscrive tutti gli elementi della griglia con wr-cogtabel

Validazione¶

x-controlla-tm-cod: controllo codice (attualmente senza vincoli particolari)
x-controlla-tm-des: la descrizione e' obbligatoria se il codice e' compilato

Variabili principali¶

Variabile	Tipo	Descrizione
tab-maschera	01	Struttura griglia (tm-filler)
tm-grid-dati-ele (i)	Riga griglia	tm-cod, tm-cod-prec, tm-des
a-modalita	77	"S" = Selezione, "A" = Aggiornamento
a-operazione	77	"I" = Inserimento, "M" = Modifica
k-max-ele-tab	78	500 (max elementi griglia)

Documentazione tecnica -- 2026-04-28