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

Patch level :10.0

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :
personalizzazione crpa in corso


git-svn-id: svn://10.65.10.50/trunk@20369 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2010-04-22 13:51:36 +00:00
parent 3eb90d22b7
commit 5942f2b8e7
3 changed files with 86 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

52
ps/ps1001300.cpp
View File

@ -60,8 +60,22 @@ bool TVariazione_budget_mask::on_field_event(TOperable_field& o, TField_event e,
break;
case F_DATAINICMS:
case F_DATAFINECMS:
_dirty = true;
break;
case S_DATACOMP:
case S_DATAFCOMP:
if (e == fe_modify)
{
const TDate datainicms = get_date(F_DATAINICMS);
TDate datafinecms = get_date(F_DATAPRORCMS);
if (!datafinecms.ok())
datafinecms = get_date(F_DATAFINECMS);
const TDate data = o.get();
if (data < datainicms || (datafinecms.ok() && data > datafinecms))
return error_box("Le date competenza devono rientrare nella durata della commessa!");
_dirty = true;
}
break;
case DLG_CANCEL:
if (e == fe_button)
@ -83,6 +97,44 @@ bool TVariazione_budget_mask::on_field_event(TOperable_field& o, TField_event e,
check_all(!one_checked());
}
break;
case DLG_TODATAINI:
if (e == fe_button)
{
const TString& datainicms = get(F_DATAINICMS);
TSheet_field& sf_righe = sfield(F_RIGHE);
const int pos = sf_righe.cid2index(S_DATACOMP);
FOR_EACH_SHEET_ROW(sf_righe, i, riga) if (riga->get_char(0) > ' ') //solo le righe checked!!
riga->add(datainicms, pos);
sf_righe.force_update();
}
break;
case DLG_TODATAFIN:
if (e == fe_button)
{
TString datafinecms = get(F_DATAPRORCMS);
if (!datafinecms.ok())
datafinecms = get(F_DATAFINECMS);
TSheet_field& sf_righe = sfield(F_RIGHE);
const int pos = sf_righe.cid2index(S_DATAFCOMP);
FOR_EACH_SHEET_ROW(sf_righe, i, riga) if (riga->get_char(0) > ' ') //solo le righe checked!!
riga->add(datafinecms, pos);
sf_righe.force_update();
}
break;
case DLG_TOMATURATO:
if (e == fe_button)
{
TSheet_field& sf_righe = sfield(F_RIGHE);
const int pos_imp = sf_righe.cid2index(S_IMPORTO);
const int pos_mat = sf_righe.cid2index(S_MATURATO);
FOR_EACH_SHEET_ROW(sf_righe, i, riga) if (riga->get_char(0) > ' ') //solo le righe checked!!
riga->add(riga->get(pos_mat), pos_imp);
sf_righe.force_update();
}
break;
default:
break;
}

3
ps/ps1001300a.h
View File

@ -13,6 +13,9 @@
//bottoni
#define DLG_CHECKALL 250
#define DLG_TODATAINI 251
#define DLG_TODATAFIN 252
#define DLG_TOMATURATO 253
//campi dello sheet
#define S_CHECK 101

38
ps/ps1001300a.uml
View File

@ -20,16 +20,33 @@ BEGIN
PICTURE TOOL_MULTISEL
END
BUTTON DLG_NULL 4 2
BUTTON DLG_NULL
BEGIN
PROMPT 2 1 ""
PROMPT 4 1 ""
PICTURE 0
END
//allinea alla dataini
//allinea alla data fine
BUTTON DLG_NULL 4 2
BUTTON DLG_TODATAINI
BEGIN
PROMPT 2 1 ""
PROMPT 5 1 "All.~Ini"
PICTURE TOOL_TODATAINI
END
BUTTON DLG_TODATAFIN
BEGIN
PROMPT 6 1 "All.~Fin"
PICTURE TOOL_TODATAFIN
END
BUTTON DLG_TOMATURATO
BEGIN
PROMPT 7 1 "All.~Mat"
PICTURE TOOL_TOCALC
END
BUTTON DLG_NULL
BEGIN
PROMPT 8 1 ""
PICTURE 0
END
@ -85,7 +102,7 @@ BOOL F_PROROGATA
BEGIN
PROMPT 43 2 "Prorogata"
MESSAGE FALSE CLEAR,F_DATAPRORCMS
MESSAGE ENABLE,F_DATAPRORCMS
MESSAGE TRUE ENABLE,F_DATAPRORCMS
END
DATE F_DATAPRORCMS
@ -169,16 +186,19 @@ END
STRING S_CDC 4
BEGIN
PROMPT 1 2 "Sede "
FLAGS "L"
END
STRING S_FASE 5
BEGIN
PROMPT 1 3 "Fase "
FLAGS "L"
END
STRING S_CONTO 12
BEGIN
PROMPT 1 4 "Conto "
FLAGS "L"
END
DATE S_DATACOMP
@ -199,6 +219,7 @@ END
STRING S_COSRIC 1
BEGIN
PROMPT 1 8 "Cst/Ric "
FLAGS "L"
END
NUMBER S_IMPORTO 15 2
@ -220,16 +241,19 @@ END
NUMBER S_NUMREG 7
BEGIN
PROMPT 1 12 "N. reg. "
FLAGS "L"
END
NUMBER S_NUMRIG 3
BEGIN
PROMPT 1 13 "N. riga "
FLAGS "L"
END
STRING S_TIPOMOV 1
BEGIN
PROMPT 1 14 "Tipo "
FLAGS "L"
END
ENDPAGE