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

Patch level :

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :


git-svn-id: svn://10.65.10.50/trunk@16042 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2008-01-24 16:25:46 +00:00
parent 3c3cc8c84a
commit 3459429d3a
1 changed files with 19 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

27
ps/ps0017100.cpp
View File

@ -35,6 +35,7 @@ protected:
bool on_sheet_event(TOperable_field& o, TField_event e, long jolly);
int insert_anal_fields(TMask& m, int page, int lf, int& y, short& dlg, short& dlgd, bool required);
void insert_anal_page();
const TString& get_anal_field(const int lf) const;
public:
bool calc_residual(const TRiga_scadenze& scad, real& impres, real& imppag,
@ -309,6 +310,21 @@ void TPE_mask::sort_sheet()
}
}
const TString& TPE_mask::get_anal_field(const int lf) const
{
TString80 stringona;
TString80 workstring;
for (short id = _start[lf]; id <= _end[lf]; id++)
{
const TEdit_field& f = efield(id);
workstring = f.get();
workstring.rpad(f.size());
stringona << workstring;
}
stringona.rtrim();
return get_tmp_string() = stringona;
}
bool TPE_mask::fill_rate()
{
const long ndist = get_long(F_DIST);
@ -318,7 +334,6 @@ bool TPE_mask::fill_rate()
TSheet_field& sheet = sfield(F_SHEET);
sheet.destroy();
TString commessa;
TString cdc;
TString fase;
@ -334,14 +349,10 @@ bool TPE_mask::fill_rate()
TCursor partite(&rel, filtro, 1, &filter, &filter);
TLocalisamfile mov(LF_MOV);
TLocalisamfile doc(LF_DOC);
short id;
for (id = _start[LF_COMMESSE]; id <= _end[LF_COMMESSE]; id++)
commessa << get(id);
for (id = _start[LF_CDC]; id <= _end[LF_CDC]; id++)
cdc << get(id);
for (id = _start[LF_FASI]; id <= _end[LF_FASI]; id++)
fase << get(id);
commessa = get_anal_field(LF_COMMESSE);
cdc = get_anal_field(LF_CDC);
fase = get_anal_field(LF_FASI);
const long items = partite.items();
partite.freeze();