From 44873c0fc329388b968340972ecfc2c9d474f6f1 Mon Sep 17 00:00:00 2001 From: alex Date: Mon, 28 Feb 2011 16:38:10 +0000 Subject: [PATCH] Patch level : 10.946 Files correlati : tc1.exe Ricompilazione Demo : [ ] Commento : Modificatro il calcolo del campo black list e San Marino nell' invio a zucchetti git-svn-id: svn://10.65.10.50/branches/R_10_00@21723 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- tc/tc1100.cpp | 15 +++++++++------ 1 file changed, 9 insertions(+), 6 deletions(-) diff --git a/tc/tc1100.cpp b/tc/tc1100.cpp index de4916a54..73550edcc 100755 --- a/tc/tc1100.cpp +++ b/tc/tc1100.cpp @@ -324,7 +324,15 @@ void TInvio_file::validate(TCursor& cur,TRecord_text &rec, TToken_string &s, TSt if (cur.curr().get(CLI_STATOPAIV) == "SM") valore = "S"; else - valore = " "; + { + const TRectype & r = cache().get("%STA", cur.curr().get(CLI_STATOCF)); + valore = r.get_bool("B1") ? "S" : " "; + } + } + else if (code == "_BLACKLIST") + { + const TRectype & r = cache().get("%STA", cur.curr().get(CLI_STATOCF)); + valore = r.get_bool("B0") ? "S" : " "; } else if (code == "_ATTIVITA") { @@ -490,11 +498,6 @@ void TInvio_file::validate(TCursor& cur,TRecord_text &rec, TToken_string &s, TSt const char tipopers = cur.curr(LF_CLIFO).get_char(CLI_TIPOPERS); valore = (tipopers == 'F') ? " " : "S"; } - else if (code == "_BLACKLIST") - { - const bool sospeso = cur.curr(LF_CLIFO).get_bool(CLI_SOSPESO); - valore = (sospeso == true) ? "S" : " "; - } else if (code.starts_with("_CONTO")) { const int ln = s.get_int();