нее, все таки можно оказывается, когда позарез надо
нигде в инете не нашел, может еще кому пригодится

--------------------
create or replace package SPB_CRREP as
TYPE m_refcur IS REF CURSOR;

FUNCTION fncRefCursor return m_refcur;

end SPB_CRREP;

create or replace package body SPB_CRREP as

function fncRefCursor return m_refcur
IS
p_rf m_refcur;
BEGIN
OPEN p_rf FOR
SELECT code, label FROM account;
RETURN(p_rf);
END fncRefCursor;

end SPB_CRREP;

---------------

conAPHINA.ConnectionString = "Provider=OraOLEDB.Oracle;" & _
"Data Source=spb3.world;" & _
"User ID=xxxx;" & _
"Password=xxxx;" & _
"PLSQLRSet=1;"
conAPHINA.Open

cmd.ActiveConnection = conAPHINA
cmd.CommandType = adCmdText
cmd.CommandText = "{Call spb_crrep.fncRefCursor}"
Set rstAPHINA = cmd.Execute
Text1 = rstAPHINA.Fields(0)