Corretto errore 1102

git-svn-id: svn://10.65.10.50/trunk@398 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1994-10-19 09:36:44 +00:00
parent b90dea37b6
commit 4ebf73c70b

View File

@ -98,7 +98,7 @@ public:
void incrementa_totali();
void compila_clifo();
void compila_comuni();
int my_next (TLocalisamfile*);
int my_next (TLocalisamfile&);
CG3100_application() {}
};
@ -428,13 +428,9 @@ bool filter_func_fatture (const TRelation * rel)
from.put(MOV_ANNOES, app._annoes);
to.put(MOV_ANNOES, app._annoes);
}
//if (app._data_ini.ok())
// from.put(MOV_DATAREG, app._data_ini);
from.put(MOV_TIPO, app._tipo_ini);
if (app._codice_ini != 0)
from.put(MOV_CODCF, app._codice_ini);
//if (app._data_fin.ok())
// to.put(MOV_DATAREG, app._data_fin);
to.put(MOV_TIPO, app._tipo_fin);
if (app._codice_fin != 0)
to.put(MOV_CODCF, app._codice_fin);
@ -904,8 +900,8 @@ bool CG3100_application::preprocess_page(int file,int counter)
printer().formfeed();
TLocalisamfile & file = cur->file(LF_MOV);
TRectype da (file->curr());
TRectype a (file->curr());
TRectype da (file.curr());
TRectype a (file.curr());
da.zero();
a.zero();
@ -925,7 +921,7 @@ bool CG3100_application::preprocess_page(int file,int counter)
if (_codice_fin != 0)
a.put(MOV_CODCF, _codice_fin);
if ((file->curr() >= da) && (file->curr() <= a))
if ((file.curr() >= da) && (file.curr() <= a))
{
compila_clifo();
compila_comuni();
@ -1101,7 +1097,7 @@ print_action CG3100_application::postprocess_page(int file,int count)
if ((_scelta_stampa == 0)&&(_controllo_mov_errati != 3)&&(_tot_dare != _tot_avere))
set_row(n++, "@11g%s", ERR_77);
TLocalisamfile & mov = current_cursor()->file(LF_MOV);
// TLocalisamfile & mov = current_cursor()->file(LF_MOV);
pos = current_cursor()->pos();
items = current_cursor()->items();
@ -1166,12 +1162,11 @@ print_action CG3100_application::postprocess_page(int file,int count)
case fatture:
if (file == LF_MOV)
{
long numreg;
_totdocumenti += _totdoc;
TRecnotype pos, items;
bool FINITO = FALSE;
TCursor* cur = current_cursor();
TLocalisamfile & mov = cur->file(LF_MOV);
// TLocalisamfile & mov = cur->file(LF_MOV);
pos = current_cursor()->pos();
items = current_cursor()->items();
@ -1182,7 +1177,7 @@ print_action CG3100_application::postprocess_page(int file,int count)
{
cur->save_status();
++(*cur);
long numrsucc = cur->file(LF_MOV).get_long(MOV_NUMREG);
// long numrsucc = cur->file(LF_MOV).get_long(MOV_NUMREG);
_tipoelsucc = cur->file(LF_MOV).get(MOV_TIPO);
_codclifosucc = cur->file(LF_MOV).get_long(MOV_CODCF);
--(*cur);
@ -1226,7 +1221,7 @@ print_action CG3100_application::postprocess_page(int file,int count)
}
int CG3100_application::my_next(TLocalisamfile * mov)
int CG3100_application::my_next(TLocalisamfile & mov)
{
int esito;
TString cod_reg, causale;
@ -1439,17 +1434,17 @@ bool CG3100_application::segnala_errori_ogniriga()
_numreg = current_cursor()->file(LF_MOV).get_long(MOV_NUMREG);
if (current_cursor()->is_first_match(LF_RMOVIVA))
{
record = rmoviva->recno();
rmoviva->zero();
rmoviva->put(RMI_NUMREG, _numreg);
for (rmoviva->read(); !rmoviva->eof() ;rmoviva->next())
record = rmoviva.recno();
rmoviva.zero();
rmoviva.put(RMI_NUMREG, _numreg);
for (rmoviva.read(); !rmoviva.eof() ;rmoviva.next())
{
_cod = rmoviva->get(RMI_CODIVA);
_tipod = rmoviva->get_int(RMI_TIPODET);
_impo = rmoviva->get_real(RMI_IMPONIBILE);
_impos = rmoviva->get_real(RMI_IMPOSTA);
_tipocr = rmoviva->get_int(RMI_TIPOCR);
numreg = rmoviva->get_long(RMI_NUMREG);
_cod = rmoviva.get(RMI_CODIVA);
_tipod = rmoviva.get_int(RMI_TIPODET);
_impo = rmoviva.get_real(RMI_IMPONIBILE);
_impos = rmoviva.get_real(RMI_IMPOSTA);
_tipocr = rmoviva.get_int(RMI_TIPOCR);
numreg = rmoviva.get_long(RMI_NUMREG);
if (numreg != _numreg)
break;
else
@ -1511,7 +1506,7 @@ bool CG3100_application::segnala_errori_ogniriga()
}
}
} //for
rmoviva->readat (record);
rmoviva.readat (record);
}
}
return trovato;