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

Giornaliero controlli: annullamento ultima convocazione se inserisco

Browse Source 
una idoneita successiva alla data convocazione
Patch level         :
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :


git-svn-id: svn://10.65.10.50/trunk@6273 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 1998-02-26 15:41:36 +00:00
parent 4ea34f75ee
commit fc0690632d
1 changed files with 13 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
at/at0300.cpp
View File

@ -275,6 +275,19 @@ int TGiornalieroC::write(TSheet_field& s)
const TDate oggi(TODAY);
sog.put(SOG_DATAULTAGG,oggi);
sog.put(SOG_UTENULTAGG,user());
const TDate dataprossi = sog.get_date(SOG_DATAPROSSI);
const TDate dataconv = sog.get_date(SOG_DATACONV);
const char stato = modstato_tcs(sog.get(SOG_STATO));
const TString16 statosi = sog.get(SOG_STATOSI);
// cancellazione data convocazione se sospeso
// o se è venuto a donare (la dataprossi diventa > della dataconvoc.
if ((stato == 'S') || (statosi == SOSPENSIONE) || (dataprossi > dataconv))
{
const TDate datanulla(NULLDATE);
sog.put(SOG_DATACONV, datanulla);
const int numzero = 0;
sog.put(SOG_NUMCONV,numzero);
}
sog.rewrite();
}
}