Modifche dalla vesrione Linux sulla 2.1

git-svn-id: svn://10.65.10.50/trunk@11856 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 2004-03-13 09:03:18 +00:00
parent 781644ec8e
commit 83dbe7df6e
17 changed files with 27 additions and 30 deletions

View File

@ -119,7 +119,7 @@ bool Tabanabil_application::user_create()
return TRUE; return TRUE;
} }
ab0100(int argc, char* argv[]) int ab0100(int argc, char* argv[])
{ {
Tabanabil_application a; Tabanabil_application a;

View File

@ -467,7 +467,7 @@ void TRicl_saldi::calculate()
int gruppo; int gruppo;
int conto; int conto;
long sottoconto; long sottoconto;
int indbil; int indbil = 0;
TSaldo sal; TSaldo sal;
TRiga_calcolo r; TRiga_calcolo r;
TEsercizi_contabili es; TEsercizi_contabili es;

View File

@ -11,7 +11,7 @@
#include <nditte.h> #include <nditte.h>
#include "AB1.h" #include "ab1.h"
#include "ab1100.h" #include "ab1100.h"
#define FOOTER_LEN 4 // se non ridefinito nel .rpt #define FOOTER_LEN 4 // se non ridefinito nel .rpt
@ -220,9 +220,9 @@ void AB1100_application::set_rows()
{ {
TToken_string line; TToken_string line;
TFieldref campo; TFieldref campo;
int from, to, riga_record; int from = 0, to = 0, riga_record;
TString formato_campo, picture; TString formato_campo, picture;
const char * name; const char * name = NULL;
TScanner rpt(_rptname); TScanner rpt(_rptname);
rpt.paragraph("Rows"); rpt.paragraph("Rows");
@ -242,7 +242,7 @@ void AB1100_application::set_rows()
from = campo.from(); from = campo.from();
to = campo.to(); to = campo.to();
name = campo.name(); name = campo.name();
if (campo.file != 0) if (campo.file() != 0)
logicnum = campo.file(); logicnum = campo.file();
} }

View File

@ -4,7 +4,7 @@
#include <applicat.h> #include <applicat.h>
#include <urldefid.h> //Definisce BAR_ITEM(1) #include <urldefid.h> //Definisce BAR_ITEM(1)
#include "AB1.h" #include "ab1.h"
#include "ab1200.h" #include "ab1200.h"

View File

@ -83,7 +83,7 @@ bool TAdditional_car::same_as(real other_id)
ca.put(ABCA_ID,other_id); ca.put(ABCA_ID,other_id);
ca.read(); ca.read();
real id=get(ABCA_ID); real id = get_real(ABCA_ID);
put(ABCA_ID,ca.get(ABCA_ID)); put(ABCA_ID,ca.get(ABCA_ID));
r= (*this == ca.curr()); r= (*this == ca.curr());
put(ABCA_ID,id); put(ABCA_ID,id);

View File

@ -119,10 +119,10 @@ public:
class TFile_text_AS400: public TFile_text class TFile_text_AS400: public TFile_text
{ {
TString16 _tipo_bilancio;
TAssoc_array _last_id; TAssoc_array _last_id;
// static long _idcaradd; // static long _idcaradd;
long _idncomp; long _idncomp;
TString16 _tipo_bilancio;
//long _idcoldich; //long _idcoldich;
TString _codvc_prec; TString _codvc_prec;

View File

@ -1007,7 +1007,7 @@ void TRicezione_AS400::build_relana(TString& config_file, const TMask &msk, cons
{ {
THash_object *obj; THash_object *obj;
obj=tabtree.get_hashobj(); //Ritorna il primo elemento dell'assoc_array completo di chiave obj=tabtree.get_hashobj(); //Ritorna il primo elemento dell'assoc_array completo di chiave
TToken_string key = obj->key(); //Estraggo la chiave dell'oggetto estratto dall'assoc_array TToken_string key(obj->key()); //Estraggo la chiave dell'oggetto estratto dall'assoc_array
rel.lfile().write((TRectype&)obj->obj()); //Aggiorno il file isam rel.lfile().write((TRectype&)obj->obj()); //Aggiorno il file isam
tabtree.remove(key); //Tolgo il record dall'assoc_array tabtree.remove(key); //Tolgo il record dall'assoc_array
} }
@ -1189,9 +1189,6 @@ TRicezione_userdef ::TRicezione_userdef(const TString & config, const TFilename
_trasfile->open('r'); //apro il TFile_text in lettura _trasfile->open('r'); //apro il TFile_text in lettura
} }
int ab2101(int argc, char **argv) int ab2101(int argc, char **argv)
{ {
TRicezione a; TRicezione a;

View File

@ -281,7 +281,7 @@ void TObject_send::converti(int main_file, const char * tabname)
TCursor *cur=NULL; TCursor *cur=NULL;
cur = new TCursor(tr_relation); cur = new TCursor(tr_relation);
int logic_num= tr_relation->lfile().num(); // int logic_num= tr_relation->lfile().num();
//Leggo il numero di records da convertire //Leggo il numero di records da convertire
long items =cur->items(); long items =cur->items();
//Barra scorrevole di attesa //Barra scorrevole di attesa

View File

@ -117,7 +117,7 @@ bool naviga_tree(TMask_field& f, KEY k)
if ( ab->current().get_bool(ABRA_USACARADD) ) if ( ab->current().get_bool(ABRA_USACARADD) )
{ // Se il nodo esisteva già, ci sarà anche la caradd; { // Se il nodo esisteva già, ci sarà anche la caradd;
// se il nodo è nuovo, la caradd la devo aggiungere // se il nodo è nuovo, la caradd la devo aggiungere
TNumeric_id id_caradd = ab->current().get(ABRA_IDCARADD); // Caratteristica addizionale ridefinita TNumeric_id id_caradd(ab->current().get(ABRA_IDCARADD)); // Caratteristica addizionale ridefinita
if (id_caradd != ID_NULLO) if (id_caradd != ID_NULLO)
{ // Esiste già una caradd specifica definita { // Esiste già una caradd specifica definita
codice.add(id_caradd.string()); codice.add(id_caradd.string());
@ -241,7 +241,7 @@ bool aggiorna_id_colldich(TMask_field& f, KEY k)
if (sheet_msk.get_bool(F_USA_COLL)) if (sheet_msk.get_bool(F_USA_COLL))
{ {
ab_tree.user_tree()->goto_node(sheet_msk.get(F_ID)); ab_tree.user_tree()->goto_node(sheet_msk.get(F_ID));
TNumeric_id id_coll = ab_tree.user_tree()->current().get(ABRA_IDCOLDICH); // id del collegamento a dich. TNumeric_id id_coll(ab_tree.user_tree()->current().get(ABRA_IDCOLDICH)); // id del collegamento a dich.
if (id_coll != ID_NULLO) if (id_coll != ID_NULLO)
{ {
//Rintraccio il collegamento //Rintraccio il collegamento
@ -276,7 +276,7 @@ bool aggiorna_id_caradd(TMask_field& f, KEY k)
{ //CARADD NON DI DEFAULT { //CARADD NON DI DEFAULT
ab_tree.user_tree()->goto_node(sheet_msk.get(F_ID)); ab_tree.user_tree()->goto_node(sheet_msk.get(F_ID));
TNumeric_id id_caradd = ab_tree.user_tree()->current().get(ABRA_IDCARADD); // Caratteristica addizionale ridefinita TNumeric_id id_caradd(ab_tree.user_tree()->current().get(ABRA_IDCARADD)); // Caratteristica addizionale ridefinita
if (id_caradd != ID_NULLO) if (id_caradd != ID_NULLO)
{ // Esiste già una caradd specifica definita { // Esiste già una caradd specifica definita
sheet_msk.set(F_IDCARADD,id_caradd); sheet_msk.set(F_IDCARADD,id_caradd);

View File

@ -146,7 +146,7 @@ void TABsaldo::put_headkey(TRectype &rec) const
int TABsaldo::read_body(bool lockstruct) int TABsaldo::read_body(bool lockstruct)
{ {
TString codditta = get(ABS_CODDITTA); TString codditta = get(ABS_CODDITTA);
TToken_string key = codditta.right_just(5,'0'); TToken_string key(codditta.right_just(5,'0'));
key.add(get(ABS_ANNO)); key.add(get(ABS_ANNO));
key.add(get(ABS_CODPDB)); key.add(get(ABS_CODPDB));
key.add(get(ABS_TIPOBIL)); key.add(get(ABS_TIPOBIL));

View File

@ -4,7 +4,7 @@
#define F_CODTAB_DITTA 101 #define F_CODTAB_DITTA 101
#define F_CODTAB_ESE 102 #define F_CODTAB_ESE 102
#define F_CODTAB_PER 103 #define F_CODTAB_PER 103
#define F_CODTAB_TIPO 104 #define F_CODTAB_TIPO 104
#define F_SCEGLI 105 #define F_SCEGLI 105
#define F_DI 106 #define F_DI 106
#define F_DF 107 #define F_DF 107