Oracle EBS AP 取消付款

--取消付款 created by jenrry 20170425
declare
 l_return_status  varchar2(50);
 l_msg_count number;
 l_msg_data varchar2(2000);
begin
  FND_GLOBAL.APPS_INITIALIZE(USER_ID      => 1111,
                             RESP_ID      => 50737,
                             RESP_APPL_ID => 20005);
  mo_global.init('SQLAP');

  mo_global.set_policy_context(p_access_mode => 'S', p_org_id => 142);
 Ap_Void_Pkg.iby_Void_Check (p_api_version     => 1.0,
                               p_init_msg_list   => NULL,
                               p_commit          => NULL,
                               p_payment_id      => 4020,
                               p_void_date       => fnd_conc_date.string_to_date('2017-01-30'),
                               x_return_status   => l_return_status,
                               x_msg_count       => l_msg_count,
                               x_msg_data        => l_msg_data);
    dbms_output.put_line('l_return_status: '|| l_return_status);
    dbms_output.put_line('l_msg_count: '||l_msg_count);
    dbms_output.put_line('l_msg_data: '||l_msg_data);                           

end;