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

Patch level : 1.7 at

Browse Source 
Files correlati     : at8.exe
Ricompilazione Demo : [ ]
Commento            : in trasferimento da cetraplus aggiunto trasf. disponibilita aferesi


git-svn-id: svn://10.65.10.50/trunk@12518 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 2004-11-29 14:12:35 +00:00
parent badb0c3231
commit 36b0e86e8b
1 changed files with 7 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
at/at8900.cpp
View File

@ -513,7 +513,7 @@ bool TCtpr2at::soggetto(const TString& istruzione)
TRectype recpr1 = cache().get("PR1", stato);
TString16 catdon = recpr1.get("S6");
if (catdon.not_empty())
inserisci = cache().get("CTD", catdon).get_bool("B0");
inserisci = !(cache().get("CTD", catdon).get_bool("B0"));
}
if (inserisci)
{
@ -646,23 +646,24 @@ bool TCtpr2at::update_record(TRectype& record_at, TAssoc_array& record_ct)
}
}
else if (elab == "DISPONIBILE") // disponibilita
{
if (val == "NO")
{
str = val;
if (str == "NO")
{
record_at.put(SOG_DISP_AF_1, "");
record_at.put(SOG_DISP_AF_2, "");
}
else if (val == "PLA")
else if (str == "PLA")
{
record_at.put(SOG_DISP_AF_1, "PL");
record_at.put(SOG_DISP_AF_2, "");
}
else if (val == "PLT")
else if (str == "PLT")
{
record_at.put(SOG_DISP_AF_1, "PT");
record_at.put(SOG_DISP_AF_2, "");
}
else if (val == "SI")
else if (str == "SI")
{
record_at.put(SOG_DISP_AF_1, "PL");
record_at.put(SOG_DISP_AF_2, "PT");