46: l_due_date pn_payment_items.due_date%TYPE; -- Added for Bug#8303091
47:
48: BEGIN
49:
50: pnp_debug_pkg.log(l_desc ||' (+)');
51: pnp_debug_pkg.log('INPUT PARAMETERS');
52: pnp_debug_pkg.log('p_payment_item_id : '||TO_CHAR(p_payment_item_id));
53: pnp_debug_pkg.log('p_legal_entity_id : '||TO_CHAR(p_legal_entity_id));
54: pnp_debug_pkg.log('p_ledger_id : '||TO_CHAR(p_ledger_id));
47:
48: BEGIN
49:
50: pnp_debug_pkg.log(l_desc ||' (+)');
51: pnp_debug_pkg.log('INPUT PARAMETERS');
52: pnp_debug_pkg.log('p_payment_item_id : '||TO_CHAR(p_payment_item_id));
53: pnp_debug_pkg.log('p_legal_entity_id : '||TO_CHAR(p_legal_entity_id));
54: pnp_debug_pkg.log('p_ledger_id : '||TO_CHAR(p_ledger_id));
55: pnp_debug_pkg.log('p_org_id : '||TO_CHAR(p_org_id));
48: BEGIN
49:
50: pnp_debug_pkg.log(l_desc ||' (+)');
51: pnp_debug_pkg.log('INPUT PARAMETERS');
52: pnp_debug_pkg.log('p_payment_item_id : '||TO_CHAR(p_payment_item_id));
53: pnp_debug_pkg.log('p_legal_entity_id : '||TO_CHAR(p_legal_entity_id));
54: pnp_debug_pkg.log('p_ledger_id : '||TO_CHAR(p_ledger_id));
55: pnp_debug_pkg.log('p_org_id : '||TO_CHAR(p_org_id));
56: pnp_debug_pkg.log('p_bill_or_pay : '||p_bill_or_pay);
49:
50: pnp_debug_pkg.log(l_desc ||' (+)');
51: pnp_debug_pkg.log('INPUT PARAMETERS');
52: pnp_debug_pkg.log('p_payment_item_id : '||TO_CHAR(p_payment_item_id));
53: pnp_debug_pkg.log('p_legal_entity_id : '||TO_CHAR(p_legal_entity_id));
54: pnp_debug_pkg.log('p_ledger_id : '||TO_CHAR(p_ledger_id));
55: pnp_debug_pkg.log('p_org_id : '||TO_CHAR(p_org_id));
56: pnp_debug_pkg.log('p_bill_or_pay : '||p_bill_or_pay);
57:
50: pnp_debug_pkg.log(l_desc ||' (+)');
51: pnp_debug_pkg.log('INPUT PARAMETERS');
52: pnp_debug_pkg.log('p_payment_item_id : '||TO_CHAR(p_payment_item_id));
53: pnp_debug_pkg.log('p_legal_entity_id : '||TO_CHAR(p_legal_entity_id));
54: pnp_debug_pkg.log('p_ledger_id : '||TO_CHAR(p_ledger_id));
55: pnp_debug_pkg.log('p_org_id : '||TO_CHAR(p_org_id));
56: pnp_debug_pkg.log('p_bill_or_pay : '||p_bill_or_pay);
57:
58: IF p_bill_or_pay = 'PAY' THEN
51: pnp_debug_pkg.log('INPUT PARAMETERS');
52: pnp_debug_pkg.log('p_payment_item_id : '||TO_CHAR(p_payment_item_id));
53: pnp_debug_pkg.log('p_legal_entity_id : '||TO_CHAR(p_legal_entity_id));
54: pnp_debug_pkg.log('p_ledger_id : '||TO_CHAR(p_ledger_id));
55: pnp_debug_pkg.log('p_org_id : '||TO_CHAR(p_org_id));
56: pnp_debug_pkg.log('p_bill_or_pay : '||p_bill_or_pay);
57:
58: IF p_bill_or_pay = 'PAY' THEN
59: l_event_type := 'LEASE_EXPENSE_TRANSFER';
52: pnp_debug_pkg.log('p_payment_item_id : '||TO_CHAR(p_payment_item_id));
53: pnp_debug_pkg.log('p_legal_entity_id : '||TO_CHAR(p_legal_entity_id));
54: pnp_debug_pkg.log('p_ledger_id : '||TO_CHAR(p_ledger_id));
55: pnp_debug_pkg.log('p_org_id : '||TO_CHAR(p_org_id));
56: pnp_debug_pkg.log('p_bill_or_pay : '||p_bill_or_pay);
57:
58: IF p_bill_or_pay = 'PAY' THEN
59: l_event_type := 'LEASE_EXPENSE_TRANSFER';
60: ELSIF p_bill_or_pay = 'BILL' THEN
63: raise bad_input_exception;
64: END IF;
65:
66: l_info := 'initializing parameters for xla API ';
67: pnp_debug_pkg.log(l_info);
68:
69: l_not_found := FALSE;
70: l_source_info := null;
71: l_chk_source_info := null;
84:
85: l_due_date := p_due_date; -- Added for Bug#8303091
86:
87: l_info := 'checking existence of xla event for payment item ID: '||p_payment_item_id;
88: pnp_debug_pkg.log(l_info);
89:
90: -- NOTE: this 'BEGIN' and 'END' should ideally not be there.
91: -- The SLA function throws a nasty error when no data is found
92: -- We need to gracefully handle the exception thrown
106: l_not_found := TRUE;
107: END;
108:
109: l_info := 'creating xla event for payment item ID: '||p_payment_item_id;
110: pnp_debug_pkg.log(l_info);
111:
112: IF l_chk_return_info.COUNT = 0 OR l_not_found THEN
113:
114: l_event_id :=
134: END IF;
135:
136: END IF;
137:
138: pnp_debug_pkg.log(l_desc ||' (-)');
139:
140: EXCEPTION
141: WHEN OTHERS THEN
142: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
138: pnp_debug_pkg.log(l_desc ||' (-)');
139:
140: EXCEPTION
141: WHEN OTHERS THEN
142: pnp_debug_pkg.log(l_desc || ': Error while ' || l_info);
143: raise;
144:
145: END create_xla_event;
146: