ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/branches/udr/udr/testsuite/Test02.pas
(Generate patch)

Comparing ibx/branches/udr/udr/testsuite/Test02.pas (file contents):
Revision 379 by tony, Mon Jan 10 10:08:03 2022 UTC vs.
Revision 381 by tony, Sat Jan 15 00:06:22 2022 UTC

# Line 74 | Line 74 | var MyTestProc: TExternalProcedureWrappe
74      Results: IProcedureResults;
75   begin
76    UDRPlugin.Attachment := Attachment;
77 <  MyTestProc := UDRPlugin.GetExternalProcedure('MYTESTPROC','','fbudrtests!test_proc');
77 >  MyTestProc := UDRPlugin.makeProcedure('MYTESTPROC','','fbudrtests!test_proc');
78    try
79      writeln(OutFile,'Salary and Name of Employee 24');
80      MyTestProc.InputParams[0].AsInteger := 24;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines