48:
49:
50: BEGIN
51:
52: l_return_status := OKC_API.START_ACTIVITY
53: (l_api_name
54: ,p_init_msg_list
55: ,'_PROCESS'
56: ,x_return_status);
54: ,p_init_msg_list
55: ,'_PROCESS'
56: ,x_return_status);
57:
58: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
59: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
60: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
61: RAISE OKC_API.G_EXCEPTION_ERROR;
62: END IF;
55: ,'_PROCESS'
56: ,x_return_status);
57:
58: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
59: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
60: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
61: RAISE OKC_API.G_EXCEPTION_ERROR;
62: END IF;
63:
56: ,x_return_status);
57:
58: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
59: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
60: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
61: RAISE OKC_API.G_EXCEPTION_ERROR;
62: END IF;
63:
64: -- To insert record in history tables
57:
58: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
59: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
60: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
61: RAISE OKC_API.G_EXCEPTION_ERROR;
62: END IF;
63:
64: -- To insert record in history tables
65: l_hstv_rec.chr_id := p_k_id;
81: x_msg_data => x_msg_data,
82: p_hstv_rec => l_hstv_rec,
83: x_hstv_rec => x_hstv_rec);
84:
85: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
86: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
87: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
88: RAISE OKC_API.G_EXCEPTION_ERROR;
89: END IF;
82: p_hstv_rec => l_hstv_rec,
83: x_hstv_rec => x_hstv_rec);
84:
85: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
86: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
87: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
88: RAISE OKC_API.G_EXCEPTION_ERROR;
89: END IF;
90:
83: x_hstv_rec => x_hstv_rec);
84:
85: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
86: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
87: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
88: RAISE OKC_API.G_EXCEPTION_ERROR;
89: END IF;
90:
91: l_corrid_rec.corrid := 'K_STS_CHANGE' ;
84:
85: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
86: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
87: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
88: RAISE OKC_API.G_EXCEPTION_ERROR;
89: END IF;
90:
91: l_corrid_rec.corrid := 'K_STS_CHANGE' ;
92: -- check if action is enabled
142: ,p_corrid_rec => l_corrid_rec
143: ,p_msg_tab => l_msg_tbl
144: ,p_queue_name => okc_aq_pvt.g_event_queue_name);
145:
146: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
147: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
148: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
149: RAISE OKC_API.G_EXCEPTION_ERROR;
150: END IF;
143: ,p_msg_tab => l_msg_tbl
144: ,p_queue_name => okc_aq_pvt.g_event_queue_name);
145:
146: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
147: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
148: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
149: RAISE OKC_API.G_EXCEPTION_ERROR;
150: END IF;
151: END IF; -- OKC_K_SIGN_ASMBLR_PVT.isActionEnabled
144: ,p_queue_name => okc_aq_pvt.g_event_queue_name);
145:
146: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
147: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
148: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
149: RAISE OKC_API.G_EXCEPTION_ERROR;
150: END IF;
151: END IF; -- OKC_K_SIGN_ASMBLR_PVT.isActionEnabled
152: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
145:
146: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
147: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
148: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
149: RAISE OKC_API.G_EXCEPTION_ERROR;
150: END IF;
151: END IF; -- OKC_K_SIGN_ASMBLR_PVT.isActionEnabled
152: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
153:
148: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
149: RAISE OKC_API.G_EXCEPTION_ERROR;
150: END IF;
151: END IF; -- OKC_K_SIGN_ASMBLR_PVT.isActionEnabled
152: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
153:
154: EXCEPTION
155: WHEN OKC_API.G_EXCEPTION_ERROR THEN
156: x_return_status := OKC_API.HANDLE_EXCEPTIONS
151: END IF; -- OKC_K_SIGN_ASMBLR_PVT.isActionEnabled
152: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
153:
154: EXCEPTION
155: WHEN OKC_API.G_EXCEPTION_ERROR THEN
156: x_return_status := OKC_API.HANDLE_EXCEPTIONS
157: (l_api_name,
158: G_PKG_NAME,
159: 'OKC_API.G_RET_STS_ERROR',
152: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
153:
154: EXCEPTION
155: WHEN OKC_API.G_EXCEPTION_ERROR THEN
156: x_return_status := OKC_API.HANDLE_EXCEPTIONS
157: (l_api_name,
158: G_PKG_NAME,
159: 'OKC_API.G_RET_STS_ERROR',
160: x_msg_count,
155: WHEN OKC_API.G_EXCEPTION_ERROR THEN
156: x_return_status := OKC_API.HANDLE_EXCEPTIONS
157: (l_api_name,
158: G_PKG_NAME,
159: 'OKC_API.G_RET_STS_ERROR',
160: x_msg_count,
161: x_msg_data,
162: '_PROCESS');
163: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
159: 'OKC_API.G_RET_STS_ERROR',
160: x_msg_count,
161: x_msg_data,
162: '_PROCESS');
163: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
164: x_return_status := OKC_API.HANDLE_EXCEPTIONS
165: (l_api_name,
166: G_PKG_NAME,
167: 'OKC_API.G_RET_STS_UNEXP_ERROR',
160: x_msg_count,
161: x_msg_data,
162: '_PROCESS');
163: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
164: x_return_status := OKC_API.HANDLE_EXCEPTIONS
165: (l_api_name,
166: G_PKG_NAME,
167: 'OKC_API.G_RET_STS_UNEXP_ERROR',
168: x_msg_count,
163: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
164: x_return_status := OKC_API.HANDLE_EXCEPTIONS
165: (l_api_name,
166: G_PKG_NAME,
167: 'OKC_API.G_RET_STS_UNEXP_ERROR',
168: x_msg_count,
169: x_msg_data,
170: '_PROCESS');
171: WHEN OTHERS THEN
168: x_msg_count,
169: x_msg_data,
170: '_PROCESS');
171: WHEN OTHERS THEN
172: x_return_status := OKC_API.HANDLE_EXCEPTIONS
173: (l_api_name,
174: G_PKG_NAME,
175: 'OTHERS',
176: x_msg_count,
225:
226:
227: BEGIN
228:
229: l_return_status := OKC_API.START_ACTIVITY
230: (l_api_name
231: ,p_init_msg_list
232: ,'_PROCESS'
233: ,x_return_status);
231: ,p_init_msg_list
232: ,'_PROCESS'
233: ,x_return_status);
234:
235: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
236: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
237: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
238: RAISE OKC_API.G_EXCEPTION_ERROR;
239: END IF;
232: ,'_PROCESS'
233: ,x_return_status);
234:
235: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
236: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
237: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
238: RAISE OKC_API.G_EXCEPTION_ERROR;
239: END IF;
240:
233: ,x_return_status);
234:
235: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
236: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
237: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
238: RAISE OKC_API.G_EXCEPTION_ERROR;
239: END IF;
240:
241: -- To insert record in history tables
234:
235: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
236: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
237: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
238: RAISE OKC_API.G_EXCEPTION_ERROR;
239: END IF;
240:
241: -- To insert record in history tables
242: l_hstv_rec.chr_id := p_k_id;
261: x_msg_data => x_msg_data,
262: p_hstv_rec => l_hstv_rec,
263: x_hstv_rec => x_hstv_rec);
264:
265: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
266: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
267: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
268: RAISE OKC_API.G_EXCEPTION_ERROR;
269: END IF;
262: p_hstv_rec => l_hstv_rec,
263: x_hstv_rec => x_hstv_rec);
264:
265: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
266: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
267: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
268: RAISE OKC_API.G_EXCEPTION_ERROR;
269: END IF;
270:
263: x_hstv_rec => x_hstv_rec);
264:
265: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
266: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
267: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
268: RAISE OKC_API.G_EXCEPTION_ERROR;
269: END IF;
270:
271: l_corrid_rec.corrid := 'K_STS_CHANGE' ;
264:
265: IF x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
266: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
267: ELSIF x_return_status = OKC_API.G_RET_STS_ERROR THEN
268: RAISE OKC_API.G_EXCEPTION_ERROR;
269: END IF;
270:
271: l_corrid_rec.corrid := 'K_STS_CHANGE' ;
272: -- check if action is enabled
323: ,p_corrid_rec => l_corrid_rec
324: ,p_msg_tab => l_msg_tbl
325: ,p_queue_name => okc_aq_pvt.g_event_queue_name);
326:
327: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
328: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
329: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
330: RAISE OKC_API.G_EXCEPTION_ERROR;
331: END IF;
324: ,p_msg_tab => l_msg_tbl
325: ,p_queue_name => okc_aq_pvt.g_event_queue_name);
326:
327: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
328: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
329: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
330: RAISE OKC_API.G_EXCEPTION_ERROR;
331: END IF;
332:
325: ,p_queue_name => okc_aq_pvt.g_event_queue_name);
326:
327: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
328: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
329: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
330: RAISE OKC_API.G_EXCEPTION_ERROR;
331: END IF;
332:
333: END IF; -- OKC_K_SIGN_ASMBLR_PVT.isActionEnabled
326:
327: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
328: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
329: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
330: RAISE OKC_API.G_EXCEPTION_ERROR;
331: END IF;
332:
333: END IF; -- OKC_K_SIGN_ASMBLR_PVT.isActionEnabled
334: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
330: RAISE OKC_API.G_EXCEPTION_ERROR;
331: END IF;
332:
333: END IF; -- OKC_K_SIGN_ASMBLR_PVT.isActionEnabled
334: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
335:
336: EXCEPTION
337: WHEN OKC_API.G_EXCEPTION_ERROR THEN
338: x_return_status := OKC_API.HANDLE_EXCEPTIONS
333: END IF; -- OKC_K_SIGN_ASMBLR_PVT.isActionEnabled
334: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
335:
336: EXCEPTION
337: WHEN OKC_API.G_EXCEPTION_ERROR THEN
338: x_return_status := OKC_API.HANDLE_EXCEPTIONS
339: (l_api_name,
340: G_PKG_NAME,
341: 'OKC_API.G_RET_STS_ERROR',
334: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
335:
336: EXCEPTION
337: WHEN OKC_API.G_EXCEPTION_ERROR THEN
338: x_return_status := OKC_API.HANDLE_EXCEPTIONS
339: (l_api_name,
340: G_PKG_NAME,
341: 'OKC_API.G_RET_STS_ERROR',
342: x_msg_count,
337: WHEN OKC_API.G_EXCEPTION_ERROR THEN
338: x_return_status := OKC_API.HANDLE_EXCEPTIONS
339: (l_api_name,
340: G_PKG_NAME,
341: 'OKC_API.G_RET_STS_ERROR',
342: x_msg_count,
343: x_msg_data,
344: '_PROCESS');
345: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
341: 'OKC_API.G_RET_STS_ERROR',
342: x_msg_count,
343: x_msg_data,
344: '_PROCESS');
345: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
346: x_return_status := OKC_API.HANDLE_EXCEPTIONS
347: (l_api_name,
348: G_PKG_NAME,
349: 'OKC_API.G_RET_STS_UNEXP_ERROR',
342: x_msg_count,
343: x_msg_data,
344: '_PROCESS');
345: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
346: x_return_status := OKC_API.HANDLE_EXCEPTIONS
347: (l_api_name,
348: G_PKG_NAME,
349: 'OKC_API.G_RET_STS_UNEXP_ERROR',
350: x_msg_count,
345: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
346: x_return_status := OKC_API.HANDLE_EXCEPTIONS
347: (l_api_name,
348: G_PKG_NAME,
349: 'OKC_API.G_RET_STS_UNEXP_ERROR',
350: x_msg_count,
351: x_msg_data,
352: '_PROCESS');
353: WHEN OTHERS THEN
350: x_msg_count,
351: x_msg_data,
352: '_PROCESS');
353: WHEN OTHERS THEN
354: x_return_status := OKC_API.HANDLE_EXCEPTIONS
355: (l_api_name,
356: G_PKG_NAME,
357: 'OTHERS',
358: x_msg_count,