102: P_CHR_STATUS IN VARCHAR2)
103: IS
104: l_api_name CONSTANT VARCHAR2(30) := 'OKS_RENEW_UTIL';
105: l_api_version CONSTANT NUMBER := 1.0;
106: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
107:
108: BEGIN
109:
110: l_return_status := OKC_API.START_ACTIVITY
106: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
107:
108: BEGIN
109:
110: l_return_status := OKC_API.START_ACTIVITY
111: (l_api_name
112: , p_init_msg_list
113: , '_PUB'
114: , x_return_status
113: , '_PUB'
114: , x_return_status
115: );
116:
117: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
118: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
119: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
120: RAISE OKC_API.G_EXCEPTION_ERROR;
121: END IF;
114: , x_return_status
115: );
116:
117: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
118: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
119: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
120: RAISE OKC_API.G_EXCEPTION_ERROR;
121: END IF;
122:
115: );
116:
117: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
118: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
119: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
120: RAISE OKC_API.G_EXCEPTION_ERROR;
121: END IF;
122:
123: OKC_UTIL.call_user_hook
116:
117: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
118: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
119: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
120: RAISE OKC_API.G_EXCEPTION_ERROR;
121: END IF;
122:
123: OKC_UTIL.call_user_hook
124: (
127: p_procedure_name => l_api_name,
128: p_before_after => 'B'
129: );
130:
131: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
132: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
133: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
134: RAISE OKC_API.G_EXCEPTION_ERROR;
135: END IF;
128: p_before_after => 'B'
129: );
130:
131: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
132: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
133: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
134: RAISE OKC_API.G_EXCEPTION_ERROR;
135: END IF;
136:
129: );
130:
131: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
132: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
133: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
134: RAISE OKC_API.G_EXCEPTION_ERROR;
135: END IF;
136:
137: OKS_RENEW_UTIL_PVT.UPDATE_RENEWAL_STATUS(
130:
131: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
132: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
133: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
134: RAISE OKC_API.G_EXCEPTION_ERROR;
135: END IF;
136:
137: OKS_RENEW_UTIL_PVT.UPDATE_RENEWAL_STATUS(
138: x_return_status => x_Return_Status,
140: P_renew_status => P_renew_status,
141: P_Chr_status => P_Chr_status
142: );
143:
144: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
145: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
146: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
147: RAISE OKC_API.G_EXCEPTION_ERROR;
148: END IF;
141: P_Chr_status => P_Chr_status
142: );
143:
144: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
145: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
146: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
147: RAISE OKC_API.G_EXCEPTION_ERROR;
148: END IF;
149:
142: );
143:
144: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
145: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
146: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
147: RAISE OKC_API.G_EXCEPTION_ERROR;
148: END IF;
149:
150: OKC_UTIL.call_user_hook
143:
144: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
145: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
146: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
147: RAISE OKC_API.G_EXCEPTION_ERROR;
148: END IF;
149:
150: OKC_UTIL.call_user_hook
151: (
154: p_procedure_name => l_api_name,
155: p_before_after => 'A'
156: );
157:
158: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
159: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
160: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
161: RAISE OKC_API.G_EXCEPTION_ERROR;
162: END IF;
155: p_before_after => 'A'
156: );
157:
158: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
159: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
160: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
161: RAISE OKC_API.G_EXCEPTION_ERROR;
162: END IF;
163:
156: );
157:
158: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
159: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
160: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
161: RAISE OKC_API.G_EXCEPTION_ERROR;
162: END IF;
163:
164: OKC_API.END_ACTIVITY
157:
158: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
159: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
160: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
161: RAISE OKC_API.G_EXCEPTION_ERROR;
162: END IF;
163:
164: OKC_API.END_ACTIVITY
165: (
160: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
161: RAISE OKC_API.G_EXCEPTION_ERROR;
162: END IF;
163:
164: OKC_API.END_ACTIVITY
165: (
166: x_msg_count => x_msg_count,
167: x_msg_data => x_msg_data
168: );
167: x_msg_data => x_msg_data
168: );
169:
170: EXCEPTION
171: WHEN OKC_API.G_EXCEPTION_ERROR THEN
172: x_return_status := OKC_API.HANDLE_EXCEPTIONS
173: (
174: l_api_name,
175: G_PKG_NAME,
168: );
169:
170: EXCEPTION
171: WHEN OKC_API.G_EXCEPTION_ERROR THEN
172: x_return_status := OKC_API.HANDLE_EXCEPTIONS
173: (
174: l_api_name,
175: G_PKG_NAME,
176: 'OKC_API.G_RET_STS_ERROR',
172: x_return_status := OKC_API.HANDLE_EXCEPTIONS
173: (
174: l_api_name,
175: G_PKG_NAME,
176: 'OKC_API.G_RET_STS_ERROR',
177: x_msg_count,
178: x_msg_data,
179: '_PUB'
180: );
178: x_msg_data,
179: '_PUB'
180: );
181:
182: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
183: x_return_status := OKC_API.HANDLE_EXCEPTIONS
184: (
185: l_api_name,
186: G_PKG_NAME,
179: '_PUB'
180: );
181:
182: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
183: x_return_status := OKC_API.HANDLE_EXCEPTIONS
184: (
185: l_api_name,
186: G_PKG_NAME,
187: 'OKC_API.G_RET_STS_UNEXP_ERROR',
183: x_return_status := OKC_API.HANDLE_EXCEPTIONS
184: (
185: l_api_name,
186: G_PKG_NAME,
187: 'OKC_API.G_RET_STS_UNEXP_ERROR',
188: x_msg_count,
189: x_msg_data,
190: '_PUB'
191: );
190: '_PUB'
191: );
192:
193: WHEN OTHERS THEN
194: x_return_status := OKC_API.HANDLE_EXCEPTIONS
195: (
196: l_api_name,
197: G_PKG_NAME,
198: 'OTHERS',
213: x_return_status OUT NOCOPY VARCHAR2) IS
214:
215: l_api_name CONSTANT VARCHAR2(30) := 'OKS_RENEW_UTIL_PUB';
216: l_api_version CONSTANT NUMBER := 1.0;
217: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
218:
219: BEGIN
220:
221: l_return_status := OKC_API.START_ACTIVITY
217: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
218:
219: BEGIN
220:
221: l_return_status := OKC_API.START_ACTIVITY
222: (
223: l_api_name
224: , p_init_msg_list
225: , '_PUB'
225: , '_PUB'
226: , x_return_status
227: );
228:
229: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
230: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
231: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
232: RAISE OKC_API.G_EXCEPTION_ERROR;
233: END IF;
226: , x_return_status
227: );
228:
229: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
230: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
231: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
232: RAISE OKC_API.G_EXCEPTION_ERROR;
233: END IF;
234:
227: );
228:
229: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
230: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
231: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
232: RAISE OKC_API.G_EXCEPTION_ERROR;
233: END IF;
234:
235:
228:
229: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
230: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
231: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
232: RAISE OKC_API.G_EXCEPTION_ERROR;
233: END IF;
234:
235:
236: OKC_UTIL.call_user_hook
240: p_procedure_name => l_api_name,
241: p_before_after => 'B'
242: );
243:
244: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
245: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
246: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
247: RAISE OKC_API.G_EXCEPTION_ERROR;
248: END IF;
241: p_before_after => 'B'
242: );
243:
244: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
245: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
246: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
247: RAISE OKC_API.G_EXCEPTION_ERROR;
248: END IF;
249:
242: );
243:
244: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
245: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
246: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
247: RAISE OKC_API.G_EXCEPTION_ERROR;
248: END IF;
249:
250: OKS_RENEW_UTIL_PVT.Can_Update_Contract(p_chr_id => p_chr_id,
243:
244: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
245: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
246: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
247: RAISE OKC_API.G_EXCEPTION_ERROR;
248: END IF;
249:
250: OKS_RENEW_UTIL_PVT.Can_Update_Contract(p_chr_id => p_chr_id,
251: x_can_update_yn => x_can_update_yn,
254: x_msg_data => x_msg_data,
255: x_return_status => x_return_status);
256:
257:
258: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
259: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
260: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
261: RAISE OKC_API.G_EXCEPTION_ERROR;
262: END IF;
255: x_return_status => x_return_status);
256:
257:
258: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
259: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
260: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
261: RAISE OKC_API.G_EXCEPTION_ERROR;
262: END IF;
263:
256:
257:
258: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
259: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
260: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
261: RAISE OKC_API.G_EXCEPTION_ERROR;
262: END IF;
263:
264:
257:
258: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
259: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
260: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
261: RAISE OKC_API.G_EXCEPTION_ERROR;
262: END IF;
263:
264:
265: OKC_UTIL.call_user_hook
269: p_procedure_name => l_api_name,
270: p_before_after => 'A'
271: );
272:
273: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
274: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
275: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
276: RAISE OKC_API.G_EXCEPTION_ERROR;
277: END IF;
270: p_before_after => 'A'
271: );
272:
273: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
274: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
275: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
276: RAISE OKC_API.G_EXCEPTION_ERROR;
277: END IF;
278:
271: );
272:
273: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
274: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
275: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
276: RAISE OKC_API.G_EXCEPTION_ERROR;
277: END IF;
278:
279: OKC_API.END_ACTIVITY
272:
273: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
274: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
275: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
276: RAISE OKC_API.G_EXCEPTION_ERROR;
277: END IF;
278:
279: OKC_API.END_ACTIVITY
280: (
275: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
276: RAISE OKC_API.G_EXCEPTION_ERROR;
277: END IF;
278:
279: OKC_API.END_ACTIVITY
280: (
281: x_msg_count => x_msg_count,
282: x_msg_data => x_msg_data
283: );
282: x_msg_data => x_msg_data
283: );
284:
285: EXCEPTION
286: WHEN OKC_API.G_EXCEPTION_ERROR THEN
287: x_return_status := OKC_API.HANDLE_EXCEPTIONS
288: (
289: l_api_name,
290: G_PKG_NAME,
283: );
284:
285: EXCEPTION
286: WHEN OKC_API.G_EXCEPTION_ERROR THEN
287: x_return_status := OKC_API.HANDLE_EXCEPTIONS
288: (
289: l_api_name,
290: G_PKG_NAME,
291: 'OKC_API.G_RET_STS_ERROR',
287: x_return_status := OKC_API.HANDLE_EXCEPTIONS
288: (
289: l_api_name,
290: G_PKG_NAME,
291: 'OKC_API.G_RET_STS_ERROR',
292: x_msg_count,
293: x_msg_data,
294: '_PUB'
295: );
293: x_msg_data,
294: '_PUB'
295: );
296:
297: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
298: x_return_status := OKC_API.HANDLE_EXCEPTIONS
299: (
300: l_api_name,
301: G_PKG_NAME,
294: '_PUB'
295: );
296:
297: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
298: x_return_status := OKC_API.HANDLE_EXCEPTIONS
299: (
300: l_api_name,
301: G_PKG_NAME,
302: 'OKC_API.G_RET_STS_UNEXP_ERROR',
298: x_return_status := OKC_API.HANDLE_EXCEPTIONS
299: (
300: l_api_name,
301: G_PKG_NAME,
302: 'OKC_API.G_RET_STS_UNEXP_ERROR',
303: x_msg_count,
304: x_msg_data,
305: '_PUB'
306: );
305: '_PUB'
306: );
307:
308: WHEN OTHERS THEN
309: x_return_status := OKC_API.HANDLE_EXCEPTIONS
310: (
311: l_api_name,
312: G_PKG_NAME,
313: 'OTHERS',
333: x_return_status OUT NOCOPY VARCHAR2) IS
334:
335: l_api_name CONSTANT VARCHAR2(30) := 'OKS_RENEW_UTIL_PUB';
336: l_api_version CONSTANT NUMBER := 1.0;
337: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
338:
339: BEGIN
340:
341: l_return_status := OKC_API.START_ACTIVITY (l_api_name
337: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
338:
339: BEGIN
340:
341: l_return_status := OKC_API.START_ACTIVITY (l_api_name
342: , p_init_msg_list
343: , '_PUB'
344: , x_return_status
345: );
343: , '_PUB'
344: , x_return_status
345: );
346:
347: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
348: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
349: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
350: RAISE OKC_API.G_EXCEPTION_ERROR;
351: END IF;
344: , x_return_status
345: );
346:
347: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
348: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
349: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
350: RAISE OKC_API.G_EXCEPTION_ERROR;
351: END IF;
352:
345: );
346:
347: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
348: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
349: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
350: RAISE OKC_API.G_EXCEPTION_ERROR;
351: END IF;
352:
353:
346:
347: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
348: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
349: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
350: RAISE OKC_API.G_EXCEPTION_ERROR;
351: END IF;
352:
353:
354: OKC_UTIL.call_user_hook (x_return_status => x_return_status,
356: p_procedure_name => l_api_name,
357: p_before_after => 'B'
358: );
359:
360: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
361: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
362: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
363: RAISE OKC_API.G_EXCEPTION_ERROR;
364: END IF;
357: p_before_after => 'B'
358: );
359:
360: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
361: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
362: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
363: RAISE OKC_API.G_EXCEPTION_ERROR;
364: END IF;
365:
358: );
359:
360: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
361: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
362: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
363: RAISE OKC_API.G_EXCEPTION_ERROR;
364: END IF;
365:
366: OKS_RENEW_UTIL_PVT.get_payment_terms(
359:
360: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
361: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
362: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
363: RAISE OKC_API.G_EXCEPTION_ERROR;
364: END IF;
365:
366: OKS_RENEW_UTIL_PVT.get_payment_terms(
367: p_chr_id => p_chr_id,
375: x_return_status => x_return_status
376: );
377:
378:
379: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
380: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
381: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
382: RAISE OKC_API.G_EXCEPTION_ERROR;
383: END IF;
376: );
377:
378:
379: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
380: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
381: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
382: RAISE OKC_API.G_EXCEPTION_ERROR;
383: END IF;
384:
377:
378:
379: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
380: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
381: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
382: RAISE OKC_API.G_EXCEPTION_ERROR;
383: END IF;
384:
385:
378:
379: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
380: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
381: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
382: RAISE OKC_API.G_EXCEPTION_ERROR;
383: END IF;
384:
385:
386: OKC_UTIL.call_user_hook (
389: p_procedure_name => l_api_name,
390: p_before_after => 'A'
391: );
392:
393: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
394: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
395: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
396: RAISE OKC_API.G_EXCEPTION_ERROR;
397: END IF;
390: p_before_after => 'A'
391: );
392:
393: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
394: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
395: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
396: RAISE OKC_API.G_EXCEPTION_ERROR;
397: END IF;
398:
391: );
392:
393: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
394: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
395: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
396: RAISE OKC_API.G_EXCEPTION_ERROR;
397: END IF;
398:
399: OKC_API.END_ACTIVITY (x_msg_count => x_msg_count,
392:
393: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
394: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
395: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
396: RAISE OKC_API.G_EXCEPTION_ERROR;
397: END IF;
398:
399: OKC_API.END_ACTIVITY (x_msg_count => x_msg_count,
400: x_msg_data => x_msg_data
395: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
396: RAISE OKC_API.G_EXCEPTION_ERROR;
397: END IF;
398:
399: OKC_API.END_ACTIVITY (x_msg_count => x_msg_count,
400: x_msg_data => x_msg_data
401: );
402:
403: EXCEPTION
400: x_msg_data => x_msg_data
401: );
402:
403: EXCEPTION
404: WHEN OKC_API.G_EXCEPTION_ERROR THEN
405: x_return_status := OKC_API.HANDLE_EXCEPTIONS (
406: l_api_name,
407: G_PKG_NAME,
408: 'OKC_API.G_RET_STS_ERROR',
401: );
402:
403: EXCEPTION
404: WHEN OKC_API.G_EXCEPTION_ERROR THEN
405: x_return_status := OKC_API.HANDLE_EXCEPTIONS (
406: l_api_name,
407: G_PKG_NAME,
408: 'OKC_API.G_RET_STS_ERROR',
409: x_msg_count,
404: WHEN OKC_API.G_EXCEPTION_ERROR THEN
405: x_return_status := OKC_API.HANDLE_EXCEPTIONS (
406: l_api_name,
407: G_PKG_NAME,
408: 'OKC_API.G_RET_STS_ERROR',
409: x_msg_count,
410: x_msg_data,
411: '_PUB'
412: );
410: x_msg_data,
411: '_PUB'
412: );
413:
414: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
415: x_return_status := OKC_API.HANDLE_EXCEPTIONS (
416: l_api_name,
417: G_PKG_NAME,
418: 'OKC_API.G_RET_STS_UNEXP_ERROR',
411: '_PUB'
412: );
413:
414: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
415: x_return_status := OKC_API.HANDLE_EXCEPTIONS (
416: l_api_name,
417: G_PKG_NAME,
418: 'OKC_API.G_RET_STS_UNEXP_ERROR',
419: x_msg_count,
414: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
415: x_return_status := OKC_API.HANDLE_EXCEPTIONS (
416: l_api_name,
417: G_PKG_NAME,
418: 'OKC_API.G_RET_STS_UNEXP_ERROR',
419: x_msg_count,
420: x_msg_data,
421: '_PUB'
422: );
421: '_PUB'
422: );
423:
424: WHEN OTHERS THEN
425: x_return_status := OKC_API.HANDLE_EXCEPTIONS (
426: l_api_name,
427: G_PKG_NAME,
428: 'OTHERS',
429: x_msg_count,