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:
parent
8af42db24f
commit
0081b04231
@ -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++)
|
||||
{
|
||||
|
@ -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"
|
||||
|
@ -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++)
|
||||
{
|
||||
|
@ -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
|
||||
|
126
ca/ca3300a.uml
126
ca/ca3300a.uml
@ -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"
|
||||
|
Loading…
x
Reference in New Issue
Block a user