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

Patch level :

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            : Lo sblocco automatico aggiorna data e utente ultimo aggiornamento


git-svn-id: svn://10.65.10.50/trunk@7736 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 1999-02-02 14:35:53 +00:00
parent e9f301e028
commit 251a0d079c
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
at/at0700.cpp
View File

@ -1,5 +1,6 @@
#include <form.h>
#include <mask.h>
#include <prefix.h>
#include <printapp.h>
#include <recarray.h>
#include <tabutil.h>
@ -194,6 +195,9 @@ bool TSbloccoSospesi::preprocess_page(int file, int counter)
reccon.put(CON_PROGCON, progcon);
reccon.put(CON_DATACON, _data_stampa);
reccon.put(CON_TIPOCON, FINE_SOSPENSIONE);
TString80 resp = user();
resp << " - SBLOCCO AUTOMATICO";
reccon.put(CON_RESPONSAB, resp);
_scontrolli->add_row(reccon);
_scontrolli->rewrite();
recsog.put(SOG_DATACONV,NULLDATE);
@ -252,10 +256,16 @@ bool TSbloccoSospesi::preprocess_page(int file, int counter)
recido.put(IDO_INTERVALLO, recsog.get(SOG_INTAF));
if (recsog.get_int(SOG_INTAF) == 0)
recido.put(IDO_INTERVALLO, _intaf_m);
TString80 resp = user();
resp << " - SBLOCCO AUTOMATICO";
recido.put(IDO_RESPONSAB, resp);
_sidoneita->add_row(recido);
_sidoneita->rewrite();
}
con_reord(recsog, _scontrolli, _sidoneita);
const TDate oggi(TODAY);
recsog.put(SOG_DATAULTAGG,oggi);
recsog.put(SOG_UTENULTAGG,user());
current_cursor()->file().rewrite();
}
}