33: invalid_ledger exception;
34: l_path_name varchar2(150) := g_path || 'create_revaluation_event';
35:
36: BEGIN
37: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
38: p_full_path => l_path_name,
39: p_string => 'create_revaluation_event....Welcome... ');
40:
41: select book_type_code,revaluation_date
42: into l_book_type_code,l_revaluation_date
43: from igi_iac_revaluations
44: where revaluation_id =p_revaluation_id;
45:
46: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
47: p_full_path => l_path_name,
48: p_string => 'l_book_type_code = ' || l_book_type_code);
49:
50: -- Find the set_of_books_id and the currency code
53: ,l_chart_of_accounts_id
54: ,l_currency_code
55: ,l_precision)) THEN
56:
57: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
58: p_full_path => l_path_name,
59: p_string => 'GL book info found for ledger_id = '||l_ledger_id);
60: ELSE
61: raise invalid_ledger;
71: l_valuation_method := l_book_type_code;
72: l_event_date := sysdate; --l_revaluation_date;
73: l_event_status := XLA_EVENTS_PUB_PKG.C_EVENT_UNPROCESSED;
74:
75: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
76: p_full_path => l_path_name,
77: p_string => 'p_revaluation_id = ' || p_revaluation_id);
78:
79: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
75: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
76: p_full_path => l_path_name,
77: p_string => 'p_revaluation_id = ' || p_revaluation_id);
78:
79: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
80: p_full_path => l_path_name,
81: p_string => 'Calling xla create event api.');
82:
83: -- Call XLA API
91: p_reference_info => NULL,
92: p_valuation_method => l_valuation_method,
93: p_security_context => l_security_context);
94:
95: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
96: p_full_path => l_path_name,
97: p_string => 'p_event_id = ' || p_event_id);
98:
99: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
95: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
96: p_full_path => l_path_name,
97: p_string => 'p_event_id = ' || p_event_id);
98:
99: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
100: p_full_path => l_path_name,
101: p_string => 'create_revaluation_event....Bye... ');
102:
103: return true;
103: return true;
104:
105: EXCEPTION
106: WHEN invalid_ledger THEN
107: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
108: p_full_path => l_path_name,
109: p_string => 'GL book info not found for book = '|| l_book_type_code);
110: igi_iac_debug_pkg.debug_unexpected_msg(p_full_path => l_path_name);
111: return FALSE;
106: WHEN invalid_ledger THEN
107: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
108: p_full_path => l_path_name,
109: p_string => 'GL book info not found for book = '|| l_book_type_code);
110: igi_iac_debug_pkg.debug_unexpected_msg(p_full_path => l_path_name);
111: return FALSE;
112:
113: WHEN OTHERS THEN
114: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
110: igi_iac_debug_pkg.debug_unexpected_msg(p_full_path => l_path_name);
111: return FALSE;
112:
113: WHEN OTHERS THEN
114: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
115: p_full_path => l_path_name,
116: p_string => 'Fatal Error = '|| sqlerrm);
117: igi_iac_debug_pkg.debug_unexpected_msg(p_full_path => l_path_name);
118: return FALSE;
113: WHEN OTHERS THEN
114: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
115: p_full_path => l_path_name,
116: p_string => 'Fatal Error = '|| sqlerrm);
117: igi_iac_debug_pkg.debug_unexpected_msg(p_full_path => l_path_name);
118: return FALSE;
119: END create_revaluation_event;
120:
121:
150: ,l_chart_of_accounts_id
151: ,l_currency_code
152: ,l_precision)) THEN
153:
154: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
155: p_full_path => l_path_name,
156: p_string => 'GL book info found for ledger_id = '||l_ledger_id);
157: ELSE
158: raise invalid_ledger;
178: return true;
179:
180: EXCEPTION
181: WHEN OTHERS THEN
182: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
183: p_full_path => l_path_name,
184: p_string => 'Fatal Error = '|| sqlerrm);
185: igi_iac_debug_pkg.debug_unexpected_msg(p_full_path => l_path_name);
186: return FALSE;
181: WHEN OTHERS THEN
182: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
183: p_full_path => l_path_name,
184: p_string => 'Fatal Error = '|| sqlerrm);
185: igi_iac_debug_pkg.debug_unexpected_msg(p_full_path => l_path_name);
186: return FALSE;
187:
188: end update_revaluation_event;
189:
220: ,l_chart_of_accounts_id
221: ,l_currency_code
222: ,l_precision)) THEN
223:
224: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
225: p_full_path => l_path_name,
226: p_string => 'GL book info found for ledger_id = '||l_ledger_id);
227: ELSE
228: raise invalid_ledger;
246: return true;
247:
248: EXCEPTION
249: WHEN OTHERS THEN
250: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
251: p_full_path => l_path_name,
252: p_string => 'Fatal Error = '|| sqlerrm);
253: igi_iac_debug_pkg.debug_unexpected_msg(p_full_path => l_path_name);
254: return FALSE;
249: WHEN OTHERS THEN
250: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
251: p_full_path => l_path_name,
252: p_string => 'Fatal Error = '|| sqlerrm);
253: igi_iac_debug_pkg.debug_unexpected_msg(p_full_path => l_path_name);
254: return FALSE;
255:
256: END delete_revaluation_event;
257: