COGY65 - Tabella Rating Affidabilita'¶
Sorgente: cbl/cogy65.cbl | Program-ID: COGY65 | Tipo: gestione tabella a griglia
Menu: Contabilita' > Archivi & Tabelle > Varie > Rating affidabilita
Scopo¶
COGY65 gestisce la tabella dei codici di rating di affidabilita' di clienti e fornitori, memorizzati in COGTABEL con tipo "FO". La funzione permette di aggiungere, modificare e cancellare voci (coppia codice + descrizione) tramite una griglia a editing diretto. Puo' essere richiamata in modalita' chiamata (w-dc-called = "S") da altri programmi che necessitano di selezionare un codice rating, restituendo il valore scelto tramite la linkage utilcogy65.cpy.
File e tabelle¶
| File/Tabella | Copybook | Modalita' | Uso |
|---|---|---|---|
| COGTABEL | cogtabel.fd, cogtabel.k01 |
I/O (lettura, scrittura, cancellazione) | Voci rating affidabilita' (tipo "FO") |
| FEURTAB | feurtab.fd, cogfiles.cpy |
Utility | File di sistema per gestione maschere |
Programmi chiamati¶
| Programma | Scopo |
|---|---|
| GRIDADMN | Gestore tabella generato; prepara e gestisce la griglia |
Copybook principali¶
Screen Designer / maschera:
- cogy65.select, cogy65.fd, cogy65.wrk, cogy65.prc, cogy65.decla, cogy65-01.scr
Gestionale - tabelle:
- cogtabel.fd, cogtabel.k01
- cogfiles.cpy, feurtab.fd
Linkage / interfaccia:
- wcont.cpy, wcont1.cpy, utilcogy65.cpy
Utility / infrastruttura:
- wgrave.cpy, wnscr.cpy, wopenf.cpy, wstato.cpy, cogazien.cpy
- wgrid.cpy, utilgdad.cpy
- grave.cpy, mmmask.cpy, opengen.cpy, stato.cpy, stato1.cpy, winmsg.cpy
Logica di elaborazione¶
Avvio (apri): inizializzazione standard, rilevamento modalita' chiamata, impostazione tasti funzione (Invio, F3-aggiorna o F3-selezione/modifica, SF4-griglia, Ctrl+A aggiungi, Ctrl+E elimina).
Caricamento griglia (a4 / a10-loop): posizionamento su COGTABEL con euta-tipo-x = "FO" e scansione sequenziale; le voci vengono caricate in tm-grid-dati-ele fino al massimo di 500 elementi. Ciascuna riga memorizza codice (tm-cod) e descrizione (tm-des).
Gestione griglia (a-grid / a-accept-grid): in modalita' Aggiornamento (a-modalita = "A") l'operatore puo' modificare direttamente le celle; Ctrl+A aggiunge una riga vuota, Ctrl+E la azzera e richiede conferma prima della cancellazione definitiva al salvataggio. In modalita' Selezione (a-modalita = "S") le celle sono protette e Invio restituisce il codice selezionato al chiamante tramite cogy65-out-cod / cogy65-out-des.
Salvataggio (b-aggiorna): al momento del salvataggio (F3 in modalita' Aggiornamento), tutte le righe esistenti con tipo "FO" vengono cancellate sequenzialmente e poi riscritte per intero dalla griglia corrente, evitando gestione puntuale degli aggiornamenti.
Uscita (fine / z-chiudi): chiusura file e finestra, exit program.
Note¶
- Il tipo COGTABEL utilizzato e'
"FO"(hardcoded nel sorgente). - Il salvataggio e' di tipo "delete-all + rewrite": tutti i record vengono prima eliminati e poi riscritti, per semplicita' gestionale.
- Massimo 500 righe gestibili dalla griglia (
k-max-ele-tab). - La convalida della descrizione richiede che non sia vuota se il codice e' presente.
Documentazione tecnica generata -- 2026-07-15