campo-sirio/ab/ab0300.cpp
nik 41cad56e5e This commit was generated by cvs2svn to compensate for changes in r1834,
which included commits to RCS files with non-trunk default branches.

git-svn-id: svn://10.65.10.50/trunk@1835 c028cbd2-c16b-5b4b-a496-9718f37d4682
1995-09-15 14:15:18 +00:00

68 lines
982 B
C++
Executable File

// Compatta Piano dei Conti Analisi di Bilancio
#include <applicat.h>
#include <isam.h>
#include <mask.h>
#include <utility.h>
#include <config.h>
#include <urldefid.h>
#include "ab0.h"
class Comp_abpcon : public TApplication
{
//TSystemisamfile* _abpcon;
TLocalisamfile* _abpcon;
public:
virtual bool create();
virtual bool destroy();
virtual bool menu(MENU_TAG m);
Comp_abpcon() {}
};
bool Comp_abpcon::create()
{
TApplication::create();
//_abpcon = new TSystemisamfile (LF_ABPCON);
_abpcon = new TLocalisamfile (LF_ABPCON);
//_abpcon->packfile();
//_abpcon->packindex();
dispatch_e_menu (BAR_ITEM(1));
return TRUE;
}
bool Comp_abpcon::destroy()
{
delete _abpcon;
return TApplication::destroy();
}
bool Comp_abpcon::menu(MENU_TAG m)
{
if (m == BAR_ITEM(1))
return FALSE;
return FALSE;
}
int ab0300 (int argc, char* argv[])
{
Comp_abpcon main_app;
main_app.run(argc, argv, "Compatta");
return TRUE;
}