关于三层开发的基础问题，帮看下这个错误是什么问题　５０分

我在服务器写了个过程　insertindbgrd()
代码：function TDM_Server.insertingrid(const sqlText: WideString; var MsgReturn:
  OleVariant):WordBool; safecall;
begin
  Result := False;
  with qryTemp do
  begin
    close;
    sql.Clear;
    sql.Add(sqltext);
    ExecSQL;
    Result := true;
  end;
end;然后在客户端调用　：
procedure DBGridMode_Write(wrDBGridName: TDBGridEh; wrsection: WideString);
var
  sqltext: string;
  MsgReturn: string;
  cdstemp: TClientDataSet;
begin
  sqltext := 'insert into syst_info_dbgrid values(''' + wrsection + ''','''
    + wrdbgridname.datasource.dataset.Name + ''')';
  ShowMessage(sqltext);
  if DM_Main.scntMain.AppServer.insertindbgrd(sqltext, MsgReturn) then
  begin
    cdstemp := cdstemp.Create(wrDBGridName.DataSource.DataSet);
    with cdsTemp do
    begin
      Close;
      Open;
    end;
    cdstemp.Free;
  end;
end;报错　
---------------------------
Debugger Exception Notification
---------------------------
Project GreatClient.exe raised exception class EOleError with message 'Method 'insertindbgrd' not supported by automation object'. Process stopped. Use Step or Run to continue.
---------------------------
OK   Help   
---------------------------望大家给看下