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;
|
return TRUE;
|
||||||
}
|
}
|
||||||
|
|
||||||
ab0100(int argc, char* argv[])
|
int ab0100(int argc, char* argv[])
|
||||||
{
|
{
|
||||||
Tabanabil_application a;
|
Tabanabil_application a;
|
||||||
|
|
||||||
|
@ -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;
|
||||||
|
@ -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();
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -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"
|
||||||
|
|
||||||
|
|
||||||
|
@ -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);
|
||||||
|
@ -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;
|
||||||
|
|
||||||
|
@ -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;
|
||||||
|
@ -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
|
||||||
|
@ -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);
|
||||||
|
@ -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));
|
||||||
|
@ -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
|
||||||
|
Loading…
x
Reference in New Issue
Block a user