How can ı cancel requisition line by API (EBS 11.5.10)?

Hello,

I have some requisitions and ı want to cancel some lines by api. I have found a code but it did not work. Are there any working solution or what is wrong here?

Best Regards,

MehmeT

declare

p_req_header_id po_tbl_number;

p_req_line_id po_tbl_number;

i number;

      w_return_status    VARCHAR2(250);

      w_return_msg       VARCHAR2(250);

      w_msg_count NUMBER;

begin

p_req_header_id := po_tbl_number();

p_req_line_id := po_tbl_number();

i := 1;

p_req_header_id.extend;

p_req_header_id(i) := 652680;    

p_req_line_id.extend;

p_req_line_id(i) := 1697792;