Aggiunto luogo di costituzione

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

ba/ba4200.h

@@ -386,6 +386,7 @@
 #define F_TIPOSTDEL    395
 #define F_CODABI       396
 #define F_CODCAB       397
-
+#define F_COMCOST      398
+#define F_DENCOMCOST   399
 
 #endif  // __BA4200_H

ba/ba4200c.uml

@@ -209,7 +209,8 @@ BEGIN
   FIELD LF_ANAG->INDRES
   HELP "Indirizzo della sede della ditta"
   WARNING "Completare l'indirizzo di residenza"
-  VALIDATE REQIF_FUNC 1 FLD_AG2_COMRES
+
+  CHECKTYPE REQUIRED
 END
 
 STRING FLD_AG2_CIVRES 10
@@ -547,21 +548,55 @@ BEGIN
   GROUP 2
 END
 
+GROUPBOX DLG_NULL 28 5
+BEGIN
+  PROMPT 1 9 "Bilancio"
+END
+
 GROUPBOX DLG_NULL 76 13
 BEGIN
   PROMPT 0 4 "Dati Societa'"
 END
 
+STRING F_COMCOST 4
+BEGIN
+  PROMPT 2 5 "Luogo costituz. "
+  FIELD LF_ANAGGIU->COMCOST
+  FLAGS "U"
+  USE LF_COMUNI
+  COPY USE FLD_AG2_COMRES
+  INPUT STATO ""
+  INPUT COM F_COMCOST
+#include <comdcod.h>
+  OUTPUT F_COMCOST COM
+  OUTPUT F_DENCOMCOST DENCOM
+  HELP "Codice del comune sede della ditta"
+  CHECKTYPE NORMAL
+  WARNING "Comune assente"
+  ADD MASK ba4100a
+END
+
+STRING F_DENCOMCOST 50 46
+BEGIN
+  PROMPT 26 5 ""
+  COPY USE FLD_AG2_COMRES_COMUNI_DENCOM
+  INPUT DENCOM F_DENCOMCOST
+#include <comdden.h>
+  COPY OUTPUT F_COMCOST
+  CHECKTYPE NORMAL
+  ADD MASK ba4100a
+END
+
 DATE FLD_AG3_DATACOST
 BEGIN
-  PROMPT 2 5 "Data costituz.  "
+  PROMPT 2 6 "Data costituz.  "
   FIELD LF_ANAGGIU->DATACOST
   HELP "Data di costituzione della ditta"
 END
 
 DATE FLD_AG3_DATAOMOL
 BEGIN
-  PROMPT 31 5 "Data omologa                    "
+  PROMPT 31 6 "Data omologa                    "
   FIELD LF_ANAGGIU->DATAOMOL
   HELP "Data di omologazione della ditta"
   WARNING "Data non corretta"
@@ -570,7 +605,7 @@ END
 
 DATE FLD_AG3_DATAISCRIZ
 BEGIN
-  PROMPT 2 6 "Data iscrizione "
+  PROMPT 2 7 "Data iscrizione "
   FIELD LF_ANAGGIU->DATAISCRIZ
   HELP "Data di iscrizione della ditta"
   WARNING "Data non corretta"
@@ -579,14 +614,14 @@ END
 
 DATE FLD_AG3_DATASORAMM
 BEGIN
-  PROMPT 31 6 "Data scadenza organo amministr. "
+  PROMPT 31 7 "Data scadenza organo amministr. "
   FIELD LF_ANAGGIU->DATASORAMM
   HELP "Data di scadenza degli organismi amministrativi"
 END
 
 DATE FLD_AG3_DATASCAD
 BEGIN
-  PROMPT 2 7 "Data scadenza   "
+  PROMPT 2 8 "Data scadenza   "
   FIELD LF_ANAGGIU->DATASCAD
   HELP "Data di scadenza della ditta"
   WARNING "La data di scadenza non puo' precedere quella di costituzione"
@@ -595,16 +630,11 @@ END
 
 DATE FLD_AG3_DATASCSIND
 BEGIN
-  PROMPT 31 7 "Data scadenza collegio sindac.  "
+  PROMPT 31 8 "Data scadenza collegio sindac.  "
   FIELD LF_ANAGGIU->DATASCSIND
   HELP "Data di scadenza delo collegio sindacale"
 END
 
-GROUPBOX DLG_NULL 27 5
-BEGIN
-  PROMPT 1 9 "Bilancio"
-END
-
 DATE FLD_AG3_DATATAPPBI
 BEGIN
   PROMPT 2 10 "Data termine  "