COGV43 -- Visualizzazione movimenti per merce¶

Sorgente: cbl/cogv43.cbl | Tipo: Programma con interfaccia grafica (griglia interattiva paginata) | Program-ID: COGV43

Menu: Magazzino > Visualizzazioni > Movimenti x Merce

Scopo¶

Visualizza lo storico dei movimenti di magazzino per un singolo articolo. Per ogni movimento mostra data, documento, causale, soggetto (cliente/fornitore), quantita', prezzo, valore e numerosi altri campi di dettaglio. Supporta filtri per periodo, magazzino, causale, tipo movimento (entrata/uscita), tipo soggetto (C/F), fattura, brand, commessa e gruppo aziende.

Puo' funzionare sia in modalita' autonoma sia come programma richiamato (CALLED) per la consultazione rapida dei movimenti di un articolo.

Interfaccia utente¶

Modalita' di funzionamento¶

Modalita'	Condizione	Comportamento
Autonomo	Chiamata diretta da menu	Filtri liberi, navigazione completa
CALLED	`v43-called = "COGV43-CALLED"`	Precompila merce, magazzino, clifor, cli, date

Maschera di filtro (tab-maschera)¶

Campo	Tipo	Descrizione
`tm-mer`	x(09)	Codice merce (gru+sot+cod)
`tm-mer-des`	x(40)	Descrizione merce
`tm-mer-lotti`	x(01)	Flag gestione lotti ("C" = completa)
`tm-fl-gia`	x(01)	Flag incidenza giacenza
`tm-mag`	x(01)	Codice magazzino
`tm-cau`	9(02)	Causale di magazzino
`tm-da-data` / `tm-a-data`	9(08)	Periodo di riferimento
`tm-tip-mov`	x(01)	Tipo movimento: T=Tutti, E=Entrate, U=Uscite
`tm-tip-ana`	x(01)	Tipo soggetto: T=Tutti, C=Clienti, F=Fornitori
`tm-cli` / `tm-for`	9(05)	Codice cliente/fornitore
`tm-tipo-fat`	x(02)	Tipo fattura
`tm-brand`	x(03)	Codice brand
`tm-grp-az-ese-cod`	x(04)	Esercizio gruppo aziende
`tm-tsc`	x(10)	Codice commessa
`tm-mer-fl-sn`	x(01)	Flag serial number

Griglia (grid-record)¶

Colonna	Descrizione
`grd-data`	Data movimento (gg/mm/aaaa)
`grd-doc`	Documento (mag + anno + tipo + numero)
`grd-cau`	Descrizione causale
`grd-nonno-cod/des`	Codice e ragione sociale soggetto
`grd-clifor`	Tipo soggetto (C/F)
`grd-gia`	Flag incidenza giacenza
`grd-sgn`	Segno movimento
`grd-qta`	Quantita'
`grd-prezzo`	Prezzo unitario
`grd-val`	Valore
`grd-um`	Unita' di misura
`grd-pezzi`	Pezzi (doppia UM)
`grd-rif-fat`	Riferimento fattura
`grd-data-fat`	Data fattura
`grd-ordine`	Ordine collegato (anno/numero/progressivo)
`grd-consegna`	Consegna (mag/anno/numero)
`grd-pre-no-sco`	Prezzo lordo senza sconti
`grd-sco-1/2`	Percentuali sconto
`grd-trasporto`	Costo trasporto
`grd-prezzo-arrivo`	Prezzo di arrivo
`grd-val-1`	Valore totale
`grd-doc-for`	Documento fornitore
`grd-data-for`	Data documento fornitore
`grd-mag-ext`	Magazzino esterno
`grd-rep/rep-des`	Reparto e descrizione
`grd-alt-um/qta/pre`	UM alternativa, qta, prezzo
`grd-alt-merce`	Merce alternativa
`grd-commessa`	Commessa
`grd-padre-cod/des`	Padre di anagrafica
`grd-prezzo-div-conto`	Prezzo in divisa conto
`grd-mgp-tip/cod/des`	Magazzino punto
`grd-tipo-fat/d`	Tipo fattura e descrizione
`grd-r-tsc`	Commessa (numerico)
`grd-ana-ind/cap/loca/prov`	Indirizzo soggetto
`grd-div-sigla`	Sigla divisa
`grd-lotto-for`	Lotto fornitore
`grd-altri-lotti`	Flag altri lotti
`grd-data-ins/ora-ins`	Data e ora inserimento
`grd-costo-fifo`	Costo FIFO
`grd-ope-ins`	Operatore inserimento
`grd-prog-ins`	Programma inserimento
`grd-doc-collegato`	Documento collegato
`grd-qta-sn`	Quantita' serial number
`grd-ord-cnf-num/data`	Conferma ordine
`grd-bdp-key/data/ope`	Dati BDP collegato

Tasti funzione¶

Tasto	Funzione
F1	Configurazione
F3	Conferma ricerca
F5	Matricola entrata (COGY68)
F6	Matricola uscita (COGMAH)
F7	Filtra (GRP002)
F8	Dettaglio del movimento (COGMA3 o COGW54)
F9	Stampa etichette lotti (se `az-lotti = "C"`)
S-F2	Navigazione sul documento (COGS65W)
S-F4	Gestione griglia (GRIDADMN)
S-F5	Esportazione Excel
S-F7	Lotti collegati

File e Tabelle¶

File/Tabella	Copybook	Uso
COGMOGIO	COGMOGIO.CPY	Movimenti giornalieri per merce
COGMOPRO	COGMOPRO.CPY	Movimenti produzione (DC)
COGTRANS	(definito inline)	File transito con 3 chiavi alternate
FEURTAB	cogfiles.cpy	File tabelle Euro
Tabelle via cogv43.select	cogv43.fd	Tabelle aggiuntive (merci, magazzini, anagrafica, ecc.)

Struttura del programma¶

Flusso principale¶

apri -> z-99-init-program -> ctr-abil -> rd-azi
     -> x99-confi (RNEWCONF)
     -> open-files -> caricamento bitmap custom
     -> a4 (inizializzazione maschera)
     -> Accept filtri (a-tm-mer, a-tm-mag, a-tm-cau, a-tm-da-data,
                       a-tm-a-data, a-tm-tip-mov, a-tm-tip-ana,
                       a-tm-cli/for, a-tm-tipo-fat, a-tm-brand,
                       a-tm-tsc, a-tm-grp-az-ese-cod)
     -> a-richiesta-conferma -> a-pagina-2 (caricamento dati)
     -> a-grid (navigazione griglia paginata)

Paragrafi principali¶

Paragrafo	Funzione
`a4`	Inizializzazione maschera e filtri
`a-tm-mer`	Accept codice merce
`a-tm-mag`	Accept magazzino
`a-tm-da-data` / `a-tm-a-data`	Accept periodo
`a-tm-tip-mov`	Accept tipo movimento (T/E/U)
`a-tm-tip-ana`	Accept tipo soggetto (T/C/F)
`a-pagina-2`	Caricamento e visualizzazione dati paginati
`a-pagina-2-ini`	Lettura movimenti da COGMOGIO
`a-grid`	Navigazione griglia e gestione tasti funzione
`a-pagina-3`	Gestione sotto-filtri aggiuntivi (quantita'/prezzo)
`a-etichetta-lotto`	Stampa etichette lotti
`x-controlla-dati`	Validazione completa dei filtri

Logica di elaborazione¶

Caricamento movimenti¶

Il programma legge i movimenti da COGMOGIO posizionandosi sulla merce indicata. Per ogni movimento:

Filtra per magazzino (se indicato), causale, periodo, tipo movimento (E/U), tipo soggetto (C/F)
Filtra per tipo fattura, brand, commessa, gruppo aziende (se indicati)
Recupera la descrizione del soggetto (cliente o fornitore)
Calcola prezzi nella divisa di conto tramite COGU10W
Popola la griglia con tutti i dettagli del movimento

Paginazione¶

La griglia e' paginata: la tabella tab-maschera contiene k-max-ele-tab (100) elementi. La navigazione avanti/indietro e' gestita dai paragrafi pg-after-pg-dwn e pg-after-pg-up.

Totali¶

I totali di quantita' e valore vengono accumulati in tab-totali e mostrati nella barra di stato.

Chiamate esterne¶

Programma	Scopo
RNEWCONF	Lettura configurazioni
COGS65W	Selezione anagrafica / navigazione documento
COGS68W	Gestione campo merce
COGU10W	Utility valute (conversione divisa)
COGU18	Utility date
COGU25	Utility formattazione
COGU78	Utility
COGY68	Dettaglio matricola entrata
COGMAH	Dettaglio matricola uscita
GRP002	Filtro avanzato
COGMA3	Dettaglio movimento
COGW54	Dettaglio movimento alternativo
COGL61	Utility listini
GRIDADMN	Gestione griglia interattiva

Copybook utilizzate¶

Copybook generate da Screens¶

cogv43.select, cogv43.fd, cogv43.wrk, cogv43.prc, cogv43.decla, cogv43-01.scr

Copybook di libreria¶

cogfiles.cpy -- Definizione file Euro
COGMOPRO.CPY -- Movimenti produzione
COGMOGIO.CPY -- Movimenti giornalieri
k-personal.cpy -- Costanti personalizzazione
k-u10.cpy -- Costanti utility valute
k-tipi-cogtabel.cpy -- Costanti tipi tabella
utilu35w.cpy, utilu18.cpy -- Utility date
wstato.cpy, wopenf.cpy, wgrave.cpy, wnscr.cpy -- Working storage standard
cogazien.cpy -- Dati azienda
wgrid.cpy, utilgdad.cpy -- Griglia interattiva
utilncnf.cpy -- Interfaccia RNEWCONF

Linkage¶

wcont.cpy -- Struttura linkage standard
wcont1.cpy -- Linkage supplementare
utilv43.cpy -- Interfaccia per chiamata CALLED
utils52.cpy, utils65.cpy, utils68.cpy -- Interfacce sottoprogrammi

Note tecniche¶

Il file COGTRANS ha 3 chiavi alternate per supportare ordinamenti diversi: per chiave primaria (mag+anno+tipo+bolla+prog), per entrata/uscita + chiave, e per alimentazione+mag+merce+data.
Il programma usa thread: l'header segnala che in debug e' necessario avere i thread attivi nel runtime, pena il loop.
La colonna grd-qta-sn (quantita' serial number, aggiunta 2019-08-20) e' visibile solo se presente nella configurazione della griglia.
Il programma supporta la navigazione sul documento collegato tramite S-F2 che richiama COGS65W.
Il costo FIFO e' disponibile come colonna griglia.

Documentazione tecnica -- 2026-04-18