Procedimiento de consulta en ORACLE

create or replace procedure sp_paises consultar  is
v1 varchar2(3);       // Se declara una variable v1 tipo varchar
v2 Varchar2(40);   // Se declara una variable v2 tipo varchar
CURSOR C1 IS  SELECT * FROM tbl_paises;    // Se declara un cursor o tabla temporal llamado C1
BEGIN     // Inicio del procedimiento
  FOR i in C1 LOOP    // Ciclo repetitivo que lee el cursor hasta que no encuentre mas registros
       v1 := i.fld_codpais;    // Pasa el dato de la columna a la variable declarada
       v2 := i.fld_nombre;    // Pasa el dato de la columna a la variable declarada
       dbms_output.put_line("Codigo : "||v1||"Nombre : "||v2);     // Muestra la informacion en las variable || (doble pipe) es para concatenar
END LOOP;    // Fin del ciclo repetitivo
END;   // Fin del procedimiento
/   //CAracter de escape o salida del procedimiento