740a06d957
Files correlati : Ricompilazione Demo : [ ] Commento : Riportata la versione 98.01.03pl040 sul main trunk git-svn-id: svn://10.65.10.50/trunk@6699 c028cbd2-c16b-5b4b-a496-9718f37d4682
58 lines
1.0 KiB
C++
Executable File
58 lines
1.0 KiB
C++
Executable File
#include <applicat.h>
|
|
#include <mask.h>
|
|
#include <config.h>
|
|
#include <utility.h>
|
|
#include <execp.h>
|
|
#include "bainst05.h"
|
|
|
|
class TInstall_VE : public TSkeleton_application
|
|
{
|
|
TMask * _m;
|
|
protected:
|
|
virtual void main_loop() ;
|
|
virtual bool install_firm() ; // setta i dati ditta
|
|
virtual bool install_com() ; // setta i dati comuni
|
|
|
|
public:
|
|
virtual ~TInstall_VE () {}
|
|
};
|
|
|
|
// setta i dati ditta
|
|
bool TInstall_VE ::install_firm()
|
|
{
|
|
// ciclo su ogni ditta
|
|
return TRUE;
|
|
}
|
|
|
|
bool TInstall_VE ::install_com()
|
|
{
|
|
bool ok=TRUE;
|
|
if (_m->get_bool(F_LOADTAB))
|
|
{
|
|
TExternal_app rice("bacnv 1 4 vetab.txt");
|
|
ok &= (rice.run()==0);
|
|
}
|
|
return ok;
|
|
}
|
|
|
|
void TInstall_VE::main_loop()
|
|
{
|
|
TConfig ini("install.ini","ve");
|
|
const bool primainst=ini.get("Versione").blank();
|
|
|
|
_m = new TMask ("bainst05.msk");
|
|
if (primainst)
|
|
_m->set(F_LOADTAB,"X");
|
|
if (_m->run()!=K_QUIT)
|
|
{
|
|
install_firm();
|
|
install_com();
|
|
}
|
|
}
|
|
|
|
int bainst05(int argc, char** argv)
|
|
{
|
|
TInstall_VE app;
|
|
app.run(argc, argv, "Installazione Vendite");
|
|
return 0;
|
|
} |