Re: Forms4.5 Query

From: Garry M. Filimonov <garry_at_fly.triniti.troitsk.ru>
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:

  1. 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-0408
Received on Tue Oct 08 1996 - 00:00:00 CEST

Original text of this message