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

Patch level : 10.0 706

Browse Source 
Files correlati     : sc2.exe
Ricompilazione Demo : [ ]
Commento            :

analitica


git-svn-id: svn://10.65.10.50/trunk@20340 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 2010-04-15 11:37:19 +00:00
parent 144b559cd7
commit 54300466e0
2 changed files with 21 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
sc/sc2100.cpp
View File

@ -390,6 +390,7 @@ void TEC_row::export_to(TEC_recordset& r)
class TEC_array : public TArray class TEC_array : public TArray
{ {
TArray _scaduto; // Array di importi scaduti TArray _scaduto; // Array di importi scaduti
TDecoder _anal;
const TEC_form* _form; // Form che contiene l'array di righe const TEC_form* _form; // Form che contiene l'array di righe
@ -575,7 +576,9 @@ void TEC_array::add_row(const TRiga_partite& row)
if (main_app().has_module(CAAUT)) if (main_app().has_module(CAAUT))
{ {
const long numreg = row.get_long(PART_NREG); const TString & numregcg = row.get(PART_NREG);
const long numreg = atol(_anal.decode(numregcg));
if (numreg > 0) if (numreg > 0)
{ {
TAnal_mov anal_mov(numreg); TAnal_mov anal_mov(numreg);
@ -731,7 +734,7 @@ void TEC_array::arrange_scaduto(const TPartita& game)
} }
TEC_array::TEC_array(const TPartita& game, const TEC_form* f) TEC_array::TEC_array(const TPartita& game, const TEC_form* f)
: _form(f) : _form(f), _anal(LF_MOVANA, "NUMREG", 3)
{ {
int r; int r;
for (r = game.last(); r > 0; r = game.pred(r)) for (r = game.last(); r > 0; r = game.pred(r))
@ -2008,9 +2011,9 @@ void TStampaEC_application::main_loop()
if (excel) if (excel)
{ {
TFilename slk; slk.tempdir(); slk.add("ec.slk"); TFilename xls; xls.tempdir(); xls.add("ec.xls");
_form->recordset().save_as(slk, fmt_silk); _form->recordset().save_as(xls, fmt_html);
xvt_sys_goto_url(slk, "open"); xvt_sys_goto_url(xls, "open");
} }
delete _form; delete _form;

23
sc/sc2600.cpp
View File

@ -226,6 +226,9 @@ void TProspettoScadenze::compute_all(TPartita& p, TBill& bill)
real res_pagati; real res_pagati;
real esposto; real esposto;
if (p.anno() == 2009 && p.numero() == "032")
int i = 1;
compute_unassigned(p, _limbf); compute_unassigned(p, _limbf);
esposto = _unsesp; esposto = _unsesp;
for (int r = p.last(); r > 0; r = p.pred(r)) // Browse all rows (partite) for (int r = p.last(); r > 0; r = p.pred(r)) // Browse all rows (partite)
@ -333,7 +336,7 @@ void TProspettoScadenze::compute_all(TPartita& p, TBill& bill)
{ {
if (_nsinfasce) if (_nsinfasce)
{ {
for (int i = _nsfasce + 1; i >= 0; i--) for (int i = _nsfasce - 1; i >= 0; i--)
{ {
const TDate & limdate = (TDate&)_ns_date[i]; const TDate & limdate = (TDate&)_ns_date[i];
if (limdate.ok() && d > limdate) if (limdate.ok() && d > limdate)
@ -350,7 +353,7 @@ void TProspettoScadenze::compute_all(TPartita& p, TBill& bill)
{ {
if (_sinfasce) if (_sinfasce)
{ {
for (int i = _sfasce + 1; i >= 0; i--) for (int i = _sfasce - 1; i >= 0; i--)
{ {
const TDate & limdate = (TDate&)_s_date[i]; const TDate & limdate = (TDate&)_s_date[i];
if (limdate.ok() && d <= limdate) if (limdate.ok() && d <= limdate)
@ -632,9 +635,9 @@ void TProspettoScadenze::postclose_print()
{ {
if (_excel) if (_excel)
{ {
TFilename slk; slk.tempdir(); slk.add("prosscad.slk"); TFilename xls; xls.tempdir(); xls.add("prosscad.xls");
_recset->save_as(slk, fmt_silk); _recset->save_as(xls, fmt_html);
xvt_sys_goto_url(slk, "open"); xvt_sys_goto_url(xls, "open");
delete _recset; delete _recset;
_recset = NULL; _recset = NULL;
} }
@ -754,7 +757,7 @@ void TProspettoScadenze::print_totali_rows(int nriga, bool what)
TString value; TString value;
TLineTotal& v = (TLineTotal&)xassoc[k]; TLineTotal& v = (TLineTotal&)xassoc[k];
real tot = ZERO; real tot = ZERO;
int pos = 40; int pos = 49;
TString rw(255); TString rw(255);
rw = ""; rw = "";
@ -892,7 +895,7 @@ void TProspettoScadenze::export_totali_rows()
if (_sinfasce) if (_sinfasce)
{ {
for (int i = _sfasce; i >= 0; i--) for (int i = _sfasce - 1; i >= 0; i--)
{ {
_recset->set(_colnames.row(col++), v._s[i]); _recset->set(_colnames.row(col++), v._s[i]);
tot += v._s[i]; tot += v._s[i];
@ -906,7 +909,7 @@ void TProspettoScadenze::export_totali_rows()
if (_nsinfasce) if (_nsinfasce)
{ {
for (int i = 0; i <= _nsfasce; i++) for (int i = 0; i < _nsfasce; i++)
{ {
_recset->set(_colnames.row(col++), v._ns[i]); _recset->set(_colnames.row(col++), v._ns[i]);
tot += v._ns[i]; tot += v._ns[i];
@ -982,7 +985,7 @@ void TProspettoScadenze::print_header()
meno.fill('-', last_column); meno.fill('-', last_column);
set_header(soh++,(const char *)meno); set_header(soh++,(const char *)meno);
set_header(soh,"CODICE@8gC O G N O M E E N O M E "); set_header(soh,"CODICE@8gC O G N O M E E N O M E ");
int pos = 40; int pos = 49;
rw.cut(0); rw.cut(0);
if (_sinfasce) if (_sinfasce)
@ -994,7 +997,7 @@ void TProspettoScadenze::print_header()
rw << format("@%dg <= %3d gg", pos, _limiti[i] * 30); rw << format("@%dg <= %3d gg", pos, _limiti[i] * 30);
pos += 12; pos += 12;
} }
set_header(soh, format("@%dg%s", 40+((pos-40)/2), "SCADUTO")); set_header(soh, format("@%dg%s", 49+((pos-49)/2), "SCADUTO"));
} }
else else
{ {