14: /*
15:
16: /*================================================================
17:
18: PROCEDURE NAME: create_ap_invoices()
19:
20: ==================================================================*/
21: PROCEDURE create_ap_invoices(X_transaction_source IN VARCHAR2,
22: X_commit_interval IN NUMBER,
17:
18: PROCEDURE NAME: create_ap_invoices()
19:
20: ==================================================================*/
21: PROCEDURE create_ap_invoices(X_transaction_source IN VARCHAR2,
22: X_commit_interval IN NUMBER,
23: X_shipment_header_id IN NUMBER,
24: X_aging_period IN NUMBER)
25:
120: X_progress := '050';
121: X_completion_code := X_receipt_completion_status AND
122: X_bill_notice_compl_status;
123:
124: /** This will return TRUE if create_ap_invoices did not encounter any
125: application errors. However, if one or more application errors is
126: found during the execution of this program, X_completion_code will
127: be FALSE. **/
128:
137: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
138: RAISE; /* Error has been printed. No need to print error here */
139: /*
140: WHEN others THEN
141: po_message_s.sql_error('create_ap_invoices', x_progress,sqlcode);
142: RAISE;
143: END create_ap_invoices;
144:
145:
139: /*
140: WHEN others THEN
141: po_message_s.sql_error('create_ap_invoices', x_progress,sqlcode);
142: RAISE;
143: END create_ap_invoices;
144:
145:
146: /*================================================================
147:
604: l_api_name CONSTANT VARCHAR2(30) := 'cancel_asbn_invoices_line';
605: l_token VARCHAR2(1000);
606: l_return_status BOOLEAN;
607: l_message_name FND_NEW_MESSAGES.message_name%TYPE;
608: l_invoice_amount AP_INVOICES.invoice_amount%TYPE;
609: l_base_amount AP_INVOICES.base_amount%TYPE;
610: l_temp_cancelled_amount AP_INVOICES.temp_cancelled_amount%TYPE;
611: l_cancelled_by AP_INVOICES.cancelled_by%TYPE;
612: l_cancelled_amount AP_INVOICES.cancelled_amount%TYPE;
605: l_token VARCHAR2(1000);
606: l_return_status BOOLEAN;
607: l_message_name FND_NEW_MESSAGES.message_name%TYPE;
608: l_invoice_amount AP_INVOICES.invoice_amount%TYPE;
609: l_base_amount AP_INVOICES.base_amount%TYPE;
610: l_temp_cancelled_amount AP_INVOICES.temp_cancelled_amount%TYPE;
611: l_cancelled_by AP_INVOICES.cancelled_by%TYPE;
612: l_cancelled_amount AP_INVOICES.cancelled_amount%TYPE;
613: l_cancelled_date AP_INVOICES.cancelled_date%TYPE;
606: l_return_status BOOLEAN;
607: l_message_name FND_NEW_MESSAGES.message_name%TYPE;
608: l_invoice_amount AP_INVOICES.invoice_amount%TYPE;
609: l_base_amount AP_INVOICES.base_amount%TYPE;
610: l_temp_cancelled_amount AP_INVOICES.temp_cancelled_amount%TYPE;
611: l_cancelled_by AP_INVOICES.cancelled_by%TYPE;
612: l_cancelled_amount AP_INVOICES.cancelled_amount%TYPE;
613: l_cancelled_date AP_INVOICES.cancelled_date%TYPE;
614: l_last_update_date AP_INVOICES.last_update_date%TYPE;
607: l_message_name FND_NEW_MESSAGES.message_name%TYPE;
608: l_invoice_amount AP_INVOICES.invoice_amount%TYPE;
609: l_base_amount AP_INVOICES.base_amount%TYPE;
610: l_temp_cancelled_amount AP_INVOICES.temp_cancelled_amount%TYPE;
611: l_cancelled_by AP_INVOICES.cancelled_by%TYPE;
612: l_cancelled_amount AP_INVOICES.cancelled_amount%TYPE;
613: l_cancelled_date AP_INVOICES.cancelled_date%TYPE;
614: l_last_update_date AP_INVOICES.last_update_date%TYPE;
615: l_original_prepayment_amount NUMBER;
608: l_invoice_amount AP_INVOICES.invoice_amount%TYPE;
609: l_base_amount AP_INVOICES.base_amount%TYPE;
610: l_temp_cancelled_amount AP_INVOICES.temp_cancelled_amount%TYPE;
611: l_cancelled_by AP_INVOICES.cancelled_by%TYPE;
612: l_cancelled_amount AP_INVOICES.cancelled_amount%TYPE;
613: l_cancelled_date AP_INVOICES.cancelled_date%TYPE;
614: l_last_update_date AP_INVOICES.last_update_date%TYPE;
615: l_original_prepayment_amount NUMBER;
616: l_pay_curr_invoice_amount AP_INVOICES.pay_curr_invoice_amount%TYPE;
609: l_base_amount AP_INVOICES.base_amount%TYPE;
610: l_temp_cancelled_amount AP_INVOICES.temp_cancelled_amount%TYPE;
611: l_cancelled_by AP_INVOICES.cancelled_by%TYPE;
612: l_cancelled_amount AP_INVOICES.cancelled_amount%TYPE;
613: l_cancelled_date AP_INVOICES.cancelled_date%TYPE;
614: l_last_update_date AP_INVOICES.last_update_date%TYPE;
615: l_original_prepayment_amount NUMBER;
616: l_pay_curr_invoice_amount AP_INVOICES.pay_curr_invoice_amount%TYPE;
617:
610: l_temp_cancelled_amount AP_INVOICES.temp_cancelled_amount%TYPE;
611: l_cancelled_by AP_INVOICES.cancelled_by%TYPE;
612: l_cancelled_amount AP_INVOICES.cancelled_amount%TYPE;
613: l_cancelled_date AP_INVOICES.cancelled_date%TYPE;
614: l_last_update_date AP_INVOICES.last_update_date%TYPE;
615: l_original_prepayment_amount NUMBER;
616: l_pay_curr_invoice_amount AP_INVOICES.pay_curr_invoice_amount%TYPE;
617:
618: BEGIN
612: l_cancelled_amount AP_INVOICES.cancelled_amount%TYPE;
613: l_cancelled_date AP_INVOICES.cancelled_date%TYPE;
614: l_last_update_date AP_INVOICES.last_update_date%TYPE;
615: l_original_prepayment_amount NUMBER;
616: l_pay_curr_invoice_amount AP_INVOICES.pay_curr_invoice_amount%TYPE;
617:
618: BEGIN
619:
620: IF (g_fnd_debug = 'Y') THEN
625:
626:
627: SELECT gl_date
628: INTO l_gl_date
629: FROM ap_invoices_all
630: WHERE invoice_id = p_invoice_id;
631:
632: IF (NOT AP_CANCEL_PKG.Ap_Cancel_Single_Invoice( --AP Call
633: P_invoice_id => p_invoice_id,
705: l_invoice_id NUMBER := NULL;
706:
707: CURSOR l_invoice_id_csr IS
708: select invoice_id
709: from AP_INVOICES_ALL
710: where invoice_num = p_invoice_num
711: and vendor_id = p_vendor_id
712: and org_id = p_org_id; -- Bug 9008159;
713:
827: x_return_status := FND_API.G_RET_STS_SUCCESS;
828:
829: DELETE FROM ap_invoice_lines_interface aili
830: WHERE EXISTS (SELECT 1
831: FROM ap_invoices_interface aii
832: WHERE aii.invoice_id = aili.invoice_id
833: AND aii.group_id = p_group_id);
834:
835: DELETE FROM ap_invoices_interface aii
831: FROM ap_invoices_interface aii
832: WHERE aii.invoice_id = aili.invoice_id
833: AND aii.group_id = p_group_id);
834:
835: DELETE FROM ap_invoices_interface aii
836: WHERE aii.group_id = p_group_id;
837: EXCEPTION
838: WHEN OTHERS THEN
839: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;