root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Eliminato parametro data

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@4492 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1997-06-02 10:32:22 +00:00
parent 0a4be9355c
commit 113f9777f6
2 changed files with 833 additions and 838 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1333
mg/mglib01.cpp
View File

File diff suppressed because it is too large Load Diff

338
mg/mglib01.h
View File

@ -21,26 +21,26 @@ class THead_lines_record : public TAuto_variable_rectype {
// @ cmember flag indicatore di record nuovo // @ cmember flag indicatore di record nuovo
bool _nuovo; bool _nuovo;
// @ cmember file principale // @ cmember file principale
int _file; int _file;
// @ cmember file delle righe // @ cmember file delle righe
int _rfile; int _rfile;
// @ cmember nome del campo "numeratore" delle righe // @ cmember nome del campo "numeratore" delle righe
TString _numfield; TString _numfield;
protected: protected:
// @ cmember restituisce la riga del corpo // @ cmember restituisce la riga del corpo
virtual TRectype & row(int index) const; virtual TRectype & row(int index) const;
virtual void put_str(const char* fieldname, const char* val); virtual void put_str(const char* fieldname, const char* val);
// @ cmember funzione per estrarre dal record della testata la chiave delle righe // @ cmember funzione per estrarre dal record della testata la chiave delle righe
virtual void copy_linekey(const TRectype & headrecord, TRectype & linesrecord)=0; virtual void copy_linekey(const TRectype & headrecord, TRectype & linesrecord)=0;
// @ cmember renumer la chiave del corpo // @ cmember renumer la chiave del corpo
virtual long renum(long numdoc=-1)=0; virtual long renum(long numdoc=-1)=0;
int write_rewrite(TBaseisamfile& f ,bool re = FALSE) const ; int write_rewrite(TBaseisamfile& f ,bool re = FALSE) const ;
public: public:
//*********************** //***********************
// struttura // struttura
// @ cmember restituisce il record di testata // @ cmember restituisce il record di testata
const TAuto_variable_rectype& head() const { return *this; } // Ritorna la testata del documento const TAuto_variable_rectype& head() const { return *this; } // Ritorna la testata del documento
// @ cmember restituisce il record di testata // @ cmember restituisce il record di testata
@ -53,22 +53,22 @@ public:
// @ cmember restituisce il record n-esimo del del corpo // @ cmember restituisce il record n-esimo del del corpo
virtual const TRectype& operator[](int index) const virtual const TRectype& operator[](int index) const
{ return (const TRectype&)((THead_lines_record *)this)->row(index); } { return (const TRectype&)((THead_lines_record *)this)->row(index); }
// @ cmember restituisce il record n-esimo del del corpo // @ cmember restituisce il record n-esimo del del corpo
virtual TRectype& operator[](int index) virtual TRectype& operator[](int index)
{ return (TRectype&)row(index); } { return (TRectype&)row(index); }
TRectype & insert_row(int row, const char *tipo = NULL); TRectype & insert_row(int row, const char *tipo = NULL);
TRectype & new_row(const char *tipo = NULL); TRectype & new_row(const char *tipo = NULL);
bool destroy_row(int n, bool pack = FALSE) { return _rows->destroy_row(n, pack); } bool destroy_row(int n, bool pack = FALSE) { return _rows->destroy_row(n, pack); }
void destroy_rows() { _rows->destroy_rows(); } void destroy_rows() { _rows->destroy_rows(); }
//*********************** //***********************
// record e I/O // record e I/O
virtual void dirty_fields(); virtual void dirty_fields();
virtual const char *get_next_key() =0 ; virtual const char *get_next_key() =0 ;
virtual void renum_key(const char * kfield,const char * val); virtual void renum_key(const char * kfield,const char * val);
virtual TRectype & operator =(const TRectype & r); virtual TRectype & operator =(const TRectype & r);
virtual TRectype & operator =(const char * r); virtual TRectype & operator =(const char * r);
virtual void zero(const char * fieldname); virtual void zero(const char * fieldname);
@ -77,43 +77,38 @@ public:
void reset_fields(TAuto_variable_rectype & rec) { rec.remove_field(); } void reset_fields(TAuto_variable_rectype & rec) { rec.remove_field(); }
virtual void set_fields(TAuto_variable_rectype & rec); virtual void set_fields(TAuto_variable_rectype & rec);
virtual int read(TBaseisamfile& f, word op = _isequal, word lockop = _nolock, TDate& atdate = (TDate&)botime); virtual int read(TBaseisamfile& f, word op = _isequal, word lockop = _nolock);
virtual int write(TBaseisamfile& f, TDate& atdate = (TDate&)botime) const ; virtual int write(TBaseisamfile& f) const ;
virtual int rewrite(TBaseisamfile& f, TDate& atdate = (TDate&)botime) const ; virtual int rewrite(TBaseisamfile& f) const ;
virtual int remove(TBaseisamfile& f, TDate& atdate = (TDate&)botime) const ; virtual int remove(TBaseisamfile& f) const ;
//************************** //**************************
// @ cmember costruttore dal numero del file // @ cmember costruttore dal numero del file
THead_lines_record(int hfn, int rfn,const char *numfield); THead_lines_record(int hfn, int rfn,const char *numfield);
// @ cmember costruttore dal file // @ cmember costruttore dal file
THead_lines_record(const TBaseisamfile* head_file,int rfn,const char *numfield); THead_lines_record(const TBaseisamfile* head_file,int rfn,const char *numfield);
// @ cmember costruttore dal record // @ cmember costruttore dal record
THead_lines_record(const TRectype & r,int rfn,const char *numfield); THead_lines_record(const TRectype & r,int rfn,const char *numfield);
// @ cmember costruttore di copia // @ cmember costruttore di copia
THead_lines_record(const THead_lines_record& r); THead_lines_record(const THead_lines_record& r);
virtual ~THead_lines_record(); virtual ~THead_lines_record();
}; };
//********************** //**********************
// classe per la gestione delle finestre temporizzate // classe per la gestione delle finestre temporizzate
class TTimed_box: public TMask class TTimed_box: public TMask
{ {
long _timer_delay; long _timer_delay;
long _timer_id; long _timer_id;
short _button_id; short _button_id;
protected: protected:
virtual void handler(WINDOW win, EVENT* ep); virtual void handler(WINDOW win, EVENT* ep);
virtual void start_run(); virtual void start_run();
public: public:
TTimed_box(const char * header,const char * message,int seconds,short button_id,int x,int y); TTimed_box(const char * header,const char * message,int seconds,short button_id,int x,int y);
}; };
// ************************************** // **************************************
// ************************************** // **************************************
// ************************************** // **************************************
@ -122,30 +117,30 @@ public:
// ******************************* // *******************************
// LIBRERIA DI utility del magazzino // LIBRERIA DI utility del magazzino
// ******************************* // *******************************
#include "..\cg\cglib.h"
//#include "..\ve\velib03.h" //#include "..\ve\velib03.h"
#define MANY_MAG_LEV 10 #define MANY_MAG_LEV 10
#define MAX_GIAC_LEVEL 4
class TMag_livelli { class TMag_livelli {
bool _enabled[MANY_MAG_LEV]; bool _enabled[MANY_MAG_LEV];
int _code_lenght[MANY_MAG_LEV]; int _code_lenght[MANY_MAG_LEV];
TString _name[MANY_MAG_LEV]; TString _name[MANY_MAG_LEV];
TString _picture[MANY_MAG_LEV]; TString _picture[MANY_MAG_LEV];
int _last_level; int _last_level;
public: public:
int last_level() const {return _last_level;}; // Ritorna il numero di livelli abilitati int last_level() const {return _last_level;}; // Ritorna il numero di livelli abilitati
const bool enabled(int levnum=1); // Ritorna se il livello è abilitato const bool enabled(int levnum=1); // Ritorna se il livello è abilitato
const TString & name(int levnum); // Ritorna il nome (descrizione) di quel livello const TString & name(int levnum); // Ritorna il nome (descrizione) di quel livello
const TString & picture(int levnum);// Ritorna la stringa di picture per i codici gruppo di quel livello const TString & picture(int levnum);// Ritorna la stringa di picture per i codici gruppo di quel livello
const int code_lenght(int levnum); // Ritorna la lunghezza dei codici gruppo di quel livello const int code_lenght(int levnum); // Ritorna la lunghezza dei codici gruppo di quel livello
void pack_grpcode(TString & pc, const TString &codlev, const int levnum); // Inserisce il codice del gruppo del livello levnum in pc void pack_grpcode(TString & pc, const TString &codlev, const int levnum); // Inserisce il codice del gruppo del livello levnum in pc
TString unpack_grpcode(const TString & pc, const int levnum); // Estrae il codice del gruppo del livello levnum da pc TString unpack_grpcode(const TString & pc, const int levnum); // Estrae il codice del gruppo del livello levnum da pc
TMag_livelli(const char *tabname); // costruttore TMag_livelli(const char *tabname); // costruttore
~TMag_livelli() {}; // distruttore ~TMag_livelli() {}; // distruttore
}; };
@ -154,62 +149,62 @@ public:
#define MAXSIMBOLS 256 #define MAXSIMBOLS 256
#define MAXSTATES 25 #define MAXSTATES 25
class TStateset { class TStateset {
unsigned char _container[MAXSTATES]; unsigned char _container[MAXSTATES];
int _current; int _current;
public: public:
TStateset & empty(); TStateset & empty();
TStateset & enclose(int e); TStateset & enclose(int e);
TStateset & singleton(int e); TStateset & singleton(int e);
TStateset & cap(TStateset & s); TStateset & cap(TStateset & s);
int get_first() ; int get_first() ;
int get_next() ; int get_next() ;
bool is_empty() const; bool is_empty() const;
bool is_member(int e) const; bool is_member(int e) const;
TStateset(); TStateset();
~TStateset() {}; ~TStateset() {};
}; };
struct TAutoma_state { struct TAutoma_state {
short _transaction[MAXSIMBOLS]; short _transaction[MAXSIMBOLS];
TString16 * _label; TString16 * _label;
bool _final; bool _final;
}; };
// ******************************* // *******************************
// ******************************* // *******************************
// automa per il riconoscimento di metacaratteri // automa per il riconoscimento di metacaratteri
class TR_automa { class TR_automa {
TAutoma_state st[MAXSTATES]; TAutoma_state st[MAXSTATES];
short _maxstate; short _maxstate;
protected: protected:
TStateset union_of_closures(TStateset &s); TStateset union_of_closures(TStateset &s);
bool is_final(int statenum) const; bool is_final(int statenum) const;
bool is_final(TStateset states) const; bool is_final(TStateset states) const;
TR_automa & set_label(int statenum, const char *label); TR_automa & set_label(int statenum, const char *label);
bool is_state(int statenum); bool is_state(int statenum);
const char *label(int statenum); const char *label(int statenum);
int label2state(const char * label); int label2state(const char * label);
void del_trans(int statenum,unsigned char symbol); void del_trans(int statenum,unsigned char symbol);
int trans_to(int statenum,unsigned char symbol); int trans_to(int statenum,unsigned char symbol);
bool _isdeterministic; bool _isdeterministic;
public: public:
TR_automa & reset_state(int statenum=-1); TR_automa & reset_state(int statenum=-1);
void add_tran(int statenum,unsigned char symbol,int next);// aggiunge una transizione void add_tran(int statenum,unsigned char symbol,int next);// aggiunge una transizione
int add_state(const char * label);// aggiunge uno stato int add_state(const char * label);// aggiunge uno stato
TR_automa & set_final(int statenum,bool v=TRUE); // pone lo stato come finale TR_automa & set_final(int statenum,bool v=TRUE); // pone lo stato come finale
bool is_deterministic() {return _isdeterministic;}; // bool is_deterministic() {return _isdeterministic;}; //
bool recognized(const char * s); // tenta di riconoscere la stringa passata bool recognized(const char * s); // tenta di riconoscere la stringa passata
TR_automa(TR_automa *a=NULL,bool makedet=FALSE); // duplica un automa (e lo rende deterministico) TR_automa(TR_automa *a=NULL,bool makedet=FALSE); // duplica un automa (e lo rende deterministico)
~TR_automa(); ~TR_automa();
static void set2label(const TStateset ss,TString16 & label); static void set2label(const TStateset ss,TString16 & label);
static void label2set(const TString16 & label,TStateset & ss); static void label2set(const TString16 & label,TStateset & ss);
}; };
@ -218,50 +213,50 @@ public:
// ******************************* // *******************************
// riconoscimento di metacaratteri // riconoscimento di metacaratteri
class TMetachar { class TMetachar {
TR_automa * _au; TR_automa * _au;
TString _language; TString _language;
char _metach_mand[10]; char _metach_mand[10];
char _metach_opz[10]; char _metach_opz[10];
void set_language(const char * language); // setta l'automa che ricosce il linguaggio passato void set_language(const char * language); // setta l'automa che ricosce il linguaggio passato
void add_tran(int statenum,unsigned char symbol,int next);// aggiunge le transizioni all'automa void add_tran(int statenum,unsigned char symbol,int next);// aggiunge le transizioni all'automa
public: public:
const char * language() const; // restituisce la stringa di metacaratteri del linguaggio riconosciuto const char * language() const; // restituisce la stringa di metacaratteri del linguaggio riconosciuto
bool recognized(const char * pattern); bool recognized(const char * pattern);
bool has_opzchars(const char * pattern); bool has_opzchars(const char * pattern);
bool has_mandchars(const char * pattern); bool has_mandchars(const char * pattern);
int maxstrlen(const char * pattern) const; int maxstrlen(const char * pattern) const;
const char *mand_chars() {return _metach_mand;}; const char *mand_chars() {return _metach_mand;};
const char *opz_chars() {return _metach_opz;}; const char *opz_chars() {return _metach_opz;};
TMetachar(const char * str); TMetachar(const char * str);
TMetachar(); TMetachar();
~TMetachar(); ~TMetachar();
}; };
// ********************* // *********************
// classe che incapsula le causali di magazzino (record della tabella CAU) // classe che incapsula le causali di magazzino (record della tabella CAU)
typedef enum { typedef enum {
s_giac, s_giac,
s_acq,s_ent, s_acq,s_ent,
s_ven,s_usc, s_ven,s_usc,
s_ordc,s_ordf, s_ordc,s_ordf,
s_acl,s_incl, s_acl,s_incl,
s_prodc,s_prodf, s_prodc,s_prodf,
s_rim, s_rim,
s_scart, s_scart,
s_label s_label
} TTipo_saldomag; } TTipo_saldomag;
class TCausale_magazzino : public TRectype { class TCausale_magazzino : public TRectype {
public: public:
const char * get_descr() {return get("S0");} const char * get_descr() {return get("S0");}
const char get_tipoprz() {return get_char("S6");} const char get_tipoprz() {return get_char("S6");}
const char get_tipomov() {return get_char("S7");} const char get_tipomov() {return get_char("S7");}
const char * get_raggfisc() {return get("S8");} const char * get_raggfisc() {return get("S8");}
int sgn(TTipo_saldomag fieldname) ; int sgn(TTipo_saldomag fieldname) ;
TCausale_magazzino(const char * codice); TCausale_magazzino(const char * codice);
}; };
@ -270,72 +265,71 @@ class TLine_movmag ; // convenience...
// dati della linea di movimento di magazzino // dati della linea di movimento di magazzino
class TLine_movmag : public TObject { class TLine_movmag : public TObject {
public: public:
TString16 um; TString16 um;
real quant; real quant;
real prezzo; real prezzo;
int operator==(TLine_movmag &); int operator==(TLine_movmag &);
virtual TObject* dup() const {return new TLine_movmag(*this);}; virtual TObject* dup() const {return new TLine_movmag(*this);};
TLine_movmag() {}; TLine_movmag() {};
TLine_movmag(const TLine_movmag &); TLine_movmag(const TLine_movmag &);
virtual ~TLine_movmag() {}; virtual ~TLine_movmag() {};
}; };
// classe per la definizione dei movimenti di magazzino // classe per la definizione dei movimenti di magazzino
// ( un movimento (testata+righe) == un oggetto TMov_mag ) // ( un movimento (testata+righe) == un oggetto TMov_mag )
class TMov_mag : public THead_lines_record { class TMov_mag : public THead_lines_record {
TEsercizi_contabili _esercizi; //
// TString16 _codcaus;
TString16 _codcaus; TString16 _annoes;
TString16 _annoes; //
// TString16 _nextcod;
TString16 _nextcod; //
// TAssoc_array lines_to_add;
TAssoc_array lines_to_add; TAssoc_array lines_to_subtract;
TAssoc_array lines_to_subtract;
protected: protected:
virtual void copy_linekey(const TRectype & headrecord, TRectype & linesrecord ); virtual void copy_linekey(const TRectype & headrecord, TRectype & linesrecord );
virtual long renum(long numdoc=-1); // rinumerazione ; virtual long renum(long numdoc=-1); // rinumerazione ;
// ************ gestione saldi // ************ gestione saldi
// @member: compone le parti chiave + dati a partire dalla riga dello sheet // @member: compone le parti chiave + dati a partire dalla riga dello sheet
void line2key_data(int numriga, TToken_string &key,TLine_movmag &rest) const; void line2key_data(int numriga, TToken_string &key,TLine_movmag &rest) const;
// @member: compone la chiave a partire dalla riga dello sheet // @member: compone la chiave a partire dalla riga dello sheet
TToken_string line2key(int numriga) const; TToken_string line2key(int numriga) const;
// @member: compone la dati a partire dalla riga dello sheet // @member: compone la dati a partire dalla riga dello sheet
TLine_movmag line2data(int numriga) const; TLine_movmag line2data(int numriga) const;
// @member: estrae dalla Tokenstring della chiave i valori corrispondenti ai campi del file // @member: estrae dalla Tokenstring della chiave i valori corrispondenti ai campi del file
static TString key2field(TToken_string &key,const char * f); static TString key2field(TToken_string &key,const char * f);
// @member: memorizza la linea come "da togliere" // @member: memorizza la linea come "da togliere"
int delete_line(TToken_string &key,TLine_movmag &rest); int delete_line(TToken_string &key,TLine_movmag &rest);
// @member: memorizza la linea come "da aggiungere" // @member: memorizza la linea come "da aggiungere"
int insert_line(TToken_string &key,TLine_movmag &rest); int insert_line(TToken_string &key,TLine_movmag &rest);
// @member: effettua l'aggiornamento dei saldi relativi alle giacenze interessate al movimento // @member: effettua l'aggiornamento dei saldi relativi alle giacenze interessate al movimento
int update_balances() const; int update_balances() const;
// @member: effettua l'aggiornamento dei saldi di una giacenza // @member: effettua l'aggiornamento dei saldi di una giacenza
int update_balances(TRectype & magrec, const TLine_movmag &l,TString16 codcaus,int sign) const; int update_balances(TRectype & magrec, const TLine_movmag &l,TString16 codcaus,int sign) const;
// @member: effettua l'aggiornamento di un saldo di una giacenza // @member: effettua l'aggiornamento di un saldo di una giacenza
void update_balance(TRectype & magrec, const char * fieldname, real diff) const; void update_balance(TRectype & magrec, const char * fieldname, real diff) const;
static void giac_putkey2(TLocalisamfile & mag,TString16 annoes,TToken_string curr_key); static void giac_putkey2(TLocalisamfile & mag,TString16 annoes,TToken_string curr_key);
static bool lock_anamag(const char *codart); static bool lock_anamag(const char *codart);
static bool unlock_anamag(const char *codart) ; static bool unlock_anamag(const char *codart) ;
public: public:
// IO ad alto livello // IO ad alto livello
virtual const char *get_next_key() ; virtual const char *get_next_key() ;
virtual int read(TBaseisamfile& f, word op = _isequal, word lockop = _nolock, TDate& atdate = (TDate&)botime); virtual int read(TBaseisamfile& f, word op = _isequal, word lockop = _nolock);
virtual int remove(TBaseisamfile& f, TDate& atdate = (TDate&)botime) const ; virtual int remove(TBaseisamfile& f) const ;
virtual int write(TBaseisamfile& f, TDate& atdate = (TDate&)botime) const ; virtual int write(TBaseisamfile& f) const ;
virtual int rewrite(TBaseisamfile& f, TDate& atdate = (TDate&)botime) const ; virtual int rewrite(TBaseisamfile& f) const ;
// //
int codice_esercizio(TDate &d); int codice_esercizio(TDate &d);
// costruttori e distruttori // costruttori e distruttori
TMov_mag(); TMov_mag();
virtual ~TMov_mag(); virtual ~TMov_mag();
}; };