43: P_ORG_ID := NVL(P_ORG_ID, FND_GLOBAL.ORG_ID);
44:
45: SELECT gl.ledger_id, gl.currency_code
46: INTO gc_ledger_id, gc_func_currency
47: FROM gl_ledgers gl, hr_operating_units hou
48: /* Bug 9725033 replaced fnd_profile.VALUE ('org_id') with fnd_global.org_id() */
49: WHERE hou.organization_id = P_ORG_ID --bug9564002
50: AND gl.ledger_id = hou.set_of_books_id;
51:
51:
52: BEGIN
53: SELECT NAME
54: INTO gc_operating_name
55: FROM hr_operating_units
56: WHERE organization_id = p_org_id;
57: EXCEPTION
58: WHEN NO_DATA_FOUND
59: THEN