diff --git a/ve/ve6200a.uml b/ve/ve6200a.uml index 30663880b..a711e3759 100755 --- a/ve/ve6200a.uml +++ b/ve/ve6200a.uml @@ -96,23 +96,23 @@ END STRING F_CODICE_AGENTE_DA 5 BEGIN PROMPT 20 7 "da codice agente " - FLAG "UR" - USE AGE - INPUT CODTAB F_CODICE_AGENTE_DA - DISPLAY "Codice agente" CODTAB - DISPLAY "Descrizione@50" S0 - OUTPUT F_CODICE_AGENTE_DA CODTAB + FLAG "UZ" + USE LF_AGENTI + INPUT CODAGE F_CODICE_AGENTE_DA + DISPLAY "Codice agente" CODAGE + DISPLAY "Descrizione@50" RAGSOC + OUTPUT F_CODICE_AGENTE_DA CODAGE GROUP 2 END STRING F_CODICE_AGENTE_A 5 BEGIN PROMPT 55 7 "a " - FLAG "UR" - USE AGE - INPUT CODTAB F_CODICE_AGENTE_A + FLAG "UZ" + USE LF_AGENTI + INPUT CODAGE F_CODICE_AGENTE_A COPY DISPLAY F_CODICE_AGENTE_DA - OUTPUT F_CODICE_AGENTE_A CODTAB + OUTPUT F_CODICE_AGENTE_A CODAGE NUM_EXPR #F_CODICE_AGENTE_A>=#F_CODICE_AGENTE_DA WARNING "Digitare un codice maggiore o uguale al campo 'da codice agente'" GROUP 2 diff --git a/ve/veacc.frm b/ve/veacc.frm index 287bcc7e9..123e3123b 100755 --- a/ve/veacc.frm +++ b/ve/veacc.frm @@ -7,7 +7,7 @@ JOIN 16 TO 33 INTO TIPOCF==TIPOCF CODCF==CODCF CODIND==CODINDSP JOIN 16 TO 17 ALIAS 116 INTO TIPOCF==TIPOCF CODCF==CODCF CODIND==CODINDSP JOIN 47 INTO CODART==CODART JOIN %CPG TO 33 ALIAS 201 INTO CODTAB==CODPAG -JOIN %AGE TO 33 ALIAS 202 INTO CODTAB==CODAG +JOIN 122 TO 33 ALIAS 202 INTO CODTAB==CODAG JOIN %POR TO 33 ALIAS 203 INTO CODTAB==CODPORTO JOIN %BAN TO 33 ALIAS 204 INTO CODTAB==CODABIA+CODCABA JOIN %VET TO 33 ALIAS 205 INTO CODTAB==CODVETT1 diff --git a/ve/vebol.frm b/ve/vebol.frm index 8ef47e16f..e7dc342a2 100755 --- a/ve/vebol.frm +++ b/ve/vebol.frm @@ -3,7 +3,7 @@ JOIN 34 INTO CODNUM==CODNUM ANNO==ANNO PROVV==PROVV NDOC==NDOC JOIN 16 TO 33 INTO TIPOCF==TIPOCF CODCF==CODCF CODIND==CODINDSP JOIN 47 TO 34 INTO CODART==CODART JOIN %CPG TO 33 ALIAS 201 INTO CODTAB==CODPAG -JOIN %AGE TO 33 ALIAS 202 INTO CODTAB==CODAG +JOIN 122 TO 33 ALIAS 202 INTO CODTAB==CODAG JOIN %POR TO 33 ALIAS 203 INTO CODTAB==CODPORTO JOIN %BAN TO 33 ALIAS 204 INTO CODTAB==CODABIA+CODCABA JOIN %VET TO 33 ALIAS 205 INTO CODTAB==CODVETT1 diff --git a/ve/vebolbmp.frm b/ve/vebolbmp.frm index 8687d061a..5976dee65 100755 --- a/ve/vebolbmp.frm +++ b/ve/vebolbmp.frm @@ -3,7 +3,7 @@ JOIN 34 INTO CODNUM==CODNUM ANNO==ANNO PROVV==PROVV NDOC==NDOC JOIN 16 TO 33 INTO TIPOCF==TIPOCF CODCF==CODCF CODIND==CODINDSP JOIN 47 INTO CODART==CODART JOIN %CPG TO 33 ALIAS 201 INTO CODTAB==CODPAG -JOIN %AGE TO 33 ALIAS 202 INTO CODTAB==CODAG +JOIN 122 TO 33 ALIAS 202 INTO CODTAB==CODAG JOIN %POR TO 33 ALIAS 203 INTO CODTAB==CODPORTO JOIN %BAN TO 33 ALIAS 204 INTO CODTAB==CODABIA+CODCABA JOIN %VET TO 33 ALIAS 205 INTO CODTAB==CODVETT1 diff --git a/ve/vefat.frm b/ve/vefat.frm index 22bea9eca..3b1ba44dc 100755 --- a/ve/vefat.frm +++ b/ve/vefat.frm @@ -6,7 +6,7 @@ JOIN 16 TO 33 INTO TIPOCF==TIPOCF CODCF==CODCF CODIND==CODINDSP JOIN 16 TO 17 ALIAS 116 INTO TIPOCF==TIPOCF CODCF==CODCF CODIND==CODINDSP JOIN 47 TO 34 INTO CODART==CODART JOIN %CPG TO 33 ALIAS 201 INTO CODTAB==CODPAG -JOIN %AGE TO 33 ALIAS 202 INTO CODTAB==CODAG +JOIN 122 TO 33 ALIAS 202 INTO CODTAB==CODAG JOIN %POR TO 33 ALIAS 203 INTO CODTAB==CODPORTO JOIN %BAN TO 33 ALIAS 204 INTO CODTAB==CODABIA+CODCABA JOIN %VET TO 33 ALIAS 205 INTO CODTAB==CODVETT1