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

Corretto n. decimali e conseguenti casini

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@2722 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
villa 1996-04-12 09:50:22 +00:00
parent 9f168594ce
commit 785f657ebd
1 changed files with 35 additions and 35 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

70
sc/sc2200.cpp
View File

@ -469,9 +469,9 @@ bool TStampaScadenzario::preprocess_page(int file, int counter)
_imp_pag = ""; _imp_pag = "";
if (_stvaluta && _codval != " ") if (_stvaluta && _codval != " ")
{ {
_imp_scad = imp_scad.string(".2"); _imp_scad = imp_scad.string(".3");
if (_w_imp_pag != 0.0) if (_w_imp_pag != 0.0)
_imp_pag=_w_imp_pag.string(".2"); _imp_pag=_w_imp_pag.string(".3");
} }
else else
{ {
@ -484,7 +484,7 @@ bool TStampaScadenzario::preprocess_page(int file, int counter)
case 1: // Rimesse dirette case 1: // Rimesse dirette
if (_w_imp_res != 0.0) if (_w_imp_res != 0.0)
{ {
if (_stvaluta && _codval != " ") _rimdir = _w_imp_res.string(".2"); if (_stvaluta && _codval != " ") _rimdir = _w_imp_res.string(".3");
else _rimdir=_w_imp_res.string("."); else _rimdir=_w_imp_res.string(".");
} }
break; break;
@ -492,14 +492,14 @@ bool TStampaScadenzario::preprocess_page(int file, int counter)
case 3: case 3:
if (_w_imp_res != 0.0) if (_w_imp_res != 0.0)
{ {
if (_stvaluta && _codval != " ") _riba = _w_imp_res.string(".2"); if (_stvaluta && _codval != " ") _riba = _w_imp_res.string(".3");
else _riba=_w_imp_res.string("."); else _riba=_w_imp_res.string(".");
} }
break; break;
default: // Altri default: // Altri
if (_w_imp_res != 0.0) if (_w_imp_res != 0.0)
{ {
if (_stvaluta && _codval != " ") _altri = _w_imp_res.string(".2"); if (_stvaluta && _codval != " ") _altri = _w_imp_res.string(".3");
else _altri=_w_imp_res.string("."); else _altri=_w_imp_res.string(".");
} }
break; break;
@ -974,7 +974,7 @@ void TStampaScadenzario::print_header()
set_header(soh++,"@28gRif.@38gData@47gData@77gCd/Tp@91g%s",(const char*)s1); set_header(soh++,"@28gRif.@38gData@47gData@77gCd/Tp@91g%s",(const char*)s1);
set_header(soh++,"Codice@9gRagione sociale@28gpartita@38gscadenza@47gRegistr." set_header(soh++,"Codice@9gRagione sociale@28gpartita@38gscadenza@47gRegistr."
"@56gDescrizione@77gPag.@86gRata@91g%s@97gVal." "@56gDescrizione@77gPag.@86gRata@91g%s@97gVal."
"@106gImp. in sca.@124gImp. pagati@142gRimesse dir.@160gRi.ba./Tratte@178gAltri",(const char*)s2); "@106gImp. in sca.@125gImp. pagati@144gRimesse dir.@163gRi.ba./Tratte@182gAltri",(const char*)s2);
set_header(soh++,"@28gData e Nr doc. @46gProt. IVA"); set_header(soh++,"@28gData e Nr doc. @46gProt. IVA");
set_header(soh++,(const char *)rw); set_header(soh++,(const char *)rw);
break; break;
@ -991,7 +991,7 @@ void TStampaScadenzario::print_header()
set_header(soh++,"@33gRif.@43gData@53gData@82gCd/Tp"); set_header(soh++,"@33gRif.@43gData@53gData@82gCd/Tp");
set_header(soh++,"Gr. Co. So.@16gDescrizione@33gpartita@43gscadenza@53gRegistr." set_header(soh++,"Gr. Co. So.@16gDescrizione@33gpartita@43gscadenza@53gRegistr."
"@61gDescrizione@82gPag.@89gRata@97gVal." "@61gDescrizione@82gPag.@89gRata@97gVal."
"@106gImp. in sca.@124gImp. pagati@142gRimesse dir.@160gRi.ba./Tratte@178gAltri"); "@106gImp. in sca.@125gImp. pagati@144gRimesse dir.@163gRi.ba./Tratte@182gAltri");
set_header(soh++,"@36gData e Nr doc. @54gProt. IVA"); set_header(soh++,"@36gData e Nr doc. @54gProt. IVA");
@ -1020,11 +1020,11 @@ void TStampaScadenzario::set_page_clifo(int nriga)
if (_tipost == fornitori) if (_tipost == fornitori)
set_row(nriga,"@91g@5pn",FLD(LF_SCADENZE,SCAD_CODABIPR,"@@@@@")); set_row(nriga,"@91g@5pn",FLD(LF_SCADENZE,SCAD_CODABIPR,"@@@@@"));
set_row(nriga,"@97g#t", &_codval); set_row(nriga,"@97g#t", &_codval);
set_row(nriga,"@101g#17t",&_imp_scad); set_row(nriga,"@101g#18t",&_imp_scad);
set_row(nriga,"@119g#17t",&_imp_pag); set_row(nriga,"@120g#18t",&_imp_pag);
set_row(nriga,"@137g#17t",&_rimdir); // rimesse dirette set_row(nriga,"@139g#18t",&_rimdir); // rimesse dirette
set_row(nriga,"@155g#17t",&_riba); // Ri.ba. / tratte set_row(nriga,"@158g#18t",&_riba); // Ri.ba. / tratte
set_row(nriga++,"@173g#17t",&_altri); // Altri tipi di pagamento set_row(nriga++,"@177g#18t",&_altri); // Altri tipi di pagamento
set_row(nriga,"@31g#t",&_datadoc); set_row(nriga,"@31g#t",&_datadoc);
set_row(nriga,"@40g#t",&_numdoc); set_row(nriga,"@40g#t",&_numdoc);
set_row(nriga,"@49g#-5t",&_protiva); set_row(nriga,"@49g#-5t",&_protiva);
@ -1042,11 +1042,11 @@ void TStampaScadenzario::set_page_pcon(int nriga)
set_row(nriga,"@82g@4,rs/@1n@89g@4n",FLD(LF_SCADENZE,SCAD_CODPAG),FLD(LF_SCADENZE,SCAD_TIPOPAG), set_row(nriga,"@82g@4,rs/@1n@89g@4n",FLD(LF_SCADENZE,SCAD_CODPAG),FLD(LF_SCADENZE,SCAD_TIPOPAG),
FLD(LF_SCADENZE,SCAD_NRATA)); FLD(LF_SCADENZE,SCAD_NRATA));
set_row(nriga,"@97g#t", &_codval); set_row(nriga,"@97g#t", &_codval);
set_row(nriga,"@101g#17t",&_imp_scad); set_row(nriga,"@101g#18t",&_imp_scad);
set_row(nriga,"@119g#17t",&_imp_pag); set_row(nriga,"@120g#18t",&_imp_pag);
set_row(nriga,"@137g#17t",&_rimdir); // rimesse dirette set_row(nriga,"@139g#18t",&_rimdir); // rimesse dirette
set_row(nriga,"@155g#17t",&_riba); // Ri.ba. / tratte set_row(nriga,"@158g#18t",&_riba); // Ri.ba. / tratte
set_row(nriga++,"@173g#17t",&_altri); // Altri tipi di pagamento set_row(nriga++,"@177g#17t",&_altri); // Altri tipi di pagamento
set_row(nriga,"@36g#t@45g#t@54g#-5t",&_datadoc,&_numdoc,&_protiva); set_row(nriga,"@36g#t@45g#t@54g#-5t",&_datadoc,&_numdoc,&_protiva);
} }
@ -1087,10 +1087,10 @@ void TStampaScadenzario::print_rows_riepilogo(int& nriga, bool type, TAssoc_arra
const int tipo = k[0]-'0'; const int tipo = k[0]-'0';
const char ult = k[1]; const char ult = k[1];
if (_stvaluta && val != " ") value = v.string(".2"); if (_stvaluta && val != " ") value = v.string(".3");
else value = v.string("."); else value = v.string(".");
if (v != 0.0) if (v != 0.0)
set_row(nriga++,"@0g!@3g%s@25g!@27g%c@32g!@34g%s@39g!@42g%17s@59g!", set_row(nriga++,"@0g!@3g%s@25g!@27g%c@32g!@34g%s@39g!@42g%18s@60g!",
tipi_tab[tipo], ult, (const char*) val, (const char*) value); tipi_tab[tipo], ult, (const char*) val, (const char*) value);
// Cerca la valuta "val" nell'assoc array dei totali per il prospetto // Cerca la valuta "val" nell'assoc array dei totali per il prospetto
if (tot.is_key(val)) if (tot.is_key(val))
@ -1108,7 +1108,7 @@ void TStampaScadenzario::print_riepilogo(int &nriga, bool type)
// Setta le righe di stampa per lo schema riepilogativo con ordinamento primario per data // 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. // Con type == 1 stampa il riepilogo del periodo; viceversa quello del mese.
{ {
TString s(60); TString s(61);
TAssoc_array totali; // Assoc array per i totali distinti per valuta TAssoc_array totali; // Assoc array per i totali distinti per valuta
TString_array as; TString_array as;
@ -1119,13 +1119,13 @@ void TStampaScadenzario::print_riepilogo(int &nriga, bool type)
{ {
if (_ordata) if (_ordata)
{ {
set_row(nriga++,"@0g!@2g%s@59g!",itom(_cur_data.month())); set_row(nriga++,"@0g!@2g%s@60g!",itom(_cur_data.month()));
set_row(nriga++,"%s",(const char*)s); set_row(nriga++,"%s",(const char*)s);
} }
} else } else
{ {
set_row(nriga,"!@5gTotali dal %s al ",_datai.string(brief)); set_row(nriga,"!@5gTotali dal %s al ",_datai.string(brief));
set_row(nriga++,"%s@59g!",_dataf.string(brief)); set_row(nriga++,"%s@60g!",_dataf.string(brief));
set_row(nriga++,"%s",(const char *)s); set_row(nriga++,"%s",(const char *)s);
} }
print_rows_riepilogo(nriga, type, totali); print_rows_riepilogo(nriga, type, totali);
@ -1137,19 +1137,19 @@ void TStampaScadenzario::print_riepilogo(int &nriga, bool type)
TString val(as.row(i)); TString val(as.row(i));
TString value; TString value;
real& tot = (real&)totali[val]; real& tot = (real&)totali[val];
if (_stvaluta && val != " ") value = tot.string(".2"); if (_stvaluta && val != " ") value = tot.string(".3");
else value = tot.string("."); else value = tot.string(".");
if (tot != 0.0) if (tot != 0.0)
{ {
if (i == 0) if (i == 0)
set_row(nriga++,"%s",(const char *)s); // Se c'e' almeno un totale != 0 allora stampa il separe' set_row(nriga++,"%s",(const char *)s); // Se c'e' almeno un totale != 0 allora stampa il separe'
set_row(nriga++,"!@34g%s@42g%17s@59g!",(const char*) val, (const char*) value); set_row(nriga++,"!@34g%s@42g%18s@60g!",(const char*) val, (const char*) value);
} }
else else
{ {
if (val == " ") val = "LIT"; if (val == " ") val = "LIT";
set_row(nriga++,"! Nessun valore totale in %s. @59g!",(const char*) val); set_row(nriga++,"! Nessun valore totale in %s. @60g!",(const char*) val);
} }
} }
set_row(nriga++,"%s",(const char *)s); set_row(nriga++,"%s",(const char *)s);
@ -1182,26 +1182,26 @@ void TStampaScadenzario::print_rows_totali(int &nriga, tipo_pe p)
_LinearTotal& v = (_LinearTotal&)xassoc[k]; _LinearTotal& v = (_LinearTotal&)xassoc[k];
if (k != " ") if (k != " ")
set_row(nriga,"@97g%3s",(const char*)k); set_row(nriga,"@97g%3s",(const char*)k);
if (_stvaluta && k != " ") value = v._is.string(".2"); if (_stvaluta && k != " ") value = v._is.string(".3");
else value = v._is.string("."); else value = v._is.string(".");
if (v._is != 0.0) if (v._is != 0.0)
set_row(nriga,"@101g%17s",(const char*) value); set_row(nriga,"@101g%18s",(const char*) value);
if (_stvaluta && k != " ") value = v._ip.string(".2"); if (_stvaluta && k != " ") value = v._ip.string(".3");
else value = v._ip.string("."); else value = v._ip.string(".");
if (v._ip != 0.0) if (v._ip != 0.0)
set_row(nriga,"@119g%17s",(const char*) value); set_row(nriga,"@120g%18s",(const char*) value);
if (_stvaluta && k != " ") value = v._rd.string(".2"); if (_stvaluta && k != " ") value = v._rd.string(".3");
else value = v._rd.string("."); else value = v._rd.string(".");
if (v._rd != 0.0) if (v._rd != 0.0)
set_row(nriga,"@137g%17s",(const char*) value); set_row(nriga,"@139g%18s",(const char*) value);
if (_stvaluta && k != " ") value = v._ri.string(".2"); if (_stvaluta && k != " ") value = v._ri.string(".3");
else value = v._ri.string("."); else value = v._ri.string(".");
if (v._ri != 0.0) if (v._ri != 0.0)
set_row(nriga,"@155g%17s",(const char*) value); set_row(nriga,"@158g%18s",(const char*) value);
if (_stvaluta && k != " ") value = v._al.string(".2"); if (_stvaluta && k != " ") value = v._al.string(".3");
else value = v._al.string("."); else value = v._al.string(".");
if (v._al != 0.0) if (v._al != 0.0)
set_row(nriga,"@173g%17s",(const char*) value); set_row(nriga,"@177g%18s",(const char*) value);
set_row(++nriga,""); set_row(++nriga,"");
} }
set_row(++nriga,""); set_row(++nriga,"");