Corrette chiamate a TArray::sort

git-svn-id: svn://10.65.10.50/trunk@2140 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1995-11-13 15:32:37 +00:00
parent a21b096941
commit 704cd63568
2 changed files with 29 additions and 29 deletions

View File

@ -435,7 +435,7 @@ void TPrimanota_application::cgs_pack()
} }
} }
if (!pagamento) // Il pagamento e' gia' ordinato if (!pagamento) // Il pagamento e' gia' ordinato
rows.sort(compare_rows); // Pack and sort array rows.TArray::sort(compare_rows); // Pack and sort array
} }

View File

@ -446,51 +446,51 @@ bool TGame_mask::partite_notify(TSheet_field& partite, int r, KEY k)
game = new TPartita(zio, anno, num); // ... creane una temporanea game = new TPartita(zio, anno, num); // ... creane una temporanea
TImporto tot_lit, tot_val; TImporto tot_lit, tot_val;
TToken_string riga_fattura; TToken_string riga_fattura(80);
const int lastrow = game->last(); const int lastrow = game->last();
for (int ri = game->first(); ri <= lastrow; ri = game->succ(ri)) for (int ri = game->first(); ri <= lastrow; ri = game->succ(ri))
{ {
const TRiga_partite& riga = game->riga(ri); const TRiga_partite& riga = game->riga(ri);
if (!riga.is_fattura())
continue;
const bool in_valuta = riga.in_valuta(); const bool in_valuta = riga.in_valuta();
riga_fattura.cut(0);
if (riga.rate() > 0) // Se ci sono rate stampa la riga con la fattura riga_fattura.add(ri);
{ riga_fattura.add("");
riga_fattura.add(ri); riga_fattura.add("");
riga_fattura.add(""); riga_fattura.add(riga.get(PART_DATADOC));
riga_fattura.add(""); riga_fattura.add(riga.get(PART_DESCR));
riga_fattura.add(riga.get(PART_DATADOC)); add_importo(riga_fattura, TImporto(riga.sezione(), riga.get_real(SCAD_IMPORTO)));
riga_fattura.add(riga.get(PART_DESCR)); if (in_valuta)
add_importo(riga_fattura, TImporto(riga.sezione(), riga.get_real(SCAD_IMPORTO))); add_importo(riga_fattura, TImporto(riga.sezione(), riga.get_real(SCAD_IMPORTOVAL)), TRUE);
if (in_valuta) else
add_importo(riga_fattura, TImporto(riga.sezione(), riga.get_real(SCAD_IMPORTOVAL)), TRUE); riga_fattura.add("");
else riga_fattura.add(riga.get(PART_NREG));
riga_fattura.add(""); riga_fattura.add(riga.get(PART_DATAREG));
riga_fattura.add(riga.get(PART_NREG)); riga_fattura.add(riga.get(PART_NUMDOC));
riga_fattura.add(riga.get(PART_DATAREG)); riga_fattura.add(riga.get(PART_PROTIVA));
riga_fattura.add(riga.get(PART_NUMDOC)); scadenze.add(riga_fattura);
riga_fattura.add(riga.get(PART_PROTIVA));
scadenze.add(riga_fattura);
}
for (int ra = 1; ra <= riga.rate(); ra++) for (int ra = 1; ra <= riga.rate(); ra++)
{ {
const TRiga_scadenze& scad = riga.rata(ra); const TRiga_scadenze& scad = riga.rata(ra);
TToken_string& row = scadenze.row(scadenze.add(riga_fattura)); TToken_string& row = scadenze.row(scadenze.add(riga_fattura));
row.add(ra, 1); row.add(ra, 1);
row.add(scad.get(SCAD_DATASCAD), 2); row.add(scad.get(SCAD_DATASCAD), 2);
add_importo(row, TImporto(riga.sezione(), scad.get_real(SCAD_IMPORTO)), FALSE, 5); add_importo(row, TImporto(riga.sezione(), scad.get_real(SCAD_IMPORTO)), FALSE, 5);
if (in_valuta) if (in_valuta)
add_importo(row, TImporto(riga.sezione(), scad.get_real(SCAD_IMPORTOVAL)), TRUE, 6); add_importo(row, TImporto(riga.sezione(), scad.get_real(SCAD_IMPORTOVAL)), TRUE, 6);
const int lastp = scad.last(); const int lastp = scad.last();
for (int pa = scad.first(); pa <= lastp; pa = scad.succ(pa)) for (int pa = scad.first(); pa <= lastp; pa = scad.succ(pa))
{ {
const TRectype& pag = scad.row(pa); const TRectype& pag = scad.row(pa);
const TRiga_partite& sum = game->riga(pa); const TRiga_partite& sum = game->riga(pa);
const char sez = sum.sezione(); const char sez = sum.sezione();
TToken_string& row = scadenze.row(scadenze.add("")); TToken_string& row = scadenze.row(scadenze.add(""));
row.add(ri); row.add(ri);
row.add(ra); row.add(ra);
@ -508,7 +508,7 @@ bool TGame_mask::partite_notify(TSheet_field& partite, int r, KEY k)
row.add(""); row.add("");
row.add(pa); row.add(pa);
} }
TImporto abb(scad.importo_pagato(TRUE, 0x2)); TImporto abb(scad.importo_pagato(TRUE, 0x2));
if (!abb.is_zero()) if (!abb.is_zero())
{ {
@ -525,7 +525,7 @@ bool TGame_mask::partite_notify(TSheet_field& partite, int r, KEY k)
rabb.add(""); rabb.add("");
} }
} }
if (in_valuta) if (in_valuta)
{ {
TImporto diff(scad.importo_pagato(FALSE, 0x4)); TImporto diff(scad.importo_pagato(FALSE, 0x4));
@ -536,7 +536,7 @@ bool TGame_mask::partite_notify(TSheet_field& partite, int r, KEY k)
add_importo(rdiff, diff.normalize()); add_importo(rdiff, diff.normalize());
} }
} }
TToken_string& rsal = scadenze.row(scadenze.add("")); TToken_string& rsal = scadenze.row(scadenze.add(""));
rsal.add("Saldo rata ", 4); rsal << ra; rsal.add("Saldo rata ", 4); rsal << ra;
if (!scad.chiusa()) if (!scad.chiusa())
@ -545,7 +545,7 @@ bool TGame_mask::partite_notify(TSheet_field& partite, int r, KEY k)
sl.normalize(); sl.normalize();
add_importo(rsal, sl); add_importo(rsal, sl);
tot_lit += sl; tot_lit += sl;
if (in_valuta) if (in_valuta)
{ {
sl = scad.residuo(TRUE, 0x3); sl = scad.residuo(TRUE, 0x3);