From 633521019d588437e1925a901f56bc21332f0702 Mon Sep 17 00:00:00 2001 From: alex Date: Mon, 3 Nov 1997 15:43:22 +0000 Subject: [PATCH] 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 | 9 +++++---- ba/ba4400a.uml | 50 ++++++++++++++++++++++++++------------------------ ba/f11.dir | 2 +- ba/f11.trr | 7 ++----- 4 files changed, 34 insertions(+), 34 deletions(-) diff --git a/ba/ba4400.h b/ba/ba4400.h index f186dc7ef..448f676c7 100755 --- a/ba/ba4400.h +++ b/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 diff --git a/ba/ba4400a.uml b/ba/ba4400a.uml index 194e55d20..33c54c6b6 100755 --- a/ba/ba4400a.uml +++ b/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." - FIELD LF_UNLOC->REGTRIB - HELP "Numero di registro del tribunale in cui e' iscritta la ditta" + PROMPT 1 10 "Numero " + FIELD REGIMP[1,2] + FLAGS "U" END -STRING FLD_UL2_VOLTRIB 7 +NUMBER F_REGIMP2 3 BEGIN - PROMPT 30 10 "Volume " - FIELD LF_UNLOC->VOLTRIB - FLAGS "R" - HELP "Numero del volume del tribunale in cui e' iscritta la ditta" + PROMPT 12 10 "" + FIELD REGIMP[3,5] END -STRING FLD_UL2_FSCTRIB 5 +NUMBER F_REGIMP3 4 BEGIN - PROMPT 57 10 "Fascicolo " - FIELD LF_UNLOC->FASCTRIB - FLAGS "R" - HELP "Numero del fascicolo del tribunale in cui e' iscritta la ditta" + PROMPT 17 10 "" + FIELD REGIMP[6,9] +END + +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 diff --git a/ba/f11.dir b/ba/f11.dir index 5791c2256..bde80382c 100755 --- a/ba/f11.dir +++ b/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|| diff --git a/ba/f11.trr b/ba/f11.trr index 26d232843..5bdc286fc 100755 --- a/ba/f11.trr +++ b/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 -VOLTRIB|3|7|0|Volume tribunale -FASCTRIB|3|5|0|Fascicolo tribunale +REGIMP|1|19|0|Numero registro delle imprese COMTRIB|1|4|0|Codice comune tribunale CAPTRIB|1|5|0|CAP tribunale MQULC|3|5|0|Metri quadrati unita' locale