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

Eliminate dallo sheet le ditte non attivate per la contabilita'

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@1106 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
pirro 1995-03-13 10:56:27 +00:00
parent adbbbf4a58
commit cc6555348d
1 changed files with 46 additions and 44 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

90
cg/cg5500.cpp
View File

@ -171,7 +171,7 @@ void Visliq_app::build_nomiditte()
else fr = lia.get("S7"); else fr = lia.get("S7");
} }
else continue; else continue;
TToken_string* d = new TToken_string(64); TToken_string* d = new TToken_string(64);
// add record // add record
@ -333,11 +333,11 @@ bool Visliq_app::sel_mese_sh1 (TMask_field& f, KEY k)
TMask& sm = sh.sheet_mask(); TMask& sm = sh.sheet_mask();
sm.field(102).set(tt.get(2)); sm.field(103).set(tt.get(2));
sm.field(103).set(tt.get(3)); sm.field(104).set(tt.get(3));
sm.field(104).set(tt.get(4)); sm.field(105).set(tt.get(4));
sm.field(105).set(tt.get(5)); sm.field(106).set(tt.get(5));
sm.field(106).set(tt.get(6)); sm.field(107).set(tt.get(6));
return TRUE; return TRUE;
} }
@ -439,8 +439,8 @@ bool Visliq_app::vis_all()
// qui occorre modificare le deleghe // qui occorre modificare le deleghe
sv.set_notify(vers_action); sv.set_notify(vers_action);
sh.sheet_mask().set_handler(100,sel_mese_sh1); sh.sheet_mask().set_handler(101,sel_mese_sh1);
sv.sheet_mask().set_handler(100,sel_mese_sh2); sv.sheet_mask().set_handler(101,sel_mese_sh2);
// fill the mask in // fill the mask in
read_general(m); read_general(m);
@ -916,11 +916,11 @@ void Visliq_app::recalc_next_liq(int start_month, TSheet_field* sl, TSheet_field
int sr0 = (_lim->get_real("R0")).sign(); int sr0 = (_lim->get_real("R0")).sign();
int sr5 = (_lim->get_real("R5")).sign(); int sr5 = (_lim->get_real("R5")).sign();
t.add(abs(_lim->get_real("R0")).string(),1); t.add(abs(_lim->get_real("R0")).string(),2);
t.add(sr0 == 0 ? "" : (sr0 > 0 ? "D" : "C"), 2); t.add(sr0 == 0 ? "" : (sr0 > 0 ? "D" : "C"), 3);
t.add((_lim->get_real("R1")).string(),3); t.add((_lim->get_real("R1")).string(),4);
t.add(abs(_lim->get_real("R5")).string(),4); t.add(abs(_lim->get_real("R5")).string(),5);
t.add(sr5 == 0 ? "" : (sr5 > 0 ? "D" : "C"),5); t.add(sr5 == 0 ? "" : (sr5 > 0 ? "D" : "C"),6);
sl->force_update(row); sl->force_update(row);
} }
@ -995,6 +995,7 @@ void Visliq_app::read_general(TMask& m)
if (sh.items() < i) tt = new TToken_string(80); if (sh.items() < i) tt = new TToken_string(80);
else tt = &(sh.row(i-1)); else tt = &(sh.row(i-1));
tt->add(""); // questo e' il bottone
tt->add(itoname(i)); tt->add(itoname(i));
tt->add(abs(_lim->get_real("R0")).string()); tt->add(abs(_lim->get_real("R0")).string());
@ -1053,6 +1054,7 @@ void Visliq_app::read_general(TMask& m)
if (i == 12) nomemese << " acconto"; if (i == 12) nomemese << " acconto";
if (i == 13) nomemese << " saldo"; if (i == 13) nomemese << " saldo";
tt->add(""); // questo e' il bottone
tt->add(nomemese); // mese tt->add(nomemese); // mese
tt->add(date[i-1].string()); // data vers. tt->add(date[i-1].string()); // data vers.
tt->add(banche[i-1].get(0)); // azienda tt->add(banche[i-1].get(0)); // azienda
@ -1111,22 +1113,22 @@ void Visliq_app::write_general(TMask& m)
TToken_string& tt_vn = sv.row(row); TToken_string& tt_vn = sv.row(row);
// traduci contenuto righe in real pila // traduci contenuto righe in real pila
real orett(tt_lo.get(4)); real orett(tt_lo.get(5));
real nrett(tt_ln.get(4)); real nrett(tt_ln.get(5));
real orimb(tt_lo.get(3)); real orimb(tt_lo.get(4));
real nrimb(tt_ln.get(3)); real nrimb(tt_ln.get(4));
real overs(tt_vo.get(5)); real overs(tt_vo.get(6));
real nvers(tt_vn.get(5)); real nvers(tt_vn.get(6));
TDate odate(tt_vn.get(1)); TDate odate(tt_vn.get(2));
TDate ndate(tt_vn.get(1)); TDate ndate(tt_vn.get(2));
TString odbcr(tt_lo.get(5)); TString odbcr(tt_lo.get(6));
TString ndbcr(tt_ln.get(5)); TString ndbcr(tt_ln.get(6));
TString oabi (tt_vo.get(2)); TString oabi (tt_vo.get(3));
TString nabi (tt_vn.get(2)); TString nabi (tt_vn.get(3));
TString ocab (tt_vo.get(3)); TString ocab (tt_vo.get(4));
TString ncab (tt_vn.get(3)); TString ncab (tt_vn.get(4));
TString ocon (tt_vo.get(4)); TString ocon (tt_vo.get(5));
TString ncon (tt_vn.get(4)); TString ncon (tt_vn.get(5));
if (odbcr == "C") orett = -orett; if (odbcr == "C") orett = -orett;
if (ndbcr == "C") nrett = -nrett; if (ndbcr == "C") nrett = -nrett;
@ -1134,16 +1136,16 @@ void Visliq_app::write_general(TMask& m)
// acconto (si considerera' solo a dicembre) // acconto (si considerera' solo a dicembre)
TToken_string& vo = (TToken_string&)_vers_rows[_freqviva == "M" ? 11 : 3]; TToken_string& vo = (TToken_string&)_vers_rows[_freqviva == "M" ? 11 : 3];
TToken_string& vn = sv.row(_freqviva == "M" ? 11 : 3); TToken_string& vn = sv.row(_freqviva == "M" ? 11 : 3);
real oacct (vo.get(5)); real oacct (vo.get(6));
real nacct (vn.get(5)); real nacct (vn.get(6));
TDate aodate(vn.get(1)); TDate aodate(vn.get(2));
TDate andate(vn.get(1)); TDate andate(vn.get(2));
TString aoabi (vo.get(2)); TString aoabi (vo.get(3));
TString anabi (vn.get(2)); TString anabi (vn.get(3));
TString aocab (vo.get(3)); TString aocab (vo.get(4));
TString ancab (vn.get(3)); TString ancab (vn.get(4));
TString aocon (vo.get(4)); TString aocon (vo.get(5));
TString ancon (vn.get(4)); TString ancon (vn.get(5));
if (!look_lim(i)) if (!look_lim(i))
// blocca riporto crediti e debiti // blocca riporto crediti e debiti
@ -1321,11 +1323,11 @@ void Visliq_app::write_general(TMask& m)
int sr0 = (_lim->get_real("R0")).sign(); int sr0 = (_lim->get_real("R0")).sign();
int sr5 = (_lim->get_real("R5")).sign(); int sr5 = (_lim->get_real("R5")).sign();
tt_ln.add(abs(_lim->get_real("R0")).string(),1); tt_ln.add(abs(_lim->get_real("R0")).string(),2);
tt_ln.add(sr0 == 0 ? "" : (sr0 > 0 ? "D" : "C"), 2); tt_ln.add(sr0 == 0 ? "" : (sr0 > 0 ? "D" : "C"), 3);
tt_ln.add((_lim->get_real("R1")).string(),3); tt_ln.add((_lim->get_real("R1")).string(),4);
tt_ln.add(abs(_lim->get_real("R5")).string(),4); tt_ln.add(abs(_lim->get_real("R5")).string(),5);
tt_ln.add(sr5 == 0 ? "" : (sr5 > 0 ? "D" : "C"),5); tt_ln.add(sr5 == 0 ? "" : (sr5 > 0 ? "D" : "C"),6);
sh.force_update(row); sh.force_update(row);