Retriving all table records

Question

Hi,
To retrieve all records of the table, below procedure has been used, but on executing gets only one record in the output.
Procedure(proc_env) has been defined wrapped in the package (packg)
this package gets call from the java enviornment to retrieve all the records of the table.
Procedure wrapped in the package
PROCEDURE proc_test(cursor1 OUT TestCursor)
          IS
     BEGIN
          OPEN          cursor1 FOR
          SELECT           col1,
                         col2,
col3
          FROM           table_name
     END;
procedure called for execution
DECLARE
v_col1 table.col_name%TYPE;
v_col2 table.col_name%TYPE;
v_col3 table.col_name%TYPE;
v_cur packg.TestCursor;
BEGIN
packg.proc_test(v_cur);
FETCH v_cur INTO v_col1,v_col2,v_col3;
DBMS_OUTPUT.ENABLE;
DBMS_OUTPUT.put_line(v_col1||','||v_col2||','||v_col3);
END;
How to retrieve all the records of the table ?
what is missing in the code ?
With Regards

Answer 1

SET SERVEROUTPUT ON
DECLARE
    v_col1 table.col_name%TYPE;
    v_col2 table.col_name%TYPE;
    v_col3 table.col_name%TYPE;
    v_cur packg.TestCursor;
BEGIN
    DBMS_OUTPUT.ENABLE;
    packg.proc_test(v_cur);
    LOOP
      FETCH v_cur INTO v_col1,v_col2,v_col3;
      EXIT WHEN v_cur%NOTFOUND;
      DBMS_OUTPUT.put_line(v_col1||','||v_col2||','||v_col3);
    END LOOP;
    CLOSE v_cur;
END;
/SY.