Return of Procedure

[Aszarael]

When we run a oracle pl/sql procedure using in/out parameters inside a Delphi 7 code we need to use it. So we need to know how to buit this method.
For example:
parameter in var1;
parameter out var2;
spr_teste(var1 in type,var2 out type);

Any suggests?

Best regards,

Isael

 

[Marco Kalter]

Create a TOracleQuery with the following SQL:

begin
   spr_teste(:var1, :var2);
end;

Declare the 2 variables, and use SetVariable / GetVariable to set and get the values:

Query.SetVariable('var1', 10);
Query.Execute;
Result := Query.GetVariable('var2');