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:
parent
d8789177e7
commit
87766987bc
12
ba/ba3.h
12
ba/ba3.h
@ -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
|
||||||
|
@ -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()
|
||||||
|
1837
ba/ba3800.cpp
1837
ba/ba3800.cpp
File diff suppressed because it is too large
Load Diff
@ -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
|
||||||
|
Loading…
x
Reference in New Issue
Block a user