- MI6134 stampa bilancio IV dir. CEE.
- MI6127 stampa bilancio. git-svn-id: svn://10.65.10.50/trunk@3863 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
4779f273e5
commit
1050a335fc
@ -38,7 +38,8 @@ BEGIN
|
|||||||
DISPLAY "Data inizio esercizio" D0
|
DISPLAY "Data inizio esercizio" D0
|
||||||
DISPLAY "Data fine esercizio" D1
|
DISPLAY "Data fine esercizio" D1
|
||||||
OUTPUT F_ANNO CODTAB
|
OUTPUT F_ANNO CODTAB
|
||||||
FLAGS "Z"
|
FLAGS "Z"
|
||||||
|
CHECKTYPE REQUIRED
|
||||||
ADD RUN cg0 -5 esc
|
ADD RUN cg0 -5 esc
|
||||||
END
|
END
|
||||||
|
|
||||||
|
120
cg/cg1600.cpp
120
cg/cg1600.cpp
@ -706,22 +706,32 @@ bool tipo_bilancio (TMask_field& f, KEY key)
|
|||||||
}
|
}
|
||||||
else
|
else
|
||||||
if (tipo_bil == 2)
|
if (tipo_bil == 2)
|
||||||
{
|
{
|
||||||
if (anno != 0)
|
if (tipo_stampa == 1)
|
||||||
{
|
{
|
||||||
f.mask().show (96);
|
if (anno != 0)
|
||||||
f.mask().show (97);
|
{
|
||||||
f.mask().hide (98);
|
f.mask().show (96);
|
||||||
f.mask().hide (99);
|
f.mask().show (97);
|
||||||
|
f.mask().hide (98);
|
||||||
|
f.mask().hide (99);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
if (anno == 0)
|
||||||
|
{
|
||||||
|
f.mask().show(98);
|
||||||
|
f.mask().show(99);
|
||||||
|
f.mask().hide(96);
|
||||||
|
f.mask().hide(97);
|
||||||
|
}
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
if (anno == 0)
|
{
|
||||||
{
|
f.mask().hide (98);
|
||||||
f.mask().show(98);
|
f.mask().hide (99);
|
||||||
f.mask().show(99);
|
f.mask().hide(96);
|
||||||
f.mask().hide(96);
|
f.mask().hide(97);
|
||||||
f.mask().hide(97);
|
}
|
||||||
}
|
|
||||||
}
|
}
|
||||||
if (tipo_bil == 2 && tipo_stampa == 1 && f.mask().get_int(F_ANNOESE) == 0)
|
if (tipo_bil == 2 && tipo_stampa == 1 && f.mask().get_int(F_ANNOESE) == 0)
|
||||||
f.mask().show(F_QUADRATURA);
|
f.mask().show(F_QUADRATURA);
|
||||||
@ -737,8 +747,14 @@ bool anno_esercizio (TMask_field& f, KEY key)
|
|||||||
|
|
||||||
if (key == K_TAB || f.focusdirty())
|
if (key == K_TAB || f.focusdirty())
|
||||||
{
|
{
|
||||||
|
int tipo_stp;
|
||||||
|
|
||||||
tipo_bil = f.mask().get_int(F_TIPOBIL);
|
tipo_bil = f.mask().get_int(F_TIPOBIL);
|
||||||
anno = f.mask().get_int(F_ANNOESE);
|
anno = f.mask().get_int(F_ANNOESE);
|
||||||
|
if (tipo_bil == 1)
|
||||||
|
tipo_stp = f.mask().get_int(F_TIPOSTAMPA);
|
||||||
|
else
|
||||||
|
tipo_stp = f.mask().get_int(F_TIPOSTAMPA1);
|
||||||
if (tipo_bil == 1)
|
if (tipo_bil == 1)
|
||||||
{
|
{
|
||||||
f.mask().hide (98);
|
f.mask().hide (98);
|
||||||
@ -749,21 +765,31 @@ bool anno_esercizio (TMask_field& f, KEY key)
|
|||||||
else
|
else
|
||||||
if (tipo_bil == 2)
|
if (tipo_bil == 2)
|
||||||
{
|
{
|
||||||
if (anno != 0)
|
if (tipo_stp == 1)
|
||||||
{
|
{
|
||||||
f.mask().show (96);
|
if (anno != 0)
|
||||||
f.mask().show (97);
|
{
|
||||||
f.mask().hide (98);
|
f.mask().show (96);
|
||||||
f.mask().hide (99);
|
f.mask().show (97);
|
||||||
|
f.mask().hide (98);
|
||||||
|
f.mask().hide (99);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
if (anno == 0)
|
||||||
|
{
|
||||||
|
f.mask().show(98);
|
||||||
|
f.mask().show(99);
|
||||||
|
f.mask().hide(96);
|
||||||
|
f.mask().hide(97);
|
||||||
|
}
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
if (anno == 0)
|
{
|
||||||
{
|
f.mask().hide (98);
|
||||||
f.mask().show(98);
|
f.mask().hide (99);
|
||||||
f.mask().show(99);
|
f.mask().hide(96);
|
||||||
f.mask().hide(96);
|
f.mask().hide(97);
|
||||||
f.mask().hide(97);
|
}
|
||||||
}
|
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
@ -803,17 +829,53 @@ bool tipo_stampa(TMask_field& f,KEY k)
|
|||||||
error_box("Nella stampa all' ultima immissione l' anno esercizio e' obbligatorio");
|
error_box("Nella stampa all' ultima immissione l' anno esercizio e' obbligatorio");
|
||||||
return FALSE;
|
return FALSE;
|
||||||
}
|
}
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|
||||||
if (k == K_SPACE)
|
if (k == K_SPACE)
|
||||||
{
|
{
|
||||||
|
int anno = f.mask().get_int(F_ANNOESE);
|
||||||
tipo_bil = f.mask().get_int(F_TIPOBIL);
|
tipo_bil = f.mask().get_int(F_TIPOBIL);
|
||||||
if (tipo_bil == 1)
|
if (tipo_bil == 1)
|
||||||
tipo_stampa = f.mask().get_int(F_TIPOSTAMPA);
|
tipo_stampa = f.mask().get_int(F_TIPOSTAMPA);
|
||||||
else
|
else
|
||||||
tipo_stampa = f.mask().get_int(F_TIPOSTAMPA1);
|
tipo_stampa = f.mask().get_int(F_TIPOSTAMPA1);
|
||||||
|
|
||||||
|
if (tipo_bil == 1)
|
||||||
|
{
|
||||||
|
f.mask().hide (98);
|
||||||
|
f.mask().hide (99);
|
||||||
|
f.mask().hide(96);
|
||||||
|
f.mask().hide(97);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
if (tipo_bil == 2)
|
||||||
|
{
|
||||||
|
if (tipo_stampa == 1)
|
||||||
|
{
|
||||||
|
if (anno != 0)
|
||||||
|
{
|
||||||
|
f.mask().show (96);
|
||||||
|
f.mask().show (97);
|
||||||
|
f.mask().hide (98);
|
||||||
|
f.mask().hide (99);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
if (anno == 0)
|
||||||
|
{
|
||||||
|
f.mask().show(98);
|
||||||
|
f.mask().show(99);
|
||||||
|
f.mask().hide(96);
|
||||||
|
f.mask().hide(97);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
f.mask().hide (98);
|
||||||
|
f.mask().hide (99);
|
||||||
|
f.mask().hide(96);
|
||||||
|
f.mask().hide(97);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
if (tipo_bil == 2 && tipo_stampa == 1 && f.mask().get_int(F_ANNOESE) == 0)
|
if (tipo_bil == 2 && tipo_stampa == 1 && f.mask().get_int(F_ANNOESE) == 0)
|
||||||
f.mask().show(F_QUADRATURA);
|
f.mask().show(F_QUADRATURA);
|
||||||
else
|
else
|
||||||
|
@ -89,7 +89,7 @@ BEGIN
|
|||||||
MESSAGE HIDE,F_DATALIM
|
MESSAGE HIDE,F_DATALIM
|
||||||
MESSAGE RESET,F_DATALIM
|
MESSAGE RESET,F_DATALIM
|
||||||
MESSAGE SHOW,F_STAMPAINT|SHOW,F_STAMPACOD|SHOW,F_STAMPAMOV
|
MESSAGE SHOW,F_STAMPAINT|SHOW,F_STAMPACOD|SHOW,F_STAMPAMOV
|
||||||
MESSAGE SHOW,F_DATAINI|SHOW,F_DATAFINE|SHOW,F_STAMPAMODULO
|
MESSAGE SHOW,F_DATAINI|SHOW,F_DATAFINE|SHOW,F_STAMPAMODULO
|
||||||
ITEM "2|All'ultima immissione"
|
ITEM "2|All'ultima immissione"
|
||||||
MESSAGE HIDE,F_DATALIM|HIDE,F_DATAINI|HIDE,F_DATAFINE
|
MESSAGE HIDE,F_DATALIM|HIDE,F_DATAINI|HIDE,F_DATAFINE
|
||||||
MESSAGE RESET,F_DATAINI|RESET,F_DATALIM|RESET,F_DATAFINE
|
MESSAGE RESET,F_DATAINI|RESET,F_DATALIM|RESET,F_DATAFINE
|
||||||
|
Loading…
x
Reference in New Issue
Block a user