diff --git a/ba/batb%del.uml b/ba/batb%del.uml index 08533a379..9e88681a4 100755 --- a/ba/batb%del.uml +++ b/ba/batb%del.uml @@ -11,8 +11,8 @@ PAGE "Tabella deleghe IVA" -1 -1 78 15 NUMBER F_CODDITTA 5 BEGIN PROMPT 4 1 "Ditta " - FIELD %DEL->CODTAB[1,5] - FLAGS "FRZ" + FIELD CODTAB[1,5] + FLAGS "FR" KEY 1 USE LF_NDITTE KEY 1 INPUT CODDITTA F_CODDITTA @@ -40,7 +40,8 @@ END NUMBER F_ANNO 4 BEGIN PROMPT 4 3 "Anno " - FIELD %DEL->CODTAB[6,9] + FIELD CODTAB[6,9] + CHECKTYPE REQUIRED FLAGS "RA" KEY 1 USE %DEL @@ -64,7 +65,7 @@ END LIST F_MESE 10 BEGIN PROMPT 4 4 "Mese " - FIELD %DEL->CODTAB[10,11] + FIELD CODTAB[10,11] FLAGS "MA" KEY 1 COPY ALL F_ANNO @@ -77,7 +78,7 @@ END LIST F_TIPO 20 BEGIN PROMPT 4 5 "Tipo " - FIELD %DEL->CODTAB[12,12] + FIELD CODTAB[12,12] KEY 1 HELP "Introdurre il tipo di versamento" ITEM "1|normale" @@ -97,14 +98,14 @@ END DATE F_DATA BEGIN PROMPT 4 7 "Data " - FIELD %DEL->D0 + FIELD D0 HELP "Introdurre la data di versamento" END NUMBER F_BANCA1 5 BEGIN PROMPT 4 8 "Codice ABI " - FIELD %DEL->S7 + FIELD S7 FLAGS "RZ" USE %BAN INPUT CODTAB[1,5] F_BANCA1 @@ -121,7 +122,7 @@ END NUMBER F_BANCA2 5 BEGIN PROMPT 4 9 "Codice CAB " - FIELD %DEL->S8 + FIELD S8 FLAGS "RZ" COPY ALL F_BANCA1 CHECKTYPE NORMAL @@ -131,7 +132,7 @@ END NUMBER F_IMPORTO 15 BEGIN PROMPT 4 10 "Importo " - FIELD %DEL->R0 + FIELD R0 FLAGS "R" HELP "Introdurre l'importo versato" END @@ -139,7 +140,7 @@ END BOOLEAN F_STAMPATO BEGIN PROMPT 4 12 "Stampato " - FIELD %DEL->B0 + FIELD B0 END ENDPAGE