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

Corretto errore MI3403. Corretta la costruzione delle Token_string sui

Browse Source 
campi S1 e S2 di PIM.


git-svn-id: svn://10.65.10.50/trunk@3152 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-07-08 08:50:23 +00:00
parent 22a7061bc1
commit 5589e9773e
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
cg/cg4400.cpp
View File

@ -3634,7 +3634,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);
}
@ -3643,7 +3643,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)