Spostata variazione sede legale o residenza vicino all' indirizzo

Aggiunta variazione domicilio fiscale per le persone giuridiche


git-svn-id: svn://10.65.10.50/trunk@763 c028cbd2-c16b-5b4b-a496-9718f37d4682

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

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

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