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:
parent
781644ec8e
commit
83dbe7df6e
@ -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;
|
||||
|
||||
|
@ -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;
|
||||
|
2
ab/ab1.h
2
ab/ab1.h
@ -4,4 +4,4 @@
|
||||
int ab1100(int argc, char **argv);
|
||||
int ab1200(int argc, char **argv);
|
||||
|
||||
#endif //__AB1_H
|
||||
#endif //__AB1_H
|
||||
|
@ -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();
|
||||
}
|
||||
|
||||
|
@ -4,7 +4,7 @@
|
||||
#include <applicat.h>
|
||||
#include <urldefid.h> //Definisce BAR_ITEM(1)
|
||||
|
||||
#include "AB1.h"
|
||||
#include "ab1.h"
|
||||
#include "ab1200.h"
|
||||
|
||||
|
||||
|
2
ab/ab2.h
2
ab/ab2.h
@ -9,4 +9,4 @@ int ab2102(int argc, char **argv);
|
||||
//int ab2200(int argc, char **argv);
|
||||
|
||||
|
||||
#endif //__AB2_H
|
||||
#endif //__AB2_H
|
||||
|
@ -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;
|
||||
}
|
||||
}
|
||||
|
@ -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;
|
||||
|
||||
|
@ -19,4 +19,4 @@
|
||||
#define F_TESTO_TIPOBIL 214
|
||||
#define F_TIPO_BILANCIO 215
|
||||
|
||||
#endif //__AB2100A_H
|
||||
#endif //__AB2100A_H
|
||||
|
@ -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;
|
||||
}
|
||||
}
|
||||
|
@ -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
|
||||
|
2
ab/ab3.h
2
ab/ab3.h
@ -3,4 +3,4 @@
|
||||
|
||||
void ab3100(int argc, char **argv);
|
||||
|
||||
#endif //__AB3_H
|
||||
#endif //__AB3_H
|
||||
|
@ -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);
|
||||
|
@ -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));
|
||||
|
@ -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
|
||||
|
@ -23,4 +23,4 @@
|
||||
|
||||
|
||||
|
||||
#endif //_CARADD_H
|
||||
#endif //_CARADD_H
|
||||
|
@ -4,4 +4,4 @@
|
||||
|
||||
#define ABCD_ID "ID"
|
||||
|
||||
#endif //_COLLDICH_H
|
||||
#endif //_COLLDICH_H
|
||||
|
Loading…
x
Reference in New Issue
Block a user