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

Sdoppiata la visualizzazione degli importi iva (MI2232).

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@3908 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-11-18 16:03:47 +00:00
parent f5b9343d4b
commit bdf2329da1
1 changed files with 15 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
cg/cg6700.cpp
View File

@ -97,7 +97,7 @@ class TRic_ListaMov : public TPrintapp
int _gruppo_p, _conto_p, _anno_prec;
TDate _datacomp, _datadoc, _datareg, _data74tr, _datacam, _datacam_part,_datapag;
real _importo, _impo, _impos, _tot_dare, _tot_avere, _tot_doc, _tot_val;
real _cambio, _cambio_part;
real _cambio, _cambio_part, _impo_print, _impos_print;
long _codcf, _numero, _protiva, _sottoconto, _numreg;
long _sottocontoc, _sottocontocr, _codcf_p;
TBit_array _err;
@ -2263,7 +2263,6 @@ bool TRic_ListaMov::preprocess_page(int file,int counter)
_impo = impo;
_impos = impos;
if (!_tipodoc.blank())
{
TTable tabtpd("%TPD");
@ -2280,9 +2279,21 @@ bool TRic_ListaMov::preprocess_page(int file,int counter)
}
int r = 1;
// Visualizza in positivo le note di credito e gli storni
if ((_tipodoc == "NC" || _tipodoc == "ST") && _impo < 0.0)
{
_impo_print = _impo * (-1);
_impos_print = _impos * (-1);
}
else
{
_impo_print = _impo;
_impos_print = _impos;
}
set_row(r, "I%d", numrig);
set_row(r, "@5gImponibile@16g%r",&_impo);
set_row(r, "@32gImposta@40g%r", &_impos);
set_row(r, "@5gImponibile@16g%r",&_impo_print);
set_row(r, "@32gImposta@40g%r", &_impos_print);
set_row(r, "@56gCodice@63g%4s", (const char*) _codiva);
set_row(r, "@68g%s", (const char*) codiva_des);