diff --git a/lv/lv0800a.uml b/lv/lv0800a.uml index 1579b5ada..3c07f5134 100755 --- a/lv/lv0800a.uml +++ b/lv/lv0800a.uml @@ -16,13 +16,14 @@ BEGIN PROMP 2 3 "Da Data " FIELD #F_DATADOC_DA CHECKTYPE REQUIRED + FLAGS "A" END DATE F_DATADOC_A_1 BEGIN - PROMP 40 3 "Da Data " + PROMP 40 3 "A Data " FIELD #F_DATADOC_A - VALIDATE DATE_CMP_FUNC >= F_DATADOC_A + VALIDATE DATE_CMP_FUNC >= F_DATADOC_A_1 WARNING "La data finale non deve essere successiva a quella finale" CHECKTYPE REQUIRED FLAGS "A" @@ -33,11 +34,11 @@ BEGIN PROMPT 2 5 "Numerazione " HELP "Codice numerazione" USE %NUM - INPUT CODTAB F_CODNUM + INPUT CODTAB F_CODNUM_1 DISPLAY "Codice" CODTAB DISPLAY "Descrizione@50" S0 - OUTPUT F_CODNUM CODTAB - OUTPUT F_DESCODNUM S0 + OUTPUT F_CODNUM_1 CODTAB + OUTPUT F_DESCODNUM_1 S0 CHECKTYPE REQUIRED FLAGS "UPA" WARNING "Numerazione assente" @@ -49,11 +50,11 @@ BEGIN PROMPT 24 5 "" HELP "Descrizione Numerazione" USE %NUM KEY 2 - INPUT S0 F_DESCODNUM + INPUT S0 F_DESCODNUM_1 DISPLAY "Descrizione@50" S0 DISPLAY "Codice" CODTAB - OUTPUT F_CODNUM CODTAB - OUTPUT F_DESCODNUM S0 + OUTPUT F_CODNUM_1 CODTAB + OUTPUT F_DESCODNUM_1 S0 FIELD #F_DESCODNUM END @@ -62,12 +63,12 @@ BEGIN PROMPT 2 6 "Tipo " HELP "Codice tipo documento" USE %TIP - INPUT CODTAB F_TIPODOC + INPUT CODTAB F_TIPODOC_1 DISPLAY "Codice" CODTAB DISPLAY "Descrizione@50" S0 - OUTPUT F_TIPODOC CODTAB - OUTPUT F_DESTIPODOC S0 - FLAGS "UP" + OUTPUT F_TIPODOC_1 CODTAB + OUTPUT F_DESTIPODOC_1 S0 + FLAGS "UPA" FIELD #F_TIPODOC END @@ -76,10 +77,11 @@ BEGIN PROMPT 24 6 "" HELP "Descrizione tipo documento" USE %TIP KEY 2 - INPUT S0 F_DESTIPODOC + INPUT S0 F_DESTIPODOC_1 DISPLAY "Descrizione@50" S0 DISPLAY "Codice" CODTAB - COPY OUTPUT F_TIPODOC + OUTPUT F_TIPODOC_1 CODTAB + OUTPUT F_DESTIPODOC_1 S0 FIELD #F_DESTIPODOC END diff --git a/lv/lv0900a.uml b/lv/lv0900a.uml index 1579b5ada..b3c4d21a8 100755 --- a/lv/lv0900a.uml +++ b/lv/lv0900a.uml @@ -1,4 +1,4 @@ -#include "lv0800a.h" +#include "lv0900a.h" TOOLBAR "topbar" 0 0 0 2 #include "printbar.h" @@ -16,13 +16,14 @@ BEGIN PROMP 2 3 "Da Data " FIELD #F_DATADOC_DA CHECKTYPE REQUIRED + FLAGS "A" END DATE F_DATADOC_A_1 BEGIN - PROMP 40 3 "Da Data " + PROMP 40 3 "A Data " FIELD #F_DATADOC_A - VALIDATE DATE_CMP_FUNC >= F_DATADOC_A + VALIDATE DATE_CMP_FUNC >= F_DATADOC_A_1 WARNING "La data finale non deve essere successiva a quella finale" CHECKTYPE REQUIRED FLAGS "A" @@ -33,11 +34,11 @@ BEGIN PROMPT 2 5 "Numerazione " HELP "Codice numerazione" USE %NUM - INPUT CODTAB F_CODNUM + INPUT CODTAB F_CODNUM_1 DISPLAY "Codice" CODTAB DISPLAY "Descrizione@50" S0 - OUTPUT F_CODNUM CODTAB - OUTPUT F_DESCODNUM S0 + OUTPUT F_CODNUM_1 CODTAB + OUTPUT F_DESCODNUM_1 S0 CHECKTYPE REQUIRED FLAGS "UPA" WARNING "Numerazione assente" @@ -49,11 +50,11 @@ BEGIN PROMPT 24 5 "" HELP "Descrizione Numerazione" USE %NUM KEY 2 - INPUT S0 F_DESCODNUM + INPUT S0 F_DESCODNUM_1 DISPLAY "Descrizione@50" S0 DISPLAY "Codice" CODTAB - OUTPUT F_CODNUM CODTAB - OUTPUT F_DESCODNUM S0 + OUTPUT F_CODNUM_1 CODTAB + OUTPUT F_DESCODNUM_1 S0 FIELD #F_DESCODNUM END @@ -62,12 +63,12 @@ BEGIN PROMPT 2 6 "Tipo " HELP "Codice tipo documento" USE %TIP - INPUT CODTAB F_TIPODOC + INPUT CODTAB F_TIPODOC_1 DISPLAY "Codice" CODTAB DISPLAY "Descrizione@50" S0 - OUTPUT F_TIPODOC CODTAB - OUTPUT F_DESTIPODOC S0 - FLAGS "UP" + OUTPUT F_TIPODOC_1 CODTAB + OUTPUT F_DESTIPODOC_1 S0 + FLAGS "UPA" FIELD #F_TIPODOC END @@ -76,10 +77,11 @@ BEGIN PROMPT 24 6 "" HELP "Descrizione tipo documento" USE %TIP KEY 2 - INPUT S0 F_DESTIPODOC + INPUT S0 F_DESTIPODOC_1 DISPLAY "Descrizione@50" S0 DISPLAY "Codice" CODTAB - COPY OUTPUT F_TIPODOC + OUTPUT F_TIPODOC_1 CODTAB + OUTPUT F_DESTIPODOC_1 S0 FIELD #F_DESTIPODOC END