Patch level : 2.2 nopatch

Files correlati     : ca3.exe
Ricompilazione Demo : [ ]
Commento            :

Modifiche alle maschere


git-svn-id: svn://10.65.10.50/trunk@13080 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 2005-05-12 22:17:46 +00:00
parent 8af42db24f
commit 0081b04231
5 changed files with 91 additions and 127 deletions

View File

@ -28,12 +28,11 @@ int TPrint_mastrini_ca_mask::create_page2_sheet(int lf, int& y, short& dlg, bool
TSheet_field& sf = sfield(F_RIGHE);
TMask& sm = sf.sheet_mask();
const int h = ca_create_fields(sm, 1, lf, 1, y, dlg, dlg+50);
// ca_create_fields(*this, 1, lf, 1, y+12, dlg+ini_fin_offset , dlg+cdc_des_offset+ini_fin_offset);
const int h = ca_create_fields(sm, 0, lf, 1, y, dlg, dlg+50);
for (int i = 0; i < h; i++)
{
TEdit_field& fld = efield(dlg+i);
TEdit_field& fld = sm.efield(dlg+i);
int logic = lf;
if (logic == LF_FASI)
{
@ -59,19 +58,28 @@ int TPrint_mastrini_ca_mask::create_page2_sheet(int lf, int& y, short& dlg, bool
fld.check_type(required ? CHECK_REQUIRED : CHECK_NORMAL);
TEdit_field& dfld = efield(dlg+50+i);
TEdit_field& dfld = sm.efield(dlg+50+i);
dfld.set_field(EMPTY_STRING); // Toglie campi che fan saltare gli output!
//settaggio dei gruppi
TMask_field& da = field(dlg + i);
da.set_group(1);
TMask_field& a = field(dlg + i + 50);
a.set_group(2);
}
y += h+1;
dlg += h;
for (short id = S_CON4+100; id >= S_CDC1+100; id--)
{
const int pos = sm.id2pos(id);
if (pos >= 0)
{
TMask_field& f = sm.fld(pos);
const int size = f.size();
const TString& prompt = f.prompt();
sf.set_column_header(id, prompt);
sf.set_column_justify(id, f.is_kind_of(CLASS_REAL_FIELD));
sf.set_column_width(id, (max(3+size, prompt.len()+1)) * CHARX);
}
else
sf.delete_column(id);
}
return h;
}
@ -116,26 +124,6 @@ void TPrint_mastrini_ca_mask::create_page2()
if (fasinfo.levels() > 0 && fasinfo.parent() <= 0)
create_page2_sheet(LF_FASI, y, dlg, fsc_req);
//ordinatore delle colonne
/* for (short id = S_CON4+100; id >= S_CDC1+100; id--)
{
const int pos = sm.id2pos(id);
if (pos >= 0)
{
TMask_field& f = sm.fld(pos);
const int size = f.size();
const TString& prompt = f.prompt();
sf.set_column_header(id, prompt);
sf.set_column_justify(id, f.is_kind_of(CLASS_REAL_FIELD));
sf.set_column_width(id, (max(3+size, prompt.len()+1)) * CHARX);
}
else
{
sf.delete_column(id);
}
}*/
}
@ -147,7 +135,7 @@ TPrint_mastrini_ca_mask::TPrint_mastrini_ca_mask()
const int logicnum = use_pdcc ? LF_PCON : LF_PCONANA;
const int nfields = ca_create_fields(*this, 0, logicnum, 2, 5, F_CDC1_INI, F_DES1_INI, 0x0, "#DACONTO");
ca_create_fields(*this, 0, logicnum, 2, 5+nfields+2, F_CDC1_FIN, F_DES1_FIN, 0x0, "#ACONTO");
ca_create_fields(*this, 0, logicnum, 2, 11, F_CDC1_FIN, F_DES1_FIN, 0x0, "#ACONTO");
for (int i = 0; i < nfields; i++)
{

View File

@ -134,16 +134,11 @@ END
ENDPAGE
PAGE "CdC/Cms/Fas" -1 -1 78 20
GROUPBOX DLG_NULL 76 20
BEGIN
PROMPT 0 0 "@bSelezione CdC / Commesse /Fasi"
END
PAGE "Selezioni" -1 -1 78 20
SPREADSHEET F_RIGHE -1 -2
BEGIN
PROMPT 0 5 ""
PROMPT 0 2 ""
ITEM "Cdc 1"
ITEM "Cdc 2"
ITEM "Cdc 3"

View File

@ -28,11 +28,11 @@ int TPrint_bilancio_ca_mask::create_page2_sheet(int lf, int& y, short& dlg, bool
TSheet_field& sf = sfield(F_RIGHE);
TMask& sm = sf.sheet_mask();
const int h = ca_create_fields(sm, 1, lf, 1, y, dlg, dlg+50);
const int h = ca_create_fields(sm, 0, lf, 1, y, dlg, dlg+50);
for (int i = 0; i < h; i++)
{
TEdit_field& fld = efield(dlg+i);
TEdit_field& fld = sm.efield(dlg+i);
int logic = lf;
if (logic == LF_FASI)
{
@ -58,19 +58,28 @@ int TPrint_bilancio_ca_mask::create_page2_sheet(int lf, int& y, short& dlg, bool
fld.check_type(required ? CHECK_REQUIRED : CHECK_NORMAL);
TEdit_field& dfld = efield(dlg+50+i);
TEdit_field& dfld = sm.efield(dlg+50+i);
dfld.set_field(EMPTY_STRING); // Toglie campi che fan saltare gli output!
//settaggio dei gruppi
TMask_field& da = field(dlg + i);
da.set_group(1);
TMask_field& a = field(dlg + i + 50);
a.set_group(2);
}
y += h+1;
dlg += h;
for (short id = S_CON4+100; id >= S_CDC1+100; id--)
{
const int pos = sm.id2pos(id);
if (pos >= 0)
{
TMask_field& f = sm.fld(pos);
const int size = f.size();
const TString& prompt = f.prompt();
sf.set_column_header(id, prompt);
sf.set_column_justify(id, f.is_kind_of(CLASS_REAL_FIELD));
sf.set_column_width(id, (max(3+size, prompt.len()+1)) * CHARX);
}
else
sf.delete_column(id);
}
return h;
}
@ -145,10 +154,9 @@ TPrint_bilancio_ca_mask::TPrint_bilancio_ca_mask()
const bool use_pdcc = cfg.get_bool("UsePdcc");
const int logicnum = use_pdcc ? LF_PCON : LF_PCONANA;
const int y = 1;
const int nfields = ca_create_fields(*this, 1, logicnum, 2, y, F_CDC1_INI, F_DES1_INI, 0x0, "#DACONTO");
ca_create_fields(*this, 1, logicnum, 2, y+nfields+2, F_CDC1_FIN, F_DES1_FIN, 0x0, "#ACONTO");
const int nfields = ca_create_fields(*this, 0, logicnum, 2, 11, F_CDC1_INI, F_DES1_INI, 0x0, "#DACONTO");
ca_create_fields(*this, 0, logicnum, 2, 17, F_CDC1_FIN, F_DES1_FIN, 0x0, "#ACONTO");
for (int i = 0; i < nfields; i++)
{

View File

@ -8,7 +8,6 @@
#define F_ANNO 304
#define F_BILANCIO 105
#define F_STAMPA 107
#define F_DATALIM 308
#define F_CODICI 309
#define F_SALDO 310
#define F_STAMPAV 311

View File

@ -56,124 +56,98 @@ BEGIN
CHECKTYPE NORMAL
WARNING "L'esercizio non esiste"
ADD RUN cg0 -5 esc
MESSAGE EMPTY SHOW,6@|HIDE,7@|K_SPACE,F_STAMPA
MESSAGE HIDE,6@|SHOW,7@|K_SPACE,F_STAMPA
END
RADIOBUTTON F_BILANCIO 37
LIST F_BILANCIO 22
BEGIN
PROMPT 2 5 "@bTipo bilancio"
PROMPT 2 4 "Tipo bilancio"
HELP "Indicare il tipo di bilancio da stampare"
ITEM "1|Bilancio a sezioni contrapposte"
MESSAGE HIDE,F_STAMPAV|RESET,F_STAMPAV|HIDE,F_DATADA|RESET,F_DATADA
MESSAGE HIDE,F_DATAA|RESET,F_DATAA
MESSAGE HIDE,96|HIDE,97|HIDE,98|HIDE,99
MESSAGE SHOW,F_STAMPA|K_SPACE,F_STAMPA
ITEM "2|Bilancio di verifica"
MESSAGE HIDE,F_STAMPA|RESET,F_STAMPA
MESSAGE HIDE,F_DATALIM|RESET,F_DATALIM
MESSAGE HIDE,F_CODICI|RESET,F_CODICI|HIDE,F_SALDO|RESET,F_SALDO
MESSAGE HIDE,F_STAMPAV|RESET,F_STAMPAV
MESSAGE SHOW,F_VERIFICA|K_SPACE,F_VERIFICA
MESSAGE SHOW,96|SHOW,97|SHOW,98|SHOW,99
ITEM "1|A sezioni contrapposte"
MESSAGE HIDE,4@|RESET,4@|SHOW,3@
ITEM "2|Di verifica"
MESSAGE SHOW,4@|HIDE,3@|K_SPACE,F_STAMPA
END
RADIOBUTTON F_STAMPA 28
LIST F_STAMPA 22
BEGIN
PROMPT 41 5 "@bTipo stampa"
PROMPT 41 4 "Tipo stampa"
HELP "Indicare il tipo di stampa"
ITEM "1|Per date limite"
MESSAGE SHOW,F_DATALIM|SHOW,F_CODICI|SHOW,F_SALDO
MESSAGE SHOW,5@|K_SPACE,F_BILANCIO
ITEM "2|All'ultima immissione"
MESSAGE HIDE,F_DATALIM|RESET,F_DATALIM
MESSAGE SHOW,F_CODICI|SHOW,F_SALDO
MESSAGE HIDE,5@|RESET,5@
END
DATE F_DATALIM
GROUPBOX DLG_NULL 40 3
BEGIN
PROMPT 2 9 "Data limite "
HELP "Data fino alla quale si vuole la stampa"
PROMPT 0 5 "@bData operazione"
GROUP 6
END
BOOLEAN F_CODICI
GROUPBOX DLG_NULL 40 3
BEGIN
PROMPT 2 10 "Non stampare codici conti "
HELP "Indicare se non si devono stampare i codici dei conti"
END
BOOLEAN F_SALDO
BEGIN
PROMPT 33 10 "Non stampare movimenti con saldo a zero "
HELP "Indicare se non si devono stampare i movimenti con saldo nullo"
END
TEXT 96
BEGIN
PROMPT 2 10 "Dalla data competenza "
END
TEXT 97
BEGIN
PROMPT 38 10 "Alla data competenza "
END
TEXT 98
BEGIN
PROMPT 2 10 "Dalla data operazione "
END
TEXT 99
BEGIN
PROMPT 38 10 "Alla data operazione "
PROMPT 0 5 "@bData competenza"
GROUP 7
END
DATE F_DATADA
BEGIN
PROMPT 24 10 ""
PROMPT 2 6 "Dal "
HELP "Data dalla quale iniziare la stampa"
GROUP 4 5
END
DATE F_DATAA
BEGIN
PROMPT 60 10 ""
PROMPT 20 6 "Al "
GROUP 5
END
LIST F_STAMPAMPROV 15
LIST F_STAMPAMPROV 20
BEGIN
PROMPT 2 11 "Bilancio "
PROMPT 41 6 "Bilancio "
ITEM "1|Preventivo"
ITEM "2|Consuntivo"
ITEM "3|Raffronto"
GROUP 3
END
RADIOBUTTON F_STAMPAV 36
LIST F_STAMPAV 20
BEGIN
PROMPT 2 12 "@bTipo stampa per bilancio provvisorio"
ITEM "1|Conti movimentati"
ITEM "2|Conti con saldo diverso da zero"
ITEM "3|Tutti i conti"
PROMPT 41 6 "Tipo stampa"
ITEM "1|Movimentati"
ITEM "2|Con saldo <> da 0"
ITEM "3|Tutti"
GROUP 4
END
BOOLEAN F_CODICI
BEGIN
PROMPT 2 8 "Non stampare codici conti "
HELP "Indicare se non si devono stampare i codici dei conti"
GROUP 4
END
GROUPBOX DLG_NULL 78 6
BEGIN
PROMPT 0 10 "@bDa:"
END
GROUPBOX DLG_NULL 78 6
BEGIN
PROMPT 0 16 "@bA:"
END
ENDPAGE
PAGE "Parametri" -1 -1 74 20
PAGE "Selezioni" -1 -1 74 20
GROUPBOX DLG_NULL 76 6
BEGIN
PROMPT 0 0 "@bDa:"
END
GROUPBOX DLG_NULL 76 6
BEGIN
PROMPT 0 6 "@bA:"
END
GROUPBOX DLG_NULL 76 11
BEGIN
PROMPT 0 12 "@bSelezione CdC / Commesse / Fasi"
END
SPREADSHEET F_RIGHE -1 -2
BEGIN
PROMPT 0 5 ""
PROMPT 0 2 ""
ITEM "Cdc 1"
ITEM "Cdc 2"
ITEM "Cdc 3"