Corretta trasformazione di data in long

git-svn-id: svn://10.65.10.50/trunk@2017 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1995-10-26 11:45:37 +00:00
parent dcb7ad73af
commit e45b971bdc

View File

@ -92,7 +92,7 @@ void TAttivazione_moduli::generate_key()
long & l = (long &) ud[2];
TDate d(TODAY);
l = (long) d;
l = d.year()*10000L + d.month()*100L + d.day();
#if XVT_OS == XVT_OS_SCOUNIX
INT_OFF();
HL_ON(_port, ModAd);
@ -273,7 +273,7 @@ bool TAttivazione_moduli::activate_hnd(TMask_field & f, KEY k)
const TDate d(m.get(F_DT));
long & l = (long &) ud1[0];
l = (long) d;
l = d.year()*10000L + d.month()*100L + d.day();
ud1[2] = K1 | (nmod & UBYTEMASK);
ud1[3] = app()._serno;
#if XVT_OS == XVT_OS_SCOUNIX