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

Corretto il ripristino di EOD ed EOX in caso di errore in conversione.

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@1563 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1995-07-05 15:59:35 +00:00
parent f0a7a654b7
commit 719901b5c4
1 changed files with 6 additions and 1 deletions

7
ba/bacnvid.cpp

@ -216,6 +216,7 @@ int TIsam_date_converter::convert_file(int logicnum)
const char * fp = dir.name();
TFilename old(fp);
const TRecnotype nitems = dir.eod();
const TRecnotype neox = dir.eox();
TFile f(dir.len());
old.ext("dta");
@ -329,7 +330,11 @@ int TIsam_date_converter::convert_file(int logicnum)
::remove(old);
}
// Put dir to restore original EOD and EOX.
dir.put(logicnum);
dir.get(logicnum,_lock,_nordir,_sysdirop);
dir.eod()=nitems;
dir.eox()=neox;
dir.put(logicnum,_nordir,_sysdirop);
FILE *fp = fopen((const char*)_logfile,"a");
old.ext("dta");
fprintf(fp,"File: %s (%d). %ld records non convertiti. Errore %d.\n",