80: l_api_version CONSTANT VARCHAR2(30) := p_api_version;
81:
82: BEGIN
83:
84: x_return_status := OKC_API.G_RET_STS_SUCCESS;
85: -- call START_ACTIVITY to create savepoint, check compatibility
86: -- and initialize message list
87: x_return_status := OKC_API.START_ACTIVITY(
88: p_api_name => l_api_name,
83:
84: x_return_status := OKC_API.G_RET_STS_SUCCESS;
85: -- call START_ACTIVITY to create savepoint, check compatibility
86: -- and initialize message list
87: x_return_status := OKC_API.START_ACTIVITY(
88: p_api_name => l_api_name,
89: p_pkg_name => G_PKG_NAME,
90: p_init_msg_list => p_init_msg_list,
91: l_api_version => l_api_version,
93: p_api_type => G_API_TYPE,
94: x_return_status => x_return_status);
95:
96: -- check if activity started successfully
97: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
98: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
99: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
100: RAISE OKC_API.G_EXCEPTION_ERROR;
101: END IF;
94: x_return_status => x_return_status);
95:
96: -- check if activity started successfully
97: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
98: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
99: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
100: RAISE OKC_API.G_EXCEPTION_ERROR;
101: END IF;
102:
95:
96: -- check if activity started successfully
97: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
98: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
99: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
100: RAISE OKC_API.G_EXCEPTION_ERROR;
101: END IF;
102:
103:
96: -- check if activity started successfully
97: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
98: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
99: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
100: RAISE OKC_API.G_EXCEPTION_ERROR;
101: END IF;
102:
103:
104: x_amount := OKL_ACCOUNTING_UTIL.cc_round_format_amount(p_amount => TO_NUMBER(get_number(p_amount)),
108: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
109: x_msg_data => x_msg_data);
110:
111: EXCEPTION
112: WHEN OKC_API.G_EXCEPTION_ERROR THEN
113: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
114: p_api_name => l_api_name,
115: p_pkg_name => G_PKG_NAME,
116: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
109: x_msg_data => x_msg_data);
110:
111: EXCEPTION
112: WHEN OKC_API.G_EXCEPTION_ERROR THEN
113: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
114: p_api_name => l_api_name,
115: p_pkg_name => G_PKG_NAME,
116: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
117: x_msg_count => x_msg_count,
112: WHEN OKC_API.G_EXCEPTION_ERROR THEN
113: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
114: p_api_name => l_api_name,
115: p_pkg_name => G_PKG_NAME,
116: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
117: x_msg_count => x_msg_count,
118: x_msg_data => x_msg_data,
119: p_api_type => G_API_TYPE);
120:
117: x_msg_count => x_msg_count,
118: x_msg_data => x_msg_data,
119: p_api_type => G_API_TYPE);
120:
121: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
122: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
123: p_api_name => l_api_name,
124: p_pkg_name => G_PKG_NAME,
125: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
118: x_msg_data => x_msg_data,
119: p_api_type => G_API_TYPE);
120:
121: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
122: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
123: p_api_name => l_api_name,
124: p_pkg_name => G_PKG_NAME,
125: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
126: x_msg_count => x_msg_count,
121: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
122: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
123: p_api_name => l_api_name,
124: p_pkg_name => G_PKG_NAME,
125: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
126: x_msg_count => x_msg_count,
127: x_msg_data => x_msg_data,
128: p_api_type => G_API_TYPE);
129:
127: x_msg_data => x_msg_data,
128: p_api_type => G_API_TYPE);
129:
130: WHEN OTHERS THEN
131: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
132: p_api_name => l_api_name,
133: p_pkg_name => G_PKG_NAME,
134: p_exc_name => 'OTHERS',
135: x_msg_count => x_msg_count,
156: l_api_version CONSTANT VARCHAR2(30) := p_api_version;
157:
158: BEGIN
159:
160: x_return_status := OKC_API.G_RET_STS_SUCCESS;
161: -- call START_ACTIVITY to create savepoint, check compatibility
162: -- and initialize message list
163: x_return_status := OKC_API.START_ACTIVITY(
164: p_api_name => l_api_name,
159:
160: x_return_status := OKC_API.G_RET_STS_SUCCESS;
161: -- call START_ACTIVITY to create savepoint, check compatibility
162: -- and initialize message list
163: x_return_status := OKC_API.START_ACTIVITY(
164: p_api_name => l_api_name,
165: p_pkg_name => G_PKG_NAME,
166: p_init_msg_list => p_init_msg_list,
167: l_api_version => l_api_version,
169: p_api_type => G_API_TYPE,
170: x_return_status => x_return_status);
171:
172: -- check if activity started successfully
173: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
174: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
175: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
176: RAISE OKC_API.G_EXCEPTION_ERROR;
177: END IF;
170: x_return_status => x_return_status);
171:
172: -- check if activity started successfully
173: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
174: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
175: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
176: RAISE OKC_API.G_EXCEPTION_ERROR;
177: END IF;
178:
171:
172: -- check if activity started successfully
173: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
174: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
175: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
176: RAISE OKC_API.G_EXCEPTION_ERROR;
177: END IF;
178:
179:
172: -- check if activity started successfully
173: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
174: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
175: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
176: RAISE OKC_API.G_EXCEPTION_ERROR;
177: END IF;
178:
179:
180: x_amount := OKL_ACCOUNTING_UTIL.cc_round_format_amount(p_amount => TO_NUMBER(get_number(p_amount)),
184: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
185: x_msg_data => x_msg_data);
186:
187: EXCEPTION
188: WHEN OKC_API.G_EXCEPTION_ERROR THEN
189: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
190: p_api_name => l_api_name,
191: p_pkg_name => G_PKG_NAME,
192: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
185: x_msg_data => x_msg_data);
186:
187: EXCEPTION
188: WHEN OKC_API.G_EXCEPTION_ERROR THEN
189: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
190: p_api_name => l_api_name,
191: p_pkg_name => G_PKG_NAME,
192: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
193: x_msg_count => x_msg_count,
188: WHEN OKC_API.G_EXCEPTION_ERROR THEN
189: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
190: p_api_name => l_api_name,
191: p_pkg_name => G_PKG_NAME,
192: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
193: x_msg_count => x_msg_count,
194: x_msg_data => x_msg_data,
195: p_api_type => G_API_TYPE);
196:
193: x_msg_count => x_msg_count,
194: x_msg_data => x_msg_data,
195: p_api_type => G_API_TYPE);
196:
197: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
198: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
199: p_api_name => l_api_name,
200: p_pkg_name => G_PKG_NAME,
201: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
194: x_msg_data => x_msg_data,
195: p_api_type => G_API_TYPE);
196:
197: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
198: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
199: p_api_name => l_api_name,
200: p_pkg_name => G_PKG_NAME,
201: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
202: x_msg_count => x_msg_count,
197: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
198: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
199: p_api_name => l_api_name,
200: p_pkg_name => G_PKG_NAME,
201: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
202: x_msg_count => x_msg_count,
203: x_msg_data => x_msg_data,
204: p_api_type => G_API_TYPE);
205:
203: x_msg_data => x_msg_data,
204: p_api_type => G_API_TYPE);
205:
206: WHEN OTHERS THEN
207: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
208: p_api_name => l_api_name,
209: p_pkg_name => G_PKG_NAME,
210: p_exc_name => 'OTHERS',
211: x_msg_count => x_msg_count,
232: l_api_version CONSTANT VARCHAR2(30) := p_api_version;
233:
234: BEGIN
235:
236: x_return_status := OKC_API.G_RET_STS_SUCCESS;
237: -- call START_ACTIVITY to create savepoint, check compatibility
238: -- and initialize message list
239: x_return_status := OKC_API.START_ACTIVITY(
240: p_api_name => l_api_name,
235:
236: x_return_status := OKC_API.G_RET_STS_SUCCESS;
237: -- call START_ACTIVITY to create savepoint, check compatibility
238: -- and initialize message list
239: x_return_status := OKC_API.START_ACTIVITY(
240: p_api_name => l_api_name,
241: p_pkg_name => G_PKG_NAME,
242: p_init_msg_list => p_init_msg_list,
243: l_api_version => l_api_version,
245: p_api_type => G_API_TYPE,
246: x_return_status => x_return_status);
247:
248: -- check if activity started successfully
249: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
250: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
251: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
252: RAISE OKC_API.G_EXCEPTION_ERROR;
253: END IF;
246: x_return_status => x_return_status);
247:
248: -- check if activity started successfully
249: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
250: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
251: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
252: RAISE OKC_API.G_EXCEPTION_ERROR;
253: END IF;
254:
247:
248: -- check if activity started successfully
249: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
250: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
251: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
252: RAISE OKC_API.G_EXCEPTION_ERROR;
253: END IF;
254:
255: x_amount := OKL_ACCOUNTING_UTIL.cross_currency_round_amount(
248: -- check if activity started successfully
249: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
250: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
251: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
252: RAISE OKC_API.G_EXCEPTION_ERROR;
253: END IF;
254:
255: x_amount := OKL_ACCOUNTING_UTIL.cross_currency_round_amount(
256: p_amount => TO_NUMBER(get_number(p_amount)),
260: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
261: x_msg_data => x_msg_data);
262:
263: EXCEPTION
264: WHEN OKC_API.G_EXCEPTION_ERROR THEN
265: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
266: p_api_name => l_api_name,
267: p_pkg_name => G_PKG_NAME,
268: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
261: x_msg_data => x_msg_data);
262:
263: EXCEPTION
264: WHEN OKC_API.G_EXCEPTION_ERROR THEN
265: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
266: p_api_name => l_api_name,
267: p_pkg_name => G_PKG_NAME,
268: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
269: x_msg_count => x_msg_count,
264: WHEN OKC_API.G_EXCEPTION_ERROR THEN
265: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
266: p_api_name => l_api_name,
267: p_pkg_name => G_PKG_NAME,
268: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
269: x_msg_count => x_msg_count,
270: x_msg_data => x_msg_data,
271: p_api_type => G_API_TYPE);
272:
269: x_msg_count => x_msg_count,
270: x_msg_data => x_msg_data,
271: p_api_type => G_API_TYPE);
272:
273: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
274: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
275: p_api_name => l_api_name,
276: p_pkg_name => G_PKG_NAME,
277: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
270: x_msg_data => x_msg_data,
271: p_api_type => G_API_TYPE);
272:
273: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
274: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
275: p_api_name => l_api_name,
276: p_pkg_name => G_PKG_NAME,
277: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
278: x_msg_count => x_msg_count,
273: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
274: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
275: p_api_name => l_api_name,
276: p_pkg_name => G_PKG_NAME,
277: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
278: x_msg_count => x_msg_count,
279: x_msg_data => x_msg_data,
280: p_api_type => G_API_TYPE);
281:
279: x_msg_data => x_msg_data,
280: p_api_type => G_API_TYPE);
281:
282: WHEN OTHERS THEN
283: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
284: p_api_name => l_api_name,
285: p_pkg_name => G_PKG_NAME,
286: p_exc_name => 'OTHERS',
287: x_msg_count => x_msg_count,
308: l_api_version CONSTANT VARCHAR2(30) := p_api_version;
309:
310: BEGIN
311:
312: x_return_status := OKC_API.G_RET_STS_SUCCESS;
313: -- call START_ACTIVITY to create savepoint, check compatibility
314: -- and initialize message list
315: x_return_status := OKC_API.START_ACTIVITY(
316: p_api_name => l_api_name,
311:
312: x_return_status := OKC_API.G_RET_STS_SUCCESS;
313: -- call START_ACTIVITY to create savepoint, check compatibility
314: -- and initialize message list
315: x_return_status := OKC_API.START_ACTIVITY(
316: p_api_name => l_api_name,
317: p_pkg_name => G_PKG_NAME,
318: p_init_msg_list => p_init_msg_list,
319: l_api_version => l_api_version,
321: p_api_type => G_API_TYPE,
322: x_return_status => x_return_status);
323:
324: -- check if activity started successfully
325: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
326: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
327: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
328: RAISE OKC_API.G_EXCEPTION_ERROR;
329: END IF;
322: x_return_status => x_return_status);
323:
324: -- check if activity started successfully
325: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
326: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
327: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
328: RAISE OKC_API.G_EXCEPTION_ERROR;
329: END IF;
330:
323:
324: -- check if activity started successfully
325: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
326: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
327: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
328: RAISE OKC_API.G_EXCEPTION_ERROR;
329: END IF;
330:
331:
324: -- check if activity started successfully
325: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
326: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
327: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
328: RAISE OKC_API.G_EXCEPTION_ERROR;
329: END IF;
330:
331:
332: x_amount := OKL_ACCOUNTING_UTIL.cross_currency_round_amount(
337: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count,
338: x_msg_data => x_msg_data);
339:
340: EXCEPTION
341: WHEN OKC_API.G_EXCEPTION_ERROR THEN
342: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
343: p_api_name => l_api_name,
344: p_pkg_name => G_PKG_NAME,
345: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
338: x_msg_data => x_msg_data);
339:
340: EXCEPTION
341: WHEN OKC_API.G_EXCEPTION_ERROR THEN
342: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
343: p_api_name => l_api_name,
344: p_pkg_name => G_PKG_NAME,
345: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
346: x_msg_count => x_msg_count,
341: WHEN OKC_API.G_EXCEPTION_ERROR THEN
342: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
343: p_api_name => l_api_name,
344: p_pkg_name => G_PKG_NAME,
345: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
346: x_msg_count => x_msg_count,
347: x_msg_data => x_msg_data,
348: p_api_type => G_API_TYPE);
349:
346: x_msg_count => x_msg_count,
347: x_msg_data => x_msg_data,
348: p_api_type => G_API_TYPE);
349:
350: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
351: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
352: p_api_name => l_api_name,
353: p_pkg_name => G_PKG_NAME,
354: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
347: x_msg_data => x_msg_data,
348: p_api_type => G_API_TYPE);
349:
350: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
351: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
352: p_api_name => l_api_name,
353: p_pkg_name => G_PKG_NAME,
354: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
355: x_msg_count => x_msg_count,
350: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
351: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
352: p_api_name => l_api_name,
353: p_pkg_name => G_PKG_NAME,
354: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
355: x_msg_count => x_msg_count,
356: x_msg_data => x_msg_data,
357: p_api_type => G_API_TYPE);
358:
356: x_msg_data => x_msg_data,
357: p_api_type => G_API_TYPE);
358:
359: WHEN OTHERS THEN
360: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
361: p_api_name => l_api_name,
362: p_pkg_name => G_PKG_NAME,
363: p_exc_name => 'OTHERS',
364: x_msg_count => x_msg_count,