Correzione errore MI3622, relativo all'impostazione anno

esercizio in ricezione da sistema nel caso non vi siano esercizi
presenti.


git-svn-id: svn://10.65.10.50/trunk@5392 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1997-10-16 14:12:18 +00:00
parent 569760adf1
commit 03bab78e6b

View File

@ -1419,27 +1419,25 @@ int TTransfer_file::annoes_datacomp(const TString& record, TDate& datacomp)
{ {
TString tmp; TString tmp;
int segn; int segn;
int ae = 0; int ae = 0, aep = 0;
tmp = record.sub(15,21); tmp = record.sub(15,21);
TString data = converti(tmp,FALSE); TString data = converti(tmp,FALSE);
_datareg = data; _datareg = data;
segn = atoi(record.sub(21,22)); segn = atoi(record.sub(21,22));
ae = date2esc(_datareg); ae = date2esc(_datareg, &aep);
if (segn == 0)
datacomp = _datareg;
if (ae != 0) if (ae != 0)
{ {
if (segn == 0)
datacomp = _datareg;
if (segn == 1) if (segn == 1)
{ {
if (ae) datafine_esprec(aep,datacomp);
ae -= 1; ae = aep;
}
datafine_esprec(ae,datacomp);
}
} }
else else
{ {