WMSW02 - Consultazione locazioni di un articolo¶

Descrizione¶

Consultazione in griglia delle locazioni in cui e' presente un dato articolo (lato APP WMS, tabella DFGIACENZELOC del DB di frontiera). Permette di visualizzare le giacenze per locazione (Shift+F7 -> WMSW03) e il dettaglio movimenti per locazione (F8 -> WMS004).

Sottoprogramma di consultazione richiamato da altri programmi (non a menu).

Tabelle utilizzate¶

Tabella	Accesso	Descrizione
FEURTAB	Lettura	Tabella euristica parametri (standard)
DFGIACENZELOC	Lettura	Giacenze per locazione (DB frontiera)
FLSTA	n/a	File di stato (standard)

Chiamate a sottoprogrammi¶

Programma	Scopo
COGU10W	Recupero divisa di conto
WMSW03	Vis. giacenze per locazione (Shift+F7)
WMS004	Dettaglio movimenti locazione (F8)
GRIDADMN	Gestione griglia

Linkage¶

utilwmsw02.cpy: parametri di chiamata da altri programmi (caller, called, codice merce/articolo)
wcont.cpy / wcont1.cpy: strutture standard

Tasti funzione¶

Shift+F7: visualizzazione giacenze per locazione (richiama WMSW03)
F8: dettaglio movimenti locazione (richiama WMS004)

Casistica problemi noti¶

Index out of bound su F8/Shift+F7 con griglia vuota (bug 869df00yn)¶

Sintomo: pressione di F8 o Shift+F7 sulla griglia locazioni quando vuota provocava errore "index out of bound" del runtime AcuCOBOL che terminava la sessione utente.
Causa: i due rami verificavano i not = zero e tm-r-locazione (i) not = spaces ma non controllavano se la griglia avesse effettivamente almeno una riga (tm-grid-det-dati-pnt = zero oppure gor-r-n-m = 0). L'accesso a tm-r-locazione(i) con i non inizializzato provocava l'eccezione.
Correzione: aggiunti guard espliciti su tm-grid-det-dati-pnt = zero e gor-r-n-m = 0 prima di accedere al vettore, con messaggio "Nessuna locazione presente in griglia" e ritorno a a-grid. La stessa correzione e' stata applicata in WMS002 (vedi sua doc).
Riferimento: dettaglio - ClickUp 869df00yn - TASK-5219