Patch level : 10.0

Files correlati     : cg3
Ricompilazione Demo : [ ]
Commento            :
Rimodernate maschere contabilita'


git-svn-id: svn://10.65.10.50/trunk@18319 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2009-02-23 11:43:21 +00:00
parent 7899b8c01f
commit ff1776e668
6 changed files with 106 additions and 145 deletions

View File

@ -14,12 +14,13 @@
bool TAgg_opintra::create() bool TAgg_opintra::create()
{ {
TApplication::create(); const bool ok = TApplication::create();
if (ok)
{
_causali = new TLocalisamfile(LF_ATTIV); _causali = new TLocalisamfile(LF_ATTIV);
dispatch_e_menu (BAR_ITEM_ID(1));
dispatch_e_menu (BAR_ITEM(1)); }
return TRUE; return ok;
} }
bool TAgg_opintra::destroy() bool TAgg_opintra::destroy()

View File

@ -45,8 +45,9 @@ public:
bool TStampa_deleghe_IVA::create() bool TStampa_deleghe_IVA::create()
{ {
TApplication::create(); const bool ok = TApplication::create();
if (ok)
{
_nditte = new TRelation(LF_NDITTE); _nditte = new TRelation(LF_NDITTE);
_nditte->add(LF_ANAG, "TIPOA=TIPOA|CODANAGR=CODANAGR"); _nditte->add(LF_ANAG, "TIPOA=TIPOA|CODANAGR=CODANAGR");
_nditte->add(LF_COMUNI, "COM=COMRF(COMRES)", 1, LF_ANAG); _nditte->add(LF_COMUNI, "COM=COMRF(COMRES)", 1, LF_ANAG);
@ -59,8 +60,9 @@ bool TStampa_deleghe_IVA::create()
_azienda = "" ; _azienda = "" ;
_dipendenza = "" ; _dipendenza = "" ;
dispatch_e_menu(BAR_ITEM(1)); dispatch_e_menu(BAR_ITEM_ID(1));
return TRUE; }
return ok;
} }
bool TStampa_deleghe_IVA::destroy() bool TStampa_deleghe_IVA::destroy()

View File

@ -393,7 +393,7 @@ void TPrimanota_application::print()
bool TPrimanota_application::menu(MENU_TAG mt) bool TPrimanota_application::menu(MENU_TAG mt)
{ {
bool ok = true; bool ok = true;
if (mt == MENU_ITEM(1)) if (mt == MENU_ITEM_ID(1))
set_colors(); set_colors();
else else
ok = TRelation_application::menu(mt); ok = TRelation_application::menu(mt);
@ -475,7 +475,7 @@ bool TPrimanota_application::force_mask_swap(const TCausale& old_caus, const TCa
if (old_caus.iva() != nessuna_iva && new_caus.iva() != nessuna_iva) if (old_caus.iva() != nessuna_iva && new_caus.iva() != nessuna_iva)
{ {
// Salvo un campo virtuale col codice IVA // Salvo un campo virtuale col codice IVA
ini.set("CODIVA", old.get(F_CODIVA)); ini.set("CODIVA", old.get(F_CODIVA)); // Campo virtuale non presente in testata
} }
if (old_caus.iva() != new_caus.iva() || old_caus.corrispettivi() != new_caus.corrispettivi()) if (old_caus.iva() != new_caus.iva() || old_caus.corrispettivi() != new_caus.corrispettivi())
{ {

View File

@ -1,26 +1,8 @@
#include "cg3200.h" #include "cg3200.h"
TOOLBAR "" 0 -2 0 2
BUTTON F_MEMORIZZA 18 2
BEGIN
PROMPT -23 -11 "~Memorizza scelte"
END
ENDPAGE
TOOLBAR "topbar" 0 0 0 2 TOOLBAR "topbar" 0 0 0 2
BUTTON DLG_PRINT 18 2 #include <printbar.h>
BEGIN
PROMPT -13 -11 "~Stampa"
MESSAGE EXIT,K_ENTER
END
BUTTON DLG_QUIT 18 2
BEGIN
PROMPT -33 -11 ""
END
ENDPAGE ENDPAGE
@ -64,7 +46,7 @@ END
NUMBER F_ANNO 4 NUMBER F_ANNO 4
BEGIN BEGIN
PROMPT 56 3 "Esercizio " PROMPT 55 3 "Esercizio "
USE ESC USE ESC
INPUT CODTAB F_ANNO INPUT CODTAB F_ANNO
DISPLAY "Codice Esercizio" CODTAB DISPLAY "Codice Esercizio" CODTAB
@ -434,27 +416,32 @@ BEGIN
ITEM "3|Tutti" ITEM "3|Tutti"
END END
ENDPAGE
PAGE "Parametri" -1 -1 78 20
BOOLEAN F_SEPARATOR
BEGIN
PROMPT 1 1 "Non stampare il separatore delle migliaia"
GROUP 8
END
LIST F_NUMMAST 10 LIST F_NUMMAST 10
BEGIN BEGIN
PROMPT 1 2 "Mastrini per pagina " PROMPT 1 17 "Mastrini per pagina "
ITEM "1|Uno" ITEM "1|Uno"
ITEM "2|Due" ITEM "2|Due"
ITEM "3|Continua" ITEM "3|Continua"
END END
BOOLEAN F_SEPARATOR
BEGIN
PROMPT 40 17 "Non stampare il separatore delle migliaia"
GROUP 8
END
BUTTON F_MEMORIZZA 18 2
BEGIN
PROMPT -11 -1 "~Memorizza scelte"
END
ENDPAGE
PAGE "Parametri" -1 -1 78 20
SPREADSHEET F_SCELTE SPREADSHEET F_SCELTE
BEGIN BEGIN
PROMPT 0 4 "" PROMPT 0 1 ""
ITEM "Anno" ITEM "Anno"
ITEM "Tipo@4" ITEM "Tipo@4"
ITEM "Gr." ITEM "Gr."
@ -891,7 +878,6 @@ BEGIN
PROMPT -23 -1 "" PROMPT -23 -1 ""
END END
BUTTON DLG_DELREC 10 2 BUTTON DLG_DELREC 10 2
BEGIN BEGIN
PROMPT -33 -1 "" PROMPT -33 -1 ""

View File

@ -2117,7 +2117,7 @@ void TMastrini_grid::update_mask() const
void TMastrini_grid::load_colors() void TMastrini_grid::load_colors()
{ {
TConfig conf(CONFIG_USER, "cg3600b"); TConfig conf(CONFIG_GUI, "cg3600b");
_mas_back = conf.get_color("ColorMB", NULL, -1, REQUIRED_BACK_COLOR); _mas_back = conf.get_color("ColorMB", NULL, -1, REQUIRED_BACK_COLOR);
_mas_fore = conf.get_color("ColorMF", NULL, -1, FOCUS_COLOR); _mas_fore = conf.get_color("ColorMF", NULL, -1, FOCUS_COLOR);
_con_back = conf.get_color("ColorCB", NULL, -1, NORMAL_BACK_COLOR); _con_back = conf.get_color("ColorCB", NULL, -1, NORMAL_BACK_COLOR);
@ -2126,7 +2126,7 @@ void TMastrini_grid::load_colors()
void TMastrini_grid::save_colors() void TMastrini_grid::save_colors()
{ {
TConfig conf(CONFIG_USER, "cg3600b"); TConfig conf(CONFIG_GUI, "cg3600b");
conf.set_color("ColorMB", _mas_back); conf.set_color("ColorMB", _mas_back);
conf.set_color("ColorMF", _mas_fore); conf.set_color("ColorMF", _mas_fore);
conf.set_color("ColorCB", _con_back); conf.set_color("ColorCB", _con_back);
@ -2481,25 +2481,28 @@ void TGrid_mask::handler(WINDOW win, EVENT* ep)
class TQuery_mask : public TMask class TQuery_mask : public TMask
{ {
TGrid_mask* _gm;
protected: protected:
static bool esercizio_handler(TMask_field& f, KEY k); static bool esercizio_handler(TMask_field& f, KEY k);
static bool data_handler(TMask_field& f, KEY k); static bool data_handler(TMask_field& f, KEY k);
static bool find_handler(TMask_field& f, KEY k); static bool find_handler(TMask_field& f, KEY k);
static bool colors_handler(TMask_field& f, KEY k);
public: public:
void do_query(TGrid_mask& gm); void do_query();
TQuery_mask(); TQuery_mask(TGrid_mask* gm);
virtual ~TQuery_mask() { } virtual ~TQuery_mask() { }
}; };
TQuery_mask::TQuery_mask() TQuery_mask::TQuery_mask(TGrid_mask* gm) : TMask("cg3600a"), _gm(gm)
: TMask("cg3600a")
{ {
set_handler(F_ESERCIZIO, esercizio_handler); set_handler(F_ESERCIZIO, esercizio_handler);
set_handler(F_DADATA, data_handler); set_handler(F_DADATA, data_handler);
set_handler(F_ADATA, data_handler); set_handler(F_ADATA, data_handler);
set_handler(DLG_FINDREC, find_handler); set_handler(DLG_FINDREC, find_handler);
set_handler(DLG_CONFIG, colors_handler);
} }
bool TQuery_mask::esercizio_handler(TMask_field& f, KEY k) bool TQuery_mask::esercizio_handler(TMask_field& f, KEY k)
@ -2584,7 +2587,17 @@ bool TQuery_mask::find_handler(TMask_field& f, KEY k)
return true; return true;
} }
void TQuery_mask::do_query(TGrid_mask& gm) bool TQuery_mask::colors_handler(TMask_field& f, KEY k)
{
if (k == K_SPACE)
{
const TQuery_mask& qm = (const TQuery_mask&)f.mask();
qm._gm->grid().set_colors();
}
return true;
}
void TQuery_mask::do_query()
{ {
const char t = get(F_TIPO)[0]; const char t = get(F_TIPO)[0];
const int g = get_int(F_GRUPPO); const int g = get_int(F_GRUPPO);
@ -2600,54 +2613,46 @@ void TQuery_mask::do_query(TGrid_mask& gm)
const TString& a_caus = get(F_ACAUSALE); const TString& a_caus = get(F_ACAUSALE);
const bool provv = get_bool(F_PROVVIS); const bool provv = get_bool(F_PROVVIS);
conto.set(gm, F_GRUPPO, F_CONTO, F_SOTTOCONTO, 0, F_DESSOTTOC); conto.set(*_gm, F_GRUPPO, F_CONTO, F_SOTTOCONTO, 0, F_DESSOTTOC);
gm.grid().read(conto, annoes, da_data, a_data, da_caus, a_caus, provv); _gm->grid().read(conto, annoes, da_data, a_data, da_caus, a_caus, provv);
gm.run(); _gm->run();
} }
/////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////
// TMastrini_video // TMastrini_video
/////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////
class TMastrini_video : public TApplication class TMastrini_video : public TSkeleton_application
{ {
TQuery_mask* _qm; TQuery_mask* _qm;
TGrid_mask* _gm; TGrid_mask* _gm;
protected: protected:
virtual bool create(); virtual bool create();
virtual void main_loop();
virtual bool destroy(); virtual bool destroy();
virtual bool menu(MENU_TAG);
public:
}; };
bool TMastrini_video::create() bool TMastrini_video::create()
{ {
xvtil_statbar_set("", TRUE); xvtil_statbar_set("", TRUE);
open_files(LF_RMOV, LF_MOV, LF_CAUSALI, 0); open_files(LF_RMOV, LF_MOV, LF_CAUSALI, LF_SALDI, LF_PCON, 0);
open_files(LF_SALDI, LF_PCON, 0);
_qm = new TQuery_mask;
_gm = new TGrid_mask; _gm = new TGrid_mask;
_qm = new TQuery_mask(_gm);
dispatch_e_menu(BAR_ITEM(1)); return TSkeleton_application::create();
return true;
} }
bool TMastrini_video::destroy() bool TMastrini_video::destroy()
{ {
delete _gm;
delete _qm; delete _qm;
delete _gm;
return true; return TSkeleton_application::destroy();
} }
bool TMastrini_video::menu(MENU_TAG mt) void TMastrini_video::main_loop()
{
if (mt == BAR_ITEM(1))
{ {
TQuery_mask& qm = *_qm; TQuery_mask& qm = *_qm;
@ -2669,41 +2674,17 @@ bool TMastrini_video::menu(MENU_TAG mt)
} }
const TEsercizi_contabili esercizi; const TEsercizi_contabili esercizi;
TDate inies, fines;
int codesc = qm.get_int(F_ESERCIZIO); int codesc = qm.get_int(F_ESERCIZIO);
if (codesc <= 0) if (!esercizi.exist(codesc))
codesc = esercizi.last(); codesc = esercizi.last();
if (esercizi.exist(codesc)) esercizi.code2range(codesc, inies, fines);
{
const TEsercizio& esercizio = esercizi.esercizio(codesc);
qm.set(F_ESERCIZIO, codesc); qm.set(F_ESERCIZIO, codesc);
qm.set(F_DADATA, esercizio.inizio()); qm.set(F_DADATA, inies);
qm.set(F_ADATA, esercizio.fine()); qm.set(F_ADATA, fines);
}
KEY key = 0; while (qm.run() == K_ENTER)
while (key != K_QUIT) qm.do_query();
{
key = qm.run();
switch (key)
{
case K_ENTER:
disable_menu_item(M_FONT);
qm.do_query(*_gm);
enable_menu_item(M_FONT);
break;
default:
break;
}
}
return false;
}
else
{
_gm->grid().set_colors();
}
return true;
} }
/////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////

View File

@ -13,22 +13,13 @@ BEGIN
PICTURE BMP_LENTE PICTURE BMP_LENTE
END END
BUTTON DLG_INFO 10 2 BUTTON DLG_CONFIG 10 2
BEGIN BEGIN
PROMPT -35 -11 "~Info" PROMPT -25 -11 "Opzioni"
PICTURE BMP_INFO PICTURE BMP_CONFIG
END END
BUTTON DLG_HELP 10 2 #include <helpbar.h>
BEGIN
PROMPT -45 -11 "~Help"
PICTURE BMP_HELP
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -55 -11 ""
END
ENDPAGE ENDPAGE