From 3048dced9731c79a36c72a4f0630c8239c5e7356 Mon Sep 17 00:00:00 2001 From: guy Date: Mon, 6 May 2013 08:53:11 +0000 Subject: [PATCH] Prima versione 770 2013 git-svn-id: svn://10.65.10.50/branches/R_10_00@22851 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- m770/777100.cpp | 45 +++++++++++++++++++++------------------------ 1 file changed, 21 insertions(+), 24 deletions(-) diff --git a/m770/777100.cpp b/m770/777100.cpp index 58771ba4d..81476d673 100755 --- a/m770/777100.cpp +++ b/m770/777100.cpp @@ -28,7 +28,7 @@ // Codice fiscale di Sirio spa #define CF_PRODUTTORE "00909290355" -const int ANNO_DIC = 2011; +const int ANNO_DIC = 2012; /////////////////////////////////////////////////////////// // TForm770 @@ -778,39 +778,37 @@ TTracciato770::TTracciato770(char tipo) : _tipo(tipo) add_field("Situazioni particolari", NU,1180,2, 100); // 100 - add_field("Codice fiscale del rappresentante", CF,1396,16,110); // 110 + add_field("Codice fiscale del rappresentante", CF,1396,16,126); // 126 add_field("Codice carica del rappresentante", NU,1412, 2); add_field("Data carica del rappresentante", DT,1414, 8); - add_field("Cognome", AN,1493,24, 115); // 115 + add_field("Cognome", AN,1493,24, 131); // 131 add_field("Nome", AN,1517,20); add_field("Sesso", AN,1537, 1); add_field("Data di nascita rappresentante", DT,1538, 8); - add_field("Comune di nascita", AN,1546,40); // 119 + add_field("Comune di nascita", AN,1546,40); // 135 add_field("Provincia di nascita", PN,1586, 2); - add_field("Codice stato estero", NU,1588, 3); // 121 + add_field("Codice stato estero", NU,1588, 3); // 137 add_field("Stato federato, provincia, contea", AN,1591,24); - add_field("Localitį di residenza", AN,1615,24); - add_field("Indirizzo estero", AN,1639,35); // 124 + add_field("Localitą di residenza", AN,1615,24); + add_field("Indirizzo estero", AN,1639,35); // 140 - add_field("Data apertura fallimento", DT,1686, 8, 126); // 126 + add_field("Data apertura fallimento", DT,1686, 8, 142); // 142 add_field("Codice fiscale societa o dichiarante", NU,1694,11); - add_field("Invio avviso telematico", CB,1715, 1, 131); // 131 + add_field("Invio avviso telematico", CB,1715, 1, 147); // 147 add_field("Ricezione avviso telematico", CB,1716, 1); add_field("Codice fiscale intermediario", CF,1717,16); add_field("Numero iscrizione C.A.F.", NU,1733, 5); - add_field("Impegno a trasmettere la dichiaraz.", NU,1738, 1); // 135 + add_field("Impegno a trasmettere la dichiaraz.", NU,1738, 1); // 151 add_field("Data dell'impegno", DT,1739, 8); add_field("Firma dell'intermediario", CB,1747, 1); add_field("Codice fiscale responsabile C.A.F.", CF,1748,16); add_field("Codice fiscale C.A.F.", CN,1764,11); - add_field("Codice fiscale professionista", CF,1775,16); // 140 + add_field("Codice fiscale professionista", CF,1775,16); // 156 add_field("Firma", CB,1791, 1); - add_field("Importi < 1 Euro", CB,1878, 1, 152); // 152 (NU ma vale 1 o 0) } else - if (tipo == 'E' || tipo == 'F') { add_field("Codice fiscale del dichiarante", CF, 2, 16); // 2 @@ -1184,7 +1182,7 @@ TRecord770::~TRecord770() /////////////////////////////////////////////////////////// const char* TTrasferimento770::default_name() const -{ return "MOD77012"; } +{ return "MOD77013"; } bool TTrasferimento770::open(const char* path, char mode, int volume) { @@ -1377,14 +1375,14 @@ bool TTrasferimento770::append_record_b() const TRectype& rec_com_nas = _cache770.get(LF_COMUNI, key); key.cut(0) << "|" << rec_rap.get(ANA_COMRES); const TRectype& rec_com_res = _cache770.get(LF_COMUNI, key); - rec.set(110, rec_rap.get(ANA_COFI)); - rec.set(111, rec_nditte.get(NDT_CARRAPP)); - rec.set(115, rec_rap.get(ANA_RAGSOC).left(24)); - rec.set(116, rec_rap.get(ANA_RAGSOC).mid(30, 20)); - rec.set(117, rec_rap_fis.get(ANF_SESSO)); - rec.set(118, rec_rap_fis.get_date(ANF_DATANASC)); - rec.set(119, rec_com_nas.get(COM_DENCOM)); - rec.set(120, rec_com_nas.get(COM_PROVCOM)); + rec.set(126, rec_rap.get(ANA_COFI)); + rec.set(127, rec_nditte.get(NDT_CARRAPP)); + rec.set(131, rec_rap.get(ANA_RAGSOC).left(24)); + rec.set(132, rec_rap.get(ANA_RAGSOC).mid(30, 20)); + rec.set(133, rec_rap_fis.get(ANF_SESSO)); + rec.set(134, rec_rap_fis.get_date(ANF_DATANASC)); + rec.set(135, rec_com_nas.get(COM_DENCOM)); + rec.set(136, rec_com_nas.get(COM_PROVCOM)); // Ignoro la parte "estera" @@ -1494,7 +1492,7 @@ bool TTrasferimento770::split(const char* path) if (_save_headers) { rec.tipo_record('A'); // Compila record di testata A - rec.set(3, "77S12"); // Codice fornitura + rec.set(3, "77S13"); // Codice fornitura rec.set(4, 1); // Tipo fornitore 01 = Soggetto che invia la propria dichiarazione rec.set(5, cod_fis_dic()); // Codice fiscale del fornitore if (volumes > 1) @@ -1635,7 +1633,6 @@ protected: public: TTransfer770_msk(); - virtual ~TTransfer770_msk() { } }; bool TTransfer770_msk::on_field_event(TOperable_field& of, TField_event fe, long jolly)