From ba977088289015312403b68fe1da515b2eb3202d Mon Sep 17 00:00:00 2001 From: guy Date: Fri, 28 Sep 2007 08:37:07 +0000 Subject: [PATCH] Patch level : 4.0 Files correlati : cg3.exe cg3900a.msk Ricompilazione Demo : [ ] Commento : git-svn-id: svn://10.65.10.50/trunk@15651 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- cg/cg3900.cpp | 50 +++++++++++++++++++++++++------------------------- cg/cg3900a.uml | 2 -- 2 files changed, 25 insertions(+), 27 deletions(-) diff --git a/cg/cg3900.cpp b/cg/cg3900.cpp index 8ea22c880..986662e86 100755 --- a/cg/cg3900.cpp +++ b/cg/cg3900.cpp @@ -352,28 +352,28 @@ void TPadoaSchioppa_set::add_trc(int trc) { case 0: // Testata case 9: // Coda - add_field(trc, 2, 4, 3, "IndentificativoFornitura" , AN, true, "ECF"); - add_field(trc, 5, 6, 2, "IdentificativoAnno" , AN, true, "00"); - add_field(trc, 7, 8, 2, "CodiceFornitura" , NU, true, "38"); - add_field(trc, 9, 24, 16, "CodiceFiscale" , CF, true); - add_field(trc, 25, 35, 11, "PartitaIVA" , PI, true); - add_field(trc, 36, 61, 26, "Cognome" , AN); // Persone fisiche - add_field(trc, 62, 86, 25, "Nome" , AN); - add_field(trc, 87, 87, 1, "Sesso" , AN); - add_field(trc, 88, 95, 8, "DataNascita" , DT); - add_field(trc, 96, 135, 40, "ComuneNascita" , AN); - add_field(trc, 136, 137, 2, "ProvinciaNascita" , PR); - add_field(trc, 138, 207, 70, "Denominazione" , AN); // Persone NON fisiche - add_field(trc, 208, 247, 40, "ComuneSedeLegale" , AN); - add_field(trc, 248, 249, 2, "ProvinciaSedeLegale" , AN); - add_field(trc, 250, 265, 16, "CodiceSoggettoObbligato" , CF); - add_field(trc, 266, 269, 4, "AnnoRiferimento" , NU, true); - add_field(trc, 270, 273, 4, "ProgressivoTelematico" , NU); - add_field(trc, 274, 277, 4, "NumeroTotaleInvii" , NU); - add_field(trc, 278, 293, 16, "CodiceIntermediario" , CF); - add_field(trc, 294, 298, 5, "NumeroIscrizioneAlboCAF" , NU); - add_field(trc, 299, 299, 1, "ImpegnoAllaTrasmissione" , NU); - add_field(trc, 300, 307, 8, "DataImpegno" , NU); + add_field(trc, 2, 4, 3, "IndentificativoFornitura", AN, true, "ECF"); + add_field(trc, 5, 6, 2, "IdentificativoAnno" , AN, true, "00"); + add_field(trc, 7, 8, 2, "CodiceFornitura" , NU, true, "38"); + add_field(trc, 9, 24, 16, "CodiceFiscale" , CF, true); + add_field(trc, 25, 35, 11, "PartitaIVA" , PI, true); + add_field(trc, 36, 61, 26, "Cognome" , AN); // Persone fisiche + add_field(trc, 62, 86, 25, "Nome" , AN); + add_field(trc, 87, 87, 1, "Sesso" , AN); + add_field(trc, 88, 95, 8, "DataNascita" , DT); + add_field(trc, 96, 135, 40, "ComuneNascita" , AN); + add_field(trc, 136, 137, 2, "ProvinciaNascita" , PR); + add_field(trc, 138, 207, 70, "Denominazione" , AN); // Persone NON fisiche + add_field(trc, 208, 247, 40, "ComuneSedeLegale" , AN); + add_field(trc, 248, 249, 2, "ProvinciaSedeLegale" , AN); + add_field(trc, 250, 265, 16, "CodiceSoggettoObbligato" , CF); + add_field(trc, 266, 269, 4, "AnnoRiferimento" , NU, true); + add_field(trc, 270, 273, 4, "ProgressivoTelematico" , NU); + add_field(trc, 274, 277, 4, "NumeroTotaleInvii" , NU); + add_field(trc, 278, 293, 16, "CodiceIntermediario" , CF); + add_field(trc, 294, 298, 5, "NumeroIscrizioneAlboCAF" , NU); + add_field(trc, 299, 299, 1, "ImpegnoAllaTrasmissione" , NU); + add_field(trc, 300, 307, 8, "DataImpegno" , DT); break; case 1: // Clienti case 2: // Fornitori @@ -841,7 +841,7 @@ TRecordset* TAlleg_mask::new_recordset(char tipocf, bool strict) continue; // Controllo inutilmente anche il tipo documento - const TString& tipodoc = caus.tipo_doc(); + const TString& tipodoc = caus.tipodoc(); if (documento_corrispettivi(tipodoc)) continue; @@ -1037,7 +1037,7 @@ void TAlleg_mask::log_error(const TRecordset& clifo, const char* msg1, const cha TString str; str << clifo.get(CLI_TIPOCF) << clifo.get(CLI_CODCF) << ' ' << clifo.get(CLI_RAGSOC); - str.strip_double_spaces(); + str.strip_d_spaces(); log_error(str, msg1, msg2, errlog, severity); } @@ -1355,6 +1355,6 @@ void TClifo_alleg_app::main_loop() int cg3900(int argc, char* argv[]) { TClifo_alleg_app app; - app.run(argc, argv, TR("Elenco clienti/fornitori in allegato")); + app.run(argc, argv, TR("Elenco clienti/fornitori")); return 0; } diff --git a/cg/cg3900a.uml b/cg/cg3900a.uml index d2ef9206b..8e848555c 100755 --- a/cg/cg3900a.uml +++ b/cg/cg3900a.uml @@ -94,8 +94,6 @@ END NUMBER F_CAF 5 BEGIN PROMPT 42 13 "Iscrizione C.A.F. " - VALIDATE REQIF_FUNC 1 F_INTR - WARNING "Numero obbligatorio in presenza di un intermediario" FLAGS "U" END