Problema com retorno

Bom pessoal to com o seguinte problema.

Precisso retornar a variavel 'var_result' que contem o ID so usuario mas como eu faco isso ?

Se puderem dar uma mão...

create or replace procedure PRC_ORL_CONF_LOGIN(par_login varchar2, par_senha varchar2)
AS

var_conf char(1);
var_result varchar2(8);

begin

-- Usando Função

select dborl.fnc_orl_valida_senha((select usu_st_senha from dborl.orl_usuario u where u.usu_st_login = par_login),par_senha) rest INTO var_result from dual;

IF(var_conf = 'S')
THEN
-- LOGIN OK

 select u.usu_in_codigo cod INTO var_result from dborl.orl_usuario u where u.usu_st_login = par_login;

ELSE

 var_result := '0';

END IF;

-- PRECISO RETORNAR A VARIAVEL 'var_result' AQUI?

 SELECT var_result; -- ERRO

end PRC_ORL_CONF_LOGIN;