81ca7b4a4a
Files correlati : tc1.exe Ricompilazione Demo : [ ] Commento Invio a Zucchetti Aggiunti Parametri DittaReso opzionale l'ìinvio dei clienti/fornitori sospesi git-svn-id: svn://10.65.10.50/trunk@20417 c028cbd2-c16b-5b4b-a496-9718f37d4682
123 lines
2.7 KiB
C++
Executable File
123 lines
2.7 KiB
C++
Executable File
#include <confapp.h>
|
|
#include <msksheet.h>
|
|
#include <progind.h>
|
|
#include <recset.h>
|
|
#include <recarray.h>
|
|
#include <relation.h>
|
|
|
|
#include "../include/attiv.h"
|
|
#include "../include/mov.h"
|
|
#include "../cg/cglib01.h"
|
|
#include "tcconf.h"
|
|
|
|
class TZU_confditta : public TConfig_application
|
|
{
|
|
char _current;
|
|
|
|
static bool check_fields(TMask_field& f, KEY k);
|
|
// @cmember:(INTERNAL) Salva i parametri dalla maschera
|
|
virtual const char* get_mask_name() const;
|
|
virtual void save_mask(bool tosave);
|
|
|
|
public:
|
|
// @cmember Disabilita la verifica del modulo in chiave
|
|
virtual bool check_autorization() const { return FALSE; }
|
|
|
|
virtual bool preprocess_config (TMask& mask, TConfig& config);
|
|
virtual bool postprocess_config (TMask& mask, TConfig& config);
|
|
virtual bool user_create( );
|
|
virtual bool user_destroy( );
|
|
|
|
TZU_confditta() : TConfig_application( CONFIG_DITTA ){ }
|
|
virtual ~TZU_confditta( ){ }
|
|
};
|
|
|
|
bool TZU_confditta::check_fields(TMask_field& f, KEY k)
|
|
{
|
|
return true;
|
|
}
|
|
|
|
const char* TZU_confditta::get_mask_name() const
|
|
{
|
|
TString& maskname = get_tmp_string();
|
|
maskname = ini_get_string(CONFIG_DITTA, "tc", "EdMaskZu");
|
|
return maskname;
|
|
}
|
|
|
|
void TZU_confditta::save_mask(bool tosave)
|
|
{
|
|
if (tosave)
|
|
{
|
|
const TMask & m = *get_mask();
|
|
|
|
if (m.get_bool(F_RIPRISTINO))
|
|
{
|
|
const TDate from(m.get(F_ULTINVIO));
|
|
TEsercizi_contabili esc;
|
|
const TEsercizio & e = esc.esercizio(esc.date2esc(from));
|
|
const TDate to(e.fine());
|
|
|
|
TString query = "USE MOV KEY 2 SELECT INVIATO==\"X\"";
|
|
|
|
query << "\nFROM DATAREG=#DATA_DA";
|
|
query << "\nTO DATAREG=#DATA_AL";
|
|
|
|
TISAM_recordset mov(query);
|
|
|
|
mov.set_var("#DATA_DA", TVariant(from));
|
|
mov.set_var("#DATA_AL", TVariant(to));
|
|
|
|
if (mov.items() >0L)
|
|
{
|
|
TProgind pi(mov.items(), TR("Ripristino movimenti"), true, true);
|
|
TLocalisamfile cgmov(LF_MOV);
|
|
|
|
for (bool ok = mov.move_first(); ok; ok = mov.move_next())
|
|
{
|
|
if (!pi.addstatus(1))
|
|
break;
|
|
const long numreg = mov.get(MOV_NUMREG).as_int();
|
|
|
|
cgmov.put(MOV_NUMREG, numreg);
|
|
if (cgmov.read(_isequal, _lock) == NOERR)
|
|
{
|
|
cgmov.zero(MOV_INVIATO);
|
|
cgmov.rewrite();
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
TConfig_application::save_mask(tosave);
|
|
}
|
|
|
|
bool TZU_confditta::preprocess_config (TMask& mask, TConfig& config)
|
|
{
|
|
return true;
|
|
}
|
|
|
|
bool TZU_confditta::postprocess_config (TMask& mask, TConfig& config)
|
|
{
|
|
return true;
|
|
}
|
|
|
|
|
|
bool TZU_confditta::user_create( )
|
|
{
|
|
ini_set_string(CONFIG_DITTA, "tc", "EdMaskZu", "tc1300a");
|
|
return true;
|
|
}
|
|
|
|
bool TZU_confditta::user_destroy( )
|
|
{
|
|
return true;
|
|
}
|
|
|
|
int tc1300(int argc, char * * argv)
|
|
{
|
|
TZU_confditta appc;
|
|
|
|
appc.run(argc, argv, TR("Parametri ditta Zucchetti"));
|
|
return 0;
|
|
}
|