5: x_return_status OUT NOCOPY VARCHAR2,
6: p_srfvv_rec IN srfvv_rec_type
7: ) IS
8: l_api_name CONSTANT VARCHAR2(30) := 'VALIDATE_REFUND_RECORD';
9: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
10:
11: --cursor to find if vendor id is the subsidy provider party
12: cursor l_cplb_csr(p_vendor_id in number,
13: p_cpl_id in number) is
67: END validate_refund_record;
68:
69: PROCEDURE create_refund_dtls(
70: p_api_version IN NUMBER,
71: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
72: x_return_status OUT NOCOPY VARCHAR2,
73: x_msg_count OUT NOCOPY NUMBER,
74: x_msg_data OUT NOCOPY VARCHAR2,
75: p_srfvv_rec IN srfvv_rec_type,
75: p_srfvv_rec IN srfvv_rec_type,
76: x_srfvv_rec OUT NOCOPY srfvv_rec_type
77: ) IS
78: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_SUBSIDY_REFUND';
79: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
80:
81: --Bug# 4959361
82: CURSOR l_cpl_csr(p_cpl_id IN NUMBER) IS
83: SELECT cle_id
90: BEGIN
91: x_return_status := l_return_status;
92: -- Call start_activity to create savepoint, check compatibility
93: -- and initialize message list
94: l_return_status := OKC_API.START_ACTIVITY (l_api_name
95: ,p_init_msg_list
96: ,'_PVT'
97: ,x_return_status);
98: -- Check if activity started successfully
95: ,p_init_msg_list
96: ,'_PVT'
97: ,x_return_status);
98: -- Check if activity started successfully
99: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
100: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
101: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
102: RAISE OKC_API.G_EXCEPTION_ERROR;
103: END IF;
96: ,'_PVT'
97: ,x_return_status);
98: -- Check if activity started successfully
99: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
100: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
101: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
102: RAISE OKC_API.G_EXCEPTION_ERROR;
103: END IF;
104:
97: ,x_return_status);
98: -- Check if activity started successfully
99: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
100: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
101: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
102: RAISE OKC_API.G_EXCEPTION_ERROR;
103: END IF;
104:
105: --Bug# 4959361
98: -- Check if activity started successfully
99: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
100: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
101: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
102: RAISE OKC_API.G_EXCEPTION_ERROR;
103: END IF;
104:
105: --Bug# 4959361
106: OPEN l_cpl_csr(p_cpl_id => p_srfvv_rec.cpl_id);
140:
141: validate_refund_record(x_return_status, x_srfvv_rec);
142: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
143: l_return_status := x_return_status;
144: RAISE OKC_API.G_EXCEPTION_ERROR;
145: END IF;
146:
147: x_return_status := l_return_status;
148: OKC_API.END_ACTIVITY (x_msg_count
144: RAISE OKC_API.G_EXCEPTION_ERROR;
145: END IF;
146:
147: x_return_status := l_return_status;
148: OKC_API.END_ACTIVITY (x_msg_count
149: ,x_msg_data );
150:
151: EXCEPTION
152: WHEN OKC_API.G_EXCEPTION_ERROR THEN
148: OKC_API.END_ACTIVITY (x_msg_count
149: ,x_msg_data );
150:
151: EXCEPTION
152: WHEN OKC_API.G_EXCEPTION_ERROR THEN
153: x_return_status := OKC_API.HANDLE_EXCEPTIONS
154: (l_api_name,
155: G_PKG_NAME,
156: 'OKC_API.G_RET_STS_ERROR',
149: ,x_msg_data );
150:
151: EXCEPTION
152: WHEN OKC_API.G_EXCEPTION_ERROR THEN
153: x_return_status := OKC_API.HANDLE_EXCEPTIONS
154: (l_api_name,
155: G_PKG_NAME,
156: 'OKC_API.G_RET_STS_ERROR',
157: x_msg_count,
152: WHEN OKC_API.G_EXCEPTION_ERROR THEN
153: x_return_status := OKC_API.HANDLE_EXCEPTIONS
154: (l_api_name,
155: G_PKG_NAME,
156: 'OKC_API.G_RET_STS_ERROR',
157: x_msg_count,
158: x_msg_data,
159: '_PVT');
160: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
156: 'OKC_API.G_RET_STS_ERROR',
157: x_msg_count,
158: x_msg_data,
159: '_PVT');
160: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
161: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
162: (l_api_name,
163: G_PKG_NAME,
164: 'OKC_API.G_RET_STS_UNEXP_ERROR',
157: x_msg_count,
158: x_msg_data,
159: '_PVT');
160: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
161: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
162: (l_api_name,
163: G_PKG_NAME,
164: 'OKC_API.G_RET_STS_UNEXP_ERROR',
165: x_msg_count,
160: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
161: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
162: (l_api_name,
163: G_PKG_NAME,
164: 'OKC_API.G_RET_STS_UNEXP_ERROR',
165: x_msg_count,
166: x_msg_data,
167: '_PVT');
168: WHEN OTHERS THEN
165: x_msg_count,
166: x_msg_data,
167: '_PVT');
168: WHEN OTHERS THEN
169: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
170: (l_api_name,
171: G_PKG_NAME,
172: 'OTHERS',
173: x_msg_count,
176: END create_refund_dtls;
177:
178: PROCEDURE create_refund_dtls(
179: p_api_version IN NUMBER,
180: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
181: x_return_status OUT NOCOPY VARCHAR2,
182: x_msg_count OUT NOCOPY NUMBER,
183: x_msg_data OUT NOCOPY VARCHAR2,
184: p_srfvv_tbl IN srfvv_tbl_type,
184: p_srfvv_tbl IN srfvv_tbl_type,
185: x_srfvv_tbl OUT NOCOPY srfvv_tbl_type
186: ) IS
187: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_SUBSIDY_REFUND';
188: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
189: l_overall_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
190: i NUMBER;
191: BEGIN
192:
221: raise OKL_API.G_EXCEPTION_ERROR;
222: End If;
223:
224: EXCEPTION
225: WHEN OKC_API.G_EXCEPTION_ERROR THEN
226: x_return_status := OKC_API.HANDLE_EXCEPTIONS
227: (l_api_name,
228: G_PKG_NAME,
229: 'OKC_API.G_RET_STS_ERROR',
222: End If;
223:
224: EXCEPTION
225: WHEN OKC_API.G_EXCEPTION_ERROR THEN
226: x_return_status := OKC_API.HANDLE_EXCEPTIONS
227: (l_api_name,
228: G_PKG_NAME,
229: 'OKC_API.G_RET_STS_ERROR',
230: x_msg_count,
225: WHEN OKC_API.G_EXCEPTION_ERROR THEN
226: x_return_status := OKC_API.HANDLE_EXCEPTIONS
227: (l_api_name,
228: G_PKG_NAME,
229: 'OKC_API.G_RET_STS_ERROR',
230: x_msg_count,
231: x_msg_data,
232: '_PVT');
233: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
229: 'OKC_API.G_RET_STS_ERROR',
230: x_msg_count,
231: x_msg_data,
232: '_PVT');
233: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
234: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
235: (l_api_name,
236: G_PKG_NAME,
237: 'OKC_API.G_RET_STS_UNEXP_ERROR',
230: x_msg_count,
231: x_msg_data,
232: '_PVT');
233: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
234: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
235: (l_api_name,
236: G_PKG_NAME,
237: 'OKC_API.G_RET_STS_UNEXP_ERROR',
238: x_msg_count,
233: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
234: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
235: (l_api_name,
236: G_PKG_NAME,
237: 'OKC_API.G_RET_STS_UNEXP_ERROR',
238: x_msg_count,
239: x_msg_data,
240: '_PVT');
241: WHEN OTHERS THEN
238: x_msg_count,
239: x_msg_data,
240: '_PVT');
241: WHEN OTHERS THEN
242: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
243: (l_api_name,
244: G_PKG_NAME,
245: 'OTHERS',
246: x_msg_count,
249: END create_refund_dtls;
250:
251: PROCEDURE lock_refund_dtls(
252: p_api_version IN NUMBER,
253: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
254: x_return_status OUT NOCOPY VARCHAR2,
255: x_msg_count OUT NOCOPY NUMBER,
256: x_msg_data OUT NOCOPY VARCHAR2,
257: p_srfvv_rec IN srfvv_rec_type
256: x_msg_data OUT NOCOPY VARCHAR2,
257: p_srfvv_rec IN srfvv_rec_type
258: ) IS
259: l_api_name CONSTANT VARCHAR2(30) := 'LOCK_SUBSIDY_REFUND';
260: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
261: BEGIN
262: x_return_status := l_return_status;
263: -- Call start_activity to create savepoint, check compatibility
264: -- and initialize message list
261: BEGIN
262: x_return_status := l_return_status;
263: -- Call start_activity to create savepoint, check compatibility
264: -- and initialize message list
265: l_return_status := OKC_API.START_ACTIVITY (l_api_name
266: ,p_init_msg_list
267: ,'_PVT'
268: ,x_return_status);
269: -- Check if activity started successfully
266: ,p_init_msg_list
267: ,'_PVT'
268: ,x_return_status);
269: -- Check if activity started successfully
270: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
271: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
272: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
273: RAISE OKC_API.G_EXCEPTION_ERROR;
274: END IF;
267: ,'_PVT'
268: ,x_return_status);
269: -- Check if activity started successfully
270: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
271: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
272: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
273: RAISE OKC_API.G_EXCEPTION_ERROR;
274: END IF;
275:
268: ,x_return_status);
269: -- Check if activity started successfully
270: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
271: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
272: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
273: RAISE OKC_API.G_EXCEPTION_ERROR;
274: END IF;
275:
276: OKL_PYD_PVT.lock_row(p_api_version,
269: -- Check if activity started successfully
270: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
271: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
272: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
273: RAISE OKC_API.G_EXCEPTION_ERROR;
274: END IF;
275:
276: OKL_PYD_PVT.lock_row(p_api_version,
277: p_init_msg_list,
285: Elsif x_return_status = OKL_API.G_RET_STS_ERROR Then
286: raise OKL_API.G_EXCEPTION_ERROR;
287: End If;
288:
289: OKC_API.END_ACTIVITY (x_msg_count
290: ,x_msg_data );
291:
292: EXCEPTION
293: WHEN OKC_API.G_EXCEPTION_ERROR THEN
289: OKC_API.END_ACTIVITY (x_msg_count
290: ,x_msg_data );
291:
292: EXCEPTION
293: WHEN OKC_API.G_EXCEPTION_ERROR THEN
294: x_return_status := OKC_API.HANDLE_EXCEPTIONS
295: (l_api_name,
296: G_PKG_NAME,
297: 'OKC_API.G_RET_STS_ERROR',
290: ,x_msg_data );
291:
292: EXCEPTION
293: WHEN OKC_API.G_EXCEPTION_ERROR THEN
294: x_return_status := OKC_API.HANDLE_EXCEPTIONS
295: (l_api_name,
296: G_PKG_NAME,
297: 'OKC_API.G_RET_STS_ERROR',
298: x_msg_count,
293: WHEN OKC_API.G_EXCEPTION_ERROR THEN
294: x_return_status := OKC_API.HANDLE_EXCEPTIONS
295: (l_api_name,
296: G_PKG_NAME,
297: 'OKC_API.G_RET_STS_ERROR',
298: x_msg_count,
299: x_msg_data,
300: '_PVT');
301: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
297: 'OKC_API.G_RET_STS_ERROR',
298: x_msg_count,
299: x_msg_data,
300: '_PVT');
301: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
302: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
303: (l_api_name,
304: G_PKG_NAME,
305: 'OKC_API.G_RET_STS_UNEXP_ERROR',
298: x_msg_count,
299: x_msg_data,
300: '_PVT');
301: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
302: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
303: (l_api_name,
304: G_PKG_NAME,
305: 'OKC_API.G_RET_STS_UNEXP_ERROR',
306: x_msg_count,
301: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
302: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
303: (l_api_name,
304: G_PKG_NAME,
305: 'OKC_API.G_RET_STS_UNEXP_ERROR',
306: x_msg_count,
307: x_msg_data,
308: '_PVT');
309: WHEN OTHERS THEN
306: x_msg_count,
307: x_msg_data,
308: '_PVT');
309: WHEN OTHERS THEN
310: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
311: (l_api_name,
312: G_PKG_NAME,
313: 'OTHERS',
314: x_msg_count,
317: END lock_refund_dtls;
318:
319: PROCEDURE lock_refund_dtls(
320: p_api_version IN NUMBER,
321: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
322: x_return_status OUT NOCOPY VARCHAR2,
323: x_msg_count OUT NOCOPY NUMBER,
324: x_msg_data OUT NOCOPY VARCHAR2,
325: p_srfvv_tbl IN srfvv_tbl_type
324: x_msg_data OUT NOCOPY VARCHAR2,
325: p_srfvv_tbl IN srfvv_tbl_type
326: ) IS
327: l_api_name CONSTANT VARCHAR2(30) := 'LOCK_SUBSIDY_REFUND';
328: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
329: l_overall_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
330: i NUMBER;
331: BEGIN
332:
360: raise OKL_API.G_EXCEPTION_ERROR;
361: End If;
362:
363: EXCEPTION
364: WHEN OKC_API.G_EXCEPTION_ERROR THEN
365: x_return_status := OKC_API.HANDLE_EXCEPTIONS
366: (l_api_name,
367: G_PKG_NAME,
368: 'OKC_API.G_RET_STS_ERROR',
361: End If;
362:
363: EXCEPTION
364: WHEN OKC_API.G_EXCEPTION_ERROR THEN
365: x_return_status := OKC_API.HANDLE_EXCEPTIONS
366: (l_api_name,
367: G_PKG_NAME,
368: 'OKC_API.G_RET_STS_ERROR',
369: x_msg_count,
364: WHEN OKC_API.G_EXCEPTION_ERROR THEN
365: x_return_status := OKC_API.HANDLE_EXCEPTIONS
366: (l_api_name,
367: G_PKG_NAME,
368: 'OKC_API.G_RET_STS_ERROR',
369: x_msg_count,
370: x_msg_data,
371: '_PVT');
372: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
368: 'OKC_API.G_RET_STS_ERROR',
369: x_msg_count,
370: x_msg_data,
371: '_PVT');
372: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
373: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
374: (l_api_name,
375: G_PKG_NAME,
376: 'OKC_API.G_RET_STS_UNEXP_ERROR',
369: x_msg_count,
370: x_msg_data,
371: '_PVT');
372: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
373: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
374: (l_api_name,
375: G_PKG_NAME,
376: 'OKC_API.G_RET_STS_UNEXP_ERROR',
377: x_msg_count,
372: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
373: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
374: (l_api_name,
375: G_PKG_NAME,
376: 'OKC_API.G_RET_STS_UNEXP_ERROR',
377: x_msg_count,
378: x_msg_data,
379: '_PVT');
380: WHEN OTHERS THEN
377: x_msg_count,
378: x_msg_data,
379: '_PVT');
380: WHEN OTHERS THEN
381: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
382: (l_api_name,
383: G_PKG_NAME,
384: 'OTHERS',
385: x_msg_count,
388: END lock_refund_dtls;
389:
390: PROCEDURE delete_refund_dtls(
391: p_api_version IN NUMBER,
392: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
393: x_return_status OUT NOCOPY VARCHAR2,
394: x_msg_count OUT NOCOPY NUMBER,
395: x_msg_data OUT NOCOPY VARCHAR2,
396: p_srfvv_rec IN srfvv_rec_type
395: x_msg_data OUT NOCOPY VARCHAR2,
396: p_srfvv_rec IN srfvv_rec_type
397: ) IS
398: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_SUBSIDY_REFUND';
399: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
400:
401: --Bug# 4959361
402: CURSOR l_cpl_csr(p_pyd_id IN NUMBER) IS
403: SELECT cpl.cle_id
412: BEGIN
413: x_return_status := l_return_status;
414: -- Call start_activity to create savepoint, check compatibility
415: -- and initialize message list
416: l_return_status := OKC_API.START_ACTIVITY (l_api_name
417: ,p_init_msg_list
418: ,'_PVT'
419: ,x_return_status);
420: -- Check if activity started successfully
417: ,p_init_msg_list
418: ,'_PVT'
419: ,x_return_status);
420: -- Check if activity started successfully
421: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
422: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
423: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
424: RAISE OKC_API.G_EXCEPTION_ERROR;
425: END IF;
418: ,'_PVT'
419: ,x_return_status);
420: -- Check if activity started successfully
421: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
422: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
423: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
424: RAISE OKC_API.G_EXCEPTION_ERROR;
425: END IF;
426:
419: ,x_return_status);
420: -- Check if activity started successfully
421: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
422: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
423: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
424: RAISE OKC_API.G_EXCEPTION_ERROR;
425: END IF;
426:
427: --Bug# 4959361
420: -- Check if activity started successfully
421: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
422: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
423: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
424: RAISE OKC_API.G_EXCEPTION_ERROR;
425: END IF;
426:
427: --Bug# 4959361
428: OPEN l_cpl_csr(p_pyd_id => p_srfvv_rec.id);
458: Elsif x_return_status = OKL_API.G_RET_STS_ERROR Then
459: raise OKL_API.G_EXCEPTION_ERROR;
460: End If;
461:
462: OKC_API.END_ACTIVITY (x_msg_count
463: ,x_msg_data );
464:
465: EXCEPTION
466: WHEN OKC_API.G_EXCEPTION_ERROR THEN
462: OKC_API.END_ACTIVITY (x_msg_count
463: ,x_msg_data );
464:
465: EXCEPTION
466: WHEN OKC_API.G_EXCEPTION_ERROR THEN
467: x_return_status := OKC_API.HANDLE_EXCEPTIONS
468: (l_api_name,
469: G_PKG_NAME,
470: 'OKC_API.G_RET_STS_ERROR',
463: ,x_msg_data );
464:
465: EXCEPTION
466: WHEN OKC_API.G_EXCEPTION_ERROR THEN
467: x_return_status := OKC_API.HANDLE_EXCEPTIONS
468: (l_api_name,
469: G_PKG_NAME,
470: 'OKC_API.G_RET_STS_ERROR',
471: x_msg_count,
466: WHEN OKC_API.G_EXCEPTION_ERROR THEN
467: x_return_status := OKC_API.HANDLE_EXCEPTIONS
468: (l_api_name,
469: G_PKG_NAME,
470: 'OKC_API.G_RET_STS_ERROR',
471: x_msg_count,
472: x_msg_data,
473: '_PVT');
474: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
470: 'OKC_API.G_RET_STS_ERROR',
471: x_msg_count,
472: x_msg_data,
473: '_PVT');
474: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
475: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
476: (l_api_name,
477: G_PKG_NAME,
478: 'OKC_API.G_RET_STS_UNEXP_ERROR',
471: x_msg_count,
472: x_msg_data,
473: '_PVT');
474: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
475: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
476: (l_api_name,
477: G_PKG_NAME,
478: 'OKC_API.G_RET_STS_UNEXP_ERROR',
479: x_msg_count,
474: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
475: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
476: (l_api_name,
477: G_PKG_NAME,
478: 'OKC_API.G_RET_STS_UNEXP_ERROR',
479: x_msg_count,
480: x_msg_data,
481: '_PVT');
482: WHEN OTHERS THEN
479: x_msg_count,
480: x_msg_data,
481: '_PVT');
482: WHEN OTHERS THEN
483: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
484: (l_api_name,
485: G_PKG_NAME,
486: 'OTHERS',
487: x_msg_count,
490: END delete_refund_dtls;
491:
492: PROCEDURE delete_refund_dtls(
493: p_api_version IN NUMBER,
494: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
495: x_return_status OUT NOCOPY VARCHAR2,
496: x_msg_count OUT NOCOPY NUMBER,
497: x_msg_data OUT NOCOPY VARCHAR2,
498: p_srfvv_tbl IN srfvv_tbl_type
497: x_msg_data OUT NOCOPY VARCHAR2,
498: p_srfvv_tbl IN srfvv_tbl_type
499: ) IS
500: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_SUBSIDY_REFUND';
501: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
502: l_overall_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
503: i NUMBER;
504: BEGIN
505:
533: raise OKL_API.G_EXCEPTION_ERROR;
534: End If;
535:
536: EXCEPTION
537: WHEN OKC_API.G_EXCEPTION_ERROR THEN
538: x_return_status := OKC_API.HANDLE_EXCEPTIONS
539: (l_api_name,
540: G_PKG_NAME,
541: 'OKC_API.G_RET_STS_ERROR',
534: End If;
535:
536: EXCEPTION
537: WHEN OKC_API.G_EXCEPTION_ERROR THEN
538: x_return_status := OKC_API.HANDLE_EXCEPTIONS
539: (l_api_name,
540: G_PKG_NAME,
541: 'OKC_API.G_RET_STS_ERROR',
542: x_msg_count,
537: WHEN OKC_API.G_EXCEPTION_ERROR THEN
538: x_return_status := OKC_API.HANDLE_EXCEPTIONS
539: (l_api_name,
540: G_PKG_NAME,
541: 'OKC_API.G_RET_STS_ERROR',
542: x_msg_count,
543: x_msg_data,
544: '_PVT');
545: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
541: 'OKC_API.G_RET_STS_ERROR',
542: x_msg_count,
543: x_msg_data,
544: '_PVT');
545: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
546: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
547: (l_api_name,
548: G_PKG_NAME,
549: 'OKC_API.G_RET_STS_UNEXP_ERROR',
542: x_msg_count,
543: x_msg_data,
544: '_PVT');
545: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
546: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
547: (l_api_name,
548: G_PKG_NAME,
549: 'OKC_API.G_RET_STS_UNEXP_ERROR',
550: x_msg_count,
545: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
546: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
547: (l_api_name,
548: G_PKG_NAME,
549: 'OKC_API.G_RET_STS_UNEXP_ERROR',
550: x_msg_count,
551: x_msg_data,
552: '_PVT');
553: WHEN OTHERS THEN
550: x_msg_count,
551: x_msg_data,
552: '_PVT');
553: WHEN OTHERS THEN
554: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
555: (l_api_name,
556: G_PKG_NAME,
557: 'OTHERS',
558: x_msg_count,
561: END delete_refund_dtls;
562:
563: PROCEDURE update_refund_dtls(
564: p_api_version IN NUMBER,
565: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
566: x_return_status OUT NOCOPY VARCHAR2,
567: x_msg_count OUT NOCOPY NUMBER,
568: x_msg_data OUT NOCOPY VARCHAR2,
569: p_srfvv_rec IN srfvv_rec_type,
569: p_srfvv_rec IN srfvv_rec_type,
570: x_srfvv_rec OUT NOCOPY srfvv_rec_type
571: ) IS
572: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_SUBSIDY_REFUND';
573: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
574:
575: --Bug# 4959361
576: CURSOR l_cpl_csr(p_cpl_id IN NUMBER) IS
577: SELECT cle_id
584: BEGIN
585: x_return_status := l_return_status;
586: -- Call start_activity to create savepoint, check compatibility
587: -- and initialize message list
588: l_return_status := OKC_API.START_ACTIVITY (l_api_name
589: ,p_init_msg_list
590: ,'_PVT'
591: ,x_return_status);
592: -- Check if activity started successfully
589: ,p_init_msg_list
590: ,'_PVT'
591: ,x_return_status);
592: -- Check if activity started successfully
593: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
594: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
595: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
596: RAISE OKC_API.G_EXCEPTION_ERROR;
597: END IF;
590: ,'_PVT'
591: ,x_return_status);
592: -- Check if activity started successfully
593: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
594: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
595: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
596: RAISE OKC_API.G_EXCEPTION_ERROR;
597: END IF;
598:
591: ,x_return_status);
592: -- Check if activity started successfully
593: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
594: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
595: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
596: RAISE OKC_API.G_EXCEPTION_ERROR;
597: END IF;
598:
599: --Bug# 4959361
592: -- Check if activity started successfully
593: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
594: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
595: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
596: RAISE OKC_API.G_EXCEPTION_ERROR;
597: END IF;
598:
599: --Bug# 4959361
600: OPEN l_cpl_csr(p_cpl_id => p_srfvv_rec.cpl_id);
634:
635: validate_refund_record(x_return_status, x_srfvv_rec);
636: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
637: l_return_status := x_return_status;
638: RAISE OKC_API.G_EXCEPTION_ERROR;
639: END IF;
640:
641: OKC_API.END_ACTIVITY (x_msg_count
642: ,x_msg_data );
637: l_return_status := x_return_status;
638: RAISE OKC_API.G_EXCEPTION_ERROR;
639: END IF;
640:
641: OKC_API.END_ACTIVITY (x_msg_count
642: ,x_msg_data );
643:
644: EXCEPTION
645: WHEN OKC_API.G_EXCEPTION_ERROR THEN
641: OKC_API.END_ACTIVITY (x_msg_count
642: ,x_msg_data );
643:
644: EXCEPTION
645: WHEN OKC_API.G_EXCEPTION_ERROR THEN
646: x_return_status := OKC_API.HANDLE_EXCEPTIONS
647: (l_api_name,
648: G_PKG_NAME,
649: 'OKC_API.G_RET_STS_ERROR',
642: ,x_msg_data );
643:
644: EXCEPTION
645: WHEN OKC_API.G_EXCEPTION_ERROR THEN
646: x_return_status := OKC_API.HANDLE_EXCEPTIONS
647: (l_api_name,
648: G_PKG_NAME,
649: 'OKC_API.G_RET_STS_ERROR',
650: x_msg_count,
645: WHEN OKC_API.G_EXCEPTION_ERROR THEN
646: x_return_status := OKC_API.HANDLE_EXCEPTIONS
647: (l_api_name,
648: G_PKG_NAME,
649: 'OKC_API.G_RET_STS_ERROR',
650: x_msg_count,
651: x_msg_data,
652: '_PVT');
653: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
649: 'OKC_API.G_RET_STS_ERROR',
650: x_msg_count,
651: x_msg_data,
652: '_PVT');
653: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
654: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
655: (l_api_name,
656: G_PKG_NAME,
657: 'OKC_API.G_RET_STS_UNEXP_ERROR',
650: x_msg_count,
651: x_msg_data,
652: '_PVT');
653: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
654: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
655: (l_api_name,
656: G_PKG_NAME,
657: 'OKC_API.G_RET_STS_UNEXP_ERROR',
658: x_msg_count,
653: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
654: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
655: (l_api_name,
656: G_PKG_NAME,
657: 'OKC_API.G_RET_STS_UNEXP_ERROR',
658: x_msg_count,
659: x_msg_data,
660: '_PVT');
661: WHEN OTHERS THEN
658: x_msg_count,
659: x_msg_data,
660: '_PVT');
661: WHEN OTHERS THEN
662: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
663: (l_api_name,
664: G_PKG_NAME,
665: 'OTHERS',
666: x_msg_count,
669: END update_refund_dtls;
670:
671: PROCEDURE update_refund_dtls(
672: p_api_version IN NUMBER,
673: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
674: x_return_status OUT NOCOPY VARCHAR2,
675: x_msg_count OUT NOCOPY NUMBER,
676: x_msg_data OUT NOCOPY VARCHAR2,
677: p_srfvv_tbl IN srfvv_tbl_type,
677: p_srfvv_tbl IN srfvv_tbl_type,
678: x_srfvv_tbl OUT NOCOPY srfvv_tbl_type
679: ) IS
680: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_SUBSIDY_REFUND';
681: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
682: l_overall_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
683: i NUMBER;
684:
685: BEGIN
715: raise OKL_API.G_EXCEPTION_ERROR;
716: End If;
717:
718: EXCEPTION
719: WHEN OKC_API.G_EXCEPTION_ERROR THEN
720: x_return_status := OKC_API.HANDLE_EXCEPTIONS
721: (l_api_name,
722: G_PKG_NAME,
723: 'OKC_API.G_RET_STS_ERROR',
716: End If;
717:
718: EXCEPTION
719: WHEN OKC_API.G_EXCEPTION_ERROR THEN
720: x_return_status := OKC_API.HANDLE_EXCEPTIONS
721: (l_api_name,
722: G_PKG_NAME,
723: 'OKC_API.G_RET_STS_ERROR',
724: x_msg_count,
719: WHEN OKC_API.G_EXCEPTION_ERROR THEN
720: x_return_status := OKC_API.HANDLE_EXCEPTIONS
721: (l_api_name,
722: G_PKG_NAME,
723: 'OKC_API.G_RET_STS_ERROR',
724: x_msg_count,
725: x_msg_data,
726: '_PVT');
727: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
723: 'OKC_API.G_RET_STS_ERROR',
724: x_msg_count,
725: x_msg_data,
726: '_PVT');
727: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
728: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
729: (l_api_name,
730: G_PKG_NAME,
731: 'OKC_API.G_RET_STS_UNEXP_ERROR',
724: x_msg_count,
725: x_msg_data,
726: '_PVT');
727: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
728: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
729: (l_api_name,
730: G_PKG_NAME,
731: 'OKC_API.G_RET_STS_UNEXP_ERROR',
732: x_msg_count,
727: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
728: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
729: (l_api_name,
730: G_PKG_NAME,
731: 'OKC_API.G_RET_STS_UNEXP_ERROR',
732: x_msg_count,
733: x_msg_data,
734: '_PVT');
735: WHEN OTHERS THEN
732: x_msg_count,
733: x_msg_data,
734: '_PVT');
735: WHEN OTHERS THEN
736: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
737: (l_api_name,
738: G_PKG_NAME,
739: 'OTHERS',
740: x_msg_count,
743: END update_refund_dtls;
744:
745: PROCEDURE validate_refund_dtls(
746: p_api_version IN NUMBER,
747: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
748: x_return_status OUT NOCOPY VARCHAR2,
749: x_msg_count OUT NOCOPY NUMBER,
750: x_msg_data OUT NOCOPY VARCHAR2,
751: p_srfvv_rec IN srfvv_rec_type
750: x_msg_data OUT NOCOPY VARCHAR2,
751: p_srfvv_rec IN srfvv_rec_type
752: ) IS
753: l_api_name CONSTANT VARCHAR2(30) := 'VALIDATE_SUBSIDY_REFUND';
754: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
755: BEGIN
756: x_return_status := l_return_status;
757: -- Call start_activity to create savepoint, check compatibility
758: -- and initialize message list
755: BEGIN
756: x_return_status := l_return_status;
757: -- Call start_activity to create savepoint, check compatibility
758: -- and initialize message list
759: l_return_status := OKC_API.START_ACTIVITY (l_api_name
760: ,p_init_msg_list
761: ,'_PVT'
762: ,x_return_status);
763: -- Check if activity started successfully
760: ,p_init_msg_list
761: ,'_PVT'
762: ,x_return_status);
763: -- Check if activity started successfully
764: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
765: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
766: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
767: RAISE OKC_API.G_EXCEPTION_ERROR;
768: END IF;
761: ,'_PVT'
762: ,x_return_status);
763: -- Check if activity started successfully
764: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
765: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
766: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
767: RAISE OKC_API.G_EXCEPTION_ERROR;
768: END IF;
769:
762: ,x_return_status);
763: -- Check if activity started successfully
764: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
765: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
766: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
767: RAISE OKC_API.G_EXCEPTION_ERROR;
768: END IF;
769:
770: OKL_PYD_PVT.validate_row(p_api_version,
763: -- Check if activity started successfully
764: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
765: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
766: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
767: RAISE OKC_API.G_EXCEPTION_ERROR;
768: END IF;
769:
770: OKL_PYD_PVT.validate_row(p_api_version,
771: p_init_msg_list,
779: Elsif x_return_status = OKL_API.G_RET_STS_ERROR Then
780: raise OKL_API.G_EXCEPTION_ERROR;
781: End If;
782:
783: OKC_API.END_ACTIVITY (x_msg_count
784: ,x_msg_data );
785:
786: EXCEPTION
787: WHEN OKC_API.G_EXCEPTION_ERROR THEN
783: OKC_API.END_ACTIVITY (x_msg_count
784: ,x_msg_data );
785:
786: EXCEPTION
787: WHEN OKC_API.G_EXCEPTION_ERROR THEN
788: x_return_status := OKC_API.HANDLE_EXCEPTIONS
789: (l_api_name,
790: G_PKG_NAME,
791: 'OKC_API.G_RET_STS_ERROR',
784: ,x_msg_data );
785:
786: EXCEPTION
787: WHEN OKC_API.G_EXCEPTION_ERROR THEN
788: x_return_status := OKC_API.HANDLE_EXCEPTIONS
789: (l_api_name,
790: G_PKG_NAME,
791: 'OKC_API.G_RET_STS_ERROR',
792: x_msg_count,
787: WHEN OKC_API.G_EXCEPTION_ERROR THEN
788: x_return_status := OKC_API.HANDLE_EXCEPTIONS
789: (l_api_name,
790: G_PKG_NAME,
791: 'OKC_API.G_RET_STS_ERROR',
792: x_msg_count,
793: x_msg_data,
794: '_PVT');
795: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
791: 'OKC_API.G_RET_STS_ERROR',
792: x_msg_count,
793: x_msg_data,
794: '_PVT');
795: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
796: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
797: (l_api_name,
798: G_PKG_NAME,
799: 'OKC_API.G_RET_STS_UNEXP_ERROR',
792: x_msg_count,
793: x_msg_data,
794: '_PVT');
795: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
796: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
797: (l_api_name,
798: G_PKG_NAME,
799: 'OKC_API.G_RET_STS_UNEXP_ERROR',
800: x_msg_count,
795: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
796: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
797: (l_api_name,
798: G_PKG_NAME,
799: 'OKC_API.G_RET_STS_UNEXP_ERROR',
800: x_msg_count,
801: x_msg_data,
802: '_PVT');
803: WHEN OTHERS THEN
800: x_msg_count,
801: x_msg_data,
802: '_PVT');
803: WHEN OTHERS THEN
804: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
805: (l_api_name,
806: G_PKG_NAME,
807: 'OTHERS',
808: x_msg_count,
811: END validate_refund_dtls;
812:
813: PROCEDURE validate_refund_dtls(
814: p_api_version IN NUMBER,
815: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
816: x_return_status OUT NOCOPY VARCHAR2,
817: x_msg_count OUT NOCOPY NUMBER,
818: x_msg_data OUT NOCOPY VARCHAR2,
819: p_srfvv_tbl IN srfvv_tbl_type
818: x_msg_data OUT NOCOPY VARCHAR2,
819: p_srfvv_tbl IN srfvv_tbl_type
820: ) IS
821: l_api_name CONSTANT VARCHAR2(30) := 'VALIDATE_SUBSIDY_REFUND';
822: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
823: l_overall_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
824: i NUMBER;
825: BEGIN
826:
854: raise OKL_API.G_EXCEPTION_ERROR;
855: End If;
856:
857: EXCEPTION
858: WHEN OKC_API.G_EXCEPTION_ERROR THEN
859: x_return_status := OKC_API.HANDLE_EXCEPTIONS
860: (l_api_name,
861: G_PKG_NAME,
862: 'OKC_API.G_RET_STS_ERROR',
855: End If;
856:
857: EXCEPTION
858: WHEN OKC_API.G_EXCEPTION_ERROR THEN
859: x_return_status := OKC_API.HANDLE_EXCEPTIONS
860: (l_api_name,
861: G_PKG_NAME,
862: 'OKC_API.G_RET_STS_ERROR',
863: x_msg_count,
858: WHEN OKC_API.G_EXCEPTION_ERROR THEN
859: x_return_status := OKC_API.HANDLE_EXCEPTIONS
860: (l_api_name,
861: G_PKG_NAME,
862: 'OKC_API.G_RET_STS_ERROR',
863: x_msg_count,
864: x_msg_data,
865: '_PVT');
866: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
862: 'OKC_API.G_RET_STS_ERROR',
863: x_msg_count,
864: x_msg_data,
865: '_PVT');
866: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
867: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
868: (l_api_name,
869: G_PKG_NAME,
870: 'OKC_API.G_RET_STS_UNEXP_ERROR',
863: x_msg_count,
864: x_msg_data,
865: '_PVT');
866: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
867: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
868: (l_api_name,
869: G_PKG_NAME,
870: 'OKC_API.G_RET_STS_UNEXP_ERROR',
871: x_msg_count,
866: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
867: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
868: (l_api_name,
869: G_PKG_NAME,
870: 'OKC_API.G_RET_STS_UNEXP_ERROR',
871: x_msg_count,
872: x_msg_data,
873: '_PVT');
874: WHEN OTHERS THEN
871: x_msg_count,
872: x_msg_data,
873: '_PVT');
874: WHEN OTHERS THEN
875: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
876: (l_api_name,
877: G_PKG_NAME,
878: 'OTHERS',
879: x_msg_count,