diff --git a/ve/ve2400.uml b/ve/ve2400.uml index 2c6d2fdf6..d6e8a5d3f 100755 --- a/ve/ve2400.uml +++ b/ve/ve2400.uml @@ -7,7 +7,7 @@ ENDPAGE PAGE "Pagina 1" 0 0 70 20 -GROUPBOX DLG_NULL 71 5 +GROUPBOX DLG_NULL 78 5 BEGIN PROMPT 0 0 "" //FLAG "R" @@ -48,129 +48,69 @@ BEGIN CHECKTYPE REQUIRED END -STRING F_GRMERC1 3 +STRING F_GRMERC 3 BEGIN - PROMPT 1 5 "Gruppo merc. 1 " - FIELD LF_ANAMAG->GRMERC1[1,3] + PROMPT 1 5 "Gr. merc. " + FIELD LF_ANAMAG->GRMERC[1,3] GROUP 1 FLAG "U" -END - -STRING F_GRMERC1B 2 -BEGIN - PROMPT 21 5 "" - FIELD LF_ANAMAG->GRMERC1[4,5] - GROUP 1 - FLAG "U" - MESSAGE EMPTY CLEAR,2@ - MESSAGE ENABLE,2@ - USE GMC - INPUT CODTAB[1,3] F_GRMERC1 - INPUT CODTAB[4,5] F_GRMERC1B + USE GMC + INPUT CODTAB F_GRMERC SELECT DISPLAY "Codice" CODTAB DISPLAY "Descrizione@50" S0 - OUTPUT F_GRMERC1 CODTAB[1,3] - OUTPUT F_GRMERC1B CODTAB[4,5] - OUTPUT F_GRMERC1D S0 + OUTPUT F_GRMERC CODTAB[1,3] + OUTPUT F_GRMERCB CODTAB[4,5] + OUTPUT F_GRMERCD1 S0 CHECKTYPE NORMAL END -STRING F_GRMERC1D 50 +STRING F_GRMERCD1 50 BEGIN - PROMPT 26 5 "" + PROMPT 23 5 "" GROUP 1 USE GMC KEY 2 - INPUT S0 F_GRMERC1D + INPUT S0 F_GRMERCD1 DISPLAY "Codice" CODTAB DISPLAY "Descrizione@50" S0 - OUTPUT F_GRMERC1 CODTAB[1,3] - OUTPUT F_GRMERC1B CODTAB[4,5] - OUTPUT F_GRMERC1D S0 -END - -STRING F_GRMERC2 3 -BEGIN - PROMPT 1 6 "Gruppo merc. 2 " - FIELD LF_ANAMAG->GRMERC2[1,3] - GROUP 2 - FLAG "U" -END - -STRING F_GRMERC2B 2 -BEGIN - PROMPT 21 6 "" - FIELD LF_ANAMAG->GRMERC2[4,5] - GROUP 2 - FLAG "U" - MESSAGE EMPTY CLEAR,3@ - MESSAGE ENABLE,3@ - NUM_EXPR (#F_GRMERC2=="")||(#F_GRMERC2!=#F_GRMERC1) - USE GMC - INPUT CODTAB[1,3] F_GRMERC2 - INPUT CODTAB[4,5] F_GRMERC2B - DISPLAY "Codice" CODTAB - DISPLAY "Descrizione@50" S0 - OUTPUT F_GRMERC2 CODTAB[1,3] - OUTPUT F_GRMERC2B CODTAB[4,5] - OUTPUT F_GRMERC2D S0 + OUTPUT F_GRMERC CODTAB[1,3] + OUTPUT F_GRMERCD1 S0 CHECKTYPE NORMAL END -STRING F_GRMERC2D 50 +STRING F_GRMERCB 2 BEGIN - PROMPT 26 6 "" - GROUP 2 - USE GMC KEY 2 - INPUT S0 F_GRMERC2D - DISPLAY "Codice" CODTAB - DISPLAY "Descrizione@50" S0 - OUTPUT F_GRMERC2 CODTAB[1,3] - OUTPUT F_GRMERC2B CODTAB[4,5] - OUTPUT F_GRMERC2D S0 -END - -STRING F_GRMERC3 3 -BEGIN - PROMPT 1 7 "Gruppo merc. 3 " - FIELD LF_ANAMAG->GRMERC3[1,3] - GROUP 3 + PROMPT 1 6 "Sott. merc. " + FIELD LF_ANAMAG->GRMERC[4,5] + GROUP 1 FLAG "U" -END - -STRING F_GRMERC3B 2 -BEGIN - PROMPT 21 7 "" - FIELD LF_ANAMAG->GRMERC3[4,5] - GROUP 3 - FLAG "U" - NUM_EXPR (#F_GRMERC3=="")||((#F_GRMERC3!=#F_GRMERC1)&&(#F_GRMERC3!=#F_GRMERC2)) USE GMC - INPUT CODTAB[1,3] F_GRMERC3 - INPUT CODTAB[4,5] F_GRMERC3B + INPUT CODTAB[1,3] F_GRMERC + INPUT CODTAB[4,5] F_GRMERCB DISPLAY "Codice" CODTAB DISPLAY "Descrizione@50" S0 - OUTPUT F_GRMERC3 CODTAB[1,3] - OUTPUT F_GRMERC3B CODTAB[4,5] - OUTPUT F_GRMERC3D S0 + OUTPUT F_GRMERC CODTAB[1,3] + OUTPUT F_GRMERCB CODTAB[4,5] + OUTPUT F_GRMERCD2 S0 CHECKTYPE NORMAL END -STRING F_GRMERC3D 50 +STRING F_GRMERCD2 50 BEGIN - PROMPT 26 7 "" - GROUP 3 + PROMPT 23 6 "" + GROUP 1 USE GMC KEY 2 - INPUT S0 F_GRMERC3D + INPUT S0 F_GRMERCD2 DISPLAY "Codice" CODTAB DISPLAY "Descrizione@50" S0 - OUTPUT F_GRMERC3 CODTAB[1,3] - OUTPUT F_GRMERC3B CODTAB[4,5] - OUTPUT F_GRMERC3D S0 + OUTPUT F_GRMERC CODTAB[1,3] + OUTPUT F_GRMERCB CODTAB[4,5] + OUTPUT F_GRMERCD2 S0 + CHECKTYPE NORMAL END STRING F_CODIVA 4 BEGIN - PROMPT 1 8 "Codice IVA " + PROMPT 1 7 "Codice IVA " FIELD LF_ANAMAG->CODIVA USE %IVA INPUT CODTAB F_CODIVA @@ -183,7 +123,7 @@ END STRING F_CODIVA1 50 BEGIN - PROMPT 26 8 "" + PROMPT 23 7 "" USE %IVA KEY 2 INPUT S0 F_CODIVA1 DISPLAY "Descrizione@50" S0 @@ -194,7 +134,7 @@ END SPREADSHEET F_SHEET0 77 5 BEGIN - PROMPT 1 9 "" + PROMPT 1 8 "" ITEM "U.M." ITEM "F. conversione" ITEM "Prezzo netto@18" @@ -203,7 +143,7 @@ END STRING F_CATCONA 3 BEGIN - PROMPT 1 15 "Categoria conto acquisti " + PROMPT 1 14 "Categoria conto acquisti " FIELD LF_ANAMAG->CATCONA GROUP 11 MESSAGE CLEAR,12@ @@ -223,7 +163,7 @@ END STRING F_CATCONA1 40 BEGIN - PROMPT 36 15 "" + PROMPT 36 14 "" FLAG "D" GROUP 11 USE CAA KEY 2 @@ -238,7 +178,7 @@ END STRING F_GRUPPOA 2 BEGIN - PROMPT 1 16 "Conto d'acquisto " + PROMPT 1 15 "Conto d'acquisto " FIELD LF_ANAMAG->GRUPPOA GROUP 12 MESSAGE CLEAR,11@ @@ -247,14 +187,14 @@ END STRING F_CONTOA 2 BEGIN - PROMPT 22 16 "" + PROMPT 22 15 "" FIELD LF_ANAMAG->CONTOA GROUP 12 END STRING F_SOTTOCA 6 BEGIN - PROMPT 26 16 "" + PROMPT 26 15 "" FIELD LF_ANAMAG->SOTTOCA GROUP 12 USE LF_PCON @@ -274,7 +214,7 @@ END STRING F_DESCRA 40 BEGIN - PROMPT 36 16 "" + PROMPT 36 15 "" FLAG "D" GROUP 12 USE LF_PCON KEY 2 @@ -290,7 +230,7 @@ END STRING F_CATCONV 3 BEGIN - PROMPT 1 17 "Categoria conto vendite " + PROMPT 1 16 "Categoria conto vendite " FIELD LF_ANAMAG->CATCONV GROUP 21 MESSAGE CLEAR,22@ @@ -310,7 +250,7 @@ END STRING F_CATCONV1 40 BEGIN - PROMPT 36 17 "" + PROMPT 36 16 "" FLAG "D" GROUP 21 USE CRA KEY 2 @@ -325,7 +265,7 @@ END STRING F_GRUPPOV 2 BEGIN - PROMPT 1 18 "Conto di vendita " + PROMPT 1 17 "Conto di vendita " FIELD LF_ANAMAG->GRUPPOV GROUP 22 MESSAGE CLEAR,21@ @@ -334,14 +274,14 @@ END STRING F_CONTOV 2 BEGIN - PROMPT 22 18 "" + PROMPT 22 17 "" FIELD LF_ANAMAG->CONTOV GROUP 22 END STRING F_SOTTOCV 6 BEGIN - PROMPT 26 18 "" + PROMPT 26 17 "" FIELD LF_ANAMAG->SOTTOCV GROUP 22 USE LF_PCON @@ -361,7 +301,7 @@ END STRING F_DESCRV 40 BEGIN - PROMPT 36 18 "" + PROMPT 36 17 "" FLAG "D" GROUP 22 USE LF_PCON KEY 2 @@ -375,19 +315,19 @@ END STRING F_UMP 3 BEGIN - PROMPT 1 19 "U.M. peso " + PROMPT 1 18 "U.M. peso " FIELD LF_ANAMAG->UMP END NUMBER F_PESO 15 5 BEGIN - PROMPT 30 19 "Peso " + PROMPT 30 18 "Peso " FIELD LF_ANAMAG->PESO END STRING F_CLASSDOG 10 BEGIN - PROMPT 1 20 "Classe doganale " + PROMPT 1 19 "Classe doganale " FIELD LF_ANAMAG->CLASSDOG FLAG "UZ" USE %CLD @@ -401,7 +341,7 @@ END STRING F_CLASSDOG1 40 BEGIN - PROMPT 36 20 "" + PROMPT 36 19 "" FLAG "D" END