f362b8f434
Files correlati : ca0.exe ca2.exe Ricompilazione Demo : [ ] Commento : Bug 0001669: Aggiungere un conto di contabilità di default alle commesse Aggiungere un conto di contabilità di default alle commesse git-svn-id: svn://10.65.10.50/trunk@20665 c028cbd2-c16b-5b4b-a496-9718f37d4682
131 lines
3.3 KiB
C++
Executable File
131 lines
3.3 KiB
C++
Executable File
// gestione files Contabilita' Analitica: COMMESSE
|
|
#include <execp.h>
|
|
#include <recset.h>
|
|
#include <relapp.h>
|
|
|
|
#include "calib01.h"
|
|
#include "ca0600a.h"
|
|
#include "commesse.h"
|
|
|
|
////////////////////////////////////////////////////////////////////////
|
|
//MASCHERA
|
|
////////////////////////////////////////////////////////////////////////
|
|
class TCms_anal_msk : public TSimple_anal_msk
|
|
{
|
|
protected:
|
|
virtual int get_logicnum() const { return LF_COMMESSE; }
|
|
|
|
public:
|
|
TCms_anal_msk();
|
|
};
|
|
|
|
TCms_anal_msk::TCms_anal_msk()
|
|
{
|
|
read("ca0600a");
|
|
ca_create_fields(*this, 2, LF_CDC, 1, 1, F_CMS_CDC1, F_CMS_CDCDES1, 0x0, COMMESSE_CODCOSTO);
|
|
|
|
const bool use_pdcc = ca_config().get_bool("UsePdcc");
|
|
const int nfields = ca_create_fields(*this, 3, use_pdcc ? LF_PCON : LF_PCONANA, 2, 2, F_CMSPDA1, F_CMSDES1, 0x0, COMMESSE_CODCONTO);
|
|
int from = 1;
|
|
|
|
for (int i = 0; i < nfields; i++)
|
|
{
|
|
TEdit_field & e = efield(F_CMSPDA1 + i);
|
|
|
|
e.check_type(CHECK_NORMAL);
|
|
TFieldref * fr = (TFieldref *) e.field();
|
|
if (fr != NULL)
|
|
{
|
|
fr->set_from(from);
|
|
if (i < 2)
|
|
from += 3;
|
|
else
|
|
from += 6;
|
|
fr->set_to(from - 1);
|
|
}
|
|
}
|
|
}
|
|
|
|
////////////////////////////////////////////////////////////////////////
|
|
//APPLICAZIONE
|
|
////////////////////////////////////////////////////////////////////////
|
|
// applicazione per la gestione delle commesse
|
|
class TCms_app : public TAnal_app
|
|
{
|
|
int _maxlev;
|
|
bool _has_filter;
|
|
|
|
protected:
|
|
virtual const char * extra_modules() const {return "cm";} //funziona anche con autorizzazione CM
|
|
|
|
virtual bool filtered() const;
|
|
|
|
virtual void init_modify_mode(TMask& mask);
|
|
virtual void init_insert_mode(TMask& mask);
|
|
virtual bool protected_record(TRectype& record);
|
|
virtual TSimple_anal_msk* create_mask() const { return new TCms_anal_msk; }
|
|
virtual bool user_create();
|
|
};
|
|
|
|
bool TCms_app::filtered() const
|
|
{
|
|
if (_has_filter)
|
|
return true;
|
|
return TAnal_app::filtered();
|
|
}
|
|
|
|
//non si può eliminare una commessa se essa appare in un saldo analitico dell'anno in corso o dell'anno precedente
|
|
bool TCms_app::protected_record(TRectype& record)
|
|
{
|
|
TString query;
|
|
query << "USE SALDANA\nSELECT COMMESSA==#COMMESSA\nFROM ANNO=#ANNO\n";
|
|
const TString commessa = record.get(COMMESSE_CODCMS);
|
|
const TDate today(TODAY);
|
|
const long anno = today.year();
|
|
|
|
TISAM_recordset saldana_recset(query);
|
|
saldana_recset.set_var("#COMMESSA", TVariant(commessa));
|
|
saldana_recset.set_var("#ANNO", TVariant(anno - 1));
|
|
|
|
const long items = saldana_recset.items();
|
|
return items > 0;
|
|
}
|
|
|
|
void TCms_app::init_modify_mode(TMask& mask)
|
|
{
|
|
const short id = ((TCms_anal_msk &)mask).get_field_id(_maxlev - 1 , 1);
|
|
mask.enable(-1, mask.get(id).not_empty());
|
|
|
|
TAnal_app::init_modify_mode(mask);
|
|
}
|
|
|
|
void TCms_app::init_insert_mode(TMask& mask)
|
|
{
|
|
const short id = ((TCms_anal_msk &)mask).get_field_id(_maxlev - 1, 1);
|
|
mask.enable(-1, mask.get(id).not_empty());
|
|
|
|
TAnal_app::init_insert_mode(mask);
|
|
}
|
|
|
|
bool TCms_app::user_create()
|
|
{
|
|
const TMultilevel_code_info& mci = ca_multilevel_code_info(LF_COMMESSE);
|
|
|
|
_maxlev = mci.levels();
|
|
if (_maxlev <= 0)
|
|
return error_box(TR("Le commesse non sono state configurate"));
|
|
|
|
//eventuali filtri per utente
|
|
_has_filter = cache().get("%AUC", user(), "S0").full();
|
|
|
|
return TAnal_app::user_create();
|
|
}
|
|
|
|
int ca0600(int argc, char* argv[])
|
|
{
|
|
TCms_app a;
|
|
a.run(argc, argv, TR("Commesse"));
|
|
return 0;
|
|
}
|
|
|