diff --git a/lv/lvtbcau.uml b/lv/lvtbcau.uml index 46a5860a3..072a8aefd 100755 --- a/lv/lvtbcau.uml +++ b/lv/lvtbcau.uml @@ -6,22 +6,24 @@ ENDPAGE PAGE "Causali Lavanderie" -1 -1 78 10 -GROUPBOX DLG_NULL 100 4 +GROUPBOX DLG_NULL 90 4 BEGIN PROMPT 1 1 "@bDati Causale" END -STRING F_COD_CAUSALE 7 +STRING F_COD_CAUSALE 3 BEGIN PROMPT 2 2 "Causale " FLAGS "U" HELP "Inserire il codice della causale." - USE &CAU + USE &CAU KEY 1 INPUT CODTAB F_COD_CAUSALE DISPLAY "Codice@8" CODTAB DISPLAY "Descrizione@50" S0 OUTPUT F_COD_CAUSALE CODTAB OUTPUT F_DES_CAUSALE S0 + OUTPUT F_CAUSALE_RITIRO S1 + OUTPUT F_CAUSALE_CONSEGNA S2 FIELD CODTAB KEY 1 CHECKTYPE REQUIRED @@ -41,7 +43,7 @@ BEGIN KEY 2 END -GROUPBOX DLG_NULL 100 4 +GROUPBOX DLG_NULL 90 4 BEGIN PROMPT 1 5 "@b Ritiro" END @@ -56,33 +58,34 @@ END STRING F_CAUSALE_RITIRO 5 BEGIN - PROMPT 2 7 "Causale di magazzino " + PROMPT 2 7 "Causale di magazzino" USE %CAU KEY 1 INPUT CODTAB F_CAUSALE_RITIRO DISPLAY "Codice@8" CODTAB DISPLAY "Descrizione@50" S0 OUTPUT F_CAUSALE_RITIRO CODTAB OUTPUT F_DES_CAUSALE_RITIRO S0 - FIELD S1 VALIDATE REQIF_FUNC TRUE F_RITIRATO WARNING "Causale ritirato obbligatoria" GROUP 1 FLAGS "D" + FIELD S1 END STRING F_DES_CAUSALE_RITIRO 50 BEGIN - PROMPT 35 7 "Descrizione" + PROMPT 30 7 " " USE %CAU KEY 2 INPUT S0 F_DES_CAUSALE_RITIRO DISPLAY "Codice" CODTAB DISPLAY "Descrizione @50" S0 - COPY OUTPUT F_CAUSALE_RITIRO + OUTPUT F_DES_CAUSALE_RITIRO S0 + OUTPUT F_CAUSALE_RITIRO CODTAB GROUP 1 FLAGS "D" END -GROUPBOX DLG_NULL 100 4 +GROUPBOX DLG_NULL 90 4 BEGIN PROMPT 1 10 "@b Consegna" END @@ -97,7 +100,7 @@ END STRING F_CAUSALE_CONSEGNA 5 BEGIN - PROMPT 2 12 "Causale di magazzino " + PROMPT 2 12 "Causale di magazzino" USE %CAU KEY 1 INPUT CODTAB F_CAUSALE_CONSEGNA DISPLAY "Codice@8" CODTAB @@ -113,7 +116,7 @@ END STRING F_DES_CAUSALE_CONSEGNA 50 BEGIN - PROMPT 35 12 "Descrizione" + PROMPT 30 12 " " USE %CAU KEY 2 INPUT S0 F_DES_CAUSALE_CONSEGNA DISPLAY "Codice" CODTAB @@ -123,7 +126,7 @@ BEGIN GROUP 2 END -GROUPBOX DLG_NULL 100 4 +GROUPBOX DLG_NULL 90 4 BEGIN PROMPT 1 14 "" END