Vai al contenuto

COGP50 - Confronto giacenza / inventario

Descrizione

Stampa di confronto tra le quantita' rilevate in un inventario fisico e le giacenze contabili del gestionale, con calcolo del valore delle rimanenze. Prodotta in formato a 140 colonne. Offre anche la possibilita' di aggiornare il valore delle rimanenze nell'archivio inventario.

  • Magazzino > Inventario > Stampe > Confronto con Giacenza

Tabelle utilizzate

Tabella Accesso Descrizione
COGINVEN (via cogp50.select) Lettura Archivio inventario fisico
COGMOMAG (via cogp50.select) Lettura Movimenti di magazzino (giacenze)
COGTABEL Lettura Tabelle generali (tipo 57: parametri inventario)
COGMERCI / COGMERAP (via utils54) Lettura Anagrafica merci
FEURTAB Lettura Tabella euristica parametri (standard)
FLSTA n/a File di stato

Flusso di elaborazione

Inizializzazione

  1. z-99-init-program, ctr-abil, rd-azi, open-files
  2. Lettura COGTABEL tipo 57 (rd-cogtabel) per recuperare la data di accettazione inventario default; se non trovata, usa zero
  3. Proposta default: tm-aa-sal/tm-mm-sal da COGTABEL, tm-anno = anno corrente - 1, tm-mag da az-main-mag, tm-val = "U" (ultimo costo), tm-agg = "N", tm-fl-merci-cli = "N", tm-fl-pre-sval = "S"

Parametri maschera (tab-maschera)

Campo Tipo Descrizione
tm-data-sal-gen 9(08) Data/mese riferimento inventario
tm-anno 9(04) Anno giacenze
tm-mag x(01) Codice magazzino
tm-val x(01) Tipo valorizzazione
tm-agg x(01) Aggiorna valore rimanenza (S/N)
tm-fl-merci-cli x(01) Includi merci cliente (S/N)
tm-cli 9(05) Codice cliente (se merci cliente = S)
tm-fl-pre-sval x(01) Usa prezzo svalutato (S/N)
tm-anno-sval 9(04) Anno svalutazione

Elaborazione stampa (dopo F3, paragrafo a-fine-dati)

  1. Scansione COGINVEN per anno/magazzino selezionato
  2. Per ciascuna merce inventariata: lettura giacenza da COGMOMAG; calcolo differenza (inventario - giacenza)
  3. Calcolo valore inventario: qta-inv x prezzo-unitario; il prezzo e' determinato in base a tm-val (ultimo costo, prezzo medio, svalutato, ecc.) tramite utilcogl61
  4. Stampa riga con: merce (50 car.), qta inventario, qta giacenza, differenza (blank se zero), valore, prezzo
  5. Subtotali per gruppo (ri-gru) e sottogruppo (ri-sot) merceologico; totale generale
  6. Se tm-agg = "S": aggiornamento valore rimanenza in COGINVEN

Strutture di stampa

Record Descrizione
testa1 Intestazione pagina con titolo, data stampa, numero pagina
testa2 Intestazione magazzino
testa3 Intestazione colonne
rigel Riga dati merce
rig-riga Separatore per subtotali
rig-tot Riga totali (gruppo, sottogruppo, generale)

Chiamate a sottoprogrammi

Programma Scopo
COG021 Configurazione divisa di riferimento (richiamato da F1)
COGL61 (via utilcogl61.cpy) Calcolo prezzo/valore rimanenze
utils65 Ricerca cliente
utils50 Utility inventario
utils52 Utility date
utils54 Utility merci
utilu10 Divisa di conto
utilw36 Ricerca magazzino
z-99-init-program Inizializzazione standard

Linkage

  • wcont.cpy / wcont1.cpy: strutture standard
  • util021.cpy: parametri configurazione COG021

Note

  • La divisa di riferimento per il valore (w-cur-id) e' inizializzata a "CNIG" e puo' essere modificata tramite F1 (richiama COG021)
  • I totali sono gestiti a tre livelli: tot-gen (generale), tot-gru (gruppo), tot-sot (sottogruppo)
  • La stampa usa w-siz-stampa = 140 colonne
  • Il prezzo di svalutazione (tm-fl-pre-sval = "S") usa w-prezzo-sval con divisa w-divisa-sval
  • w-pua (prezzo ultimo acquisto) e w-pma (prezzo medio acquisto) sono le variabili principali del calcolo valore