diff --git a/ba/ba4200b.uml b/ba/ba4200b.uml index efa48c9ba..8110e528f 100755 --- a/ba/ba4200b.uml +++ b/ba/ba4200b.uml @@ -796,7 +796,7 @@ DISPLAY "Codice CAB" CODTAB[6,10] DISPLAY "Descrizione@50" S0 OUTPUT F_CODABI CODTAB[1,5] OUTPUT F_CODCAB CODTAB[6,10] -CHECKTYPE NORMAL +// CHECKTYPE NORMAL END NUMBER F_CODCAB 5 @@ -808,6 +808,7 @@ FLAGS "Z" COPY ALL F_CODABI CHECKTYPE NORMAL VALIDATE REQIF_FUNC 1 F_CODABI +WARNING "Codice CAB assente" END NUMBER F_UFFCONC 3 diff --git a/ba/ba4200c.uml b/ba/ba4200c.uml index a8495f891..67382aceb 100755 --- a/ba/ba4200c.uml +++ b/ba/ba4200c.uml @@ -22,15 +22,15 @@ PAGE "Persone Giuridiche" -1 -1 77 20 LIST DLG_NULL 1 BEGIN FIELD LF_ANAG->TIPOA - ITEM "G|Giuridica" - FLAGS "D" - KEY 1 2 3 + ITEM "G|Giuridica" + FLAGS "D" + KEY 1 2 3 END GROUPBOX DLG_NULL 76 4 BEGIN PROMPT 0 0 "Persone giuridiche" - FLAGS "R" + FLAGS "R" END NUMBER FLD_CODANAGR 5 @@ -189,7 +189,7 @@ PAGE "Anagrafica persone giuridiche" -1 -1 77 20 GROUPBOX DLG_NULL 76 4 BEGIN PROMPT 0 0 "Persone giuridiche" - FLAGS "R" + FLAGS "R" END NUMBER DLG_NULL 5 @@ -356,30 +356,30 @@ END STRING FLD_AG1_COMRF_COMUNI_PROVCOM 5 BEGIN - PROMPT 38 13 "Provincia " - FLAGS "D" + PROMPT 38 13 "Provincia " + FLAGS "D" END STRING FLD_AG1_CAPRF 5 BEGIN - PROMPT 56 13 "CAP " - FIELD LF_ANAG->CAPRF - HELP "CAP del comune domicilio fiscale della ditta" + PROMPT 56 13 "CAP " + FIELD LF_ANAG->CAPRF + HELP "CAP del comune domicilio fiscale della ditta" END STRING FLD_AG1_COMRF_COMUNI_DENCOM 50 BEGIN - PROMPT 9 14 ": Denom. " - HELP "Nome del comune residenza fiscale" - USE LF_COMUNI KEY 2 SELECT STATO=="" - COPY USE FLD_AG2_COMRES_COMUNI_DENCOM - INPUT DENCOM FLD_AG1_COMRF_COMUNI_DENCOM - COPY DISPLAY FLD_AG2_COMRES_COMUNI_DENCOM - OUTPUT FLD_AG1_COMRF COM - OUTPUT FLD_AG1_COMRF_COMUNI_DENCOM DENCOM - OUTPUT FLD_AG1_COMRF_COMUNI_PROVCOM PROVCOM - OUTPUT FLD_AG1_CAPRF CAPCOM - ADD RUN ba4 -0 + PROMPT 9 14 ": Denom. " + HELP "Nome del comune residenza fiscale" + USE LF_COMUNI KEY 2 SELECT STATO=="" + COPY USE FLD_AG2_COMRES_COMUNI_DENCOM + INPUT DENCOM FLD_AG1_COMRF_COMUNI_DENCOM + COPY DISPLAY FLD_AG2_COMRES_COMUNI_DENCOM + OUTPUT FLD_AG1_COMRF COM + OUTPUT FLD_AG1_COMRF_COMUNI_DENCOM DENCOM + OUTPUT FLD_AG1_COMRF_COMUNI_PROVCOM PROVCOM + OUTPUT FLD_AG1_CAPRF CAPCOM + ADD RUN ba4 -0 END BOOLEAN F_VARDF @@ -406,7 +406,7 @@ PAGE "Anagrafica persone giuridiche" -1 -1 77 20 GROUPBOX DLG_NULL 76 4 BEGIN PROMPT 0 0 "Persone giuridiche" - FLAGS "R" + FLAGS "R" END NUMBER DLG_NULL 5 @@ -434,8 +434,8 @@ BEGIN PROMPT 2 5 "Indirizzo " FIELD LF_ANAG->INDCORR HELP "Indirizzo a cui mandare la corrispondenza" - WARNING "Completare l'indirizzo di corrispondenza" - VALIDATE EMPTYCOPY_FUNC FLD_AG2_INDRES + WARNING "Completare l'indirizzo di corrispondenza" + VALIDATE EMPTYCOPY_FUNC FLD_AG2_INDRES END STRING FLD_AG2_CIVCORR 10 @@ -443,7 +443,7 @@ BEGIN PROMPT 56 5 "N." FIELD LF_ANAG->CIVCORR HELP "Numero civico a cui mandare la corrispondenza" - VALIDATE EMPTYCOPY_FUNC FLD_AG2_CIVRES + VALIDATE EMPTYCOPY_FUNC FLD_AG2_CIVRES END STRING F_LOCCORR 35 @@ -455,7 +455,7 @@ END NUMBER FLD_AG2_STATOCORR 3 BEGIN - PROMPT 2 7 "Comune : Stato " + PROMPT 2 7 "Comune : Stato " FIELD LF_ANAG->STATOCORR FLAGS "Z" USE %STA @@ -503,23 +503,23 @@ END STRING FLD_AG2_COMCORR_COMUNI_DENCOM 50 BEGIN - PROMPT 9 9 ": Denom. " - HELP "Nome del comune a cui mandare la corrispondenza" - COPY USE FLD_AG2_COMRES_COMUNI_DENCOM - INPUT DENCOM FLD_AG2_COMCORR_COMUNI_DENCOM - COPY DISPLAY FLD_AG2_COMRES_COMUNI_DENCOM - OUTPUT FLD_AG2_STATOCORR STATO - OUTPUT FLD_AG2_COMCORR COM - OUTPUT FLD_AG2_COMCORR_COMUNI_DENCOM DENCOM - OUTPUT FLD_AG2_COMCORR_COMUNI_PROVCOM PROVCOM - OUTPUT FLD_AG2_CAPCORR CAPCOM - ADD RUN ba4 -0 + PROMPT 9 9 ": Denom. " + HELP "Nome del comune a cui mandare la corrispondenza" + COPY USE FLD_AG2_COMRES_COMUNI_DENCOM + INPUT DENCOM FLD_AG2_COMCORR_COMUNI_DENCOM + COPY DISPLAY FLD_AG2_COMRES_COMUNI_DENCOM + OUTPUT FLD_AG2_STATOCORR STATO + OUTPUT FLD_AG2_COMCORR COM + OUTPUT FLD_AG2_COMCORR_COMUNI_DENCOM DENCOM + OUTPUT FLD_AG2_COMCORR_COMUNI_PROVCOM PROVCOM + OUTPUT FLD_AG2_CAPCORR CAPCOM + ADD RUN ba4 -0 VALIDATE EMPTYCOPY_FUNC FLD_AG2_COMRES_COMUNI_DENCOM END GROUPBOX DLG_NULL 75 5 BEGIN - PROMPT 0 11 "Telefoni" + PROMPT 0 11 "Telefoni" END STRING FLD_AG2_PTELRF 10 @@ -571,7 +571,7 @@ PAGE "Anagrafica persone giuridiche" -1 -1 77 20 GROUPBOX DLG_NULL 76 4 BEGIN PROMPT 0 0 "Persone giuridiche" - FLAGS "R" + FLAGS "R" END NUMBER DLG_NULL 5 @@ -681,7 +681,7 @@ DATE FLD_AG3_DATATAPPBI BEGIN PROMPT 2 10 "Data termine " FIELD LF_ANAGGIU->DATATAPPBI - HELP "Data termine dell'anno che compare sul bilancio" + HELP "Data termine dell'anno che compare sul bilancio" END BOOLEAN CHK_AGIU2_VARDEN @@ -799,7 +799,7 @@ PAGE "Anagrafica persone giuridiche" -1 -1 77 20 GROUPBOX DLG_NULL 76 4 BEGIN PROMPT 0 0 "Persone giuridiche" - FLAGS "R" + FLAGS "R" END NUMBER DLG_NULL 5 @@ -914,7 +914,7 @@ BEGIN DISPLAY "Descrizione@50" S0 OUTPUT F_CODABI CODTAB[1,5] OUTPUT F_CODCAB CODTAB[6,10] - CHECKTYPE NORMAL +// CHECKTYPE NORMAL END NUMBER F_CODCAB 5 @@ -948,7 +948,7 @@ PAGE "Anagrafica persone giuridiche" -1 -1 77 20 GROUPBOX DLG_NULL 76 4 BEGIN PROMPT 0 0 "Persone giuridiche" - FLAGS "R" + FLAGS "R" END NUMBER DLG_NULL 5 @@ -1107,7 +1107,7 @@ PAGE "Anagrafica persone giuridiche" -1 -1 77 20 GROUPBOX DLG_NULL 76 4 BEGIN PROMPT 0 0 "Persone giuridiche" - FLAGS "R" + FLAGS "R" END NUMBER DLG_NULL 5