Error while creating package

Question

Hi,
I am trying to create this procedure inside a package but i am getting the below mentioned error, but when i run the SELECT statement alone, it works fine
but when creating package it throws the error, can anyone please help me in this.
PROCEDURE Selections(
p_Last IN VARCHAR2,
p_CurrentTime IN VARCHAR2,
p_Selections OUT     NUMBER
IS
BEGIN
     SELECT CODE, AMOUNT,INSERT_DATE FROM
     (SELECT b.CODE, a.AMOUNT,a.INSERT_DATE, ROW_NUMBER()
     OVER(PARTITION BY b.CODE ORDER BY a.INSERT_DATE) AS SEQ
     FROM PAYMENTS a,SB b
WHERE a.INSERT_DATE > p_Last
AND a.INSERT_DATE <= p_CurrentTime
AND a.TYPE = 'X'
AND a.P_CODE IS NULL
AND a.ACCT=b.C_CODE)
     WHERE SEQ = 1;
END Selections;
After throwing the error the cursor is positioned between OVER[CURSOR](PARTITION BY b.CODE ORDER BY a.INSERT_DATE) AS SEQ
Error Message:
PLS-00103: Encountered the symbol "(" when expecting one of the following:
, from
Thanks

Answer 1

If you have to use dynamic SQL because of V 8i, try this (not tested):
PROCEDURE Selections( 
   p_Last IN VARCHAR2,
   p_CurrentTime IN VARCHAR2,
   p_Selections OUT NUMBER
IS
   l_code NUMBER;
   l_amount NUMBER;
   l_insert_date DATE;
BEGIN
   execute immediate
   'SELECT code,'||
          'amount,'||
          'insert_date '||
   'FROM   ('||
          'SELECT b.code,'||
                 'a.amount,'||
                 'a.insert_date,'||
                 'row_number() over(PARTITION BY b.code ORDER BY a.insert_date) AS seq '||
          'FROM   payments a,'||
                 'sb b '||
          'WHERE  a.insert_date > p_last '||
          'AND    a.insert_date <= p_currenttime '||
          'AND    a.type = '||''''||'X '||''''||
          'AND    a.p_code IS NULL '||
          'AND    a.acct = b.c_code'||
          ') '||
   'WHERE  seq = 1'
   INTO   l_code,
          l_amount,
          l_insert_date
   dbms_output.put_line(l_code);
   dbms_output.put_line(l_amount);
   dbms_output.put_line(l_insert_date);
END selections;Regards,
Gerd