Modificata la costruzione della TToken_string: i valori contenuti

nei campi S1 e S2 sono separati da !.


git-svn-id: svn://10.65.10.50/trunk@3173 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-07-09 13:39:35 +00:00
parent 8ed953f73f
commit 3a1704b19a

View File

@ -3680,7 +3680,7 @@ bool CG4400_application::stampa_riepilogo(int m)
real impol = pim.get_real("R2");
if (_tabreg->get_bool("B0"))
{
TToken_string cs(pim.get("S2"));
TToken_string cs(pim.get("S2"),'!');
impon = cs.get(0);
impos = cs.get(1);
}
@ -3689,7 +3689,7 @@ bool CG4400_application::stampa_riepilogo(int m)
impon = pim.get_real("R11");
impos = pim.get_real("R12");
}
TToken_string fatt_rit(pim.get("S1"));
TToken_string fatt_rit(pim.get("S1"),'!');
impon += real(fatt_rit.get(0));
impos += real(fatt_rit.get(1));
if (impon != ZERO || impos != ZERO || impol != ZERO)