DECLARE

CURSOR Cur_sub_rp IS
                SELECT A.SUB_ACCOUNT,  B.PH_basic_srv,B.PH_Salesman,A.SUB_SSN
                    FROM STG_SUB_MASTER_MONTH_HISTORY A, STG_PHN_MASTER_MONTH_HISTORY
 B 
                    WHERE A.SUB_ACCOUNT = B.PH_ACCOUNT (+)
                    AND A.MONTH_ID = B.MONTH_ID ;
                    
 TYPE t_values_tab IS TABLE OF cur_sub_rp%rowtype ;
 values_tab t_values_tab := t_values_tab()  ;

BEGIN 
    OPEN Cur_sub_rp ;
    LOOP 
        FETCH Cur_sub_rp BULK COLLECT INTO Values_tab
                                            LIMIT 1000;
        EXIT WHEN Cur_sub_rp%NOTFOUND ;
    END LOOP ;
    CLOSE Cur_sub_rp;
FORALL i IN VALUES_TAB.first..values_tab.last
INSERT INTO SUB_PHN_1 VALUES VALUES_TAB(i);
commit;
END;

DECLARE

CURSOR Cur_sub_rp IS SELECT 
                sub.MARKET_CODE        ,

                        sub.SUB_CTYPE ,
                        phn.PH_BASIC_SRV        ,
                        sub.MONTH_ID  ,
                         sub.SUB_ACCOUNT        ,
                        sub.SUB_LAST_NAME     ,
                       sub.SUB_FIRST_NAME   ,
                        SUB.WS_ENTRY_DATE AS SUB_WS_ENTRY_DATE   ,
                        sub.WS_DISC_DATE       ,
                        sub.SUB_DISC_REASON ,
                        sub.SUB_BILL_CYCLE    ,
                        sub.SUB_MUN_CODE     ,
                        sub.SUB_30DAY_BAL     ,
                        sub.SUB_60DAY_BAL     ,
                        sub.SUB_90DAY_BAL     ,
                        sub.SUB_OVR90_BAL     ,
                        sub.SUB_WRTOFF_AMT ,
                        sub.SUB_BALANCE_DUE ,
                        sub.SUB_CURRENT_BAL ,
                        sub.SUB_STATUS,
                        phn.PH_MOBIL_ID         ,
                        phn.WS_ESN_UN           ,
                        phn.WS_START_DATE    ,
                        phn.WS_STOP_DATE      ,
                        PHN.WS_ENTRY_DATE AS PHN_WS_ENTRY_DATE   ,
                        phn.PH_STATUS            ,
                        phn.PH_FEAT_CODES     ,
                        phn.PH_MODEL  ,
                        phn.CRICKET_LOCATION_ID_KEY           ,
                        phn.FEATURE_SET_ID   
                      
                    FROM STG_SUB_MASTER_MONTH_HISTORY SUB, STG_PHN_MASTER_MONTH_HISTORY PHN
 
                    WHERE 
                    SUB.MONTH_ID = PHN.MONTH_ID
                    And SUB.SUB_ACCOUNT = PHN.PH_ACCOUNT (+)
                    And SUB.Sub_Account BETWEEN 0 AND 79552866226 ;
                    
                    
 TYPE t_values_tab IS TABLE OF cur_sub_rp%rowtype ;
 values_tab t_values_tab := t_values_tab()  ;

BEGIN 
    OPEN Cur_sub_rp ;
    LOOP 
        FETCH Cur_sub_rp BULK COLLECT INTO Values_tab
                                            LIMIT 1000;
        EXIT WHEN Cur_sub_rp%NOTFOUND ;
    END LOOP ;
    CLOSE Cur_sub_rp;
FORALL i IN VALUES_TAB.first..values_tab.last
INSERT INTO SUB_PHONE_RATEPLAN_FSS VALUES VALUES_TAB(i);
COMMIT;
END;

SQL> select count(*) from user_objects;

  COUNT(*)
----------
      4321

SQL> set serveroutput on
SQL> DECLARE
  2    CURSOR Cur_sub_rp IS
  3      SELECT OBJECT_NAME
  4      FROM USER_OBJECTS;
  5                      
  6    TYPE t_values_tab IS TABLE OF cur_sub_rp%rowtype ;
  7    values_tab t_values_tab := t_values_tab();
  8  BEGIN 
  9    OPEN Cur_sub_rp ;
 10    LOOP 
 11        FETCH Cur_sub_rp BULK COLLECT INTO Values_tab
 12                                      LIMIT 1000;
 13        EXIT WHEN Cur_sub_rp%NOTFOUND ;
 14    END LOOP ;
 15    CLOSE Cur_sub_rp;
 16  
 17    DBMS_OUTPUT.PUT_LINE( 'Collection has '
 18      || to_char( values_tab.count ) ||' rows.' );
 19  END;
 20  /
Collection has 321 rows.

PL/SQL procedure successfully completed.

SQL>