187: --Unit of Measure ID/currency
188: BEGIN
189: SELECT nvl(rp.unit_of_measure_id, ldg.currency_code)
190: INTO lv_unit_of_measure_id
191: FROM rg_reports rp, gl_ledgers ldg, gl_access_sets acc
192: WHERE ldg.ledger_id = acc.default_ledger_id
193: AND acc.access_set_id = pn_data_access_set_id
194: AND rp.report_id = pn_balance_sheet_id;
195: EXCEPTION
320: --Unit of Measure ID/currency
321: BEGIN
322: SELECT nvl(rp.unit_of_measure_id, ldg.currency_code)
323: INTO lv_unit_of_measure_id
324: FROM rg_reports rp, gl_ledgers ldg, gl_access_sets acc
325: WHERE ldg.ledger_id = acc.default_ledger_id
326: AND acc.access_set_id = pn_data_access_set_id
327: AND rp.report_id = pn_revenue_expenditure_id; --parameter: pn_revenue_expenditure_id
328: EXCEPTION
452: --Unit of Measure ID/currency
453: BEGIN
454: SELECT nvl(rp.unit_of_measure_id, ldg.currency_code)
455: INTO lv_unit_of_measure_id
456: FROM rg_reports rp, gl_ledgers ldg, gl_access_sets acc
457: WHERE ldg.ledger_id = acc.default_ledger_id
458: AND acc.access_set_id = pn_data_access_set_id
459: AND rp.report_id = pn_expenditure_detail_id; --parameter: pn_expenditure_detail_id
460: EXCEPTION