CREATE TABLE test_1(id NUMBER, name VARCHAR2(25), hier_date DATE);
INSERT INTO test_1 VALUES(10,'SAM',sysdate);
COMMIT;

CREATE OR REPLACE procedure record_data1 AS
	-- Cursor
	CURSOR cur_new IS
	SELECT * FROM test_1;

	-- Array for column table
	arr_record_string VARCHAR2(4000);
	arr_uncl dbms_utility.uncl_array;  
	l_tablen NUMBER;
	
	v_col_name user_tab_cols.column_name%type;
BEGIN
	-- array
	SELECT column_name BULK COLLECT INTO arr_uncl
	FROM user_tab_cols
	WHERE table_name = 'TEST_1';
	
	dbms_utility.table_to_comma(arr_uncl, l_tablen, arr_record_string);
	dbms_output.put_line(' ===== '||arr_uncl.COUNT);
	
	FOR i IN 1..arr_uncl.COUNT LOOP
		FOR rec_cur_new IN cur_new LOOP
			--v_col_name:=arr_uncl(i);
			--dbms_output.put_line(' ---> '||rec_cur_new.arr_uncl(i)); ----> not working !			
			dbms_output.put_line(' ---> '||rec_cur_new.id); -- i need to put here dynamic column_name --> v_col_name
		END LOOP;
	END LOOP;
END;
/
sho err
exec record_data1