From 7b2f7cfc71c0cf54cc52cd21ecbbf06e09332c70 Mon Sep 17 00:00:00 2001 From: guy Date: Wed, 19 May 2010 15:43:59 +0000 Subject: [PATCH] =?UTF-8?q?Patch=20level=20=20=20=20=20=20=20=20=20:=2010.?= =?UTF-8?q?0=20Files=20correlati=20=20=20=20=20:=20ef0.exe=20Ricompilazion?= =?UTF-8?q?e=20Demo=20:=20[=20]=20Commento=20=20=20=20=20=20=20=20=20=20?= =?UTF-8?q?=20=20:=200001566:=20Disposizioni=20incassi/pagamenti:=20ef0=20?= =?UTF-8?q?-9=20Nella=20generazione=20delle=20distinte=20di=20incasso/paga?= =?UTF-8?q?mento=20direttamente=20da=20saldaconto=20occorre=20controllare?= =?UTF-8?q?=20l'esistenza=20sull'anagrafica=20Cli/For=20dei=20codici=20ABI?= =?UTF-8?q?=20e=20CAB!=20O=20meglio=20l'obbligatoriet=C3=A0=20dovrebbe=20e?= =?UTF-8?q?ssere=20solo=20per=20i=20clienti=20nel=20caso=20di=20riba=20e?= =?UTF-8?q?=20fornitori=20nel=20caso=20di=20bonifici!?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit git-svn-id: svn://10.65.10.50/trunk@20480 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- ef/ef0a00.cpp | 30 ++++++++++-------------------- 1 file changed, 10 insertions(+), 20 deletions(-) diff --git a/ef/ef0a00.cpp b/ef/ef0a00.cpp index 7b4016120..d55e983b9 100755 --- a/ef/ef0a00.cpp +++ b/ef/ef0a00.cpp @@ -553,19 +553,10 @@ bool TPE_mask::check_bank(TEffetto& effetto, TLog_report& log) const } if (iban.blank()) iban = clifo.get(CLI_IBAN); - if (iban.starts_with("IT")) + if (iban.starts_with("IT") && iban.len() > 15) { - if (real::is_null(abi) || real::is_null(cab)) - { - abi = iban.mid( 5, 5); - cab = iban.mid(10, 5); - } - else - { - TString16 abicab; abicab << abi << cab; - if (iban.mid(5, 10) != abicab) - iban.cut(0); - } + abi = iban.mid( 5, 5); + cab = iban.mid(10, 5); } effetto.put(EFF_CODABI, abi); @@ -655,7 +646,7 @@ void TPE_mask::save_rate() // Trova rata key.add(row->get(sheet.cid2index(F_RATA))); const TRectype& scad = cache().get(LF_SCADENZE, key); -// eff.put(EFF_DATASCAD, scad.get(SCAD_DATASCAD)); + // eff.put(EFF_DATASCAD, scad.get(SCAD_DATASCAD)); TDate datapag(row->get(sheet.cid2index(F_DATAPAG))); if (!datapag.ok()) @@ -666,15 +657,14 @@ void TPE_mask::save_rate() const long codcf = row->get_long(sheet.cid2index(F_CODCF)); TRectype& reff = new_row_effetto(distinta, tipocf, codcf, datapag, rigadist, rigaeff); - reff.put(REFF_ANNO, row->get(sheet.cid2index(F_ANNO))); + reff.put(REFF_ANNO, row->get(sheet.cid2index(F_ANNO))); reff.put(REFF_NUMPART, row->get(sheet.cid2index(F_PARTITA))); - reff.put(REFF_NRIGA, row->get(sheet.cid2index(F_RIGA))); - reff.put(REFF_NRATA, row->get(sheet.cid2index(F_RATA))); + reff.put(REFF_NRIGA, row->get(sheet.cid2index(F_RIGA))); + reff.put(REFF_NRATA, row->get(sheet.cid2index(F_RATA))); - - reff.put(REFF_NFATT, part.get(PART_NUMDOC)); + reff.put(REFF_NFATT, part.get(PART_NUMDOC)); reff.put(REFF_DATAFATT, part.get(PART_DATADOC)); - reff.put(REFF_IMPFATT, part.get(PART_IMPORTO)); + reff.put(REFF_IMPFATT, part.get(PART_IMPORTO)); TString8 abi = scad.get(SCAD_CODABI); TString8 cab = scad.get(SCAD_CODCAB); @@ -682,7 +672,7 @@ void TPE_mask::save_rate() key.format("%c|%ld", tipocf, codcf); const TRectype& clifo = cache().get(LF_CLIFO, key); TString80 iban = clifo.get(CLI_IBAN); - if (atol(abi) == 0 || atol(cab) == 0L) + if (iban.starts_with("IT") || real::is_null(abi) || real::is_null(cab)) { abi = clifo.get(CLI_CODABI); cab = clifo.get(CLI_CODCAB);