2381: ,l_new_event_id,l_return_status,NULL_VALUE
2382: ,l_Source_Id,p_bug_id;
2383:
2384: DELETE
2385: FROM ap_Payment_Hist_dIsts
2386: WHERE Payment_History_Id IN
2387: (SELECT Payment_History_Id
2388: FROM ap_Payment_History_All
2389: WHERE Accounting_Event_Id = Events_to_Process_tab(i).Event_Id
3374: 'ACCOUNT_SEGMENT_VALUE', aid.dist_code_combination_id,
3375: asp.rounding_error_ccid),
3376: asp.rounding_error_ccid
3377: ) write_off_code_combination
3378: FROM ap_payment_hist_dists aphd,
3379: ap_payment_history_all aph,
3380: ap_system_parameters_all asp,
3381: ap_invoice_distributions_all aid
3382: WHERE aphd.accounting_event_id = p_event_id
3871: IF p_op_event_type NOT LIKE 'PREPAY%' THEN
3872:
3873: SELECT max(aphd.payment_hist_dist_id)
3874: INTO l_max_pay_dist_id
3875: FROM ap_payment_hist_dists aphd
3876: WHERE aphd.accounting_event_id = l_max_event_id;
3877:
3878: ELSE
3879:
4380: p_security_context => l_event_security_context,
4381: p_calling_sequence => l_procedure_name
4382: );
4383:
4384: DELETE ap_payment_hist_dists aphd
4385: WHERE aphd.accounting_event_id = i.accounting_event_id
4386: AND NOT EXISTS
4387: (
4388: SELECT 1