我的代码：
FDStoredProc1.StoredProcName := 'aaaaa' ;
with FDStoredProc1.Params do begin
Clear;
with Add do begin
ParamType := ptInput;
DataType := ftInteger;
end;
end;
FDStoredProc1.Params[0].Value := StrToint(edit1.Text) ;
edit1.Text := FDStoredProc1.ExecFunc() ;
我在Oracle中的代码：
create or replace FUNCTION AAAAA (pn number) RETURN VARCHAR2 AS
BEGIN
update dmnv set thuong = pn ;
commit ;
RETURN '3'
END AAAAA;
运行时没有错误，但是参数NULL在Oracle Server（版本12）上。所以功能exec在服务器上带有错误的参数（真正的参数是edit1.text中的值）。我在edit1上键入了一个数字。
给参数命名。
with Add do begin
Name := 'pn';
ParamType := ptInput;
DataType := ftInteger;
end;
本文收集自互联网，转载请注明来源。
如有侵权，请联系 [email protected] 删除。
我来说两句