Como ejecutar un Consulta de SQL desde la app (conectada a la DB a traves de ADO)

[[Caral]]

Código Delphi [-]
SELECT so.so_id
,so.so_des
,se.se_des
,replace(us.us_login,'TESACOM\','')+'@tesacom.net' EMAIL_DESTINATARIO
,us2.Nombre+' '+us2.Apellido RESUELTO_POR
FROM Solicitud so
,Seguimiento se
,Usuario us
,Usuario us2
WHERE so.so_id=se.so_id
AND se.se_id = (SELECT max(se_id)
FROM Seguimiento se2
WHERE se2.so_id=se.so_id)
AND se.es_id=3 --Resuelto
AND so.so_mail=0
AND so.us_id_solic=us.us_id
AND se.us_id=us2.us_id
ORDER BY 1

[[Caral]]

Hola
Bienvenido.
Pregunto:
La consulta donde la pones, directamente en el query (osea en el string) o por codigo en el programa?.
Saludos

[ContraVeneno]

Código Delphi [-]
with TuADOQuery do begin
 If active then close;
 SQL.Clear;
 SQL.Add('Select T.UnCampo, ''otro ''+T.OtroCampo');
 SQL.Add('From UnaTabla T');
 SQL.Add('Where T.ID = :ID');
 Parameters.ParamByName('ID').Value = UnEdit.Text;
 Open;
 Showmessage('Valor: '+FieldByName('UnCampo').AsString);
// First; 
 //While not EOF do begin
 //Showmessage('Valor: '+FieldByName('UnCampo').AsString);
 // Next;
 //end; //while
 //Close;
end; //with

Eso es un ejemplo de como utilizar un TADOQuery

[mibandeja]

Hola caral, gracias por la celeridad en tu respuesta.
sinceramente no estoy seguro donde introducir la consulta, supongo que desde el código del programa, es lo que tenía planeado hacer.
Saludos

[*Caro*]

Empezado por mibandeja

sinceramente no estoy seguro donde introducir la consulta, supongo que desde el código del programa, es lo que tenía planeado hacer.

Si es así entonces debes hacerlo como te indica el amigo Contraveneno, acomodando tu consulta.

Saluditos

[mibandeja]

Empezado por Caro

Si es así entonces debes hacerlo como te indica el amigo Contraveneno, acomodando tu consulta.

Saluditos

Estimada Caro,

La otra posiblidad es escribir la consulta desde el SQL Server, guardarla y luego llamarla desde el código del Delphi no es cierto?. Puede que esa variante sea mas sencilla a la hora de programar?. En caso afirmativo, como se puede levantar desde Delphi 2007 una consulta cualquiera generada desde SQL Server?.

Desde ya le agradezco la voluntad y la rapidez con la que ha respondido mi consulta anterior.

A todos les agradezco la ayuda que me estan proporcionando.

Saludos.

[ContraVeneno]

Supongo que tendría que ser un procedimiento almacenado (Stored Procedure) y por tanto no utilizarías un TADOQuery sino un TADOStoredProc

[*Caro*]

Hola de nuevo, a parte de lo que te dice el amigo ContraVeneno, supongo que también puedes guardar tu consulta como una vista y cuando quieras recuperar desde delphi lo haces como si fuera una tabla con el AdoQuery inclusive puedes utilizar un AdoTable.

Código Delphi [-]
 with ADOQuery1 do
 begin
  If active then close;  
  SQL.Clear;
  SQL.Add('Select * ');
  SQL.Add('From NombreVista');
  Open;
  Showmessage('Campo1:'+FieldByName('so_id').AsString+' Campo2:'+FieldByName(se_des').AsString);

Saluditos