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:
parent
569760adf1
commit
03bab78e6b
@ -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
|
||||||
{
|
{
|
||||||
|
Loading…
x
Reference in New Issue
Block a user