Patch level : 12.0 854

Files correlati     : cg2, cg5000a.msk cg2100c.msk
Commento            :
Condizionata la data di competenza costi ricavi al flag di studio "Gestione data competenza costi/ricavi"
This commit is contained in:
AlexBonazzi 2019-07-19 10:48:00 +02:00
parent 287a8da6e3
commit 62d6fe0d87
4 changed files with 13 additions and 3 deletions

View File

@ -111,6 +111,11 @@ TMask* TPrimanota_application::load_mask(int n)
m->set_handler(F_SHEETIVA, iva_handler);
m->show(F_LIQDIFF, _liqdiff);
m->set_handler(F_NUMDOCEXT, ndocext_handler);
if (ini_get_bool(CONFIG_STUDIO, "CG", "GesCompCR"))
{
m->show(F_DATACOMPCR);
m->set_handler(F_DATACOMPCR, datacompcr_handler);
}
TSheet_field& is = m->sfield(F_SHEETIVA);
is.set_notify(iva_notify);
@ -191,8 +196,6 @@ TMask* TPrimanota_application::load_mask(int n)
// Se esiste lo sheet delle rate
if (is_fattura())
{
m->set_handler(F_DATACOMPCR, datacompcr_handler);
TSheet_field& ps = m->sfield(FS_RATESHEET);
ps.set_notify(pag_notify);

View File

@ -96,7 +96,7 @@ DATE F_DATACOMPCR
BEGIN
PROMPT 1 3 "Data comp.c/r "
FIELD DATACOMPCR
FLAGS "G"
FLAGS "HG"
END
STRING F_CODCAUS 3

View File

@ -19,3 +19,4 @@
#define FLD_DESAGV 119
#define CHK_RICACQ 120
#define CHK_NOIDRG 121
#define CHK_02GESCOMPCR 122

View File

@ -160,6 +160,12 @@ BEGIN
FIELD Cg02SN
END
BOOLEAN CHK_02GESCOMPCR
BEGIN
PROMPT 3 8 "Gestione data competenza costi/ricavi"
FIELD GesCompCR
END
ENDPAGE
ENDMASK