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

Patch level : 12.0 854

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

7
src/cg/cg2100.cpp
View File

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

2
src/cg/cg2100c.uml
View File

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

1
src/cg/cg5000a.h
View File

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

6
src/cg/cg5000a.uml
View File

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