diff --git a/ba/ba4200.h b/ba/ba4200.h index 9ac4f1cad..23d70be65 100755 --- a/ba/ba4200.h +++ b/ba/ba4200.h @@ -375,5 +375,7 @@ #define F_DVARSLORES 404 #define F_COFIEST 405 #define F_STATO 406 +#define F_VARDF 407 +#define F_DVARDF 408 #endif // __BA4200_H diff --git a/ba/ba4200b.uml b/ba/ba4200b.uml index d63c3b95c..a02ecf261 100755 --- a/ba/ba4200b.uml +++ b/ba/ba4200b.uml @@ -360,6 +360,22 @@ BEGIN HELP "Dire se si tratta di persone non residente" END +BOOLEAN F_VARSLORES +BEGIN + PROMPT 21 9 "Variata" + FIELD LF_ANAG->VARSLORES + HELP "Indicare se e' stata variata la sede legale" + MESSAGE FALSE CLEAR,F_DVARSLORES + MESSAGE TRUE ENABLE,F_DVARSLORES +END + +DATE F_DVARSLORES +BEGIN + PROMPT 38 9 "Data variazione " + FIELD LF_ANAG->DVARSLORES + HELP "Data di variazione della sede legale" +END + GROUPBOX DLG_NULL 76 6 BEGIN PROMPT 0 11 "Domicilio Fiscale (solo se diverso)" @@ -824,25 +840,9 @@ BEGIN ITEM "4|Interventi urgenti in Liguria e Toscana per avversita' atmosferiche" END -BOOLEAN F_VARSLORES -BEGIN - PROMPT 2 7 "Domicilio Fiscale variato" - FIELD LF_ANAG->VARSLORES - HELP "Indicare se e' stata variata la sede legale" - MESSAGE FALSE CLEAR,F_DVARSLORES - MESSAGE TRUE ENABLE,F_DVARSLORES -END - -DATE F_DVARSLORES -BEGIN - PROMPT 36 7 "Data variazione " - FIELD LF_ANAG->DVARSLORES - HELP "Data di variazione della sede legale o residenza" -END - BOOLEAN FLD_AF4_RFDIVERSA BEGIN - PROMPT 2 9 "Domicilio fiscale diverso da sede legale " + PROMPT 2 7 "Domicilio fiscale diverso da sede legale " FIELD LF_ANAG->RFDIVERSA HELP "Dire se il domicilio fiscale e' diverso della sede legale" END diff --git a/ba/ba4200c.uml b/ba/ba4200c.uml index 16b306b86..93338cab3 100755 --- a/ba/ba4200c.uml +++ b/ba/ba4200c.uml @@ -206,7 +206,7 @@ BEGIN GROUP 2 END -GROUPBOX DLG_NULL 76 6 +GROUPBOX DLG_NULL 76 7 BEGIN PROMPT 0 4 "Sede Legale" END @@ -280,14 +280,31 @@ BEGIN HELP "Indicare se si tratta di persona giuridica non residente" END -GROUPBOX DLG_NULL 76 6 +BOOLEAN F_VARSLORES BEGIN - PROMPT 0 10 "Domicilio Fiscale (solo se diverso)" + PROMPT 21 8 "Variata" + FIELD LF_ANAG->VARSLORES + HELP "Indicare se e' stata variata la sede legale della ditta" + MESSAGE FALSE CLEAR,F_DVARSLORES + MESSAGE FALSE RESET,F_DVARSLORES + MESSAGE TRUE ENABLE,F_DVARSLORES +END + +DATE F_DVARSLORES +BEGIN + PROMPT 38 8 "Data variazione " + FIELD LF_ANAG->DVARSLORES + HELP "Data di variazione della sede legale" +END + +GROUPBOX DLG_NULL 76 7 +BEGIN + PROMPT 0 11 "Domicilio Fiscale (solo se diverso)" END STRING FLD_AG1_INDRF 35 BEGIN - PROMPT 2 11 "Indirizzo " + PROMPT 2 12 "Indirizzo " FIELD LF_ANAG->INDRF HELP "Indirizzo della domicilio fiscale della ditta" WARNING "Completare l'indirizzo di domicilio fiscale" @@ -296,14 +313,14 @@ END STRING FLD_AG1_CIVRF 10 BEGIN - PROMPT 56 11 "N." + PROMPT 56 12 "N." FIELD LF_ANAG->CIVRF HELP "Numero civico della domicilio fiscale della ditta" END STRING FLD_AG1_COMRF 4 BEGIN - PROMPT 2 12 "Comune : Codice " + PROMPT 2 13 "Comune : Codice " FIELD LF_ANAG->COMRF FLAGS "U" COPY USE FLD_AG2_COMRES @@ -322,20 +339,20 @@ END STRING FLD_AG1_COMRF_COMUNI_PROVCOM 5 BEGIN - PROMPT 38 12 "Provincia " + PROMPT 38 13 "Provincia " FLAGS "D" END STRING FLD_AG1_CAPRF 5 BEGIN - PROMPT 56 12 "CAP " + 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 13 ": Denom. " + PROMPT 9 14 ": Denom. " HELP "Nome del comune residenza fiscale" USE LF_COMUNI KEY 2 SELECT STATO=="" COPY USE FLD_AG2_COMRES_COMUNI_DENCOM @@ -348,6 +365,23 @@ BEGIN ADD MASK ba4100a END +BOOLEAN F_VARDF +BEGIN + PROMPT 21 15 "Variata" + FIELD LF_ANAG->VARDF + HELP "Indicare se e' stata variato il domicilio fiscale della ditta" + MESSAGE FALSE CLEAR,F_DVARDF + MESSAGE FALSE RESET,F_DVARDF + MESSAGE TRUE ENABLE,F_DVARDF +END + +DATE F_DVARDF +BEGIN + PROMPT 38 15 "Data variazione " + FIELD LF_ANAG->DVARDF + HELP "Data di variazione del domicilio fiscale" +END + ENDPAGE PAGE "Anagrafica persone giuridiche" -1 -1 77 20 @@ -901,26 +935,9 @@ BEGIN ITEM "4|Interventi urgenti in Liguria e Toscana per avversita' atmosferiche" END -BOOLEAN F_VARSLORES -BEGIN - PROMPT 2 5 "Sede legale variata" - FIELD LF_ANAG->VARSLORES - HELP "Indicare se e' stata variata la sede legale della ditta" - MESSAGE FALSE CLEAR,F_DVARSLORES - MESSAGE FALSE RESET,F_DVARSLORES - MESSAGE TRUE ENABLE,F_DVARSLORES -END - -DATE F_DVARSLORES -BEGIN - PROMPT 37 5 "Data variazione " - FIELD LF_ANAG->DVARSLORES - HELP "Data di variazione delle sede legale" -END - BOOLEAN CHK_AG5_RFDSL BEGIN - PROMPT 2 6 "Domcilio fiscale diverso sede legale" + PROMPT 2 5 "Domcilio fiscale diverso sede legale" FIELD LF_ANAG->RFDIVERSA HELP "Indicare se il domicilio fiscale e' diverso dalla sede legale" END