PDA

Ver la Versión Completa : Ayuda para generar evento a traves de RaisError SQL


Cristhor1982
14-03-2013, 23:13:57
Hola amigos, como estan? espero que bien

les cuento tengo lo siguiente
IF EXISTS (
SELECT Cod_Sindicato
FROM Trabajadores
WHERE Vic=@Vic
AND Cod_Sucursal<>@Cod_Sucursal
)
BEGIN
SET @MSG = Char(13) + Char(13) + 'Mensaje'
RaisError (@MSG, 11, 1, 0)
Return
END

en Delphi lo siguiente

fr_clave.TB_Consulta.Close;
fr_clave.TB_Consulta.sql.Clear;
fr_clave.TB_Consulta.sql.Add('EXEC_aCTeMPLEADOSsINDICATO 1,');;
fr_clave.TB_Consulta.sql.Add(''''+ trim(copy(fr_clave.CB_Sucursales.Text, 50,100)) +''',');
fr_clave.TB_Consulta.sql.Add(''''+ USindicatos.FR_Sindicatos.TX_Codigo.Text +''',');
fr_clave.TB_Consulta.sql.Add(''''+Tx_Vic.Text +''',');
fr_clave.TB_Consulta.sql.Add(''''+ fr_clave.TX_Usuario.Text +''',0,0,0');
fr_clave.TB_Consulta.ExecSQL;


Necesito a lo que se termine de ejecutar en delphi y me envie el mensaje desde sql...Abra un modulo existente, en realidad seria solo llamar en base al mensaje desde SQL...Alguien me puede ayudar, aLGUNA IDEA


Graciias