【OracleEBS】 得到本位币

Demo

 

declare
l_local_currency_code varchar2(15); --本位币
begin
select gsob.currency_code
into l_local_currency_code
from gl_sets_of_books gsob, hr_operating_units hou
where gsob.set_of_books_id = hou.set_of_books_id
and hou.organization_id = 101; --&p_org_id; --ou id
dbms_output.put_line(l_local_currency_code);
end;