COGG73 -- Agg. da Lis.Generali e Costi Agg.¶

Sorgente: cbl/cogg73.cbl | Tipo: Programma elaborazione con griglia | Program-ID: COGG73

Menu: - Magazzino > Controllo Prezzi > Agg. da Lis.Generali e Costi Agg.

Scopo¶

Aggiornamento listini vendita da prezzi acquisto fornitore con applicazione sconti, costi aggiuntivi (trasporto/facchinaggio) e ricarichi per listino. Estrae articoli per range merce o fornitore, mostra in griglia il calcolo e, dopo conferma, aggiorna i listini.

File e tabelle¶

File/Tabella	Tipo	Modalita'	Descrizione
COGMERCI	Indicizzato	I-O	Anagrafica merci (lettura prezzi, aggiornamento listini)
COGTABEL	Indicizzato	Input	Tabelle generiche (causali, sconti)
COGLIFAR	Indicizzato	Input	Listini fornitore articolo
COGLIFOR	Indicizzato	Input	Listini fornitore
FEURTAB	Indicizzato	I-O	File configurazioni generali

Programmi chiamati¶

Programma	Scopo
GRIDADMN	Gestione griglia
COGS0C	Gestione sconti gruppo
COGU05	Selezione estrattore
COGU16	Utilita' intervallo merci
COGU28	Utilita' generiche
RNEWCONF	Lettura configurazioni

Copybook principali¶

cogg73.select, cogg73.fd, cogg73.wrk, cogg73.prc -- screen-generated
utilgdad.cpy -- interfaccia GRIDADMN
wgrid.cpy -- gestione griglia
utilcogs0c.cpy -- interfaccia sconti
utils52.cpy, utils65.cpy, utils68.cpy -- subroutine screen
utilu05.cpy, utilu10.cpy, utilu16.cpy, utilu20.cpy, utilu28.cpy -- utilita' varie
utilncnf.cpy -- interfaccia RNEWCONF
cogazien.cpy -- dati azienda

Struttura del programma¶

Flusso principale¶

apri: inizializzazione, apertura file, lettura configurazioni, preparazione griglia con fino a 10 listini
a4: inizializzazione parametri (tipo estrazione, ordinamento, intervallo, data)
Richiesta parametri: tipo estrazione, ordinamento, da-merce, a-merce, fornitore, data
a-richiesta-conferma: validazione e conferma
Estrazione articoli con calcolo prezzi e caricamento in griglia (tm-tab)
a-grid / a-accept-grid: visualizzazione griglia e possibilita' di modifica ricarichi
b-aggiorna: aggiornamento listini su COGMERCI

Struttura griglia¶

Il grid-record contiene per ogni articolo: - Merce, UM fornitore, UM gestionale - Prezzo acquisto listino, 3 livelli di sconto, costo netto - Costi trasporto e facchinaggio con relativi importi calcolati - Rapporto conversione UM - Costo totale - Per ciascuno dei k-num-listini (10) listini: ricarico % e prezzo vendita calcolato

Logica di calcolo¶

Lettura prezzo acquisto da listino fornitore (COGLIFAR/COGLIFOR)
Applicazione sconti (fino a 3 livelli, anche per gruppo merceologico via tab-gruppi-sconto)
Calcolo costo netto = prezzo acquisto - sconti
Aggiunta costi trasporto e facchinaggio
Applicazione rapporto conversione UM
Per ogni listino: prezzo vendita = costo totale * (1 + ricarico / 100)

Configurazioni¶

Lettura tramite RNEWCONF per colore modifiche e altri parametri.

Documentazione tecnica -- 2026-04-29