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

- MI6134 stampa bilancio IV dir. CEE.

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

3
cg/cg1500a.uml
View File

@ -38,7 +38,8 @@ BEGIN
DISPLAY "Data inizio esercizio" D0
DISPLAY "Data fine esercizio" D1
OUTPUT F_ANNO CODTAB
FLAGS "Z"
FLAGS "Z"
CHECKTYPE REQUIRED
ADD RUN cg0 -5 esc
END

120
cg/cg1600.cpp
View File

@ -706,22 +706,32 @@ bool tipo_bilancio (TMask_field& f, KEY key)
}
else
if (tipo_bil == 2)
{
if (anno != 0)
{
if (tipo_stampa == 1)
{
f.mask().show (96);
f.mask().show (97);
f.mask().hide (98);
f.mask().hide (99);
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
if (anno == 0)
{
f.mask().show(98);
f.mask().show(99);
f.mask().hide(96);
f.mask().hide(97);
}
{
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)
f.mask().show(F_QUADRATURA);
@ -737,8 +747,14 @@ bool anno_esercizio (TMask_field& f, KEY key)
if (key == K_TAB || f.focusdirty())
{
int tipo_stp;
tipo_bil = f.mask().get_int(F_TIPOBIL);
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)
{
f.mask().hide (98);
@ -749,21 +765,31 @@ bool anno_esercizio (TMask_field& f, KEY key)
else
if (tipo_bil == 2)
{
if (anno != 0)
if (tipo_stp == 1)
{
f.mask().show (96);
f.mask().show (97);
f.mask().hide (98);
f.mask().hide (99);
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
if (anno == 0)
{
f.mask().show(98);
f.mask().show(99);
f.mask().hide(96);
f.mask().hide(97);
}
{
f.mask().hide (98);
f.mask().hide (99);
f.mask().hide(96);
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");
return FALSE;
}
}
if (k == K_SPACE)
{
{
int anno = f.mask().get_int(F_ANNOESE);
tipo_bil = f.mask().get_int(F_TIPOBIL);
if (tipo_bil == 1)
tipo_stampa = f.mask().get_int(F_TIPOSTAMPA);
else
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)
f.mask().show(F_QUADRATURA);
else

2
cg/cg1600a.uml
View File

@ -89,7 +89,7 @@ BEGIN
MESSAGE HIDE,F_DATALIM
MESSAGE RESET,F_DATALIM
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"
MESSAGE HIDE,F_DATALIM|HIDE,F_DATAINI|HIDE,F_DATAFINE
MESSAGE RESET,F_DATAINI|RESET,F_DATALIM|RESET,F_DATAFINE