table.open,general sql error

function Execute: Boolean;
var
   YJPswordForm: TYJPswordForm;
begin
   Result := False;
   YJPswordForm := TYJPswordForm.Create(Application);
   try
      YJGLB.TableOperator.Open;
      if YJGLB.TableOperator.FindKey(['YJ-2000']) then begin
         if YJGLB.TableOperator.FieldByName('OPERATOR').AsString <>
            '系统管理员' then begin
            YJGLB.TableOperator.Edit;
            YJGLB.TableOperator.FieldByName('OPERATOR').AsString := '系统管理员';
         end;
      end;
      Result := YJPswordForm.ShowModal=mrOk;
   finally
      YJGLB.TableOperator.Close;
      if Result then begin
         WriteEVDaily('进入系统');
      end;
      YJPswordForm.Free;
   end;
end;
这是个子定义的函数，为什么每次执行到YJGLB.TableOperator.Open 时就会提示general sql error,而且在其他单元中只要执行到table.open就会提示这个信息，这是为什么啊，请各位指教