diff --git a/ve/batbmag.uml b/ve/batbmag.uml index 57fa3c82b..336fd6beb 100755 --- a/ve/batbmag.uml +++ b/ve/batbmag.uml @@ -31,8 +31,9 @@ BEGIN DISPLAY "Codice " CODTAB[1,3] DISPLAY "Denominazione mag.@50 " S0 OUTPUT F_CODICE CODTAB[1,3] + OUTPUT F_DESCR S0 OUTPUT H_DESCR S0 - MESSAGE COPY,H_CODICE + OUTPUT H_GESTGIA B0 CHECKTYPE REQUIRED END @@ -51,24 +52,24 @@ BEGIN OUTPUT F_CODICE CODTAB[1,3] OUTPUT F_CODDEP CODTAB[4,5] OUTPUT F_DESDEP S0 - MESSAGE SHOW,F_DESCR|HIDE,H_DESCR|SHOW,F_DESDEP - MESSAGE EMPTY HIDE,F_DESCR|SHOW,H_DESCR|HIDE,F_DESDEP + MESSAGE SHOW,H_DESCR|HIDE,F_DESCR|SHOW,F_DESDEP|HIDE,F_GESTGIA + MESSAGE EMPTY HIDE,H_DESCR|SHOW,F_DESCR|HIDE,F_DESDEP|SHOW,F_GESTGIA CHECKTYPE NORMAL //VALIDATE AUTOEXIT_FUNC 2 F_CODICE F_CODDEP //GROUP GR_SEARCH END -STRING H_CODICE 3 +//Abilitazione/disabil. dei campi relativi al deposito +BOOLEAN H_GESTGIA BEGIN - FLAGS "H" - COPY USE F_CODICE - INPUT CODTAB F_CODICE - COPY DISPLAY F_CODICE - OUTPUT F_DESCR S0 - CHECKTYPE NORMAL + PROMPT 1 1 "" + FLAGS "GH" + MESSAGE TRUE ENABLE,F_CODDEP//|ENABLE,F_DESDEP + MESSAGE FALSE DISABLE,F_CODDEP END -STRING F_DESCR 50 + +STRING H_DESCR 50 BEGIN PROMPT 2 3 "Denominazione mag. " FLAGS "D" @@ -90,18 +91,18 @@ BEGIN WARNING "Manca la denominazione" END -STRING H_DESCR 50 +STRING F_DESCR 50 BEGIN PROMPT 2 3 "Denominazione mag. " FIELD S0 KEY 2 USE MAG KEY 2 - INPUT S0 H_DESCR + INPUT S0 F_DESCR DISPLAY "Denominazione mag.@50" S0 DISPLAY "Cod. magazzino" CODTAB[1,3] DISPLAY "Cod. deposito" CODTAB[4,5] COPY OUTPUT F_CODDEP - OUTPUT H_DESCR S0 + OUTPUT F_DESCR S0 MESSAGE K_TAB,F_CODDEP CHECKTYPE REQUIRED WARNING "Manca la denominazione del magazzino" @@ -241,6 +242,7 @@ END ENDPAGE + PAGE "Gestione magazzini" 11 60 14 NUMBER F_ANNO 4 @@ -251,13 +253,16 @@ END STRING F_CODMAGSTA 3 BEGIN - PROMPT 2 2 "Codice magazzino sul quale stampare i movimenti " + PROMPT 2 2 "Codice magazzino sul cui giornale stampare i movimenti " FIELD S6 - USE MAG SELECT CODTAB ?= "???" + USE MAG SELECT CODTAB[4,5] == "" INPUT CODTAB[1,3] F_CODMAGSTA DISPLAY "Codice " CODTAB DISPLAY "Denominazione mag.@50 " S0 OUTPUT F_CODMAGSTA CODTAB[1,3] + MESSAGE DISABLE,F_CODLGIOR + MESSAGE EMPTY ENABLE,F_CODLGIOR + CHECKTYPE NORMAL END STRING F_CODLGIOR 3 @@ -271,6 +276,14 @@ BEGIN DISPLAY "Giornale" CODTAB[5,7] DISPLAY "Descrizione@50" S0 OUTPUT F_CODLGIOR CODTAB[5,7] + MESSAGE DISABLE,F_CODMAGSTA + MESSAGE EMPTY ENABLE,F_CODMAGSTA +END + +BOOLEAN F_GESTGIA +BEGIN + PROMPT 2 4 "Gestione giacenze in piu' depositi " + FIELD MAG->B0 END STRING F_CODLUNICO 3 @@ -286,15 +299,10 @@ BEGIN OUTPUT F_CODLUNICO CODTAB[5,7] END -BOOLEAN F_GESTGIA -BEGIN - PROMPT 2 4 "Gestione giacenze in piu' depositi " - FIELD MAG->B0 -END BOOLEAN F_STALDIS BEGIN - PROMPT 2 6 "Stampa libri distinti per classe fiscale articoli " + PROMPT 2 6 "Stampa libro raggruppato per classe fiscale articoli " FIELD MAG->B1 END @@ -306,13 +314,13 @@ END BOOLEAN F_STAFISART BEGIN - PROMPT 2 8 "Stampa libri per raggruppamento fiscale articoli " + PROMPT 2 8 "Stampa libro ragg. per raggruppamento fiscale articoli " FIELD MAG->B2 END BOOLEAN F_STAFISCAU BEGIN - PROMPT 2 9 "Stampa libri per raggruppamento fiscale causali " + PROMPT 2 9 "Stampa libro ragg. per raggruppamento fiscale causali " FIELD MAG->B3 END