[Home] [Help]
31:
32: -- g_org_id stores the current OU.
33: g_org_id pa_implementations_all.org_id%type ;
34:
35: -- Declaration of individual elements to avoid ORA-3113 error because
36: -- FORALL does not allow insert of elements of %rowtype
37:
38: in_acct_currency_code PA_PLSQL_DATATYPES.Char15TabTyp;
39: in_acct_tp_exchange_rate PA_PLSQL_DATATYPES.NumTabTyp;
414: END IF;
415:
416:
417: -----------------------------------------------------------
418: -- Start checking individual EIs
419: -----------------------------------------------------------
420:
421: IF P_DEBUG_MODE = 'Y' THEN
422: log_message('reverse_distribution: ' || '250: Checking elements');
550: THEN
551: if lb_regular_ei then
552: begin
553: select 1 into l_exists
554: from dual
555: where exists
556: ( select 'Reverse in future period net-zero pair'
557: from pa_expenditure_items_all ei,
558: pa_cost_distribution_lines_all cdl,
581: end;
582: else -- lb_regular_ei
583: begin
584: select 1 into l_exists
585: from dual
586: where exists
587: ( select 'Reverse in future period net-zero pair'
588: from pa_expenditure_items_all parent_ei,
589: pa_cost_distribution_lines_all cdl,
1393: END IF;
1394:
1395: END LOOP; -- Finished processing all input records
1396:
1397: ------------------- End of individual item processing ------------
1398:
1399: IF P_DEBUG_MODE = 'Y' THEN
1400: log_message('reverse_distribution: ' || '2850: Finished processing for ALL input items');
1401: END IF;
2098: -- be passed to MRC
2099:
2100: SELECT pa_cc_dist_lines_s.nextval
2101: INTO in_cc_dist_line_id(i)
2102: FROM dual;
2103:
2104: in_expenditure_item_id(i) := g_ins_rec(i).expenditure_item_id;
2105: in_line_num(i) := g_ins_rec(i).line_num;
2106: in_acct_currency_code(i) := g_ins_rec(i).acct_currency_code;