Re: Forms4.5 Query
Date: 1996/10/08
Message-ID: <01bbb510$4861e520$bf0000c5_at_Garry.triniti.troitsk.ru>#1/1
Gudla <sgudla_at_ecte.uswc.uswest.com> wrote in article
<53braj$88i_at_aeon.ecte.uswc.uswest.com>...
> I have a multi-record block.
>
> From a trigger i execute a 'SELECT' statement and want to populate
> the multi-record block with all the resultant records from the 'SELECT'.
> How do i do this without using Record-Groups?
Idia is next:
- create table t999 (a number(3)); and insert into t999 999recs;
In Forms:
2) create block (B1) on table t999
3) create package FP:
PACKAGE FP IS
PROCEDURE cOpen;
PROCEDURE cFetch;
END;
PACKAGE BODY FP IS
CURSOR c IS select ename from scott.emp;
PROCEDURE cOpen IS
BEGIN
IF c%ISOPEN THEN
CLOSE c;
END IF;
OPEN c;
END;
PROCEDURE cFetch IS
BEGIN
IF NOT(c%ISOPEN) THEN
OPEN c;
END IF;
FETCH c INTO :b1.t1;
IF c%NOTFOUND THEN
ABORT_QUERY;
END IF;
END;
END;
3) create in B1 two triggers:
PRE-QUERY:
FP.cOpen;
POST-QUERY:
FP.cFetch;
Using package DBMS_SQL u can fetching run-time SELECTs.
-- G'luck ! ----------------------------------------- Garry M. FIlimonov LASU TRINITI, Troitsk, MR, Russia garry_at_triniti.troitsk.ru 7-(095)-334-0408Received on Tue Oct 08 1996 - 00:00:00 CEST