COGP51 - Stampa Modulo per Inventario
Descrizione
Programma di stampa che produce il modulo cartaceo da utilizzare per il rilevamento fisico dell'inventario. Per ogni articolo selezionato riporta il codice merce, la descrizione, la giacenza attuale (opzionale), una colonna vuota per il conteggio fisico, il codice fornitore e le ubicazioni fisiche nel magazzino (fino a 3). Supporta filtri per magazzino, reparto, intervallo merce, stato giacenza e merci cliente.
Tipo: Programma di stampa con selezione parametri.
Menu: Magazzino > Inventario > Stampe > Modulo x Inventario
Tabelle utilizzate
| Tabella |
Accesso |
Descrizione |
| FEURTAB (cogtabel) |
Input |
Tabella parametri generali azienda |
| COGMERCI |
Input |
Anagrafica merci (letta tramite cogp51.select/fd) |
| COGMOMAG |
Input |
Giacenze magazzino (per la quantita' attuale) |
| COGLOCAZ |
Input |
Ubicazioni fisiche merce in magazzino |
| COGGEANA |
Input |
Anagrafica fornitori (codice fornitore per merce) |
| FLSTA |
Output |
File di stampa |
Copybook principali
| Copybook |
Descrizione |
| cogp51.select |
SELECT per i file del programma |
| cogp51.fd |
File description |
| cogp51.wrk |
Working storage generata da Screens |
| cogp51-01.scr |
Screen section maschera di selezione |
| cogp51.decla |
Declaratives per gestione errori I/O |
| cogfiles.cpy |
Descrizione record FEURTAB |
| flsta.fd / flsta.cpy |
File di stampa |
| cogazien.cpy |
Dati azienda corrente |
| utils21.cpy |
Utility COG021 (opzioni stampa) |
| utils50.cpy |
Utility COGS50 |
| utils52.cpy |
Utility gestione date (COGS52W) |
| utils54.cpy |
Utility gestione stampante (COGS54) |
| utils65.cpy |
Utility selezione anagrafica (COGS65W) |
| utils68.cpy |
Utility selezione merce (COGS68) |
| utilw36.cpy |
Utility ricerca magazzino (WIN036) |
| utilw80.cpy |
Utility WIN080 |
| utilu16.cpy |
Utility gestione ordinamento merce (U16) |
| utils68.cpy (s68) |
Utility selezione merce da/a |
| cogazien.cpy |
Dati azienda |
Parametri maschera (tab-maschera)
| Campo |
Variabile |
Descrizione |
| Magazzino |
tm-mag |
Codice magazzino (F8: WIN036) |
| Ordinamento merce |
tm-ord-mer |
Criterio ordinamento (da U16) |
| Da merce |
tm-da-merce (gru+sot+cod) |
Articolo di partenza (F9: ricerca avanzata) |
| A merce |
tm-a-merce (gru+sot+cod) |
Articolo di arrivo |
| Mostra qta giacenza |
tm-qta |
"S"/"N": include colonna giacenza nel modulo |
| Reparto |
tm-rep |
Filtro per reparto (F8: ricerca) |
| Stato giacenza |
tm-sta-gia |
Filtro per stato giacenza |
| Includi cancellati |
tm-fl-canc |
"S"/"N": include articoli cancellati |
| Solo merci cliente |
tm-fl-merci-cli |
"N" default; "S" per filtrare per cliente |
| Cliente |
tm-cli |
Codice cliente (se tm-fl-merci-cli = "S") |
Flusso di elaborazione
- Inizializzazione (
a000): lettura azienda, apertura file. Preparazione utility U16 (ordinamento merce) e S68 (selezione merce da/a) per i controlli di maschera. Titolo "Stampa modulo per inventario".
- Default maschera (
a4): magazzino = az-main-mag, stato giacenza = "S" (con giacenza), tm-fl-canc dipende da az-personal.
- Accept parametri: magazzino (F1 opzioni COG021, F8 WIN036), da-merce (F9 ricerca avanzata), a-merce, qta, reparto, stato giacenza, cancellati, merci-cliente.
- Stampa (alla conferma F3):
- Posizionamento su COGMERCI per il range da/a merce nell'ordinamento selezionato.
- Per ogni articolo: lettura giacenza da COGMOMAG; lettura ubicazioni da COGLOCAZ (fino a 3: box, corridoio, colonna, piano); lettura fornitore da COGGEANA.
- Applicazione filtri: reparto, stato giacenza, cancellati, merci-cliente.
- Stampa intestazione (
testa1: data, "STAMPA MODULO PER INVENTARIO", pagina; testa2: magazzino; testa2-rep: reparto se filtrato).
- Intestazione colonne (
testa3): merce, "Qta Giacenza", "Qta Invent.", "Forn.", ubicazioni.
- Riga dettaglio (
rigel): rg-merce (48 car.), rg-gia (giacenza formattata), colonna "..........." (spazio conteggio fisico), rg-for (fornitore), r8-locaz (3 ubicazioni con box+corridoio+colonna+piano).
- F1 (COG021): apre la finestra di configurazione opzioni di stampa (
w-cur-id = 'MDNV').
Chiamate a sottoprogrammi
| Programma |
Scopo |
| COGS54 |
Gestione stampante |
| COG021 |
Finestra opzioni dettaglio stampa (F1) |
| WIN036 |
Ricerca magazzino (F8) |
| COGS65W |
Selezione anagrafica cliente |
| COGS68 |
Selezione merce (da/a) |
Note tecniche
- La variabile
w-cur-id = 'MDNV' identifica il set di opzioni di stampa per COG021.
w-siz-merce = 42 definisce la larghezza della colonna descrizione merce nella stampa.ws-loc (9(02)) conta le ubicazioni trovate per ogni articolo (max 3).- Il campo
r8-locaz (36 car.) contiene fino a 3 blocchi ubicazione, ciascuno composto da box(1)+fil(1)+corridoio(2)+fil(1)+colonna(2)+fil(1)+piano(2).
az-personal = "ID" condiziona il default di tm-fl-canc: le installazioni ID non includono per default i cancellati.- La utility U16 (
utilu16.cpy) gestisce il criterio di ordinamento merce (u16-fl-sel) e viene inizializzata all'avvio.