procedure THISQLite_DB._work_doClose;
begin
  if id <> nil then
   begin
    sqlite3_close(id);
    id := nil;
   end;  
end;