Oracle FAQ | Your Portal to the Oracle Knowledge Grid |
Home -> Community -> Usenet -> c.d.o.server -> NT Memory fills up
I have created some procs & packages. When I call them they most of the
times work, but
sometimes the memory usage grows until I can't work anyfurther.
I am pretty new in developing in PL/SQL, so please help me: It is working under NT, Oracle 7.3.4 OWS3.0
CREATE OR REPLACE PACKAGE myPackage AS
Recordid NUMBER(6);
Naam VARCHAR2(64);
FUNCTION recordSelectNext RETURN number;
FUNCTION recordSelectInit RETURN number;
FUNCTION recordSelectClose RETURN number;
END myPackage ;
/
CREATE OR REPLACE PACKAGE BODY myPackage AS
aCursor INTEGER;
queryActive BOOLEAN;
lastStatus INTEGER;
tmp INTEGER;
sqlStatement VARCHAR2(1024);
BEGIN
IF queryActive THEN
lastStatus :=DBMS_SQL.FETCH_ROWS( aCursor); IF( lastStatus >0 ) THEN DBMS_SQL.COLUMN_VALUE( aCursor, 1, RecordID); DBMS_SQL.COLUMN_VALUE( aCursor, 2, Naam); END IF; ELSE lastStatus := -1;
lastStatus INTEGER;
tmp INTEGER;
sqlStatement VARCHAR2(1024);
BEGIN
aCursor := DBMS_SQL.OPEN_CURSOR;
sqlStatement := 'SELECT * FROM Geachte ORDER BY NAAM';
DBMS_SQL.PARSE( aCursor, sqlStatement, DBMS_SQL.V7); DBMS_SQL.DEFINE_COLUMN( aCursor, 1, RecordID); DBMS_SQL.DEFINE_COLUMN( aCursor, 2, Naam,64);tmp := DBMS_SQL.EXECUTE( aCursor);
CREATE OR REPLACE PROCEDURE myProc AS
IF (myPackage.recordSelectInit>0) THEN
LOOP
EXIT WHEN (myPackage.recordSelectNext <=0); htp.print(myPackage.Name||'<BR>');END LOOP;