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

Patch level : 2.0 470

Browse Source 
Files correlati     : cg0.exe cg0100a.msk
Ricompilazione Demo : [ ]
Commento            :

Corretta ricerca tramite il pulsante "Ricerca" in basso (Lente)


git-svn-id: svn://10.65.10.50/trunk@11139 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2003-05-15 13:17:29 +00:00
parent b15210d4f6
commit 99e211d385
2 changed files with 17 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

33
cg/cg0100.cpp
View File

@ -14,7 +14,7 @@
#define RICAVI 4
#define ORDINE 5
class TCausali_app : public TRelation_application
class TPianoconti_app : public TRelation_application
{
TMask* _msk;
TRelation *_rel;
@ -38,12 +38,12 @@ public:
virtual bool check_autorization() const
{return FALSE;}
virtual TRelation* get_relation() const {return _rel;}
TCausali_app() : _pcon_com(FALSE) {}
TPianoconti_app() : _pcon_com(FALSE) {}
};
HIDDEN inline TCausali_app & app() { return (TCausali_app &) main_app();}
HIDDEN inline TPianoconti_app & app() { return (TPianoconti_app &) main_app();}
int TCausali_app::read(TMask& m)
int TPianoconti_app::read(TMask& m)
{
const TRelation *r = get_relation();
@ -63,7 +63,7 @@ int TCausali_app::read(TMask& m)
return NOERR;
}
int TCausali_app::rewrite(const TMask& m)
int TPianoconti_app::rewrite(const TMask& m)
{
TString16 sez;
@ -89,7 +89,7 @@ int TCausali_app::rewrite(const TMask& m)
return err;
}
int TCausali_app::write(const TMask& m)
int TPianoconti_app::write(const TMask& m)
{
TString16 sez;
@ -116,14 +116,14 @@ int TCausali_app::write(const TMask& m)
}
// Controlla se puo' essere effettuata la cancellazione di un conto
void TCausali_app::on_firm_change()
void TPianoconti_app::on_firm_change()
{
TDir d;
d.get(LF_PCON, _nolock, _nordir, _sysdirop);
_pcon_com = d.is_com();
}
bool TCausali_app::protected_record(TRectype &rec)
bool TPianoconti_app::protected_record(TRectype &rec)
{
if (!_pcon_com )
{
@ -171,7 +171,7 @@ bool TCausali_app::protected_record(TRectype &rec)
return FALSE;
}
void TCausali_app::init_query_mode(TMask& m)
void TPianoconti_app::init_query_mode(TMask& m)
{
m.show_default();
m.hide(-3);
@ -191,7 +191,7 @@ HIDDEN bool tmcf_handler(TMask_field& f, KEY key)
return TRUE;
}
void TCausali_app::init_insert_mode(TMask& m)
void TPianoconti_app::init_insert_mode(TMask& m)
{
const int gruppo = m.get_int(FLD_CM1_GRUPPO);
const int conto = m.get_int(FLD_CM1_CONTO);
@ -356,7 +356,7 @@ HIDDEN bool sottoc_handler(TMask_field& f, KEY key)
return TRUE;
}
bool TCausali_app::user_create()
bool TPianoconti_app::user_create()
{
open_files(LF_PCON, LF_SALDI, LF_TABCOM, LF_ABPCON, 0);
@ -366,21 +366,22 @@ bool TCausali_app::user_create()
_msk->set_handler(FLD_CM1_SOTTOCONTO, sottoc_handler);
_msk->set_handler(FLD_CM1_TMCF, tmcf_handler);
_rel = new TRelation(LF_PCON);
set_search_field(FH_SOTTOCONTO);
// set_search_field(FH_SOTTOCONTO); // Ottima trovata, ma non funziona
set_search_field(FLD_CM1_SOTTOCONTO);
return TRUE;
}
bool TCausali_app::user_destroy()
bool TPianoconti_app::user_destroy()
{
delete _msk;
delete _rel;
delete _msk;
return TRUE;
}
int cg0100(int argc, char* argv[])
{
TCausali_app a ;
TPianoconti_app a ;
a.run(argc, argv, TR("Piano dei conti"));
return 0;
}
}

1
cg/cg0100a.uml
View File

@ -68,7 +68,6 @@ BEGIN
PROMPT 2 3 "Sottoconto "
HELP "Codice dell'eventuale sottoconto"
FIELD LF_PCON->SOTTOCONTO
FLAGS "R"
KEY 1
USE LF_PCON KEY 1 SELECT SOTTOCONTO!=""
COPY INPUT FLD_CM1_CONTO