1f865ec270
Files correlati : f90.exe d181.des f181.dir/.trr f9ProspIntegr.rep masks f90104.sql Commento : - Modificata funzione che cerca movimento collegato. Altrimenti il db viene sempre segnato e sqlite rifa l'importazione ogni volta. - Aggiunta get dal recset di sqlite per le date. - Corretto sheet esclusi ragione sociale non veniva caricata. - Corretta eliminazione annessi. Seguiva fill che non puliva lo sheet.
873 lines
26 KiB
C++
873 lines
26 KiB
C++
#include "f90.h"
|
|
|
|
#include <Windows.h>
|
|
#include <set>
|
|
#include <map>
|
|
|
|
#include "annessif9.h"
|
|
#include "applicat.h"
|
|
#include "automask.h"
|
|
#include "docf9.h"
|
|
#include "sheet.h"
|
|
#include "urldefid.h"
|
|
#include "utility.h"
|
|
#include "mov.h"
|
|
#include "isam.h"
|
|
#include "f9lib01.h"
|
|
#include "f90300a.h"
|
|
#include "f90300b.h"
|
|
|
|
#define TABMOD_CARTDIR "S0"
|
|
|
|
///////////////////////////////////////////////////////////////////////////////
|
|
// TImport_msk
|
|
|
|
class TImport_msk : public TAutomask
|
|
{
|
|
friend class TGestione_doc_cartacei_f9_msk;
|
|
|
|
std::shared_ptr<TArray_sheet> _catdocs;
|
|
map<TString, unique_ptr<TArray_sheet>> _annessi;
|
|
|
|
bool on_field_event(TOperable_field& o, TField_event e, long jolly) override;
|
|
|
|
static bool catdocann_handler(TMask_field& field, KEY key);
|
|
static bool catannpadre_handler(TMask_field& field, KEY key);
|
|
static bool ok_handler(TMask_field& field, KEY key);
|
|
|
|
const char* select_catdoc();
|
|
|
|
public:
|
|
void set_fields(const TString& impaddress, const TString& impnumreg, bool isannesso = false, const TString& catannpadre = "",
|
|
const TString& catdocann = "");
|
|
|
|
TImport_msk();
|
|
};
|
|
|
|
bool TImport_msk::on_field_event(TOperable_field& o, TField_event e, long jolly)
|
|
{
|
|
switch (o.dlg())
|
|
{
|
|
case F_ISANNESSO:
|
|
if (e == fe_modify)
|
|
{
|
|
const bool on = o.mask().get_bool(F_ISANNESSO);
|
|
o.mask().enable(F_CATDOCANN, on);
|
|
}
|
|
break;
|
|
case F_IMPNUMREG:
|
|
if(e == fe_modify)
|
|
{
|
|
const std::shared_ptr<TCategorie_doc::classe_doc> c = categorie_doc().mov2cat(o.get_int());
|
|
if (c != nullptr)
|
|
{
|
|
set(F_CATANNPADRE, c->catdoc);
|
|
set(F_CATDOCANN, "");
|
|
}
|
|
else
|
|
{
|
|
message_box("Questo tipo di registrazione non corrisponde a nessuna delle categorie documentali inserite.");
|
|
set(F_CATANNPADRE, "");
|
|
set(F_CATDOCANN, "");
|
|
}
|
|
}
|
|
default: break;
|
|
}
|
|
return true;
|
|
}
|
|
|
|
bool TImport_msk::catdocann_handler(TMask_field& field, KEY key)
|
|
{
|
|
static const char* msg_notexist = "Non esistono tipologie di annessi per questa categoria documentale.";
|
|
static const char* msg_inspadre = "Questa registrazione non e' riconosciuta in nessuna categoria documentale.\nImpossible inserire un annesso.\n"
|
|
"Si prega di inserire prima una cat. documentale che comprenda questo tipo di registrazione\naggiungendo anche eventuali tipologie di annessi.";
|
|
TImport_msk& msk = (TImport_msk&)field.mask();
|
|
if (key == K_TAB && field.dirty() && field.full())
|
|
{
|
|
if (msk.get(F_CATANNPADRE).full())
|
|
{
|
|
const TString_array names_ann = categorie_doc().get_array_ann(msk.get(F_CATANNPADRE));
|
|
if (names_ann.items() > 0)
|
|
{
|
|
bool ok = false;
|
|
FOR_EACH_ARRAY_ITEM(names_ann, nr, ann)
|
|
{
|
|
if (field.get() == (*(TToken_string*)ann).get(0))
|
|
ok = true;
|
|
}
|
|
if (!ok)
|
|
{
|
|
msk.error_box("La categoria inserita e' inesistente");
|
|
field.set("");
|
|
}
|
|
}
|
|
else
|
|
warning_box(msg_notexist);
|
|
}
|
|
else
|
|
{
|
|
warning_box(msg_inspadre);
|
|
field.set("");
|
|
}
|
|
}
|
|
if (key == K_F9)
|
|
{
|
|
if (msk.get(F_CATANNPADRE).full())
|
|
{
|
|
TArray_sheet* annessi = categorie_doc().get_sheet_ann(msk.get(F_CATANNPADRE)).get();
|
|
|
|
if (annessi && annessi->items() > 0)
|
|
{
|
|
if (annessi->run() == K_ENTER)
|
|
{
|
|
const char* s = annessi->row(annessi->selected()).get(0);
|
|
TCategorie_doc::annesso annesso;
|
|
if (categorie_doc().get_ann(s, annesso))
|
|
{
|
|
if (annesso.opcee != "RC")
|
|
msk.set(F_CATDOCANN, annesso.catdoc);
|
|
else
|
|
warning_box("Impossibile importare un annesso cartaceo per un prospetto integrativo per Reverse Charge.");
|
|
}
|
|
else
|
|
warning_box("Errore nell'acquisire la categoria annesso");
|
|
}
|
|
}
|
|
else
|
|
warning_box(msg_notexist);
|
|
}
|
|
else
|
|
warning_box(msg_inspadre);
|
|
}
|
|
return true;
|
|
}
|
|
|
|
bool TImport_msk::catannpadre_handler(TMask_field& field, KEY key)
|
|
{
|
|
TImport_msk& msk = (TImport_msk&)field.mask();
|
|
if (key == K_TAB && field.dirty() && field.full())
|
|
{
|
|
std::set<TString>& name_cats = categorie_doc().get_name_catdocs();
|
|
|
|
const bool ok = name_cats.find(field.get()) != name_cats.end();
|
|
if (!ok)
|
|
{
|
|
msk.error_box("La categoria inserita e' inesistente");
|
|
field.set("");
|
|
}
|
|
}
|
|
if (key == K_F9)
|
|
{
|
|
field.set(msk.select_catdoc());
|
|
msk.set(F_CATDOCANN, "");
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
bool TImport_msk::ok_handler(TMask_field& field, KEY key)
|
|
{
|
|
field.mask().send_key(K_ENTER, DLG_OK);
|
|
return true;
|
|
}
|
|
|
|
const char* TImport_msk::select_catdoc()
|
|
{
|
|
if(_catdocs == nullptr)
|
|
_catdocs = categorie_doc().get_sheet_catdocs();
|
|
if (_catdocs->run() == K_ENTER)
|
|
return _catdocs->row().get(0);
|
|
return "";
|
|
}
|
|
|
|
void TImport_msk::set_fields(const TString& impaddress, const TString& impnumreg, const bool isannesso,
|
|
const TString& catannpadre, const TString& catdocann)
|
|
{
|
|
set(F_IMPADDRESS, impaddress);
|
|
set(F_IMPNUMREG, impnumreg);
|
|
set(F_ISANNESSO, isannesso);
|
|
set(F_CATANNPADRE, catannpadre);
|
|
set(F_CATDOCANN, catdocann);
|
|
}
|
|
|
|
TImport_msk::TImport_msk(): TAutomask("f90300b")
|
|
{
|
|
TMask::set_handler(F_CATANNPADRE, catannpadre_handler);
|
|
TMask::set_handler(F_CATDOCANN, catdocann_handler);
|
|
}
|
|
|
|
|
|
|
|
|
|
///////////////////////////////////////////////////////////////////////////////
|
|
// TGestione_doc_cartacei_f9_msk
|
|
///////////////////////////////////////////////////////////////////////////////
|
|
|
|
class TGestione_doc_cartacei_f9_msk : public TAutomask
|
|
{
|
|
struct doc_cart_t
|
|
{
|
|
TString filename;
|
|
TString loaddate;
|
|
TString numreg;
|
|
TString user;
|
|
};
|
|
struct ann_cart_t
|
|
{
|
|
TString numreg;
|
|
TString filename;
|
|
TString catdocpad;
|
|
TString catdocann;
|
|
TString loaddate;
|
|
TString user;
|
|
};
|
|
const TString& _addr_cart; // Indirizzo cartella doc. cartacei F9
|
|
std::unique_ptr<TMask> _config_msk;
|
|
std::unique_ptr<std::set<TString>> _extensions; // todo: controllare che con TString funzioni l'ordinamento, quindi la find
|
|
std::unique_ptr<TImport_msk> _import_msk;
|
|
std::map<TString, doc_cart_t> _list_file;
|
|
std::map<TString, ann_cart_t> _list_ann;
|
|
|
|
bool on_field_event(TOperable_field& o, TField_event e, long jolly) override;
|
|
|
|
void check_addr_cart();
|
|
static void check_deleted();
|
|
bool check_file_exist(const TString& file) const;
|
|
void delete_file();
|
|
void edit_ann();
|
|
void edit_file();
|
|
void fill();
|
|
void fill_annessi();
|
|
void fill_docs();
|
|
static TToken_string& get_valid_extensions();
|
|
void load_extensions();
|
|
static bool load_file(const TFilename& file, const TString& numreg, bool is_annesso, const TString& catannpadre, const TString& catdocann);
|
|
void open_config_win();
|
|
void open_import_win();
|
|
static void remove_file_from_f9cart(const std::set<TString>& files);
|
|
bool verify_extension(const TFilename& file);
|
|
|
|
public:
|
|
TGestione_doc_cartacei_f9_msk();
|
|
};
|
|
|
|
bool TGestione_doc_cartacei_f9_msk::on_field_event(TOperable_field& o, TField_event e, long jolly)
|
|
{
|
|
if(e == se_query_add || e == se_query_del || e == se_query_modify)
|
|
return false;
|
|
|
|
switch (o.dlg())
|
|
{
|
|
case B_IMPORT:
|
|
if (e == fe_button)
|
|
open_import_win();
|
|
break;
|
|
case B_DELETE:
|
|
if (e == fe_button)
|
|
delete_file();
|
|
break;
|
|
case B_CONFIG:
|
|
if (e == fe_button)
|
|
open_config_win();
|
|
break;
|
|
case DLG_USER:
|
|
if (e == fe_button)
|
|
{
|
|
const int page = curr_page();
|
|
if (!page)
|
|
edit_file();
|
|
else
|
|
edit_ann();
|
|
}
|
|
default: break;
|
|
}
|
|
return true;
|
|
}
|
|
|
|
void TGestione_doc_cartacei_f9_msk::check_addr_cart()
|
|
{
|
|
const TFilename f(_addr_cart);
|
|
if (f.full() && !f.exist())
|
|
{
|
|
warning_box("Cartella documenti cartacei non trovata.\nSalvare nuovamente le impostazioni.");
|
|
open_config_win();
|
|
}
|
|
}
|
|
|
|
void TGestione_doc_cartacei_f9_msk::check_deleted()
|
|
{
|
|
// Controllo che non ci siano file nella cartella eliminati da piu' di un mese, altrimenti li elimino
|
|
TString_array result;
|
|
TFilename s; s << TFilename(F9CONF.get_addr_cart()).slash_terminate() << "eliminati\\";
|
|
if (s.exist())
|
|
{
|
|
list_files(s, result);
|
|
FOR_EACH_ARRAY_ITEM(result, nr, file)
|
|
{
|
|
const char* deletedfile = *(TString*)(file);
|
|
HANDLE h_file = CreateFile(deletedfile, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
|
|
FILETIME last_access_time;
|
|
SYSTEMTIME time;
|
|
bool flag = false;
|
|
if (h_file != INVALID_HANDLE_VALUE)
|
|
{
|
|
if (GetFileTime(h_file, NULL, &last_access_time, NULL))
|
|
{
|
|
FileTimeToSystemTime(&last_access_time, &time);
|
|
TDate today = TDate(TODAY);
|
|
if (time.wMonth < (unsigned short)today.month() - 1 ||
|
|
time.wMonth == (unsigned short)today.month() - 1 && time.wDay <= (unsigned short)today.day())
|
|
{
|
|
flag = true;
|
|
CloseHandle(h_file);
|
|
DeleteFile(deletedfile);
|
|
}
|
|
}
|
|
}
|
|
if (!flag)
|
|
CloseHandle(h_file);
|
|
}
|
|
}
|
|
}
|
|
|
|
bool TGestione_doc_cartacei_f9_msk::check_file_exist(const TString& file) const
|
|
{
|
|
TFilename path(_addr_cart);
|
|
path.slash_terminate() << file;
|
|
return path.exist();
|
|
}
|
|
|
|
void TGestione_doc_cartacei_f9_msk::delete_file()
|
|
{
|
|
int p = curr_page();
|
|
TSheet_field& sf = p == 0 ? sfield(S_IMPORTED) : sfield(S_ANNESSI);
|
|
FOR_EACH_SHEET_ROW(sf, nr, row)
|
|
{
|
|
if (row->starts_with("X"))
|
|
{
|
|
TLocalisamfile f9cart(LF_F9DOCS);
|
|
TLocalisamfile f9annessi(LF_F9ANNESSI);
|
|
const char* filename = row->get(cid2index(F_FILENAME));
|
|
const char* numreg = row->get(p == 0 ? cid2index(F_NUMREG) : cid2index(F_ANUMREG));
|
|
|
|
if (p == 0)
|
|
{
|
|
f9cart.put(F9C_FILENAME, filename);
|
|
f9cart.put(F9C_NUMREG, numreg);
|
|
f9cart.read();
|
|
}
|
|
else
|
|
{
|
|
f9annessi.put(F9A_NUMREG, numreg);
|
|
f9annessi.put(F9A_FILENAME, filename);
|
|
f9annessi.read();
|
|
}
|
|
TFilename filecart(F9CONF.get_addr_cart());
|
|
filecart.slash_terminate();
|
|
TFilename deleted(filecart);
|
|
filecart << filename;
|
|
deleted << "eliminati" << SLASH;
|
|
if (!deleted.exist())
|
|
make_dir(deleted);
|
|
deleted << filename;
|
|
if (deleted.exist())
|
|
DeleteFile(deleted);
|
|
if (!MoveFile(filecart, deleted))
|
|
warning_box(TString("Attenzione:") << " non e' stato possibile rimuovere questo file: " << filecart);
|
|
else
|
|
{
|
|
if (p == 0)
|
|
f9cart.remove();
|
|
else
|
|
f9annessi.remove();
|
|
}
|
|
}
|
|
}
|
|
fill();
|
|
}
|
|
|
|
void TGestione_doc_cartacei_f9_msk::edit_ann()
|
|
{
|
|
TToken_string& row = sfield(S_ANNESSI).row(sfield(S_ANNESSI).selected());
|
|
TImport_msk win;
|
|
win.set_caption("Modifica annesso");
|
|
TLocalisamfile f9ann(LF_F9ANNESSI);
|
|
const char* numreg = row.get(4);
|
|
const char* filename = row.get(1);
|
|
f9ann.put(F9A_NUMREG, numreg);
|
|
f9ann.put(F9A_FILENAME, filename);
|
|
f9ann.read();
|
|
win.set_fields(TF9_doccart::get_full_path_file_cartaceo(filename), numreg, true, f9ann.get(F9A_CATDOCPAD), f9ann.get(F9A_CATDOCANN));
|
|
|
|
win.disable(F_IMPADDRESS);
|
|
win.disable(F_ISANNESSO);
|
|
win.enable(F_CATDOCANN);
|
|
if(win.run() == K_ENTER)
|
|
{
|
|
if (win.get(F_IMPNUMREG) == numreg)
|
|
{
|
|
f9ann.put(F9A_CATDOCPAD, win.get(F_CATANNPADRE));
|
|
f9ann.put(F9A_CATDOCANN, win.get(F_CATDOCANN));
|
|
f9ann.write();
|
|
f9ann.rewrite();
|
|
}
|
|
else
|
|
{
|
|
f9ann.remove();
|
|
f9ann.put(F9A_NUMREG, win.get(F_IMPNUMREG));
|
|
f9ann.put(F9A_CATDOCPAD, win.get(F_CATANNPADRE));
|
|
f9ann.put(F9A_CATDOCANN, win.get(F_CATDOCANN));
|
|
f9ann.write();
|
|
f9ann.rewrite();
|
|
}
|
|
message_box("Annesso modificato!");
|
|
}
|
|
fill_annessi();
|
|
}
|
|
|
|
void TGestione_doc_cartacei_f9_msk::edit_file()
|
|
{
|
|
TToken_string& row = sfield(S_IMPORTED).row(sfield(S_IMPORTED).selected());
|
|
TImport_msk win;
|
|
win.set_caption("Modifica documento cartaceo");
|
|
TLocalisamfile f9docs(LF_F9DOCS);
|
|
const char* numreg = row.get(2);
|
|
const char* filename = row.get(1);
|
|
f9docs.put(F9C_NUMREG, numreg);
|
|
f9docs.read();
|
|
win.set_fields(TF9_doccart::get_full_path_file_cartaceo(filename), numreg);
|
|
|
|
win.disable(F_IMPADDRESS);
|
|
win.disable(F_ISANNESSO);
|
|
if (win.run() == K_ENTER && win.get(F_IMPNUMREG) != numreg)
|
|
{
|
|
f9docs.remove();
|
|
f9docs.put(F9C_NUMREG, win.get(F_IMPNUMREG));
|
|
f9docs.write();
|
|
f9docs.rewrite();
|
|
message_box("Documento modificato!");
|
|
}
|
|
fill_docs();
|
|
}
|
|
|
|
void TGestione_doc_cartacei_f9_msk::fill()
|
|
{
|
|
fill_docs();
|
|
fill_annessi();
|
|
}
|
|
|
|
void TGestione_doc_cartacei_f9_msk::fill_annessi()
|
|
{
|
|
std::set<TString> file_err;
|
|
TSheet_field& sf = sfield(S_ANNESSI);
|
|
sf.hide();
|
|
sf.destroy();
|
|
TLocalisamfile ann(LF_F9ANNESSI);
|
|
if(ann.first() == NOERR)
|
|
{
|
|
const TString& namefile = ann.get(F9A_FILENAME);
|
|
const bool not_exist = !check_file_exist(namefile);
|
|
if (not_exist)
|
|
file_err.insert(namefile);
|
|
|
|
TLocalisamfile mov(LF_MOV);
|
|
do
|
|
{
|
|
TToken_string& row = sf.row(-1);
|
|
const TString& numreg = ann.get(F9A_NUMREG);
|
|
|
|
mov.put(MOV_NUMREG, numreg);
|
|
mov.read();
|
|
|
|
row.add(ann.get(F9A_FILENAME), 1); // ITEM "Nome File@25"
|
|
row.add(ann.get(F9A_CATDOCPAD)); // ITEM "Categoria di\nappartenenza@7"
|
|
row.add(ann.get(F9A_CATDOCANN)); // ITEM "Classe doc.\nannesso@7"
|
|
row.add(numreg); // ITEM "Movimento\nContabile N.@7"
|
|
row.add(mov.get(MOV_DATAREG)); // ITEM "Data\nMovimento@10"
|
|
row.add(mov.get(MOV_CODCAUS)); // ITEM "Causale@7"
|
|
row.add(mov.get(MOV_NUMDOC)); // ITEM "Num. Doc.@7"
|
|
row.add(TString(mov.get(MOV_REG)) << "/" << mov.get(MOV_PROTIVA)); // ITEM "Reg./Prot. IVA@10"
|
|
row.add(mov.get(MOV_DESCR)); // ITEM "Descrizione@20"
|
|
row.add(ann.get(F9A_LOADDATE)); // ITEM "Data\nCaricamento@10"
|
|
row.add(not_exist ? "IL FILE NON E' PRESENTE IN ARCHIVIO." : ""); // ITEM "Info (Errori)@25"
|
|
|
|
_list_ann.insert({ namefile, { numreg, namefile, ann.get(F9A_CATDOCPAD), ann.get(F9A_CATDOCANN), ann.get(F9C_LOADDATE), ann.get(F9C_USER) } });
|
|
} while (ann.next() == NOERR);
|
|
}
|
|
sf.force_update();
|
|
sf.show();
|
|
|
|
if (!file_err.empty())
|
|
{
|
|
int count = 0;
|
|
const bool m = (int)file_err.size() == 1;
|
|
const char p = m ? 'o' : 'i';
|
|
TString msg; msg << (int)file_err.size() << " file non " << (m ? "e'" : "sono") << " stat" << p <<
|
|
" trovat" << p << ".\nSi prega di rimuoverl" << p << " dall'elenco\n\nFile non trovat" << p << ":";
|
|
|
|
for (auto it = file_err.begin(); it != file_err.end(); ++it)
|
|
{
|
|
if (count++ == 10)
|
|
{
|
|
msg << "\n" << "...";
|
|
break;
|
|
}
|
|
msg << "\n" << *it << " [Num. Reg.: " << _list_ann.find(*it)->second.numreg << "]";
|
|
}
|
|
warning_box(msg);
|
|
}
|
|
}
|
|
|
|
void TGestione_doc_cartacei_f9_msk::fill_docs()
|
|
{
|
|
TLocalisamfile files(LF_F9DOCS);
|
|
TLocalisamfile mov(LF_MOV);
|
|
TSheet_field& sf = sfield(S_IMPORTED);
|
|
sf.hide();
|
|
sf.destroy();
|
|
_list_file.clear();
|
|
std::set<TString> file_err;
|
|
if (files.first() == NOERR)
|
|
{
|
|
do
|
|
{
|
|
const TString& namefile = files.get(F9C_FILENAME);
|
|
const bool not_exist = !check_file_exist(namefile);
|
|
if (not_exist)
|
|
file_err.insert(namefile);
|
|
const TString& numreg = files.get(F9C_NUMREG);
|
|
TString datamov, caus, numdoc, nprot, descrmov;
|
|
mov.zero();
|
|
mov.put(MOV_NUMREG, numreg);
|
|
if (mov.read() == NOERR)
|
|
{
|
|
datamov = mov.get(MOV_DATAREG);
|
|
caus = mov.get(MOV_CODCAUS);
|
|
numdoc = mov.get(MOV_NUMDOCEXT);
|
|
if (numdoc.empty()) numdoc = mov.get(MOV_NUMDOC);
|
|
nprot << mov.get(MOV_REG) << "/" << mov.get(MOV_PROTIVA);
|
|
descrmov = mov.get(MOV_DESCR);
|
|
}
|
|
TToken_string& r = sf.row(-1);
|
|
r.add(" ", 0); // F_SEL
|
|
r.add(namefile); // F_FILENAME
|
|
r.add(numreg); // F_NUMREG
|
|
r.add(datamov); // F_DATAMOV
|
|
r.add(caus); // F_CAUS
|
|
r.add(numdoc); // F_NUMDOC
|
|
r.add(nprot); // F_NPROTOCOL
|
|
r.add(descrmov); // F_DESCRMOV
|
|
r.add(files.get(F9C_LOADDATE)); // F_DATACARIC
|
|
r.add(not_exist ? "IL FILE NON E' PRESENTE IN ARCHIVIO." : ""); // F_INFO
|
|
|
|
_list_file.insert({ namefile, { namefile, files.get(F9C_LOADDATE), numreg, files.get(F9C_USER) } });
|
|
} while (files.next() == NOERR);
|
|
|
|
}
|
|
sf.force_update();
|
|
sf.show();
|
|
|
|
if (!file_err.empty())
|
|
{
|
|
int count = 0;
|
|
const bool m = (int)file_err.size() == 1;
|
|
const char p = m ? 'o' : 'i';
|
|
TString msg; msg << (int)file_err.size() << " file non " << (m ? "e'" : "sono") << " stat" << p <<
|
|
" trovat" << p << ".\nSi prega di rimuoverl" << p << " dall'elenco\n\nFile non trovat" << p << ":";
|
|
|
|
for (auto it = file_err.begin(); it != file_err.end(); ++it)
|
|
{
|
|
if (count++ == 10)
|
|
{
|
|
msg << "\n" << "...";
|
|
break;
|
|
}
|
|
msg << "\n" << *it << " [Num. Reg.: " << _list_file.find(*it)->second.numreg << "]";
|
|
}
|
|
#ifndef DBG
|
|
const bool del = warning_box(msg);
|
|
#else
|
|
if (yesno_box(msg))
|
|
{
|
|
remove_file_from_f9cart(file_err);
|
|
fill();
|
|
}
|
|
#endif
|
|
}
|
|
}
|
|
|
|
TToken_string& TGestione_doc_cartacei_f9_msk::get_valid_extensions()
|
|
{
|
|
static TToken_string ext(F9CONF.get_estensioni(), ',');
|
|
if (ext.items() == 0)
|
|
{
|
|
ext = ".pdf, .doc, .docx, .xls, .xlsx, .jpg, .jpeg, .png";
|
|
F9CONF.set_estensioni(ext);
|
|
}
|
|
ext.replace(" ", "");
|
|
return ext;
|
|
}
|
|
|
|
void TGestione_doc_cartacei_f9_msk::load_extensions()
|
|
{
|
|
if (_extensions == nullptr)
|
|
{
|
|
_extensions = std::make_unique<std::set<TString>>();
|
|
TToken_string& ext = get_valid_extensions();
|
|
for (int i = 0; i < ext.items(); ++i)
|
|
{
|
|
TString e = ext.get(i);
|
|
if (!e.empty())
|
|
{
|
|
if (e.starts_with("."))
|
|
e.ltrim(1);
|
|
_extensions->insert(e);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
bool TGestione_doc_cartacei_f9_msk::load_file(const TFilename& file, const TString& numreg, const bool is_annesso,
|
|
const TString& catannpadre, const TString& catdocann)
|
|
{
|
|
TString numreg_old;
|
|
bool annesso;
|
|
TF9_doccart f9cart;
|
|
TLocalisamfile f9docs(LF_F9DOCS);
|
|
TLocalisamfile f9annessi(LF_F9ANNESSI);
|
|
if(f9cart.doc_already_exists(file, numreg_old, annesso))
|
|
{
|
|
warning_box("Attenzione: esiste gia' un %s con questo nome associato al num. di registrazione %s", annesso ? "annesso" : "documento", (const char*)numreg_old);
|
|
return false;
|
|
}
|
|
|
|
if(!is_annesso)
|
|
{
|
|
TFilename doc;
|
|
if (f9cart.mov2doc(numreg, doc) && !doc.empty())
|
|
{
|
|
warning_box("Attenzione: la registrazione num. %s ha gia' un documento associato: %s.\n"
|
|
"Se si tratta di un annesso inserire le informazioni per la cat. documentale.", (const char*)numreg, (const char*)doc);
|
|
return false;
|
|
}
|
|
|
|
f9docs.zero();
|
|
f9docs.put(F9C_FILENAME, file.name());
|
|
f9docs.put(F9C_NUMREG, numreg);
|
|
f9docs.put(F9C_LOADDATE, TDate(TODAY));
|
|
f9docs.put(F9C_USER, user());
|
|
}
|
|
else
|
|
{
|
|
// Controllo che non sto gia' utilizzando questa categoria di annesso per questa registrazione
|
|
// Prendo la lista degli annessi per questa registrazione e li controllo in cerca della categoria
|
|
TF9_doccart doccart;
|
|
vector<annesso_t> list_annessi;
|
|
doccart.mov2listann_vect(numreg, list_annessi);
|
|
bool exist = false;
|
|
for(auto it = list_annessi.begin(); it != list_annessi.end(); ++it)
|
|
{
|
|
if(it->catdocann == catdocann)
|
|
exist = true;
|
|
}
|
|
if(exist)
|
|
{
|
|
message_box("Attenzione: la registrazione num. %s ha gia' un annesso associato con questo tipo di annesso.", (const char*)numreg);
|
|
return false;
|
|
}
|
|
f9annessi.zero();
|
|
f9annessi.put(F9A_NUMREG, numreg);
|
|
f9annessi.put(F9A_FILENAME, file.name());
|
|
f9annessi.put(F9A_CATDOCPAD, catannpadre);
|
|
f9annessi.put(F9A_CATDOCANN, catdocann);
|
|
f9annessi.put(F9C_LOADDATE, TDate(TODAY));
|
|
f9annessi.put(F9C_USER, user());
|
|
}
|
|
TFilename fdestin = F9CONF.get_addr_cart();
|
|
const TString filename = file.name();
|
|
fdestin << filename;
|
|
const bool ok = CopyFile(file, fdestin, true);
|
|
if (!ok)
|
|
{
|
|
if (fdestin.exist())
|
|
warning_box("Errore nel copiare il file nella cartella di destinazione.\nEsiste gia' un file con questo nome.");
|
|
else
|
|
warning_box("Errore nel copiare il file nella cartella di destinazione. Ritentare.");
|
|
f9docs.zero();
|
|
return false;
|
|
}
|
|
if (!is_annesso)
|
|
{
|
|
f9docs.write();
|
|
f9docs.rewrite();
|
|
}
|
|
else
|
|
{
|
|
f9annessi.write();
|
|
f9annessi.rewrite();
|
|
}
|
|
return true;
|
|
}
|
|
|
|
void TGestione_doc_cartacei_f9_msk::open_config_win()
|
|
{
|
|
if(_config_msk == nullptr)
|
|
{
|
|
_config_msk = std::make_unique<TMask>("Configurazione", 1, 78, 14);
|
|
_config_msk->add_button_tool(DLG_OK, "Conferma", TOOL_OK);
|
|
_config_msk->add_button_tool(DLG_NULL, "", 0);
|
|
_config_msk->add_button_tool(DLG_QUIT, "Esci", TOOL_QUIT);
|
|
|
|
_config_msk->add_groupbox(DLG_NULL, 0, "", 1, 0, 76, 4, "");
|
|
_config_msk->add_static (DLG_NULL, 0, "@BInserire estensioni file riconosciute, separate da virgola.", 2, 1);
|
|
_config_msk->add_string (101, 0, "Estensioni:", 2, 2, 255, "", 60);
|
|
_config_msk->add_groupbox(DLG_NULL, 0, "@BCartella documenti cartacei", 1, 4, 76, 4);
|
|
_config_msk->add_static (DLG_NULL, 0, "@BInserire nome cartella, all'interno della area dati della ditta", 2, 5);
|
|
_config_msk->add_string (102, 0, "", 2, 6, 64, "", 30);
|
|
|
|
_config_msk->set(101, F9CONF.get_estensioni());
|
|
TString s = F9CONF.get_addr_cart();
|
|
s.rtrim(1);
|
|
s.ltrim(s.rfind('\\') + 1);
|
|
_config_msk->set(102, s);
|
|
}
|
|
|
|
while (true)
|
|
{
|
|
if (_config_msk->run() != K_ENTER)
|
|
{
|
|
if (_config_msk->get(102).empty())
|
|
{
|
|
warning_box("Si prega di inserire il nome della cartella per i documenti cartacei.");
|
|
continue;
|
|
}
|
|
break;
|
|
}
|
|
F9CONF.set_estensioni(_config_msk->get(101));
|
|
TString dir = _config_msk->get(102);
|
|
if (dir.empty())
|
|
{
|
|
if(yesno_box("Nome cartella vuoto.\nCreare cartella con nome 'Cartacei_F9'?"))
|
|
_config_msk->set(102, dir = "Cartacei_F9");
|
|
else continue;
|
|
}
|
|
|
|
TFilename path(prefix().get_studio());
|
|
path.slash_terminate() << dir;
|
|
path.slash_terminate();
|
|
if (!path.exist())
|
|
{
|
|
if (dir == "Cartacei_F9" || yesno_box("Il percorso indicato e' inesistente.\nCreare la cartella con questo nome?"))
|
|
{
|
|
if (!make_dir(path))
|
|
{
|
|
warning_box("Impossibile creare il percorso specificato.");
|
|
continue;
|
|
}
|
|
}
|
|
else continue;
|
|
}
|
|
F9CONF.set_addr_cart(path);
|
|
break;
|
|
}
|
|
}
|
|
|
|
void TGestione_doc_cartacei_f9_msk::open_import_win()
|
|
{
|
|
if(_import_msk == nullptr)
|
|
_import_msk = make_unique<TImport_msk>();
|
|
while(_import_msk->run() == K_ENTER)
|
|
{
|
|
const TString& file = _import_msk->get(F_IMPADDRESS);
|
|
const TString& numreg = _import_msk->get(F_IMPNUMREG);
|
|
const bool is_annesso = _import_msk->get_bool(F_ISANNESSO);
|
|
const TString& catannpadre = _import_msk->get(F_CATANNPADRE);
|
|
const TString& catdocann = _import_msk->get(F_CATDOCANN);
|
|
if (!file.empty())
|
|
{
|
|
TFilename f(file);
|
|
if (verify_extension(f))
|
|
{
|
|
if(!numreg.empty())
|
|
{
|
|
if (!is_annesso || catannpadre.full() && catdocann.full())
|
|
{
|
|
if (load_file(f, numreg, is_annesso, catannpadre, catdocann))
|
|
{
|
|
message_box("File caricato.");
|
|
fill();
|
|
}
|
|
}
|
|
else
|
|
warning_box("Se il documento e' un annesso, si prega di inserire le\ninformazioni per la categoria documentale dell'annesso.");
|
|
}
|
|
else
|
|
warning_box("Si prega di inserire il numero di registrazione.");
|
|
}
|
|
else
|
|
warning_box("Questo file e' in un formato non accettato.");
|
|
}
|
|
else
|
|
warning_box("Si prega di inserire il nome del file.");
|
|
}
|
|
fill();
|
|
}
|
|
|
|
void TGestione_doc_cartacei_f9_msk::remove_file_from_f9cart(const std::set<TString>& files)
|
|
{
|
|
TLocalisamfile f9cart(LF_F9DOCS);
|
|
for(auto it = files.begin(); it != files.end(); ++it)
|
|
{
|
|
f9cart.zero();
|
|
f9cart.put(F9C_FILENAME, *it);
|
|
f9cart.read();
|
|
f9cart.remove();
|
|
}
|
|
}
|
|
|
|
bool TGestione_doc_cartacei_f9_msk::verify_extension(const TFilename& file)
|
|
{
|
|
load_extensions();
|
|
return _extensions->find(file.ext()) != _extensions->end();
|
|
}
|
|
|
|
TGestione_doc_cartacei_f9_msk::TGestione_doc_cartacei_f9_msk(): TAutomask("f90300a"), _addr_cart(F9CONF.get_addr_cart())
|
|
{
|
|
if (_addr_cart.empty())
|
|
{
|
|
message_box("Inserire nome cartella documenti cartacei.");
|
|
open_config_win();
|
|
}
|
|
else
|
|
check_addr_cart();
|
|
check_deleted();
|
|
fill();
|
|
}
|
|
|
|
|
|
|
|
|
|
///////////////////////////////////////////////////////////////////////////////
|
|
// TGestione_doc_cartacei_f9_app
|
|
///////////////////////////////////////////////////////////////////////////////
|
|
|
|
class TGestione_doc_cartacei_f9_app : public TSkeleton_application
|
|
{
|
|
void main_loop() override
|
|
{
|
|
TGestione_doc_cartacei_f9_msk msk;
|
|
while (msk.run() == K_ENTER)
|
|
{ }
|
|
}
|
|
};
|
|
|
|
|
|
|
|
|
|
int f90300(const int argc, char* argv[])
|
|
{
|
|
TGestione_doc_cartacei_f9_app app;
|
|
app.run(argc, argv, "Gestione documenti cartacei");
|
|
return 0;
|
|
}
|