COGW63 - Allegato Inventario Magazzino Lavoranti/Clienti
Scopo
Stampa l'allegato inventariale delle merci in giacenza presso lavoranti (fornitori), magazzini esterni o clienti. Valorizza le giacenze con prezzo ultimo acquisto o prezzo medio, supporta valutazione LIFO e importi ivati.
- Magazzino > Inventario > Stampe > Allegato mag. lavoranti
- Magazzino > Inventario > Stampe > Allegato mag. clienti
File e Tabelle
| File |
Copybook |
Utilizzo |
| FEURTAB |
cogfiles.cpy |
Tabella file di sistema |
| cogw63.select |
(generato da Screens) |
SELECT dei file specifici |
| cogw63.fd |
(generato da Screens) |
FD dei file specifici |
| COGINVLV |
coginvlv.k03 |
Inventario lavoranti (chiave 3) |
| BIDINVLV |
bidinvlv (manuale) |
Inventario bidirezionale lavoranti |
| COGMERCI |
(da cogw63.select) |
Anagrafica merci |
| COGGEANA |
(da cogw63.select) |
Anagrafica generale |
| COGMEMOR |
(da cogw63.select) |
Consolidato magazzino (prezzo ultimo acquisto) |
| COGTABEL |
(da cogw63.select) |
Tabelle di sistema (tipo 57: consolidamento) |
| COGMAGPE |
(da cogw63.select) |
Magazzini esterni |
| FLSTA |
flsta.cpy |
File stampante |
Copybook
cogfiles.cpy, cogw63.select, cogw63.fd, cogw63.wrk, cogw63-01.scr
flsta.cpy, wgrave.cpy, wnscr.cpy, wopenf.cpy, wstato.cpy, cogazien.cpy
utilcogl61.cpy, utilcogw62.cpy
utils49.cpy, utils50.cpy, utils52.cpy, utils54.cpy, utils65.cpy, utils68.cpy
utilu10.cpy, utilu16.cpy, utilw80.cpy, utils66.cpy
wcont.cpy, wcont1.cpy, utilcogw63.cpy
grave.cpy, mmmask.cpy, opengen.cpy, stato.cpy, stato1.cpy, winmsg.cpy
cogw63.prc, sendw80.cpy
coginvlv.k03
CALL
| Programma |
Scopo |
| COGS52 |
Input data con calendario |
| COGS54 |
Gestione parametri stampante |
| COGS65W |
Ricerca anagrafica (lavorante/cliente) con zoom |
| COGS68W |
Ricerca prodotto con zoom |
| COGU10W |
Conversione divisa/formattazione importi |
| COGL61 |
Calcolo prezzo medio di acquisto |
| COGW62 |
Ricerca/selezione inventari lavoranti |
Parametri di chiamata (linkage)
util-cogw63: struttura opzionale per chiamata esterna (cogw63-called, cogw63-caller, cogw63-for-cod, cogw63-data-lnv, cogw63-ana-tip)
Logica di elaborazione
tm-ord-mer: ordinamento prodotti (tramite u16)
tm-da-merce / tm-a-merce: range prodotti
tm-tipo-mag: 'C' (cliente), 'F' (fornitore/lavorante), 'E' (magazzino esterno)
tm-lav-cod o tm-mag-cod: codice soggetto (0 = tutti)
tm-data-lnv: data inventario
tm-data: data per testata stampa
tm-giac-zero, tm-inv-zero, tm-giac-ok, tm-inv-ok, tm-movim: filtri
tm-rep: reparto
tm-pre: 'U' ultimo acquisto, 'M' medio
tm-lif: LIFO 'M' medio ponderato
tm-anno-cons: anno consolidamento
tm-imp-iva: 'S' per colonna valore ivato
tm-fl-merci-cli / tm-cli: filtro merci di clienti
Flusso di stampa
- Input parametri con validazione (controllo esistenza soggetti, date, consolidamento)
- Configurazione stampante tramite COGS54 (larghezza 132 caratteri)
- Determinazione divisa di riferimento con COGU10W ("GetDivisaConto")
- Loop sugli inventari:
- Per ogni soggetto (lavorante/cliente/magazzino): intestazione con nome
- Per ogni prodotto: lettura quantita' inventariale, determinazione prezzo
- Valorizzazione: prezzo ultimo acquisto da consolidato (
src-pua-da-cons) o prezzo medio (cerca-prmed via COGL61)
- Eventuale calcolo valore ivato
- Accumulo totali per soggetto (
tot-*) e generali (ttt-*)
- Stampa totali per soggetto (
x3-totali) e totali generali (x4-totali-generali)
Determinazione prezzo
- Ultimo acquisto (
tm-pre = 'U'): letto dal consolidato magazzino (COGMEMOR) per l'anno indicato; se divisa diversa, conversione tramite COGU10W
- Medio (
tm-pre = 'M'): calcolato tramite COGL61 (prezzo medio di acquisto)
Note tecniche
- GUI (screen section con
cogw63-01.scr)
- Larghezza stampa: 132 caratteri
- Supporta chiamata esterna (parametro
w-dc-called = "S") per pre-impostare lavorante, data, tipo
- Il parametro
wo-parametro determina il tipo anagrafica all'apertura ('C'=cliente, 'F'=fornitore, 'E'=esterno)
- Configurazione label dinamica: il campo lavorante si intitola "Lavorante", "Fornitore", "Cliente" o "Magazzino" a seconda del tipo