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

Patch level :10.0 198

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :
0001074: Impostazione gruppo-specie
Descrizione  il gruppo specie viene richiesto ogni volta, la 3.2 proponeva quello dei parametri ditta

idem per l'inserimento movimenti. CE1.exe -4.


git-svn-id: svn://10.65.10.50/trunk@17951 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2008-12-18 16:11:22 +00:00
parent ac071c435d
commit c8cbb69aa8
3 changed files with 32 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
ce/ce0500.cpp
View File

@ -262,6 +262,19 @@ bool TQuery_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
switch (o.dlg()) switch (o.dlg())
{ {
case F_ESERCIZIO: case F_ESERCIZIO:
if (e == fe_init || e == fe_modify)
{
int esercizio = get_int(F_ESERCIZIO);
TString4 gruppo, specie;
TDitta_cespiti& dc = ditta_cespiti();
dc.set_attivita(esercizio, atoi(gruppo), specie);
dc.get_attivita(esercizio, gruppo, specie);
if (gruppo.full())
{
set(F_GRUPPO, gruppo);
set(F_SPECIE, specie);
}
} //niente break!!!!! è fatto apposta per far scattare i successivi controlli su gruppo e specie
case F_GRUPPO: case F_GRUPPO:
case F_SPECIE: case F_SPECIE:
if (e == fe_init || e == fe_modify) if (e == fe_init || e == fe_modify)

12
ce/ce0900.cpp
View File

@ -282,12 +282,11 @@ void TConversione_cespiti::close_log()
int TConversione_cespiti::conv_file(const TFilename& ofname, int nflogicnum) int TConversione_cespiti::conv_file(const TFilename& ofname, int nflogicnum)
{ {
long oldditta = -1; long oldditta = -1;
TDir d; TDir d(nflogicnum);
d.get(nflogicnum); d.set_eod(0);
d.eod() = 0L;
d.put(nflogicnum); d.put(nflogicnum);
TExternisamfile oldfile(ofname,(bool) FALSE,(bool) FALSE); TExternisamfile oldfile(ofname, false, false);
TLocalisamfile* newfile = NULL; TLocalisamfile* newfile = NULL;
const TRectype& oldrec = oldfile.curr(); const TRectype& oldrec = oldfile.curr();
@ -665,9 +664,8 @@ int TConversione_cespiti::conv_inifile(const TFilename& ofname, const char* ofpa
{ {
long oldditta = -1; long oldditta = -1;
long ditta; long ditta;
TDir d; TDir d(nflogicnum);
d.get(nflogicnum); d.set_eod(0);
d.eod() = 0L;
d.put(nflogicnum); d.put(nflogicnum);
TSystemisamfile f(nflogicnum); TSystemisamfile f(nflogicnum);
int err = f.pack(); int err = f.pack();

13
ce/ce1500.cpp
View File

@ -158,6 +158,19 @@ bool TMov_qmask::on_field_event(TOperable_field& o, TField_event e, long jolly)
case F_ESERCIZIO: case F_ESERCIZIO:
if ((e == fe_close || e == fe_modify) && efield(F_INIZIO_ES).empty()) if ((e == fe_close || e == fe_modify) && efield(F_INIZIO_ES).empty())
return error_box("Inserire un esercizio valido"); return error_box("Inserire un esercizio valido");
if (e == fe_init || e == fe_modify)
{
int esercizio = get_int(F_ESERCIZIO);
TString4 gruppo, specie;
TDitta_cespiti& dc = ditta_cespiti();
dc.set_attivita(esercizio, atoi(gruppo), specie);
dc.get_attivita(esercizio, gruppo, specie);
if (gruppo.full())
{
set(F_GRUPPO, gruppo);
set(F_SPECIE, specie);
}
} //niente break!!!!! è fatto apposta per far scattare i successivi controlli su gruppo e specie
case F_GRUPPO: case F_GRUPPO:
case F_SPECIE: case F_SPECIE:
calcola_stato_attivita(); calcola_stato_attivita();