How to process next record in oracle PLSQL

Question

Hi,
I am processing below record set with the help of BULK COLLECT in Oracle PLSQL Procedure. While processing I am checking model is one that need not be substituted. If it is 'NA' or 'N/A', I need process next record (marked as bold in code snipet)
Please guide me how to do it ?
TYPE t_get_money IS TABLE OF c_get_money%ROWTYPE INDEX BY BINARY_INTEGER;
L_money t_get_money ;
L_subst_model VARCHAR2(40);
L_Notify_Manager     VARCHAR2(1);
L_grade          VARCHAR2(20);
L_Error_Message     VARCHAR2(1);
BEGIN
OPEN c_get_money ;
FETCH c_get_money BULK COLLECT INTO L_money ;
CLOSE c_get_money;
FOR I IN 1..L_money.count LOOP
-- check if the model is one that need not be substituted
IF (upper(L_money(i). subst_model) in ('N/A', 'NA')
THEN
L_NOTIFY_MANAGER(I) := 'Y';
L_GRADE(I) := 'ERROR';
L_error_message(i) := 'substitute Model is not N/A or NA' ;
-------Here I want to process NEXT RECORD--------
END IF ;
END;

Answer 1

One of the solution for below version of 11g...
DECLARE
     TYPE t_get_money IS TABLE OF c_get_money%ROWTYPE
                                   INDEX BY BINARY_INTEGER;
     L_money              t_get_money;
     L_subst_model        VARCHAR2 (40);
     L_Notify_Manager   VARCHAR2 (1);
     L_grade              VARCHAR2 (20);
     L_Error_Message    VARCHAR2 (1);
BEGIN
     OPEN c_get_money;
     FETCH c_get_money
     BULK COLLECT INTO L_money;
     CLOSE c_get_money;
     FOR I IN 1 .. L_money.COUNT LOOP
          IF UPPER (L_money (i).subst_model) IN ('N/A', 'NA') THEN
               GOTO Nextrecord;
          END IF;
          L_NOTIFY_MANAGER (I)   := 'Y';
          L_GRADE (I)              := 'ERROR';
          L_error_message (i)    := 'substitute Model is not N/A or NA';
        <<Nextrecord>>
          NULL;
     END LOOP;
END;One of the solution for 11gR1 and above...
DECLARE
     TYPE t_get_money IS TABLE OF c_get_money%ROWTYPE
                                   INDEX BY BINARY_INTEGER;
     L_money              t_get_money;
     L_subst_model        VARCHAR2 (40);
     L_Notify_Manager   VARCHAR2 (1);
     L_grade              VARCHAR2 (20);
     L_Error_Message    VARCHAR2 (1);
BEGIN
     OPEN c_get_money;
     FETCH c_get_money
     BULK COLLECT INTO L_money;
     CLOSE c_get_money;
     FOR I IN 1 .. L_money.COUNT LOOP
          IF UPPER (L_money (i).subst_model) IN ('N/A', 'NA') THEN
               CONTINUE;
          END IF;
          L_NOTIFY_MANAGER (I)   := 'Y';
          L_GRADE (I)              := 'ERROR';
          L_error_message (i)    := 'substitute Model is not N/A or NA';
     END LOOP;
END;