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;
}
ab0100(int argc, char* argv[])
int ab0100(int argc, char* argv[])
{
Tabanabil_application a;

View File

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

View File

@ -4,4 +4,4 @@
int ab1100(int argc, char **argv);
int ab1200(int argc, char **argv);
#endif //__AB1_H
#endif //__AB1_H

View File

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

View File

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

View File

@ -9,4 +9,4 @@ int ab2102(int argc, char **argv);
//int ab2200(int argc, char **argv);
#endif //__AB2_H
#endif //__AB2_H

View File

@ -83,7 +83,7 @@ bool TAdditional_car::same_as(real other_id)
ca.put(ABCA_ID,other_id);
ca.read();
real id=get(ABCA_ID);
real id = get_real(ABCA_ID);
put(ABCA_ID,ca.get(ABCA_ID));
r= (*this == ca.curr());
put(ABCA_ID,id);
@ -209,4 +209,4 @@ int TAdditional_cols::write()
curr().put(ABCD_ID,0); //Il record non è stato scritto ma devo inserire nella chiave del rocord
//l'indice (=0) poichè questo andrà inserito in RELANA
return err;
}
}

View File

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

View File

@ -19,4 +19,4 @@
#define F_TESTO_TIPOBIL 214
#define F_TIPO_BILANCIO 215
#endif //__AB2100A_H
#endif //__AB2100A_H

View File

@ -1007,7 +1007,7 @@ void TRicezione_AS400::build_relana(TString& config_file, const TMask &msk, cons
{
THash_object *obj;
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
tabtree.remove(key); //Tolgo il record dall'assoc_array
}
@ -1189,12 +1189,9 @@ TRicezione_userdef ::TRicezione_userdef(const TString & config, const TFilename
_trasfile->open('r'); //apro il TFile_text in lettura
}
int ab2101(int argc, char **argv)
{
TRicezione a;
a.run(argc,argv,TR("Ricezione da file di testo"));
return 0;
}
}

View File

@ -281,7 +281,7 @@ void TObject_send::converti(int main_file, const char * tabname)
TCursor *cur=NULL;
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
long items =cur->items();
//Barra scorrevole di attesa

View File

@ -3,4 +3,4 @@
void ab3100(int argc, char **argv);
#endif //__AB3_H
#endif //__AB3_H

View File

@ -117,7 +117,7 @@ bool naviga_tree(TMask_field& f, KEY k)
if ( ab->current().get_bool(ABRA_USACARADD) )
{ // Se il nodo esisteva già, ci sarà anche la caradd;
// 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)
{ // Esiste già una caradd specifica definita
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))
{
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)
{
//Rintraccio il collegamento
@ -276,7 +276,7 @@ bool aggiorna_id_caradd(TMask_field& f, KEY k)
{ //CARADD NON DI DEFAULT
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)
{ // Esiste già una caradd specifica definita
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)
{
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_CODPDB));
key.add(get(ABS_TIPOBIL));

View File

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

View File

@ -23,4 +23,4 @@
#endif //_CARADD_H
#endif //_CARADD_H

View File

@ -4,4 +4,4 @@
#define ABCD_ID "ID"
#endif //_COLLDICH_H
#endif //_COLLDICH_H