EBS PO Approve Script
declare
x_po_head_id number ;
begin
select po_header_id
into x_po_head_id
from po_headers_all where
segment1 = '&ponumber'
and org_id = &org_id;
update po_headers_all
set authorization_status = 'APPROVED',
approved_flag = 'Y',
approved_date = sysdate,
last_update_date= sysdate
where po_header_id = x_po_head_id;
update po_line_locations_all
set approved_flag = 'Y'
where po_header_id = x_po_head_id ;
commit;
end;