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

corretto errori MI3457, MI3460, MI3461

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@4176 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 1997-03-03 16:16:49 +00:00
parent 64e54ed45e
commit 0f6c4a57cb
1 changed files with 182 additions and 170 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
cg/cg6902.cpp
View File

@ -506,6 +506,12 @@ bool TInv_cont::invio_tab_cau()
str.format("%d", tipomov);
record.overwrite(str,208); //Tipo movimento del saldaconto
bool movval = _tcaus->get_bool(CAU_MOVVAL);
if (movval)
record.overwrite("X",214);
else //Flag movimento in valuta
record.overwrite(" ",214);
int num = 0;
int pos_gcs = 41;
int pos_sez = 191;
@ -1747,6 +1753,8 @@ bool TInv_cont::invio_mov_SC()
int nriga = _tpart->get_int (PART_NRIGA);
int tipomov = _tpart->get_int (PART_TIPOMOV);
if (tipo == 'C' || tipo == 'F')
{
if (tipomov == 1)
{
_tscad->zero();
@ -1883,7 +1891,10 @@ bool TInv_cont::invio_mov_SC()
record.overwrite(str,37);
str.format("%c", sezabb);
record.overwrite(str,152);
if (_codval.not_empty())
pagsca2trasfer(record,abblire,abbuoni);
else
pagsca2trasfer(record,abbuoni,abblire);
}
real diffcam (_tpagsca->get_real(PAGSCA_DIFFCAM));
@ -1918,6 +1929,7 @@ bool TInv_cont::invio_mov_SC()
}
}
}
}
delete _prog;
_riga_interna.destroy();