Hi with Xdataset (dstSP.) i want to execute this SP :
Function TDMC.Exec_StoredProc(SPName, InputPar:String):String;
Var Params: TRDBParams;
AParam: TParam;
Begin
Try
Params:=TRDBParams.Create(Nil);
AParam:=TParam.Create(Params, ptInputOutput);
With AParam Do Begin
Name:='OutVal';
DataType:=ftString;
End;
InputPar:=Format('%d, ''%s''',[IntegerValue, StringValue]);
dstSP.Database.ExecSQL(
Format('EXEC %s '', %s'', @OutVal OUTPUT',[SPName, InputPar]), Params);
dstSP.Open();
Result:=Params.ParamByName('OutVal').AsString;
Finally
AParam.Free();
Params.Free();
dstSP.Close();
End;
End;
-
i receive and error on : TParam.Create(Params, ptInputOutput); ... 'invalid property'
How can i set it correctly ? -
Inputpar are correctly set ?
InputPar:=Format('%d, ''%s''',[IntegerValue, StringValue]);
AND
dstSP.Database.ExecSQL(
Format('EXEC MyProc '', %s'', @OutVal OUTPUT',[InputPar]), Params);