Inserting values from a cursor to a table

Question

Hi,
I need to insert the values from a cursor into a table,this i the part of code which trieds to do it...i get error stating "select stmt missing"...pls help out...
OPEN  p_cursor for V_SQLSTATEMENT;
        ---for i in p_cursor
        LOOP
          FETCH p_cursor INTO v_cursor_type;      
          insert into TEMPCHARTVALUES(HOP,AMOUNT,EFFECTIVE_FROM,EFFECTIVE_TO,CURRENCY)
               values (v_cursor_type.PMC1_HOP_CODE,
                     v_cursor_type.PMC1_Amount,
                     v_cursor_type.PMC1_EFFECTIVE_FROM,
                     v_cursor_type.PMC1_EFFECTIVE_UPTO,
                     v_cursor_type.PMC1_CURRENCY);
                                                       --dbms_output.put_line(v_cursor_type.KEYCODE1);
          EXIT WHEN p_cursor%ROWCOUNT = v_REC_COUNT;
          end loop;

Answer 1

Hi, here it is..
create or replace
procedure  prm_sp_charts_db (P_CURSOR OUT SYS_REFCURSOR,CHARTCode VARCHAR,tablename varchar)
IS
v_COUNT varchar2(200);
v_REC_COUNT NUMBER;
V_SQLSTATEMENT VARCHAR2(2000);
v_cursor_type  TEMPCHARTVALUES%ROWTYPE;
    begin
     v_COUNT:='SELECT COUNT(*) FROM PRM_M_Chart_' || CHARTCode;
     execute immediate v_COUNT into v_REC_COUNT;
     V_SQLSTATEMENT := 'SELECT ';
     V_SQLSTATEMENT := V_SQLSTATEMENT || 'PMC' || CHARTCode || '_F1_CODE Keycode1,';
      open  P_CURSOR for select column_name from  user_tab_columns where table_name=tablename and column_name='PMC' || CHARTCode || '_F2_CODE';
      IF P_CURSOR%FOUND then
      V_SQLSTATEMENT := V_SQLSTATEMENT || 'PMC' || CHARTCode || '_F2_CODE Keycode2,';
      else
      V_SQLSTATEMENT := V_SQLSTATEMENT || '0,';
      END IF;
      open  P_CURSOR for select column_name from  user_tab_columns where table_name=tablename and column_name='PMC' || CHARTCode || '_F3_CODE';
      IF P_CURSOR%FOUND then
      V_SQLSTATEMENT := V_SQLSTATEMENT || 'PMC' || CHARTCode || '_F3_CODE Keycode3,';
      else
      V_SQLSTATEMENT := V_SQLSTATEMENT || '0,';
      END IF;
       open  P_CURSOR for select column_name from  user_tab_columns where table_name=tablename and column_name='PMC' || CHARTCode || '_F4_CODE';
      IF P_CURSOR%FOUND then
      V_SQLSTATEMENT := V_SQLSTATEMENT || 'PMC' || CHARTCode || '_F4_CODE Keycode4,';
      else
      V_SQLSTATEMENT := V_SQLSTATEMENT || '0,';
      END IF;
      open  P_CURSOR for select column_name from  user_tab_columns where table_name=tablename and column_name='PMC' || CHARTCode || '_F5_CODE';
      IF P_CURSOR%FOUND then
      V_SQLSTATEMENT := V_SQLSTATEMENT || 'PMC' || CHARTCode || '_F5_CODE Keycode5,';
      else
      V_SQLSTATEMENT := V_SQLSTATEMENT || '0,';
      END IF;
      --open  P_CURSOR for select column_name from  user_tab_columns where table_name=tablename and column_name='PMC' || CHARTCode || '_F6_CODE';
      IF P_CURSOR%FOUND then
      V_SQLSTATEMENT := V_SQLSTATEMENT || 'PMC' || CHARTCode || '_F6_CODE Keycode6,';
      else
      V_SQLSTATEMENT := V_SQLSTATEMENT || '0,';
      END IF;
      --open  P_CURSOR for select column_name from  user_tab_columns where table_name=tablename and column_name='PMC' || CHARTCode || '_F7_CODE';
      IF P_CURSOR%FOUND then
      V_SQLSTATEMENT := V_SQLSTATEMENT || 'PMC' || CHARTCode || '_F7_CODE Keycode7,';
      else
      V_SQLSTATEMENT := V_SQLSTATEMENT || '0,';
      END IF;
      --open  P_CURSOR for select column_name from  user_tab_columns where table_name=tablename and column_name='PMC' || CHARTCode || '_F8_CODE';
      IF P_CURSOR%FOUND then
      V_SQLSTATEMENT := V_SQLSTATEMENT || 'PMC' || CHARTCode || '_F8_CODE Keycode8,';
      else
      V_SQLSTATEMENT := V_SQLSTATEMENT || '0,';
      END IF;
      --open  P_CURSOR for select column_name from  user_tab_columns where table_name=tablename and column_name='PMC' || CHARTCode || '_F9_CODE';
      IF P_CURSOR%FOUND then
      V_SQLSTATEMENT := V_SQLSTATEMENT || 'PMC' || CHARTCode || '_F9_CODE Keycode9,';
      else
      V_SQLSTATEMENT := V_SQLSTATEMENT || '0,';
      END IF;
      --open  P_CURSOR for select column_name from  user_tab_columns where table_name=tablename and column_name='PMC' || CHARTCode || '_F10_CODE';
      IF P_CURSOR%FOUND then
      V_SQLSTATEMENT := V_SQLSTATEMENT || 'PMC' || CHARTCode || '_F10_CODE Keycode10,';
      else
      V_SQLSTATEMENT := V_SQLSTATEMENT || '0,';
      END IF;
      V_SQLSTATEMENT := V_SQLSTATEMENT ||'PMC' || CHARTCode || '_HOP_CODE HOPCode,PMC' || CHARTCode || '_AMOUNT ,PMC'|| CHARTCode || '_EFFECTIVE_FROM Effective_From,PMC' || CHARTCode || '_EFFECTIVE_UPTO Effective_Upto,PMC' || CHARTCode || '_CURRENCY Currency FROM PRM_M_CHART_' || CHARTCode ;
      DBMS_OUTPUT.PUT_LINE(V_SQLSTATEMENT);
       OPEN  p_cursor for V_SQLSTATEMENT;
        ---for i in p_cursor
        LOOP
          FETCH p_cursor INTO v_cursor_type;      
          insert into TEMPCHARTVALUES(HOP,AMOUNT,EFFECTIVE_FROM,EFFECTIVE_TO,CURRENCY)
               values (v_cursor_type.PMC1_HOP_CODE,
                     v_cursor_type.PMC1_Amount,
                     v_cursor_type.PMC1_EFFECTIVE_FROM,
                     v_cursor_type.PMC1_EFFECTIVE_UPTO,
                     v_cursor_type.PMC1_CURRENCY);
                                                       --dbms_output.put_line(v_cursor_type.KEYCODE1);
          EXIT WHEN p_cursor%ROWCOUNT = v_REC_COUNT;
          end loop;
end prm_sp_charts_db;