Patch level :4.0 nopatch

Files correlati     :
Ricompilazione Demo : [ ]
Commento            :continua l'epopea del pagato


git-svn-id: svn://10.65.10.50/trunk@14752 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2007-01-11 10:58:54 +00:00
parent 6609644921
commit 84dfc1cf18

View File

@ -1149,6 +1149,8 @@ long TInvioP::calcola_fattura_originale(long nreg) const
return nreg;
}
// oggetto che serve per memorizzare importo e flag acc/sal dei pagamenti..
//..(usato nel trasferimento pagamenti)
struct TPay_info : public TObject
{
real _somma;
@ -1319,6 +1321,8 @@ bool TInvioP::i_proforma_pagamenti()
_nregpag = numregcg;
_nregcosto = numregcg;
_importo = imp.valore();
//deve stabilire adesso se acconto o saldo controllando gli importi
_accsal = 'S';
//e finalmente aggiunge il record al file di esportazione
TRecord_text recpag;