COGW54 - Visualizzazione Movimenti su Magazzino Secondario¶
Sorgente: cbl/cogw54.cbl | Program-ID: COGW54 | Tipo: Interattivo (maschera grafica Windows) / richiamabile da altri programmi
Menu: Magazzino > Visualizzazioni > Movimenti su Magazzino Secondario
Scopo¶
Visualizza i movimenti di magazzino relativi a una merce presso un determinato cliente, fornitore, magazzino esterno o commessa. I dati vengono caricati in una griglia paginata con possibilita' di navigazione documentale, esportazione Excel e consultazione matricole.
Il programma puo' essere chiamato direttamente da menu oppure da altri programmi (modalita' "called") con parametri preimpostati via utilcogw54.cpy.
Tabelle/File utilizzati¶
| Tabella | Tipo | Modalita' | Descrizione |
|---|---|---|---|
| FEURTAB | Tabella | Input | Tabella generale Eurosystem |
| COGGEANA | Tabella | Input | Anagrafica generale (clienti/fornitori) per descrizione soggetto |
| COGMERCI | Tabella | Input | Anagrafica merci per validazione |
| COGMAGPE | Tabella | Input | Anagrafica magazzini per validazione tipo "E" |
| COGMOMAG | Tabella | Input | Movimenti magazzino. Scansione per varie chiavi in base al tipo ricerca |
| COGTESBO | Tabella | Input | Testata bolle per dati causale, documento fornitore, ecc. |
| COGTABEL | Tabella | Input | Tabelle di sistema (causali, reparti) |
| COGMATRI | Tabella | Input | Matricole entrata (per conteggio SN e navigazione F5) |
| COGMTUSC | Tabella | Input | Matricole uscita (per conteggio SN e navigazione F6) |
| COGTSCMM | Tabella | Input | Commesse (per ricerca tipo "S") |
| COGTRANS | File temp | I-O | File di transito indicizzato per griglia paginata. Chiave primaria e alternata. Path: ext-tmp-dir |
Logica di elaborazione¶
Parametri di input (tab-maschera)¶
| Campo | Variabile | Descrizione |
|---|---|---|
| Tipo ricerca | tm-tipo-ric |
"C" = cliente, "F" = fornitore, "E" = magazzino esterno, "S" = commessa |
| Commessa | tm-tsc-cod |
Codice commessa (solo se tipo = "S") |
| Cliente/Fornitore | tm-for |
Codice soggetto (se tipo = "C" o "F") |
| Magazzino | tm-mag |
Codice magazzino (se tipo = "E") |
| Merce | tm-merce |
Codice merce (obbligatorio) |
| Da data | tm-data-da |
Data inizio (default 20000101) |
| A data | tm-data-a |
Data fine (default 20991231) |
Modalita' "called"¶
Se cogw54-called = "COGW54" (linkage utilcogw54.cpy):
- Preimposta tm-tipo-ric, tm-for/tm-mag, tm-merce, tm-tsc-cod dai parametri del chiamante
- Salta la conferma e carica direttamente i dati
- Al termine, esce senza tornare alla maschera di selezione
Flusso di elaborazione¶
-
Input parametri: accept dei campi in sequenza (tipo ricerca -> commessa -> soggetto -> magazzino -> merce -> date). Ogni campo visibile/abilitato in base al tipo ricerca.
-
Caricamento dati (
carica-tab): scandisce COGMOMAG in base ai criteri, per ogni riga: - Legge la testata bolla (COGTESBO) per causale, documento fornitore, data
- Conta le matricole associate (COGMATRI/COGMTUSC) e salva in
trs-qta-sn/trs-diff-sn -
Scrive su COGTRANS per la griglia paginata
-
Griglia paginata (
a-grid): supporta navigazione Pagina su/giu', con ricarica da COGTRANS. -
Azioni dalla griglia:
- F3: gestione bolla tramite COGU78 (tipo "COGTESBO")
- Shift+F2: navigazione filiera documentale tramite COGMA3 (tipo "B")
- F5: matricole entrata (
m-mat-ent) - F6: matricole uscita (
m-mat-usc) - Shift+F4: personalizzazione griglia tramite GRIDADMN
- Shift+F5: esportazione Excel (
z-esporta-paged-grid)
Grid-record¶
Il record della griglia e' molto ampio e contiene: - Data, documento (mag/anno/tipo/numero), causale - Soggetto (codice, descrizione, tipo C/F) - Segno (entrata/uscita), quantita', prezzo, valore - Riferimento fattura, data fattura - Ordine, consegna, sconti 1 e 2 - Trasporto, prezzo di arrivo, valore totale - Documento fornitore, data fornitore - Magazzino esterno, reparto, UM, UM alternativa, quantita' alternativa - Commessa, padre, prezzo in divisa conto - Magazzino principale (tipo + codice + descrizione) - Campo custom, conteggi matricole (qta-sn, diff-sn)
Chiamate a sottoprogrammi¶
| Programma | Funzione |
|---|---|
| GRIDADMN | Gestione griglia (preparazione, record, svuotamento, personalizzazione, esportazione) |
| COGU78 | Gestione/visualizzazione documento (tipo "COGTESBO") |
| COGMA3 | Navigazione filiera documentale (tipo "B") |
COGU35W (via call-u35-*) |
Accept commessa con validazione |
COGS52 (via z-s52-*) |
Accept date con calendario |
COGS60 (via z-s60-*) |
Accept combo box (tipo ricerca) |
COGS65 (via z-s65-*) |
Accept anagrafica (clienti/fornitori) |
COGS66 (via z-s66-*) |
Accept magazzino |
COGS68W (via z-s68-*) |
Accept merce con aiuto |
COPY utilizzate¶
Working-storage¶
| Copybook | Descrizione |
|---|---|
cogw54.wrk |
Working storage generata da Screens |
k-tipi-cogtabel.cpy |
Costanti tipi tabella |
k-personal.cpy |
Costanti personalizzazione |
k-u10.cpy |
Costanti divisa |
wgrave.cpy, wnscr.cpy, wopenf.cpy, wstato.cpy |
Working storage comuni |
cogazien.cpy |
Dati azienda |
wgrid.cpy |
Working storage griglia |
utilgdad.cpy |
Interfaccia GRIDADMN |
utilgesdebug.cpy |
Gestione debug |
utilu09.cpy |
Utility legame ordine |
utilu10.cpy |
Interfaccia COGU10 |
utilu78.cpy |
Interfaccia COGU78 |
utilu25.cpy |
Utility numerazione |
utils52.cpy |
Interfaccia COGS52 |
utils65.cpy |
Interfaccia COGS65 |
utils68.cpy |
Interfaccia COGS68W |
utilu20.cpy |
Utility numerica |
utilncnf.cpy |
Interfaccia configurazione RNEWCONF |
utils66.cpy |
Interfaccia COGS66 |
utilu35w.cpy |
Interfaccia COGU35W |
utilcogma3.cpy |
Interfaccia COGMA3 |
Linkage¶
| Copybook | Descrizione |
|---|---|
wcont.cpy |
Area di comunicazione principale |
utilv94.cpy |
Interfaccia chiamante (COGV94) |
utill14.cpy |
Interfaccia chiamante (COGL14) |
wcont1.cpy |
Area di comunicazione estesa |
utilcogw54.cpy |
Interfaccia di chiamata (parametri called) |
Configurazione RNEWCONF¶
tm-cfg-mag: magazzino di defaulttm-cfg-mag-clavoro: flag magazzino con lavorantetm-cfg-gestione-reparti: flag gestione reparti
Note¶
- Il parametro
wo-parametrodetermina il tipo di soggetto iniziale ("C", "F" o "E"). Se non riconosciuto, default a fornitore. - La griglia e' paginata: i dati sono caricati su COGTRANS e letti a pagine. I flag
fl-read= "E" (fine) e "B" (inizio) controllano i limiti di navigazione. - Supporta 3 pulsanti custom sulla toolbar: navigazione documento (Shift+F2), matricola entrata (F5), matricola uscita (F6), ciascuno con bitmap dal file "magazzino".
- I conteggi matricole (
trs-qta-sn,trs-diff-sn) sono calcolati inm-conta-cogmatriem-conta-cogmtuscscandendo rispettivamente COGMATRI e COGMTUSC. - In chiusura, il file COGTRANS viene cancellato (DELETE FILE).
- Il programma integra il sistema di debug (
gesdebug-*): se la configurazione lo prevede, al termine apre la consultazione debug.