MOdifiche tanto per renderlo compilabile

git-svn-id: svn://10.65.10.50/trunk@464 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1994-10-26 12:21:30 +00:00
parent d8789177e7
commit 87766987bc
4 changed files with 2326 additions and 504 deletions

View File

@ -1,17 +1,6 @@
#ifndef __BA3_H #ifndef __BA3_H
#define __BA3_H #define __BA3_H
#ifdef MAIN
#define extern
#endif
#ifdef MAIN
#undef extern
#endif
const MAXSTR = 128;
static char __tmp [MAXSTR];
int ba3100(int argc, char* argv[]); int ba3100(int argc, char* argv[]);
int ba3200(int argc, char* argv[]); int ba3200(int argc, char* argv[]);
int ba3300(int argc, char* argv[]); int ba3300(int argc, char* argv[]);
@ -19,5 +8,6 @@ int ba3400(int argc, char* argv[]);
int ba3500(int argc, char* argv[]); int ba3500(int argc, char* argv[]);
int ba3600(int argc, char* argv[]); int ba3600(int argc, char* argv[]);
int ba3700(int argc, char* argv[]); int ba3700(int argc, char* argv[]);
int ba3800(int argc, char* argv[]);
#endif // __BA3_H #endif // __BA3_H

View File

@ -1,13 +1,9 @@
#include <mask.h> #include <mask.h>
#include <printapp.h> #include <printapp.h>
#include <scanner.h>
#include <relation.h> #include <relation.h>
#include <tabutil.h> #include <tabutil.h>
#include <utility.h> #include <utility.h>
#include <prefix.h>
#include <lffiles.h>
#include <sort.h> #include <sort.h>
#include <assoc.h>
#include <progind.h> #include <progind.h>
#include <nditte.h> #include <nditte.h>
@ -17,8 +13,7 @@
#define ALIAS 50 #define ALIAS 50
extern char __tmp [MAXSTR]; static TString256 tmp;
static TFixed_string tmp(__tmp, MAXSTR);
const int TABLBU = (int)TTable::name2log("%LBU"); const int TABLBU = (int)TTable::name2log("%LBU");
const int TABINL = (int)TTable::name2log("%INL"); const int TABINL = (int)TTable::name2log("%INL");
@ -397,12 +392,12 @@ const char* BA3600_application::ragsoc_ditta(long codditta)
if (nditte.bad()) if (nditte.bad())
nditte.zero(); nditte.zero();
tmp = nditte.get(NDT_RAGSOC); tmp = nditte.get(NDT_RAGSOC);
return (__tmp); return tmp;
} }
const char* BA3600_application::descrizione_codreg(TString& codreg) const char* BA3600_application::descrizione_codreg(TString& codreg)
{ {
TString dep; TString16 dep;
_tab_reg->zero(); _tab_reg->zero();
dep = format("%4d", _anno); dep = format("%4d", _anno);
@ -412,7 +407,7 @@ const char* BA3600_application::descrizione_codreg(TString& codreg)
if (_tab_reg->bad()) if (_tab_reg->bad())
_tab_reg->zero(); _tab_reg->zero();
tmp = _tab_reg->get("S0"); tmp = _tab_reg->get("S0");
return (__tmp); return tmp;
} }
void BA3600_application::preprocess_header() void BA3600_application::preprocess_header()

File diff suppressed because it is too large Load Diff

View File

@ -73,7 +73,7 @@
6|Codici Attivita'|ba3 -1 %ais 6|Codici Attivita'|ba3 -1 %ais
6|Libri sociali|ba3 -1 %itl 6|Libri sociali|ba3 -1 %itl
6|Banche|ba3 -1 %ban 6|Banche|ba3 -1 %ban
6|IV direttiva CEE|ba3 -1 %ivd 6|IV direttiva CEE|ba3 -7
6|Valute|ba3 -1 %val 6|Valute|ba3 -1 %val
6|Lingue|ba3 -1 %lng 6|Lingue|ba3 -1 %lng
7|Tabelle ditta|2 7|Tabelle ditta|2