campo-sirio/ba/bainst38.cpp
alex 8a05210c2d Patch level : xx.7.054
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :
Riportata la version 1.7 patch 054 aga sul main trunk


git-svn-id: svn://10.65.10.50/trunk@9655 c028cbd2-c16b-5b4b-a496-9718f37d4682
2001-04-30 14:22:43 +00:00

66 lines
1.4 KiB
C++
Executable File

#include <applicat.h>
#include <mask.h>
#include <utility.h>
#include <prefix.h>
#include <isam.h>
#include <tabutil.h>
#include "bainst.h"
#include "bainst38.h"
class TInstall_SV : public TInstallmodule_app
{
protected:
virtual int module_number() const {return 38;}
virtual bool install_firm() {return TRUE;}
virtual bool install_com();
public:
virtual ~TInstall_SV () {}
};
bool TInstall_SV ::install_com()
{
// ciclo su ogni ditta
TStd_filename txtfile(module_code());
txtfile << "tab.txt";
if (txtfile.check(TRUE))
{
// carica le tabelle nei file di default
TLocalisamfile tampone(LF_TABCOM);
TSystemtempfile tabstd(LF_TABCOM);
TFilename stdtabname(prefix().get_studio());
stdtabname << "STD\\lf0005.txt";
tabstd.load(txtfile);
tabstd.load(stdtabname);
tabstd.set_autodel();
TFilename tempfile;
tempfile.temp();
// riconverte le macro delle date
tabstd.dump(tempfile);
TScanner scan(tempfile);
FILE *dest=fopen((const char *)stdtabname,"w");
while (TRUE) {
TString &line=scan.line();
if (line.empty()) break;
int pos=(line.find("-0000"));
while (pos >= 0 )
{
line.overwrite("%yr%",pos+1);
pos=(line.find("-0000"));
}
line << '\n' ;
fputs((const char * )line,dest);
}
fclose(dest);
}
return TRUE;
}
int bainst38(int argc, char** argv)
{
TInstall_SV app;
app.run(argc, argv);
return 0;
}