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

Patch level : 2.2 nopatch

Browse Source 
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

50
ca/ca3200.cpp
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); TSheet_field& sf = sfield(F_RIGHE);
TMask& sm = sf.sheet_mask(); 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);
// ca_create_fields(*this, 1, lf, 1, y+12, dlg+ini_fin_offset , dlg+cdc_des_offset+ini_fin_offset);
for (int i = 0; i < h; i++) for (int i = 0; i < h; i++)
{ {
TEdit_field& fld = efield(dlg+i); TEdit_field& fld = sm.efield(dlg+i);
int logic = lf; int logic = lf;
if (logic == LF_FASI) 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); 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! 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; y += h+1;
dlg += h; 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; return h;
} }
@ -116,26 +124,6 @@ void TPrint_mastrini_ca_mask::create_page2()
if (fasinfo.levels() > 0 && fasinfo.parent() <= 0) if (fasinfo.levels() > 0 && fasinfo.parent() <= 0)
create_page2_sheet(LF_FASI, y, dlg, fsc_req); 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 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"); 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++) for (int i = 0; i < nfields; i++)
{ {

9
ca/ca3200a.uml
View File

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

32
ca/ca3300.cpp
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); TSheet_field& sf = sfield(F_RIGHE);
TMask& sm = sf.sheet_mask(); 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++) for (int i = 0; i < h; i++)
{ {
TEdit_field& fld = efield(dlg+i); TEdit_field& fld = sm.efield(dlg+i);
int logic = lf; int logic = lf;
if (logic == LF_FASI) 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); 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! 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; y += h+1;
dlg += h; 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; return h;
} }
@ -145,10 +154,9 @@ TPrint_bilancio_ca_mask::TPrint_bilancio_ca_mask()
const bool use_pdcc = cfg.get_bool("UsePdcc"); const bool use_pdcc = cfg.get_bool("UsePdcc");
const int logicnum = use_pdcc ? LF_PCON : LF_PCONANA; 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"); const int nfields = ca_create_fields(*this, 0, logicnum, 2, 11, 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"); ca_create_fields(*this, 0, logicnum, 2, 17, F_CDC1_FIN, F_DES1_FIN, 0x0, "#ACONTO");
for (int i = 0; i < nfields; i++) for (int i = 0; i < nfields; i++)
{ {

1
ca/ca3300a.h
View File

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

126
ca/ca3300a.uml
View File

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