Problem with a parameter in a cursor

[Coco]

I have a problem with a cursor.
I use a like clause with a parameter in my cursor and the cursor doesn't works, no records are retrieved. It is something like this:

CREATE OR REPLACE PROCEDURE My_Proc(p_Param IN VARCHAR2) IS

v_String VARCHAR2(100);

CURSOR c_Cursor IS
SELECT Id_Cod
FROM my_table
WHERE NAME LIKE v_String;
BEGIN

v_String := '''' || p_Param || '%' || '''';

FOR cur_Cursor IN c_Cursor LOOP;

DBMS_OUTPUT.PUT_LINE('id_cod = ' || cur_Cursor.Id_Cod);

END LOOP;



END My_Proc;

The dbms_output show me nothing.
If somebody knows how to do this, please, help me.
Thanks.