Correzioni su invio Payline

git-svn-id: svn://10.65.10.50/branches/R_10_00@22866 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2013-05-27 12:08:13 +00:00
parent 8e914ac365
commit 6de44e6502

@ -193,9 +193,8 @@ bool TPayLine_app::esporta_pagsca(const TRiga_partite& part, const TRiga_scadenz
const TDate& dal, const TDate& al, TPayLine_recset& clienti, TPayLine_recset& movimenti,
TLog_report& log) const
{
const long codcf = pag.get_long(PAGSCA_SOTTOCONTO);
const long lastcf = export_clifo(codcf, clienti, log);
if (lastcf <= 0)
const long codcf = export_clifo(pag.get_long(PAGSCA_SOTTOCONTO), clienti, log);
if (codcf <= 0)
return false;
TDate data = part.get(PART_DATADOC); // Data Documento
@ -206,7 +205,7 @@ bool TPayLine_app::esporta_pagsca(const TRiga_partite& part, const TRiga_scadenz
TToken_string row(128, ';');
TString str;
row.format("%6ld", lastcf);
row.format("%6ld", codcf);
str = data.stringa(); str.left_just(10);
row.add(str, 1);
@ -298,9 +297,13 @@ bool TPayLine_app::esporta_pagsca(const TRiga_partite& part, const TRiga_scadenz
bool TPayLine_app::esporta_scad(const TRiga_scadenze& scad, const TDate& dal, const TDate& al,
TPayLine_recset& clienti, TPayLine_recset& movimenti, TLog_report& log) const
{
const long codcf = export_clifo(scad.get_long(PAGSCA_SOTTOCONTO), clienti, log);
if (codcf <= 0)
return false;
const TRiga_partite& part = scad.riga();
TToken_string row(255, ';');
row.format("%6ld", scad.get_long(SCAD_SOTTOCONTO)); // Codice cliente
row.format("%6ld", codcf); // Codice cliente
TString str;
str = part.get(PART_DATADOC); // Data Documento
@ -359,9 +362,6 @@ void TPayLine_app::esporta_partita(long cf, int year, const TString& numpart,
const TDate& dal, const TDate& al,
TPayLine_recset& clienti, TPayLine_recset& movimenti, TLog_report& log) const
{
if (cf == 766 && atoi(numpart) == 0)
int cazzone = 1;
const TBill bill(0, 0, cf, 'C');
TPartita game(bill, year, numpart);
const bool game_over = game.chiusa(true);