root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level : 10.946

Browse Source 
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
This commit is contained in:
alex 2011-02-28 16:38:10 +00:00
parent ea6203f794
commit 44873c0fc3
1 changed files with 9 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
tc/tc1100.cpp
View File

@ -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();