我有一个贮存程序,接受记录表作为其投入参数:
TYPE JREC is record
(
CUSTOMERID COMPANYS.COMPANYID%TYPE ,
JOBID JOBS.JOBID%TYPE,
-----
);
TYPE TJOBLIST IS TABLE OF JREC INDEX BY BINARY_INTEGER;
PROCEDURE UPDATEJOBS(JRECS IN TJOBLIST )
IS
BEGIN
FOR i IN JRECS .FIRST .. JRECS .LAST LOOP
-----PROCEDURE BODY---
Please let me know how can I call this procedure from Delphi. I am using RAD Studio 2007
You can call as this example:
DECLARE
L_TABLE TJOBLIST ;
NCOUNT PLS_INTEGER;
BEGIN
L_TABLE := TJOBLIST(); --Create table
L_TABLE.extend; --Add an element
NCOUNT := L_TABLE.COUNT();
L_TABLE(NCOUNT).CUSTOMERID := 1;
L_TABLE(NCOUNT).JOBID := 10;
L_TABLE.extend; --Add another element
NCOUNT := L_TABLE.COUNT();
L_TABLE(NCOUNT).CUSTOMERID := 2;
L_TABLE(NCOUNT).JOBID := 20;
L_TABLE.extend; --Add another element
NCOUNT := L_TABLE.COUNT();
L_TABLE(NCOUNT).CUSTOMERID := 3;
L_TABLE(NCOUNT).JOBID := 30;
--.. and so on
--Call the procedure and pass the table as a parameter
UPDATEJOBS(L_TABLE);
END;
my delphi 2009 app has a basic translation system that uses GNUGetText. i had used some win API calls to prepare the fonts. i thought it was working correctly until recently when someone from Malta ...
Ok, I m going nuts here. For the last (almost) four years, I ve been putting up with some extremely bad behavior from my Delphi 5 IDE. Problems include: Seemingly random errors in coride50.bpl ...
i would like to know if there are any solution to do this. Does anyone? The big picture: I want to access data over the web, using my delphi thin clients. But i´would like to keep my server/service ...
In Delphi, there is a function StrToInt() that converts a string to an integer value; there is also IntToStr(), which does the reverse. These functions doesn t appear to be part of Oxygene, and I can ...
What is the equivalent of SetLength using Oxygene? I m trying to size an integer array. var listIndexes: array of integer; begin setLength(listIndexes,5); // doesn t work end;
How can I monitor or visualize memory fragmentation of a delphi application?
I have consistently had IDE problems in Delphi/C++Builder for years, with every version. I usually just reboot, recompile, etc. and move on. However, I keep seeing others say that the IDE is rock ...
I was trying to speed up a certain routine in an application, and my profiler, AQTime, identified one method in particular as a bottleneck. The method has been with us for years, and is part of a "...