#include #include "bainstlib.h" class TInstall_SC : public TInstallmodule_app { protected: virtual int module_number() const { return SCAUT; } virtual bool something_to_load() const; virtual bool install_com(); bool form_to_load() const; public: virtual ~TInstall_SC () {} }; bool TInstall_SC::form_to_load() const { //controlla se il file con i form (solo PEC per ora) è da aggiornare //guarda se esiste il codice PEC che è l'unico creato al 20/05/2011... TLocalisamfile form(LF_FORM); form.put("TIPOPROF", "PEC"); //se il PEC non c'è -> il file dei form è da aggiornare (capita solo con nuova installazione) const int err = form.read(); return err != NOERR; } bool TInstall_SC::something_to_load() const { if (test_database()) { if (form_to_load()) return true; } return TInstallmodule_app::something_to_load(); } bool TInstall_SC::install_com() { //questo serve per caricare i files (e non le tabelle) TStd_filename txtfile; if (txtfile.check(true, "scform.txt") && form_to_load()) { TSystemisamfile form(LF_FORM); form.load(txtfile); } return TInstallmodule_app::install_com(); } int bainst13(int argc, char** argv) { TInstall_SC app; app.run(argc, argv); return 0; }