SQL> CREATE TABLE data (
key1 VARCHAR2(100),
col1 VARCHAR2(100),);  2    3  
col1 VARCHAR2(100),)
                   *
ERROR at line 3:
ORA-00904: : invalid identifier

SCOTT@orcl_11gR2> CREATE TABLE data
  2    (key1  VARCHAR2 (100),
  3  	col1  VARCHAR2 (100))
  4  /

Table created.

SCOTT@orcl_11gR2> CREATE TABLE test1
  2    (key1  VARCHAR2(100),
  3  	col1  VARCHAR2(100),
  4  	c1    CLOB)
  5  /

Table created.

SCOTT@orcl_11gR2> INSERT INTO data VALUES ('X', 'XXX')
  2  /

1 row created.

SCOTT@orcl_11gR2> DECLARE
  2    CURSOR data_crs
  3    IS
  4    SELECT key1, col1,
  5  	      EMPTY_CLOB() AS data_string
  6    FROM   data;
  7  
  8    CURSOR mf_monthly
  9    IS
 10    SELECT RPAD ('A', 32000, 'A') AS monthly_data
 11    FROM   dual;
 12  
 13    v_data CLOB;
 14  
 15    TYPE v_data_table IS TABLE OF data_crs%ROWTYPE INDEX BY BINARY_INTEGER;
 16    v_data_record v_data_table;
 17  BEGIN
 18    OPEN data_crs;
 19    FETCH data_crs BULK COLLECT INTO v_data_record;
 20    CLOSE data_crs;
 21  
 22    FOR v_rec IN v_data_record.FIRST .. v_data_record.COUNT LOOP
 23  	 FOR x_rec IN mf_monthly LOOP
 24  	   v_data := v_data || x_rec.monthly_data || '+++';
 25  	 END LOOP;
 26  
 27  	 v_data_record(v_rec).data_string := v_data;
 28  
 29  	 v_data := NULL;
 30    END LOOP;
 31  
 32    FORALL x IN v_data_record.FIRST .. v_data_record.COUNT
 33    INSERT INTO test1 VALUES v_data_record(x);
 34  END;
 35  /

PL/SQL procedure successfully completed.

SCOTT@orcl_11gR2> SELECT * FROM test1
  2  /

KEY1
--------------------------------------------------------------------------------
COL1
--------------------------------------------------------------------------------
C1
--------------------------------------------------------------------------------
X
XXX
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
... -- truncated to save space
AAAAAAAAAAAAAAA
+++


1 row selected.

SCOTT@orcl_11gR2>

SCOTT@orcl_11gR2> CREATE TABLE data
  2    (key1  VARCHAR2 (100),
  3  	col1  VARCHAR2 (100))
  4  /

Table created.

SCOTT@orcl_11gR2> CREATE TABLE test1
  2    (key1  VARCHAR2(100),
  3  	col1  VARCHAR2(100),
  4  	c1    CLOB)
  5  /

Table created.

SCOTT@orcl_11gR2> INSERT INTO data VALUES ('X', 'XXX')
  2  /

1 row created.

SCOTT@orcl_11gR2> DECLARE
  2    TYPE v_data_table IS TABLE OF test1%ROWTYPE INDEX BY BINARY_INTEGER;
  3    v_data_record v_data_table;
  4  
  5    CURSOR mf_monthly
  6    IS
  7    SELECT RPAD ('A', 32000, 'A') AS monthly_data
  8    FROM   dual;
  9  BEGIN
 10    SELECT key1, col1,
 11  	      EMPTY_CLOB() AS c1
 12    BULK   COLLECT
 13    INTO   v_data_record
 14    FROM   data;
 15  
 16    FOR v_rec IN v_data_record.FIRST .. v_data_record.COUNT LOOP
 17  	 FOR x_rec IN mf_monthly LOOP
 18  	   v_data_record(v_rec).c1 :=
 19  	     v_data_record(v_rec).c1 || x_rec.monthly_data || '+++';
 20  	 END LOOP;
 21    END LOOP;
 22  
 23    FORALL x IN v_data_record.FIRST .. v_data_record.COUNT
 24    INSERT INTO test1 VALUES v_data_record(x);
 25  END;
 26  /

PL/SQL procedure successfully completed.

SCOTT@orcl_11gR2> SELECT * FROM test1
  2  /

KEY1
--------------------------------------------------------------------------------
COL1
--------------------------------------------------------------------------------
C1
--------------------------------------------------------------------------------
X
XXX
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
... -- truncated to save space
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
+++


1 row selected.

SCOTT@orcl_11gR2>