13: --Name: Update_Invoice_Flag
14: --Pre-reqs:
15: -- None.
16: --Modifies:
17: -- Update po_distributions_all.invoice_adjument_flag.
18: --Locks:
19: -- None.
20: --Function:
21: -- This procedure updates invoice adjument flag which is used
73: END IF;
74:
75: l_progress := '040';
76: FORALL i in 1..p_dist_ids.COUNT
77: UPDATE po_distributions_all
78: SET invoice_adjustment_flag = p_flags(i)
79: WHERE po_distribution_id = p_dist_ids(i);
80:
81: l_progress := '100';