[CORBATIN]

Hola a todos, tengo un proyecto bastante avanzado en el que utilizo delphi 6
con un remote data module y funciones y procedimientos en este.

Todos los procedimientos que tengo creados me funcionan perfectamente pero ahora he creado uno en el que recibo un parámetro de tipo string y este parámetro lo utilizo para hacer una consulta con el like, esta es la consulta:

procedure TConsultasHtml.BuscarArticulo(const Param1: WideString);
begin
  with ADOQuery1 do begin
  close;
  sql.Clear;
  sql.Add('SELECT Producciones.Fecha, Lineas.descripcion_linea, Producciones.id_articulo, '+
  'Articulos.descripcion_articulo, Producciones.Cantidad FROM (Articulos   INNER '+
  'JOIN Producciones ON Articulos.id_articulo = Producciones.id_articulo) INNER JOIN '+
  'Lineas ON Producciones.Id_linea = Lineas.Id_linea WHERE Articulos.descripcion_articulo '+
  'Like '+ Quotedstr('%'+ Param1 +'%'));
  Parameters[0].Value := Param1;
  open;
 end;
end;

Y este es el código que utilizo en el cliente a través de un clientdataset:

   cds.Close;
   FGrupo.conector.AppServer.BuscarArticulos(Ebuscar.text);
   cds.Open;

Y este es el error que me da al ejecutar dicha consulta:
Method "BuscarArticulos" not supported by automation object.

Si alguién me puede ayudar sobre el tema. Los otros procedimientos y funciones también tienen parámetros y me funcionan perfectamente, este es el único que no quiere funcionar.

Os doy a todos las gracias por vuestra ayuda, un saludo.