Aggiunto programma di aggiornamento data di competenza.
Usage: CG1 -2 D /u<USER> git-svn-id: svn://10.65.10.50/trunk@4507 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
1fbc189b59
commit
10623dc466
@ -18,6 +18,7 @@
|
||||
#include "cg1303.h"
|
||||
#include "cg1304.h"
|
||||
#include "cg1305.h"
|
||||
#include "cg1306.h"
|
||||
#include "cg1.h"
|
||||
|
||||
class TAgg_attiv : public TApplication
|
||||
@ -157,6 +158,12 @@ int cg1300(int argc, char* argv[])
|
||||
a.run(argc, argv,"Aggiornamento codice esercizio");
|
||||
}
|
||||
break;
|
||||
case 'D':
|
||||
{
|
||||
TAgg_datacomp a;
|
||||
a.run(argc, argv,"Aggiornamento data competenza");
|
||||
}
|
||||
break;
|
||||
default:
|
||||
break;
|
||||
}
|
||||
|
56
cg/cg1306.cpp
Executable file
56
cg/cg1306.cpp
Executable file
@ -0,0 +1,56 @@
|
||||
// sistema la data di competenza di tutti i movimenti
|
||||
|
||||
#include "cg1306.h"
|
||||
#include "cglib.h"
|
||||
#include "cg1300.h"
|
||||
#include <mov.h>
|
||||
|
||||
inline TAgg_datacomp& app() { return (TAgg_datacomp&) main_app(); }
|
||||
|
||||
bool TAgg_datacomp::create()
|
||||
{
|
||||
TApplication::create();
|
||||
dispatch_e_menu (BAR_ITEM(1));
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
bool TAgg_datacomp::destroy()
|
||||
{
|
||||
return TApplication::destroy();
|
||||
}
|
||||
|
||||
bool TAgg_datacomp::menu(MENU_TAG m)
|
||||
{
|
||||
if (set_firm())
|
||||
aggiorna_datacomp();
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
void TAgg_datacomp::aggiorna_datacomp()
|
||||
{
|
||||
TLocalisamfile mov(LF_MOV);
|
||||
long nrecs = (long) mov.eod();
|
||||
long modified_recs = 0L;
|
||||
TDate datacomp;
|
||||
TDate datareg;
|
||||
int err = NOERR;
|
||||
TProgind p(nrecs, "Aggiornamento in corso...", TRUE, TRUE, 100);
|
||||
|
||||
for (mov.first(); !mov.eof() && err == NOERR; mov.next())
|
||||
{
|
||||
p.addstatus(1);
|
||||
datacomp = mov.get_date(MOV_DATACOMP);
|
||||
datareg = mov.get_date(MOV_DATAREG);
|
||||
if (datacomp > datareg)
|
||||
{
|
||||
mov.put(MOV_DATACOMP,datareg);
|
||||
mov.rewrite();
|
||||
modified_recs++;
|
||||
}
|
||||
}
|
||||
|
||||
if (err != NOERR)
|
||||
warning_box("Aggiornamento codice esercizio interrotta. Rilevato errore %d in riscrittura",err);
|
||||
else
|
||||
message_box("Aggiornamento data competenza completata. Modificati %ld movimenti.",modified_recs);
|
||||
}
|
18
cg/cg1306.h
Executable file
18
cg/cg1306.h
Executable file
@ -0,0 +1,18 @@
|
||||
#include <applicat.h>
|
||||
#include <mask.h>
|
||||
#include <isam.h>
|
||||
#include <utility.h>
|
||||
#include <progind.h>
|
||||
#include <urldefid.h>
|
||||
|
||||
class TAgg_datacomp : public TApplication
|
||||
{
|
||||
void aggiorna_datacomp();
|
||||
public:
|
||||
virtual bool create();
|
||||
virtual bool destroy();
|
||||
virtual bool menu(MENU_TAG m);
|
||||
|
||||
TAgg_datacomp() {};
|
||||
virtual ~TAgg_datacomp() {};
|
||||
};
|
Loading…
x
Reference in New Issue
Block a user