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

Correzione MI3535 relativo alla scelta ditta non funzionante.

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@4107 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1997-01-31 09:29:15 +00:00
parent 3331b0f3c4
commit 63afac8ee7
1 changed files with 5 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
cg/cg0400.cpp
View File

@ -5,6 +5,7 @@
#include <printapp.h>
#include <tabutil.h>
#include <utility.h>
#include <prefix.h>
#include "cg0.h"
#include "cg0400.h"
@ -114,7 +115,7 @@ bool TIva_array::add_riga(const tiporec& tipo, const real& imponibile,
class TProgressivi_iva : public TPrintapp
{
TTable* _tabpim, * _tabreg, * _tabais, * _tablia;
TTable* _tablia;
TLocalisamfile* _nditte, * _anag, * _com, * _attiv;
TMask* _msk;
TDate _data;
@ -218,9 +219,6 @@ char TProgressivi_iva::look_lia(long ditta)
bool TProgressivi_iva::user_create()
{
_tabpim = new TTable(TAB_PIM);
_tabreg = new TTable(TAB_REG);
_tabais = new TTable("%AIS");
_tablia = new TTable("%LIA");
_anag = new TLocalisamfile(LF_ANAG);
_nditte = new TLocalisamfile(LF_NDITTE);
@ -236,9 +234,6 @@ bool TProgressivi_iva::user_create()
bool TProgressivi_iva::user_destroy()
{
delete _tabpim;
delete _tabreg;
delete _tabais;
delete _tablia;
delete _anag;
delete _nditte;
@ -607,6 +602,7 @@ bool TProgressivi_iva::set_print(int m)
{
_sospmsk = _tipo_aliq = _tipo_attiv = 0;
_codditta = msk.get_long(F_CODDITTA);
prefix().set_codditta(_codditta);
_annoiva = msk.get_int(F_ANNO);
_tipoprog = msk.get_int(F_TIPO); // 1 <=> vendite; 2 <=> acquisti
_livelloprog = msk.get_int(F_LIVELLO); // 1 <=> aliquota; 2 <=> attivita'
@ -631,7 +627,8 @@ bool TProgressivi_iva::set_print(int m)
_datast = msk.get(F_DATASTAMPA);
_mese = msk.get_int(F_MESE);
_st_inizio_anno = msk.get_bool(F_STAMPA);
prefix().set_codditta(_codditta);
TLocalisamfile attiv(LF_ATTIV);
attiv.zero();
attiv.put(ATT_CODDITTA, _codditta);