[Home] [Help]
73: CURSOR vendor IS
74: SELECT DISTINCT pd.vendor_id,
75: pv.segment1, -- supplier number
76: pv.vendor_name
77: FROM po_ap_retroactive_dist_v pd,
78: po_vendors pv
79: WHERE mo_global.check_access(pd.org_id) = 'Y'
80: AND pd.vendor_id = pv.vendor_id
81: AND pd.invoice_adjustment_flag = 'R'
106:
107: sql_stmt := 'SELECT DISTINCT pd.vendor_id,
108: pv.segment1, -- supplier number
109: pv.vendor_name
110: FROM po_ap_retroactive_dist_v pd,
111: po_vendors pv
112: WHERE mo_global.check_access(pd.org_id) = ''Y''
113: AND pd.vendor_id = pv.vendor_id
114: AND pd.invoice_adjustment_flag = ''R'' ' ;
293: pd.po_release_id,
294: pr.release_num,
295: pd.price_override,
296: aii.invoice_id
297: FROM po_ap_retroactive_dist_v pd,
298: po_headers_all ph,
299: po_releases_all pr,
300: po_lines_all pl,
301: po_line_locations_all pll,
539: l_org_id_list id_list_type;
540:
541: CURSOR orgs IS
542: SELECT DISTINCT pd.org_id
543: FROM po_ap_retroactive_dist_v pd,
544: po_vendors pv
545: WHERE mo_global.check_access(pd.org_id) = 'Y'
546: AND pd.vendor_id = pv.vendor_id
547: AND pd.invoice_adjustment_flag = 'R'
676: IF p_resubmit_flag <> 'Y' THEN
677:
678: FORALL i in 1..l_po_line_loc_id_list.COUNT
679:
680: UPDATE PO_AP_RETROACTIVE_DIST_V
681: SET invoice_adjustment_flag = 'S'
682: WHERE line_location_id = l_po_line_loc_id_list(i);
683:
684: END IF; */