Hola quiero ejecutar e siguiente procemiento de sqlserver, pero no me funciona podria alguien indicarme como hacerlo Gracias
Código SQL
[-]
ALTER Procedure [dbo].[sp_rever]
@p_rowid_docto int = 0,
@p_rowid_movto int,
@p_error int output,
@p_cadena_error varchar(500) output,
@p_ind_ubi_lote smallint = 0
as
begin
-- set @p_error=0
-- set @p_cadena_error = 'respuesta de este procedimiento:' + cast(@p_rowid_docto as char(1))
-- set @p_cadena_error = 'respuesta de este procedimiento:' + CAST( @p_rowid_docto as varchar);
End
y quiero saber como definir y leer las variables de salida del procedimiento
Código Delphi
[-]
Function TFPedidosCierresAplazarEntrega.Cancelar_conpromiso(p_rowid_docto,p_rowid_movto:integer; var p_cadena_error:string ):Boolean ;
var
W_p_error :string;
begin
d.sp_inv_comprom_auto_rever.Params.ParamByName('@p_rowid_docto').AsInteger:= p_rowid_docto ;
d.sp_inv_comprom_auto_rever.Params.ParamByName('@p_rowid_movto').AsInteger:= p_rowid_movto ;
d.sp_inv_comprom_auto_rever.ExecProc;
G_ERROR := d.sp_inv_comprom_auto_rever.Params.ParamByName('@p_error').AsString;
G_MSGERROR := d.sp_inv_comprom_auto_rever.Params.ParamByName('@p_cadena_error').asString ;
g_RETURN_VALUE:= d.sp_inv_comprom_auto_rever.Params.ParamByName('@RETURN_VALUE').asString ;