Correzione errori MI3443 e MI3442, per stampare il mese 13 (annuale)

nel riepilogo progressivi IVA.


git-svn-id: svn://10.65.10.50/trunk@3207 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-07-19 09:55:18 +00:00
parent e84654a9cc
commit 5b3f0b05eb
2 changed files with 32 additions and 12 deletions

View File

@ -286,31 +286,36 @@ void TProgressivi_iva::look_pim()
switch(tipo)
{
case acq_norm:
_gen_array.add_riga(codiva,ZERO,ZERO,imponibile,imposta,ZERO,ZERO);
if (_st_inizio_anno && mese == _mese) //lo metto in un array a parte
if (_mese != 13)
_gen_array.add_riga(codiva,ZERO,ZERO,imponibile,imposta,ZERO,ZERO);
if ((_st_inizio_anno && mese == _mese) || _mese == 13) //lo metto in un array a parte
_gen1_array.add_riga(codiva,ZERO,ZERO,imponibile,imposta,ZERO,ZERO);
break;
case vend_norm:
_gen_array.add_riga(codiva,imponibile,imposta,ZERO,ZERO,ZERO,ZERO);
if (_st_inizio_anno && mese == _mese) //lo metto in un array a parte
if (_mese != 13)
_gen_array.add_riga(codiva,imponibile,imposta,ZERO,ZERO,ZERO,ZERO);
if ((_st_inizio_anno && mese == _mese) || _mese == 13) //lo metto in un array a parte
_gen1_array.add_riga(codiva,imponibile,imposta,ZERO,ZERO,ZERO,ZERO);
break;
case bolle_doganali:
_gen_array.add_riga(codiva,ZERO,ZERO,ZERO,ZERO,imponibile,imposta);
if (_st_inizio_anno && mese == _mese)
if (_mese != 13)
_gen_array.add_riga(codiva,ZERO,ZERO,ZERO,ZERO,imponibile,imposta);
if ((_st_inizio_anno && mese == _mese) || _mese == 13)
_gen1_array.add_riga(codiva,ZERO,ZERO,ZERO,ZERO,imponibile,imposta);
break;
case acq_amm_ultdetr:
{
real detr = imponibile * real(0.06);
_iva_array.add_riga(tipo,imponibile,imposta,detr);
if (_st_inizio_anno && mese == _mese)
if (_mese != 13)
_iva_array.add_riga(tipo,imponibile,imposta,detr);
if ((_st_inizio_anno && mese == _mese) || _mese == 13)
_iva1_array.add_riga(tipo,imponibile,imposta,detr);
}
break;
default:
_iva_array.add_riga(tipo,imponibile,imposta,ZERO);
if (_st_inizio_anno && mese == _mese)
if (_mese != 13)
_iva_array.add_riga(tipo,imponibile,imposta,ZERO);
if ((_st_inizio_anno && mese == _mese) || _mese == 13)
_iva1_array.add_riga(tipo,imponibile,imposta,ZERO);
break;
}
@ -1050,6 +1055,9 @@ void TProgressivi_iva::preprocess_header()
*/
if (_st_inizio_anno)
{
if (_mese == 13 || (_mese == 12 && !_prima_pagina))
set_header(soh++, "Riepilogo progressivi IVA annuale %d Cod. Att. %s %s", _anno, (const char*) _cod_att, (const char*) descr);
else
if (_prima_pagina)
set_header(soh++, "Riepilogo progressivi IVA del periodo %s %d Cod. Att. %s %s", itom(_mese), _anno, (const char*) _cod_att, (const char*) descr);
else set_header(soh++, "Riepilogo progressivi IVA al Mese di: %s %d Cod. Att. %s %s", itom(_mese), _anno, (const char*) _cod_att, (const char*) descr);
@ -1065,7 +1073,7 @@ print_action TProgressivi_iva::postprocess_page(int file, int counter)
{
case stampa:
{
if (_st_inizio_anno)
if (_st_inizio_anno && _mese != 13)
if (_prima_pagina)
{
_prima_pagina = FALSE;

View File

@ -49,7 +49,19 @@ END
LISTBOX F_MESE 11
BEGIN
PROMPT 2 7 "Mese riepilogo "
FLAGS "AM"
ITEM "1|Gennaio" MESSAGE ENABLE,F_STAMPA
ITEM "2|Febbraio" MESSAGE ENABLE,F_STAMPA
ITEM "3|Marzo" MESSAGE ENABLE,F_STAMPA
ITEM "4|Aprile" MESSAGE ENABLE,F_STAMPA
ITEM "5|Maggio" MESSAGE ENABLE,F_STAMPA
ITEM "6|Giugno" MESSAGE ENABLE,F_STAMPA
ITEM "7|Luglio" MESSAGE ENABLE,F_STAMPA
ITEM "8|Agosto" MESSAGE ENABLE,F_STAMPA
ITEM "9|Settembre" MESSAGE ENABLE,F_STAMPA
ITEM "10|Ottobre" MESSAGE ENABLE,F_STAMPA
ITEM "11|Novembre" MESSAGE ENABLE,F_STAMPA
ITEM "12|Dicembre" MESSAGE ENABLE,F_STAMPA
ITEM "13|Annuale" MESSAGE "X", F_STAMPA|DISABLE,F_STAMPA
END
BOOLEAN F_STAMPA