Patch level : 12.0 1130
Files correlati : ba1.exe Commento: Aggiunta una funzione "Recupero" per recuperare files che danno errori sulla lunghezza del record. Interno E' protetta da password [ADMIN e (giorno+mese)]
This commit is contained in:
parent
e8c708d56e
commit
06f27089fb
@ -18,7 +18,9 @@
|
||||
#include <printer.h>
|
||||
#include <progind.h>
|
||||
#include <reputils.h>
|
||||
#include <stdtypes.h>
|
||||
#include <utility.h>
|
||||
|
||||
#include <user.h>
|
||||
|
||||
#ifdef WIN32
|
||||
@ -35,59 +37,6 @@
|
||||
#define Dir_file "dir.gen"
|
||||
#define Trc_file "trc.gen"
|
||||
|
||||
class TManutenzione_app : public TSkeleton_application
|
||||
{
|
||||
TDir_sheet* _browse;
|
||||
TArray _dirs;
|
||||
TArray _recs;
|
||||
TMask* _mask;
|
||||
long _firm;
|
||||
long _level;
|
||||
long _history_firm;
|
||||
TRec_sheet* _rec;
|
||||
TLog_report* _log;
|
||||
bool _print_log;
|
||||
|
||||
bool _superprassi;
|
||||
|
||||
protected:
|
||||
virtual void main_loop();
|
||||
virtual bool create () ;
|
||||
virtual bool destroy();
|
||||
void insert_riga(long, TToken_string&);
|
||||
void edit_riga(long, TToken_string&);
|
||||
void edit_riga(const TString&);
|
||||
void delete_riga(long);
|
||||
virtual bool extended_firm() const { return true; }
|
||||
|
||||
bool set_converting();
|
||||
bool reset_converting();
|
||||
|
||||
bool try_to_recover(TSystemisamfile& f, int err);
|
||||
void update();
|
||||
void update_dir();
|
||||
void convert_dir();
|
||||
virtual void print();
|
||||
virtual void do_print(TPrinter & p, TRec_sheet & r);
|
||||
const char* dumpfilename(const FileDes& dep) const;
|
||||
void load_des();
|
||||
void open_history();
|
||||
void put_history(const char* firm);
|
||||
void close_history();
|
||||
void dump_trc(const char * dir, const bool des_too, const long modules);
|
||||
void repair_file(int i);
|
||||
void save_file(const char * file);
|
||||
|
||||
void open_log();
|
||||
void write_log(const char* line, const int severity = 0);
|
||||
void close_log();
|
||||
|
||||
bool moveable_file(int file) const;
|
||||
public:
|
||||
|
||||
TManutenzione_app();
|
||||
};
|
||||
|
||||
HIDDEN bool browse_file_handler(TMask_field& f, KEY k)
|
||||
{
|
||||
if (k == K_F9)
|
||||
@ -105,7 +54,6 @@ HIDDEN bool browse_file_handler(TMask_field& f, KEY k)
|
||||
}
|
||||
f.set_focus();
|
||||
}
|
||||
|
||||
return true;
|
||||
}
|
||||
|
||||
@ -318,11 +266,10 @@ void TManutenzione_app::print()
|
||||
|
||||
bool TManutenzione_app::create() // initvar e arrmask
|
||||
{
|
||||
_firm = get_firm();
|
||||
|
||||
TString sw(argc() > 2 ? argv(2) : "");
|
||||
// Posso fare le operazione avanzate solo se sono ammistratore
|
||||
// e NON mi trovo su di una installazione di tipo client
|
||||
|
||||
xvt_vobj_show(TASK_WIN);
|
||||
_superprassi = user() == ::dongle().administrator() && !::dongle().demo();
|
||||
if (_superprassi)
|
||||
@ -362,6 +309,7 @@ bool TManutenzione_app::create() // initvar e arrmask
|
||||
else
|
||||
if (!::dongle().demo() && !set_firm())
|
||||
return false;
|
||||
_firm = atol(prefix().name());
|
||||
load_des();
|
||||
|
||||
_mask = new TMask("ba1100a");
|
||||
@ -883,18 +831,17 @@ void TManutenzione_app::update_dir()
|
||||
if (!p.setstatus(i))
|
||||
break;
|
||||
|
||||
const TDir & ds = (const TDir &) _dirs[i];
|
||||
TDir & ds = (TDir &)_dirs[i];
|
||||
TTrec & rs = (TTrec &)_recs[i];
|
||||
const bool is_firm = ds.is_firm();
|
||||
const bool to_create = (is_com ? ds.is_com() : ds.is_firm());
|
||||
|
||||
TFilename fd(ds.filename());
|
||||
|
||||
bool towrite = false;
|
||||
|
||||
const long flags = ds.flags();
|
||||
d.get(i, _nolock, _nordir, _sysdirop);
|
||||
const bool old_is_firm = d.is_firm();
|
||||
|
||||
d.get(i, _nolock, _nordir, _sysdirop);
|
||||
|
||||
const bool old_is_firm = d.is_firm();
|
||||
TFilename fs = d.filename();
|
||||
|
||||
//modifica 03/06/09 Se un file si chiama fnnn (es. f106) nel vecchio set di tracciati, mentre esiste con nome..
|
||||
@ -935,11 +882,11 @@ void TManutenzione_app::update_dir()
|
||||
if (i > LF_USER && is_firm == old_is_firm)
|
||||
{
|
||||
const long size = fsize(fs);
|
||||
TSystemisamfile b(i);
|
||||
|
||||
if (flags < 10000L && size > 0L && d.len() > 0)
|
||||
{
|
||||
TSystemisamfile b(i);
|
||||
int err = b.is_valid(true);
|
||||
// Aggiunto err==-60 per errore conversione sui file 98,99,125 in Pharmatex e dintorni
|
||||
if ((err == _istrcerr || err == _ispatherr || err == -60) && (d.eod() == 0) && (size < 4096))
|
||||
{
|
||||
bool kill = true;
|
||||
@ -962,6 +909,7 @@ void TManutenzione_app::update_dir()
|
||||
}
|
||||
} //if((err==_istrcerr...
|
||||
|
||||
|
||||
if (err != NOERR && flags < 10000L)
|
||||
{
|
||||
TString msg(_MAX_PATH);
|
||||
@ -1061,6 +1009,84 @@ void TManutenzione_app::update_dir()
|
||||
d.put(LF_DIR, _nordir, _sysdirop);
|
||||
}
|
||||
|
||||
void TManutenzione_app::recover()
|
||||
{
|
||||
open_history();
|
||||
long firm = get_firm();
|
||||
TString pref;
|
||||
if (firm == 0)
|
||||
pref = prefix().name();
|
||||
prefix().set_codditta(0L); // COM
|
||||
|
||||
safely_close_closeable_isamfiles(); // Serve a premettere la chiamata ad fsize() in sicurezza
|
||||
|
||||
TDir d(LF_DIR); // equivale a d.get(LF_DIR, _nolock, _nordir, _sysdirop);
|
||||
const int last = (int)d.eod(); //quale è il numero dell'ultimo file attualmente presente
|
||||
|
||||
{
|
||||
TString prompt(128);
|
||||
|
||||
prompt << TR("Recupero dati comuni");
|
||||
prompt << ".\n";
|
||||
|
||||
TProgind p(last, prompt, false, true);
|
||||
|
||||
load_des();
|
||||
for (int i = LF_USER; p.setstatus(i) && i <= last; i++)
|
||||
{
|
||||
|
||||
TDir & ds = (TDir &)_dirs[i];
|
||||
TTrec & rs = (TTrec &)_recs[i];
|
||||
TSystemisamfile f(i);
|
||||
|
||||
if (ds.is_com())
|
||||
f.recover(ds, rs);
|
||||
} //for(i=LF_USER; i<=update_items; i++)
|
||||
}
|
||||
|
||||
TPointer_array ditte; // Evita di aprire LF_NDITTE
|
||||
const int nditte = prefix().firms(ditte);
|
||||
|
||||
for (int i = 0; i < nditte; i++)
|
||||
{
|
||||
const long codditta = ditte.get_long(i);
|
||||
if (prefix().exist(codditta) && set_firm(codditta))
|
||||
{
|
||||
const TString pref(prefix().name());
|
||||
TString prompt(128);
|
||||
|
||||
safely_close_closeable_isamfiles(); // Serve a premettere la chiamata ad fsize() in sicurezza
|
||||
prompt << TR("Recupero ditta") << ' ' << atol(pref);
|
||||
prompt << ".\n";
|
||||
|
||||
TProgind p(last, prompt, false, true);
|
||||
|
||||
load_des();
|
||||
for (int i = LF_USER; p.setstatus(i) && i <= last; i++)
|
||||
{
|
||||
|
||||
TDir & ds = (TDir &)_dirs[i];
|
||||
TTrec & rs = (TTrec &)_recs[i];
|
||||
TSystemisamfile f(i);
|
||||
|
||||
if (ds.is_firm())
|
||||
f.recover(ds, rs);
|
||||
} //for(i=LF_USER; i<=update_items; i++)
|
||||
}
|
||||
}
|
||||
|
||||
//chiude il log di conversione
|
||||
close_log();
|
||||
|
||||
if (firm > 0) set_firm(firm);
|
||||
else prefix().set(pref);
|
||||
load_des();
|
||||
|
||||
close_history();
|
||||
|
||||
send_campo_xml(); // Spedisce situazione via ftp
|
||||
}
|
||||
|
||||
void TManutenzione_app::convert_dir()
|
||||
{
|
||||
if (prefix().get_codditta() <= _history_firm)
|
||||
@ -1089,22 +1115,30 @@ void TManutenzione_app::convert_dir()
|
||||
if (!p.add_status())
|
||||
break;
|
||||
|
||||
const TTrec& rs = (const TTrec&)_recs[i]; // Nuovo tracciato record
|
||||
const TDir& ds = (const TDir&)_dirs[i];
|
||||
TTrec& rs = (TTrec&)_recs[i]; // Nuovo tracciato record
|
||||
TDir& ds = (TDir&)_dirs[i];
|
||||
const long flags = ds.flags();
|
||||
|
||||
if (ds.len() > 0)
|
||||
{
|
||||
if (flags >= 0L && flags < 10000L)
|
||||
{
|
||||
int err = NOERR;
|
||||
|
||||
d.get(i, _nolock, _nordir, _sysdirop);
|
||||
|
||||
TString msg = s; msg << d.filename();
|
||||
|
||||
p.set_text(msg);
|
||||
|
||||
const int module = abs((int)ds.flags());
|
||||
const bool to_convert = (is_com ? d.is_com() : d.is_firm());
|
||||
|
||||
TSystemisamfile f(i);
|
||||
int err = f.is_valid(true);
|
||||
|
||||
if (err == NOERR)
|
||||
{
|
||||
err = f.is_valid(true);
|
||||
switch (err)
|
||||
{
|
||||
case -64:
|
||||
@ -1114,6 +1148,7 @@ void TManutenzione_app::convert_dir()
|
||||
default:
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
if (i > LF_USER && err != NOERR && ((is_com && d.is_com()) || (!is_com && d.is_firm())))
|
||||
{
|
||||
@ -1521,6 +1556,18 @@ void TManutenzione_app::main_loop()
|
||||
edit_riga(other.get(101));
|
||||
}
|
||||
break;
|
||||
case K_SHIFT + K_F12: // recover
|
||||
{
|
||||
TMask pwdmask(TR("Richesta accesso"),1 , 40, 12);
|
||||
TString pwd("ADMIN");
|
||||
|
||||
pwd << today.day() + today.month();
|
||||
pwdmask.add_string(101, 0, TR("Password"), 2, 1, 20, "*");
|
||||
pwdmask.add_button(DLG_OK, 0, "", -12, -2, 10 ,2);
|
||||
pwdmask.add_button(DLG_CANCEL, 0, "", -22, -2, 10, 2);
|
||||
if (pwdmask.run() == K_ENTER && pwdmask.get(101) == pwd)
|
||||
recover();
|
||||
}
|
||||
default:
|
||||
break;
|
||||
}
|
||||
@ -1534,4 +1581,3 @@ int ba1100(int argc, char** argv)
|
||||
a.run(argc, argv, TR("Gestione files"));
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
||||
@ -1,6 +1,10 @@
|
||||
#ifndef __BA1100_H
|
||||
#define __BA1100_H
|
||||
|
||||
#ifndef __APPLICAT_H
|
||||
#include <applicat.h>
|
||||
#endif
|
||||
|
||||
#ifndef __CONFIG_H
|
||||
#include <config.h>
|
||||
#endif
|
||||
@ -17,6 +21,14 @@
|
||||
class TMask_field;
|
||||
#endif
|
||||
|
||||
#ifndef __PRINTER_H
|
||||
#include <printer.h>
|
||||
#endif
|
||||
|
||||
#ifndef __REPUTILS_H
|
||||
#include <reputils.h>
|
||||
#endif
|
||||
|
||||
#include "ba1100a.h"
|
||||
|
||||
///////////////////////////////////////////////////////////
|
||||
@ -92,4 +104,61 @@ public:
|
||||
virtual ~TEdit_file() {}
|
||||
};
|
||||
|
||||
class TManutenzione_app : public TSkeleton_application
|
||||
{
|
||||
TDir_sheet* _browse;
|
||||
TArray _dirs;
|
||||
TArray _recs;
|
||||
TMask* _mask;
|
||||
long _firm;
|
||||
long _level;
|
||||
long _history_firm;
|
||||
TRec_sheet* _rec;
|
||||
TLog_report* _log;
|
||||
bool _print_log;
|
||||
|
||||
bool _superprassi;
|
||||
|
||||
protected:
|
||||
virtual void main_loop();
|
||||
virtual bool create();
|
||||
virtual bool destroy();
|
||||
void insert_riga(long, TToken_string&);
|
||||
void edit_riga(long, TToken_string&);
|
||||
void edit_riga(const TString&);
|
||||
void delete_riga(long);
|
||||
virtual bool extended_firm() const { return true; }
|
||||
|
||||
bool set_converting();
|
||||
bool reset_converting();
|
||||
|
||||
bool try_to_recover(TSystemisamfile& f, int err);
|
||||
void update();
|
||||
void update_dir();
|
||||
void recover();
|
||||
void convert_dir();
|
||||
virtual void print();
|
||||
virtual void do_print(TPrinter & p, TRec_sheet & r);
|
||||
const char* dumpfilename(const FileDes& dep) const;
|
||||
void load_des();
|
||||
void open_history();
|
||||
void put_history(const char* firm);
|
||||
void close_history();
|
||||
void dump_trc(const char * dir, const bool des_too, const long modules);
|
||||
void repair_file(int i);
|
||||
void save_file(const char * file);
|
||||
|
||||
void open_log();
|
||||
void write_log(const char* line, const int severity = 0);
|
||||
void close_log();
|
||||
|
||||
bool moveable_file(int file) const;
|
||||
public:
|
||||
long get_firm() const { return _firm; }
|
||||
|
||||
TManutenzione_app();
|
||||
};
|
||||
|
||||
inline TManutenzione_app & app() { return (TManutenzione_app &)main_app(); }
|
||||
|
||||
#endif
|
||||
|
||||
@ -49,5 +49,6 @@
|
||||
#define DLG_ADDFILE 609
|
||||
#define DLG_INSFILE 610
|
||||
#define DLG_OTHERFILE 611
|
||||
#define DLG_RECOVER 612
|
||||
|
||||
#endif
|
||||
|
||||
@ -37,6 +37,7 @@ TDir_sheet::TDir_sheet(const char* title, bool superprassi)
|
||||
{
|
||||
add_button(DLG_OTHERFILE, TR("File Esterni"), K_F5, 113);
|
||||
add_button(DLG_CONVERT, TR("Conversione"), K_F7, 156);
|
||||
add_button(DLG_RECOVER, TR("Recupero"), K_SHIFT + K_F12, 131);
|
||||
if (is_power_station())
|
||||
add_button(DLG_ADDFILE, TR("Nuovo file"), K_F8, TOOL_NEWREC);
|
||||
add_button(DLG_NULL, "", 0); // Separatore
|
||||
@ -275,9 +276,17 @@ void TRec_sheet::edit()
|
||||
}
|
||||
f2.set_notify(key_notify);
|
||||
f2.set_append(FALSE);
|
||||
|
||||
int nkeys = _rec.keys();
|
||||
for (i = 0; i < nkeys; i++) f2.row(i) = _rec.keydef(i);
|
||||
|
||||
for (i = 0; i < nkeys; i++)
|
||||
f2.row(i) = _rec.keydef(i);
|
||||
f2.disable_cell(0, 1);
|
||||
|
||||
const bool enable_save = (_dir.is_com() && app().get_firm() == 0) ||
|
||||
(_dir.is_firm() && app().get_firm() > 0);
|
||||
|
||||
_mask->enable(DLG_SAVEREC, enable_save);
|
||||
while (true)
|
||||
{
|
||||
f1.force_update(0); // Non togliere, serve per fare l'update della descrizione quando si fa l'import!!
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user