chamando função no oracle

gostaria de chamar uma função no oracle que tem a seguinte assinatura:

 function FUN_LST_PERFIS_USU_APLIC_UA (

 P_COD_APLICACAO IN APLICACAO.COD_APLICACAO%TYPE,

 P_COL_USERNAME IN USUARIO.COL_USERNAME%TYPE,

 P_COD_UNIDADE IN UNIDADE_ADMINISTRATIVA.COD_UNIDADE%type,

 P_COD_USUARIO OUT USUARIO.COD_USUARIO%TYPE,

 P_RSET_PERF_USUARIO OUT T_RECORDSET

 ) return number is

estou chamando da seguinte forma:

con.Open

Set cmd = New ADODB.Command

Set cmd.ActiveConnection = con

cmd.CommandType = adCmdStoredProc

cmd.CommandText = "ADMA.ADM_CONTROLE_ACESSO.FUN_LST_PERFIS_USU_APLIC_UA"

cmd.Parameters.Append cmd.CreateParameter("P_COD_USUARIO", adNumeric, adParamInput, 20, codusu)

cmd.Parameters.Append cmd.CreateParameter("P_RSET_PERF_USUARIO", adVariant, adParamInput, 20, varrecord)

cmd.Parameters.Append cmd.CreateParameter("P_COD_APLICACAO", adNumeric, adParamInput, 4, 50)

cmd.Parameters.Append cmd.CreateParameter("P_COL_USERNAME", adVarChar, adParamInput, 40, login)

cmd.Parameters.Append cmd.CreateParameter("P_COD_UNIDADE", adNumeric, adParamInput, 12, codUndAdm)

Set retorno = cmd.Execute

me retorna o seguinte erro:

wrong number or types of arguments in call to 'fun_lst_perfis_usu_aplic_ua'

acredito que o erro possa estar na definição do tipo de variável que é passado na criação do 2º parametro que deve ser recordset. como eu defino esse tipo? adrecordset?

obrigado!!!