Modifica alle anagrafiche windows :

Eliminati i campi NUMMECC, VOLTRIB, REGTRIB e FASCTRIB.
Aggiunto il campo numero del registro imprese (REGIMP) diviso in
5 sottocampi : sigla provincia (AA), Codice ISTAT(NNN), anno(NNNN),
Numero (ZZZZZZZZZ) e Carattere di controllo (A).
Modificato NUMCCIA in numero REA.


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

ba/ba4400.h

@@ -32,7 +32,6 @@
 #define FLD_UL1_CAPULC 103
 #define FLD_UL1_COMULC_COMUNI_PROVCOM 104
 #define FLD_UL1_NUMCCIAA 105
-#define FLD_UL1_NUMMECC 106
 #define FLD_UL1_DATAICCIAA 107
 #define FLD_UL1_DATAVCCIAA 108
 #define FLD_UL1_NUMREC 109
@@ -41,9 +40,6 @@
 #define FLD_UL1_ALTAUT 112
 #define FLD_UL2_POSINPS 117
 #define FLD_UL2_POSINAIL 118
-#define FLD_UL2_REGTRIB 119
-#define FLD_UL2_VOLTRIB 120
-#define FLD_UL2_FSCTRIB 121
 #define FLD_UL2_CAPTRIB 122
 #define FLD_UL2_MQULC 123
 #define FDL_UL2_MQULCMAG 124
@@ -60,5 +56,10 @@
 #define FLD_UL1_COMULC_COMUNI_DENCOM 137
 #define FLD_UL1_COMCCIAA 138
 #define FLD_UL1_COMCCIAA_COMUNI_DENCOM 139
+#define F_REGIMP1 140
+#define F_REGIMP2 141
+#define F_REGIMP3 142
+#define F_REGIMP4 143
+#define F_REGIMP5 144
 
 #endif  // __BA4400_H

ba/ba4400a.uml

@@ -144,7 +144,7 @@ END
 
 STRING FLD_UL1_NUMCCIAA 7
 BEGIN
-  PROMPT 1 7 "Numero         "
+  PROMPT 1 7 "Numero REA     "
   FIELD LF_UNLOC->NUMCCIAA
   HELP "Numero autorizzazione alla camera di commercio"
 END
@@ -156,14 +156,6 @@ BEGIN
   HELP "Data di iscrizione alla camera di commercio"
 END
 
-STRING FLD_UL1_NUMMECC 7
-BEGIN
-  PROMPT 1 8 "N.Mecc.        "
-  FIELD LF_UNLOC->NUMMECC
-  FLAGS "R"
-  HELP "Numero meccanografico dell'iscrizione"
-END
-
 DATE FLD_UL1_DATAVCCIAA
 BEGIN
   PROMPT 40 8 "Data ultima variazione "
@@ -335,30 +327,40 @@ END
 
 GROUPBOX DLG_NULL 76 5
 BEGIN
-  PROMPT 0 9 "Tribunale"
+  PROMPT 0 9 "Registro imprese"
 END
 
-STRING FLD_UL2_REGTRIB 9
+STRING F_REGIMP1 2
 BEGIN
-  PROMPT 1 10 "Regist."
+  PROMPT 1 10 "Numero "
-  FIELD LF_UNLOC->REGTRIB
+  FIELD REGIMP[1,2]
-  HELP "Numero di registro del tribunale in cui e' iscritta la ditta"
+  FLAGS "U"
 END
 
-STRING FLD_UL2_VOLTRIB 7
+NUMBER F_REGIMP2 3
 BEGIN
-  PROMPT 30 10 "Volume "
+  PROMPT 12 10 ""
-  FIELD LF_UNLOC->VOLTRIB
+  FIELD REGIMP[3,5]
-  FLAGS "R"
-  HELP "Numero del volume del tribunale in cui e' iscritta la ditta"
 END
 
-STRING FLD_UL2_FSCTRIB 5
+NUMBER F_REGIMP3 4
 BEGIN
-  PROMPT 57 10 "Fascicolo "
+  PROMPT 17 10 ""
-  FIELD LF_UNLOC->FASCTRIB
+  FIELD REGIMP[6,9]
-  FLAGS "R"
+END
-  HELP "Numero del fascicolo del tribunale in cui e' iscritta la ditta"
+
+NUMBER F_REGIMP4 9
+BEGIN
+  PROMPT 23 10 ""
+  FIELD REGIMP[10,18]
+  FLAGS "Z"
+END
+
+STRING F_REGIMP5 1
+BEGIN
+  PROMPT 34 10 ""
+  FIELD REGIMP[19,19] 
+  FLAGS "U"
 END
 
 STRING FLD_UL2_COMTRIB 4

ba/f11.dir

@@ -1,3 +1,3 @@
 11
 1
-%unloc|0|0|181|0|Unita' locali|#9||
+%unloc|0|0|172|0|Unita' locali|#9||

ba/f11.trr

@@ -1,5 +1,5 @@
 11
-24
+21
 CODDITTA|3|5|0|Codice ditta
 CODULC|2|3|0|Codice unita' locale
 COMULC|1|4|0|Codice comune unita' locale
@@ -8,7 +8,6 @@ CAPULC|1|5|0|CAP Unita' locale
 CIVULC|1|10|0|N.ro civico unita' locale
 NUMCCIAA|3|7|0|Numero di iscrizione alla camera di commercio
 COMCCIAA|1|4|0|Codice comune di iscrizione alla camera di commercio
-NUMMECC|3|7|0|Numero meccanografico di iscrizione alla camera di commercio
 DATAICCIAA|5|8|0|Data di iscrizione alla camera di commercio
 DATAVCCIAA|5|8|0|Data ultima variazione camera di commercio
 NUMREC|3|7|0|Numero R.E.C.
@@ -17,9 +16,7 @@ AUTPS|3|7|0|Numero autorizzazione di pubblica sicurezza
 ALTAUT|2|1|0|Numero altre autorizzazioni
 POSINPS|1|13|0|Posizione INPS
 POSINAIL|1|11|0|Posizione INAIL
-REGTRIB|1|9|0|Numero registro del tribunale
+REGIMP|1|19|0|Numero registro delle imprese
-VOLTRIB|3|7|0|Volume tribunale
-FASCTRIB|3|5|0|Fascicolo tribunale
 COMTRIB|1|4|0|Codice comune tribunale
 CAPTRIB|1|5|0|CAP tribunale
 MQULC|3|5|0|Metri quadrati unita' locale