2004-12-21 16:05:17 +00:00
|
|
|
// gestione files Contabilita' Analitica: FASI
|
|
|
|
#include <execp.h>
|
|
|
|
#include <relapp.h>
|
|
|
|
|
|
|
|
#include "calib01.h"
|
2005-03-08 15:55:27 +00:00
|
|
|
#include "calibmsk.h"
|
2004-12-21 16:05:17 +00:00
|
|
|
#include "ca0700a.h"
|
|
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////
|
|
|
|
//MASCHERA
|
|
|
|
////////////////////////////////////////////////////////////////////////
|
2005-03-08 15:55:27 +00:00
|
|
|
|
2004-12-21 16:05:17 +00:00
|
|
|
class TFsc_anal_msk : public TSimple_anal_msk
|
|
|
|
{
|
|
|
|
protected:
|
|
|
|
virtual int get_logicnum() const { return LF_FASI; }
|
2005-03-08 15:55:27 +00:00
|
|
|
virtual bool on_field_event(TOperable_field& o, TField_event e, long jolly);
|
2004-12-21 16:05:17 +00:00
|
|
|
|
|
|
|
public:
|
|
|
|
TFsc_anal_msk() { read("ca0700a"); }
|
|
|
|
};
|
|
|
|
|
2005-03-08 15:55:27 +00:00
|
|
|
bool TFsc_anal_msk::on_field_event(TOperable_field& o, TField_event e, long jolly)
|
|
|
|
{
|
|
|
|
const short id = o.dlg();
|
|
|
|
if (id > F_KEY4 && id <= F_KEY4+4)
|
|
|
|
{
|
|
|
|
const int level = id - F_KEY4 - 1;
|
|
|
|
return ca_test_multilevel_field(efield(id), level);
|
|
|
|
}
|
|
|
|
return TSimple_anal_msk::on_field_event(o, e, jolly);
|
|
|
|
}
|
|
|
|
|
2004-12-21 16:05:17 +00:00
|
|
|
////////////////////////////////////////////////////////////////////////
|
|
|
|
//APPLICAZIONE
|
|
|
|
////////////////////////////////////////////////////////////////////////
|
|
|
|
// applicazione per la gestione delle fasi
|
|
|
|
class TFsc_app : public TAnal_app
|
|
|
|
{
|
|
|
|
protected:
|
2005-01-14 15:14:34 +00:00
|
|
|
virtual TSimple_anal_msk* create_mask() const { return new TFsc_anal_msk; }
|
2005-03-31 16:06:22 +00:00
|
|
|
virtual bool user_create();
|
2004-12-21 16:05:17 +00:00
|
|
|
};
|
|
|
|
|
2005-03-31 16:06:22 +00:00
|
|
|
bool TFsc_app::user_create()
|
|
|
|
{
|
|
|
|
const TMultilevel_code_info& mci = ca_multilevel_code_info(LF_FASI);
|
|
|
|
if (mci.levels() <= 0)
|
|
|
|
return error_box(TR("Le fasi non sono state configurate"));
|
|
|
|
|
|
|
|
return TAnal_app::user_create();
|
|
|
|
}
|
|
|
|
|
2004-12-21 16:05:17 +00:00
|
|
|
int ca0700(int argc, char* argv[])
|
|
|
|
{
|
|
|
|
TFsc_app a;
|
|
|
|
a.run(argc, argv, TR("Fasi"));
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|