- 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:
ale 1996-11-05 08:11:31 +00:00
parent 4779f273e5
commit 1050a335fc
3 changed files with 94 additions and 31 deletions

View File

@ -39,6 +39,7 @@ BEGIN
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

View File

@ -706,6 +706,8 @@ bool tipo_bilancio (TMask_field& f, KEY key)
} }
else else
if (tipo_bil == 2) if (tipo_bil == 2)
{
if (tipo_stampa == 1)
{ {
if (anno != 0) if (anno != 0)
{ {
@ -723,6 +725,14 @@ bool tipo_bilancio (TMask_field& f, KEY key)
f.mask().hide(97); 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
@ -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);
@ -748,6 +764,8 @@ bool anno_esercizio (TMask_field& f, KEY key)
} }
else else
if (tipo_bil == 2) if (tipo_bil == 2)
{
if (tipo_stp == 1)
{ {
if (anno != 0) if (anno != 0)
{ {
@ -765,6 +783,14 @@ bool anno_esercizio (TMask_field& f, KEY key)
f.mask().hide(97); f.mask().hide(97);
} }
} }
else
{
f.mask().hide (98);
f.mask().hide (99);
f.mask().hide(96);
f.mask().hide(97);
}
}
} }
if (key == K_TAB) if (key == K_TAB)
@ -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