Detele Transaction in Account receivables

declare

   v_msg_data      varchar2(4000)  := null;
    v_msg_count     number          := 0;
    v_msg_index     number          := 0;
    v_ret_status    varchar2(1)     := null;  
    v_message_tbl   arp_trx_validate.message_tbl_type;
   
begin
    dbms_output.put_line('Detele Transaction...');
   
     ---- Setting the org context for the particular session
        apps.mo_global.set_policy_context('S', 5001);
       
         apps.fnd_global.apps_initialize(1281564,50828,222);   
       
       
       
       
         ar_invoice_api_pub.delete_transaction(
                                                 p_api_name             => 'Delete_Transaction',
                                                 p_api_version          => 1.0,
                                                 p_init_msg_list        => fnd_api.g_true,
                                                 p_commit               => fnd_api.g_true,
                                                 p_validation_level     => fnd_api.g_valid_level_full,
                                                 p_customer_trx_id      => 32340430,
                                                 p_return_status        => v_ret_status,
                                                 p_msg_count            => v_msg_count,
                                                 p_msg_data             => v_msg_data,
                                                 p_errors               => v_message_tbl
                                             );
                                           
                                           
                                           
     if v_ret_status <> 'S' then
            dbms_output.put_line( '   Status: '||v_ret_status);
            for i in 1 .. v_msg_count loop
                apps.fnd_msg_pub.get( i, apps.fnd_api.g_false, v_msg_data, v_msg_index);
                dbms_output.put_line( '   Error : '||v_msg_data);
            end loop;
            dbms_output.put_line ('   '||v_msg_data);
        else
            dbms_output.put_line ('   Deleted.');
          
         end if;      
       
        commit;
        exception
    when others then
        dbms_output.put_line('Error : '||sqlerrm);
end;