Patch level :10.0
Files correlati :lv2.exe Ricompilazione Demo : [ ] Commento :No patch git-svn-id: svn://10.65.10.50/trunk@19351 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
a37b2d1c70
commit
74df405d12
@ -742,6 +742,24 @@ public:
|
|||||||
|
|
||||||
TFatturazione_msk::TFatturazione_msk():TAutomask("lv2500a")
|
TFatturazione_msk::TFatturazione_msk():TAutomask("lv2500a")
|
||||||
{
|
{
|
||||||
|
// Imposto il periodo di fatturazione al primo del mese precedente se la data odierna
|
||||||
|
// è inferiore al 10 del mese corrente, altrimenti la imposto al primo del mese corrente.
|
||||||
|
|
||||||
|
TDate data(TODAY);
|
||||||
|
if (data.day()<=10)
|
||||||
|
{
|
||||||
|
data.addmonth(-1);
|
||||||
|
data.set_day(1);
|
||||||
|
set(F_DADATA,data);
|
||||||
|
data.set_end_month();
|
||||||
|
set(F_ADATA,data);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
set(F_ADATA,data);
|
||||||
|
data.set_day(1);
|
||||||
|
set(F_DADATA,data);
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
/////////////////////////////////////
|
/////////////////////////////////////
|
||||||
|
@ -15,7 +15,6 @@ END
|
|||||||
DATE F_ADATA
|
DATE F_ADATA
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 45 1 "al "
|
PROMPT 45 1 "al "
|
||||||
FLAGS "A"
|
|
||||||
END
|
END
|
||||||
|
|
||||||
DATE F_DATAFAT
|
DATE F_DATAFAT
|
||||||
@ -82,10 +81,10 @@ END
|
|||||||
RADIOBUTTON F_PERFAT 1 70
|
RADIOBUTTON F_PERFAT 1 70
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 7 "@bPeriodicità di fatturazione "
|
PROMPT 2 7 "@bPeriodicità di fatturazione "
|
||||||
ITEM "0|Giornaliera"
|
|
||||||
ITEM "1|Settimanale"
|
|
||||||
ITEM "2|Quindicinale"
|
|
||||||
ITEM "3|Mensile"
|
ITEM "3|Mensile"
|
||||||
|
ITEM "2|Quindicinale"
|
||||||
|
ITEM "1|Settimanale"
|
||||||
|
ITEM "0|Giornaliera"
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
Loading…
x
Reference in New Issue
Block a user