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

Milgiorati allineamenti per facilitare esportazione in Excel

Browse Source 
git-svn-id: svn://10.65.10.50/branches/R_10_00@22984 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2014-07-30 13:00:05 +00:00
parent 097d7f6fe0
commit c8daf4200d
1 changed files with 25 additions and 28 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

53
sc/sc2200.cpp
View File

@ -906,9 +906,9 @@ bool TStampaScadenzario::user_create()
open_files(LF_TABCOM, LF_TAB, LF_CAUSALI, LF_PARTITE, LF_PAGSCA, 0);
_pagsca = new TLocalisamfile(LF_PAGSCA);
_descrizione = new TParagraph_string("",17);
_ragsoc = new TParagraph_string("",17);
_des_conto = new TParagraph_string("",17);
_descrizione = new TParagraph_string("",19);
_ragsoc = new TParagraph_string("",19);
_des_conto = new TParagraph_string("",19);
_tl.add(new TAssoc_array);_tl.add(new TAssoc_array);_tl.add(new TAssoc_array);_tl.add(new TAssoc_array);
_uns_cache.add(new TAssoc_array); // Pagamenti
@ -1220,7 +1220,7 @@ void TStampaScadenzario::print_header()
case fornitori:
case clienti:
{
TString rw(201);
const TString rw(201, '_');
TString s1,s2;
set_header (soh++, "%6ld@9g%s@148gData@153g%s @190gPag. @#",
@ -1228,15 +1228,15 @@ void TStampaScadenzario::print_header()
if (_tipost==fornitori)
{
set_header(soh++,FR("@72g** SCADENZARIO FORNITORI **"));
set_header(soh++,FR("@56g** SCADENZARIO FORNITORI **"));
s1 = "Ns."; s2 = "Banca";
}
else
{
set_header(soh++,FR("@73g** SCADENZARIO CLIENTI **"));
set_header(soh++,FR("@56g** SCADENZARIO CLIENTI **"));
s1 =""; s2 = "";
}
set_header (soh++,FR("@64gPer il periodo dal %s al %s"),(const char*)datai,(const char*)dataf);
set_header (soh++,FR("@56gPeriodo dal %s al %s"),(const char*)datai,(const char*)dataf);
if (_codag.not_empty())
set_header (soh++,FR("@bAgente: %s %s@r"),(const char*)_codag,(const char*)_m->get(F_CODAG_D));
@ -1247,13 +1247,12 @@ void TStampaScadenzario::print_header()
set_header (soh++,FR("@bTipo pagamento: %d %s@r"),_tipopag, (const char*)pagam.get(_tipopag));
}
rw.fill('_');
set_header(soh++, (const char *) rw);
set_header(soh++,FR("@28gRif.@38gData@47gData@77gCd/Tp@91g%s"),(const char*)s1);
set_header(soh++,FR("Codice@9gRagione sociale@28gpartita@38gscadenza@47gRegistr."
"@56gDescrizione@77gPag.@86gRata@91g%s@96gVal."
set_header(soh++,FR("@28gRif.@38gData@47gData@56gDescrizione@77gCod.@91g%s"),(const char*)s1);
set_header(soh++,FR("Codice@7gRagione sociale@28gpartita@38gscad.@47gRegistr."
"@56gDocumento@77gPag.@86gRata@91g%s@96gVal."
"@103gImp. in sca.@119gImp. pagati@135gRimesse dir.@151gRi.ba./Tratte@171gBonifici@190gAltri@197gBlc"), (const char*)s2);
set_header(soh++,FR("@28gData e Nr doc. @46gProt. IVA"));
set_header(soh++,FR("@28gData@38gN. doc.@47gProt.IVA"));
set_header(soh++,(const char *)rw);
break;
}
@ -1262,8 +1261,8 @@ void TStampaScadenzario::print_header()
TString rw(201);
set_header (soh++, FR("%6ld@9g%s@152gData@157g%s @190gPag. @#"),
firm, (const char *)s, (const char *)data);
set_header(soh++,FR("@79g** SCADENZARIO **"));
set_header (soh++,FR("@66gPer il periodo dal %s al %s"),(const char*)datai,(const char*)dataf);
set_header(soh++,FR("@61g** SCADENZARIO **"));
set_header (soh++,FR("@61gPeriodo dal %s al %s"),(const char*)datai,(const char*)dataf);
if (_codag.not_empty())
set_header (soh++,FR("@bAgente: %s %s@r"),(const char*)_codag,(const char*)_m->get(F_CODAG_D));
@ -1298,9 +1297,8 @@ void TStampaScadenzario::set_page_clifo(int nriga)
print_intestazione_banca(nriga);
set_row(nriga++,"");
set_row(nriga,"@b#6t@r",&_cur_codcf_s);
set_row(nriga,"@b@9g#a@r",_ragsoc);
set_row(nriga,"@28g#2t",&_annopart);
set_row(nriga,"@30g/@7s",FLD(LF_SCADENZE,SCAD_NUMPART));
set_row(nriga,"@b@7g#a@r",_ragsoc);
set_row(nriga,"@28g#2t/@7s",&_annopart,FLD(LF_SCADENZE,SCAD_NUMPART));
set_row(nriga,"@38g@d",FLD(LF_SCADENZE,SCAD_DATASCAD));
set_row(nriga,"@47g#t",&_datareg);
set_row(nriga,"@56g#a",_descrizione);
@ -1317,7 +1315,7 @@ void TStampaScadenzario::set_page_clifo(int nriga)
set_row(nriga,"@180g#15t",&_altri); // Altri tipi di pagamento
set_row(nriga,"@198g@1s",FLD(LF_SCADENZE,SCAD_BLOCCATA));
nriga++;
set_row(nriga,"@30g#t",&_datadoc);
set_row(nriga,"@28g#t",&_datadoc);
set_row(nriga,"@38g#8t",&_numdoc);
set_row(nriga,"@47g#-5t",&_protiva);
}
@ -1344,7 +1342,7 @@ void TStampaScadenzario::set_page_pcon(int nriga)
set_row(nriga,"@180g#15t",&_altri); // Altri tipi di pagamento
set_row(nriga,"@198g@1s",FLD(LF_SCADENZE,SCAD_BLOCCATA));
nriga++;
set_row(nriga,"@36g#t@45g#t@54g#-5t",&_datadoc,&_numdoc,&_protiva);
set_row(nriga,"@33g#t@45g#t@54g#-5t",&_datadoc,&_numdoc,&_protiva);
}
void TStampaScadenzario::set_page(int file, int counter)
@ -1382,7 +1380,7 @@ void TStampaScadenzario::print_rows_riepilogo(int& nriga, bool type, TAssoc_arra
if (v.is_zero())
continue;
TString16 val = k.right(3);
const TString4 val = k.right(3);
const int tipo = k[0]-'0';
const char ult = k[1];
@ -1394,7 +1392,7 @@ void TStampaScadenzario::print_rows_riepilogo(int& nriga, bool type, TAssoc_arra
ult_class.cut(27);
}
const bool stampa_in_valuta = _stvaluta && !val.blank();
const bool stampa_in_valuta = _stvaluta && val.full();
TString80 value;
print_real(value, v, stampa_in_valuta ? val : "_FIRM");
set_row(nriga++,"@0g! %s@25g! %s@55g! %s@61g!@64g%18s@82g!",
@ -1416,11 +1414,10 @@ void TStampaScadenzario::print_riepilogo(int &nriga, bool type)
// Setta le righe di stampa per lo schema riepilogativo con ordinamento primario per data
// Con type == 1 stampa il riepilogo del periodo; viceversa quello del mese.
{
TString s(83);
TAssoc_array totali; // Assoc array per i totali distinti per valuta
TString_array as;
s.fill('-', 83);
const TString s(83, '-');
nriga++;
set_row(nriga++,"%s",(const char *)s);
if (!type)
@ -1584,12 +1581,12 @@ void TStampaScadenzario::print_totali_c(int &nriga, bool ended)
return;
//In caso contrario continua l'avventura...
if (_tipost==clienti) // per cliente
set_row(nriga,FR("@70g** TOTALE CLIENTE"));
set_row(nriga,FR("@56g** TOTALE CLIENTE"));
else
if (_tipost ==fornitori) // per fornitore
set_row(nriga,FR("@70g** TOTALE FORNITORE"));
set_row(nriga,FR("@56g** TOTALE FORNITORE"));
else // per conto
set_row(nriga,FR("@70g** TOTALE CONTO"));
set_row(nriga,FR("@61g** TOTALE CONTO"));
print_rows_totali(nriga, single);
if (_striepilogo > 0 )
@ -1601,7 +1598,7 @@ void TStampaScadenzario::print_totali_c(int &nriga, bool ended)
print_totali_bank(nriga);
set_row(nriga++,"");set_row(nriga++,"");
}
set_row(nriga,FR("@70g** TOTALE GENERALE"));
set_row(nriga,FR("@56g** TOTALE GENERALE"));
print_rows_totali(nriga, period);
if (_striepilogo > 0 )
print_riepilogo(nriga,true);