1: PACKAGE BODY PSA_AP_BC_PVT AS
2: --$Header: psavapbb.pls 120.49.12010000.5 2008/12/15 13:19:10 gnrajago ship $
3:
4: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
5: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
6: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
7: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
8: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
1: PACKAGE BODY PSA_AP_BC_PVT AS
2: --$Header: psavapbb.pls 120.49.12010000.5 2008/12/15 13:19:10 gnrajago ship $
3:
4: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
5: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
6: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
7: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
8: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
9: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
2: --$Header: psavapbb.pls 120.49.12010000.5 2008/12/15 13:19:10 gnrajago ship $
3:
4: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
5: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
6: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
7: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
8: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
9: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10: g_full_path CONSTANT VARCHAR2(50) :='psa.plsql.psavapbb.psa_ap_bc_pvt';
3:
4: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
5: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
6: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
7: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
8: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
9: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10: g_full_path CONSTANT VARCHAR2(50) :='psa.plsql.psavapbb.psa_ap_bc_pvt';
11: /*=============================================================================
4: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
5: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
6: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
7: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
8: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
9: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10: g_full_path CONSTANT VARCHAR2(50) :='psa.plsql.psavapbb.psa_ap_bc_pvt';
11: /*=============================================================================
12: |Private Procedure Specifications
5: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
6: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
7: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
8: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
9: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10: g_full_path CONSTANT VARCHAR2(50) :='psa.plsql.psavapbb.psa_ap_bc_pvt';
11: /*=============================================================================
12: |Private Procedure Specifications
13: *===========================================================================*/
74: l_events_Tab Event_tab_type;
75: l_event_count NUMBER;
76:
77: l_curr_calling_sequence VARCHAR2(2000);
78: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
79: l_debug_loc VARCHAR2(30) := 'Delete_Events';
80: l_api_name VARCHAR2(240);
81:
82: l_event_source_info xla_events_pub_pkg.t_event_source_info;
255: FROM ap_invoice_distributions_all D
256: WHERE D.invoice_distribution_id = p_inv_dist_id;
257:
258: l_curr_calling_sequence VARCHAR2(2000);
259: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
260: l_debug_loc VARCHAR2(30) := 'Create_Events';
261:
262: TYPE BC_Event_tab_type IS TABLE OF xla_events%rowtype
263: INDEX BY BINARY_INTEGER;
1277: WHERE invoice_distribution_id = p_inv_dist_id;
1278:
1279:
1280:
1281: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
1282: l_debug_loc VARCHAR2(30) := 'Reinstate_PO_Encumbrance';
1283: l_dist_ccid NUMBER(15);
1284: l_po_dist_id NUMBER(15);
1285: l_po_expense_ccid NUMBER;