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

git-svn-id: svn://10.65.10.50/branches/R_10_00@23118 c028cbd2-c16b-5b4b-a496-9718f37d4682

Browse Source
This commit is contained in:
guy 2015-06-17 09:41:18 +00:00
parent 794d88b1a3
commit 84eca849b1
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
pa/pa0100.cpp
View File

@ -1182,10 +1182,10 @@ bool TDoc2Paf::elabora(TDocumentoEsteso& doc)
if (rdoc->is_merce()) if (rdoc->is_merce())
{ {
paf1800f.set("PI_UNITAMISURA", rdoc->get(RDOC_UMQTA)); paf1800f.set("PI_UNITAMISURA", rdoc->get(RDOC_UMQTA));
const real qta = rdoc->quantita(); const real qta = rdoc->get(RDOC_QTA);
if (qta.is_zero()) if (qta.is_zero())
{ {
TString msg; msg.format("La riga merce %d ha quantità nulla (campo %s)", riga, (const char*)rdoc->field_qta()); TString msg; msg.format("La riga merce %d ha quantità nulla", riga);
log(1, msg); log(1, msg);
} }
if (qta >= ZERO) if (qta >= ZERO)
@ -1261,7 +1261,7 @@ bool TDoc2Paf::elabora(TDocumentoEsteso& doc)
paf1000f.set("P0_RIFNUMLINEA", (long)r); paf1000f.set("P0_RIFNUMLINEA", (long)r);
paf1000f.set("P0_IDDOC", a._numdoc); paf1000f.set("P0_IDDOC", a._numdoc);
paf1000f.set("P0_DATADOC", a._datadoc); paf1000f.set("P0_DATADOC", a._datadoc);
paf1000f.set("P0_COMMCONVENZ", com); paf1000f.set("P0_COMMCONVENZ", com);
paf1000f.set("P0_CODCUP", cup); paf1000f.set("P0_CODCUP", cup);
paf1000f.set("P0_CODCIG", cig); paf1000f.set("P0_CODCIG", cig);
paf1000f.set("P0_GESTIONE", "D"); paf1000f.set("P0_GESTIONE", "D");
@ -1277,7 +1277,7 @@ bool TDoc2Paf::elabora(TDocumentoEsteso& doc)
if (sp.is_tipo()) if (sp.is_tipo())
{ {
paf1800f.set("PI_UNITAMISURA", rdoc->get(RDOC_UMQTA)); paf1800f.set("PI_UNITAMISURA", rdoc->get(RDOC_UMQTA));
qta = rdoc->quantita(); qta = rdoc->get_real(RDOC_QTA);
if (qta.is_zero()) if (qta.is_zero())
{ {
TString msg; msg.format("La riga spese a quantità %d ha quantità nulla (campo %s)", riga, (const char*)rdoc->field_qta()); TString msg; msg.format("La riga spese a quantità %d ha quantità nulla (campo %s)", riga, (const char*)rdoc->field_qta());
@ -1303,7 +1303,7 @@ bool TDoc2Paf::elabora(TDocumentoEsteso& doc)
if (rdoc->is_prestazione()) if (rdoc->is_prestazione())
{ {
paf1800f.set("PI_UNITAMISURA", rdoc->get(RDOC_UMQTA)); paf1800f.set("PI_UNITAMISURA", rdoc->get(RDOC_UMQTA));
real qta = rdoc->quantita(); if (qta.is_zero()) qta = UNO; real qta = rdoc->get(RDOC_QTA); if (qta.is_zero()) qta = UNO;
paf1800f.set("PI_QUANTITA", qta); paf1800f.set("PI_QUANTITA", qta);
paf1800f.set("PI_PREZZOUNIT", rdoc->prezzo(false, false)); paf1800f.set("PI_PREZZOUNIT", rdoc->prezzo(false, false));
paf1800f.set("PI_PRZTOTALE", rdoc->importo(true, false)); paf1800f.set("PI_PRZTOTALE", rdoc->importo(true, false));