Patch level :2.0 partners nopatch

Files correlati     :scp0.exe
Ricompilazione Demo : [ ]
Commento            :personalizzazione giuntolesca


git-svn-id: svn://10.65.10.50/trunk@11572 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2003-11-05 16:44:33 +00:00
parent 68c9a63da0
commit 9a60b5abfd

View File

@ -1808,6 +1808,9 @@ int TExternisamfile::close()
int TExternisamfile::zap() int TExternisamfile::zap()
{ {
RecDes* rd = new RecDes;
memcpy(rd, curr().rec_des(), sizeof(RecDes));
int err = prefix().close_isamfile(_isam_handle); int err = prefix().close_isamfile(_isam_handle);
if (err == NOERR) if (err == NOERR)
{ {
@ -1815,10 +1818,12 @@ int TExternisamfile::zap()
if (err == NOERR) if (err == NOERR)
{ {
TRecnotype peod; TRecnotype peod;
err = DB_packindex(TRUE, _name, curr().rec_des(), &peod, FALSE); err = DB_packindex(TRUE, _name, rd, &peod, FALSE);
} }
_isam_handle = prefix().open_isamfile(_logicnum, _name); _isam_handle = prefix().open_isamfile(_logicnum, _name);
} }
delete rd;
return err; return err;
} }