Ver Mensaje Individual
  #4  
Antiguo 31-07-2004
ceocarbajal ceocarbajal is offline
Miembro
 
Registrado: oct 2003
Ubicación: México
Posts: 13
Reputación: 0
ceocarbajal Va por buen camino
Hola a todos,

Agradezco los comentarios que han hecho, así como su tiempo en leer el mensaje. Creo las sugerencias van bien para tecnología Cliente / Servidor, aunque se podría retomar algo para multiples capas.

Casí despues de postear este mensaje y despues de mucho buscar me encontre con la respuesta en esta página

How to execute stored procedure in client when use MIDAS

Básicamente describe un proceso a tres pasos:
1 Agregar un procedimiento a la Interfaz (Servidor de Aplicación)

procedure ExecProc(Params: Integer);

2 Escribir el código para el procedimiento en el Remote Data Module (Servidor de Aplicación)
procedure ExecProc(Params: Integer);
begin
StoredProc1.ParamByName('@Param').AsInteger := Params;
StoredProc1.ExecProc;
end;

3 En el cliente, hacer una llamada al servidor de aplicación, como la siguiente:
DComConnection1.AppServer.ExecProc(1);

Esto es bastante sencillo y funciona muy bien. Despues, dada la magnitud del proyecto, decidí crear Remote Data Modules Childs, por aquello de la división del código y la pregunta ahora fue "¿Como ejecutar un procedimiento remoto que se encuentra en un RDM Child desde el Cliente?"

Igual, realice los dos primeros pasos del proceso anterior en el RDM Child y en el punto 3 (la llamada desde el cliente al servidor de aplicación) fue:

SharedConnection.AppServer.MiProcedimiento (Param1, Param2),

Donde SharedConnection, es precisamente un componente TSharedConnection, cuya propiedad ChildName := RDMChild....

Agradezco nuevamente sus comentarios y espero que esta información le sirva a alguien más.

Un Saludo.

Alonso
Guadalajara, México
Responder Con Cita