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

Patch level : at

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            : messi i passaggi automatici in sblocco sospesi


git-svn-id: svn://10.65.10.50/trunk@9347 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 2000-11-22 10:11:18 +00:00
parent 9a52cc0a52
commit fece920843
1 changed files with 40 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

40
at/at0700.cpp
View File

@ -42,6 +42,9 @@ class TSbloccoSospesi : public TPrintapp
TParagraph_string _cognome_nome, _operazione; TParagraph_string _cognome_nome, _operazione;
TString16 _finesospensione; TString16 _finesospensione;
int _intsi_f1, _intsi_f2, _intsi_m, _intaf_m, _etadonne; int _intsi_f1, _intsi_f2, _intsi_m, _intaf_m, _etadonne;
int _numdon1, _numdon2;
TString16 _catini1, _catfin1, _catini2, _catfin2, _motivoid;
bool _sttess2, _dataisc, _nomessage, _autoid;
static bool filter_func_sbloccosospesi(const TRelation* rel); static bool filter_func_sbloccosospesi(const TRelation* rel);
@ -291,6 +294,32 @@ bool TSbloccoSospesi::preprocess_page(int file, int counter)
const TDate oggi(TODAY); const TDate oggi(TODAY);
recsog.put(SOG_DATAULTAGG,oggi); recsog.put(SOG_DATAULTAGG,oggi);
recsog.put(SOG_UTENULTAGG,user()); recsog.put(SOG_UTENULTAGG,user());
TTable ctd("CTD");
TString16 catdon = recsog.get(SOG_CATDON);
const int totdon = recsog.get_int(SOG_TOTDON);
ctd.put("CODTAB",catdon);
if (ctd.read() == NOERR)
{
bool dimissione = ctd.get_bool("B0");
if (dimissione)
{
recsog.put(SOG_CATDON,ctd.get("S6"));
if (ctd.get("S6").not_empty())
catdon = ctd.get("S6");
}
if ((catdon == _catini1 || _catini1.empty()) && (totdon>=_numdon1) && _catfin1.not_empty())
{
recsog.put(SOG_CATDON, _catfin1);
catdon = _catfin1;
}
bool tstampata = recsog.get_bool(SOG_T_STAMPATA);
if ((catdon == _catini2 || _catini2.empty()) && (totdon>=_numdon2) && _catfin2.not_empty() && (!_sttess2 || tstampata))
{
recsog.put(SOG_CATDON, _catfin2);
catdon = _catfin2;
}
}
current_cursor()->file().rewrite(); current_cursor()->file().rewrite();
} }
} }
@ -470,11 +499,22 @@ bool TSbloccoSospesi::user_create()
_sidoneita = new TRecord_array(LF_IDONEITA, IDO_PROGIDO); _sidoneita = new TRecord_array(LF_IDONEITA, IDO_PROGIDO);
TConfig config(CONFIG_STUDIO); TConfig config(CONFIG_STUDIO);
_numdon1 = config.get_int("NumDon1");
_numdon2 = config.get_int("NumDon2");
_catini1 = config.get("CatIni1");
_catfin1 = config.get("CatFin1");
_catini2 = config.get("CatIni2");
_catfin2 = config.get("CatFin2");
_sttess2 = config.get_bool("StTess2");
_dataisc = config.get_bool("DataIsc");
_nomessage = config.get_bool("NoMessage");
_etadonne = config.get_int("EtaDonne"); _etadonne = config.get_int("EtaDonne");
_intsi_f1 = config.get_int("IntSI_F1"); _intsi_f1 = config.get_int("IntSI_F1");
_intsi_f2 = config.get_int("IntSI_F2"); _intsi_f2 = config.get_int("IntSI_F2");
_intsi_m = config.get_int("IntSI_M"); _intsi_m = config.get_int("IntSI_M");
_intaf_m = config.get_int("IntAF_M"); _intaf_m = config.get_int("IntAF_M");
return TRUE; return TRUE;
} }