65: l_crit_cat := 'Eligibility Criteria Category';
66: ELSE
67: l_crit_cat := 'Adjustment Category';
68: END IF;
69: okl_api.set_message(p_app_name => g_app_name
70: ,p_msg_name => 'OKL_INVALID_EFFECTIVE_DATES'
71: ,p_token1 => 'CRIT_CAT'
72: ,p_token1_value => l_crit_cat
73: ,p_token2 => 'NAME'
71: ,p_token1 => 'CRIT_CAT'
72: ,p_token1_value => l_crit_cat
73: ,p_token2 => 'NAME'
74: ,p_token2_value => l_crit_cat_name);
75: RAISE okl_api.g_exception_error;
76: END IF;
77: j := i + 1;
78: WHILE(j <= p_ecl_tbl.LAST) LOOP
79:
91: l_crit_cat := 'Eligibility Criteria Category';
92: ELSE
93: l_crit_cat := 'Adjustment Category';
94: END IF;
95: okl_api.set_message(p_app_name => g_app_name
96: ,p_msg_name => 'OKL_CRITCAT_OVERLAPPING_DATES'
97: ,p_token1 => 'CRIT_CAT'
98: ,p_token1_value => l_crit_cat
99: ,p_token2 => 'NAME'
97: ,p_token1 => 'CRIT_CAT'
98: ,p_token1_value => l_crit_cat
99: ,p_token2 => 'NAME'
100: ,p_token2_value => l_crit_cat_name);
101: RAISE okl_api.g_exception_error;
102: END IF;
103: IF (p_ecl_tbl(j).effective_to_date BETWEEN p_ecl_tbl(i).effective_from_date AND p_ecl_tbl(i).effective_to_date) THEN
104: OPEN l_crit_cat_name_csr(p_ecl_tbl(i).crit_cat_def_id);
105: FETCH l_crit_cat_name_csr INTO l_crit_cat_name
109: l_crit_cat := 'Eligibility Criteria Category';
110: ELSE
111: l_crit_cat := 'Adjustment Category';
112: END IF;
113: okl_api.set_message(p_app_name => g_app_name
114: ,p_msg_name => 'OKL_CRITCAT_OVERLAPPING_DATES'
115: ,p_token1 => 'CRIT_CAT'
116: ,p_token1_value => l_crit_cat
117: ,p_token2 => 'NAME'
115: ,p_token1 => 'CRIT_CAT'
116: ,p_token1_value => l_crit_cat
117: ,p_token2 => 'NAME'
118: ,p_token2_value => l_crit_cat_name);
119: RAISE okl_api.g_exception_error;
120: END IF;
121: END IF;
122:
123: -- Both Open End
131: l_crit_cat := 'Eligibility Criteria Category';
132: ELSE
133: l_crit_cat := 'Adjustment Category';
134: END IF;
135: okl_api.set_message(p_app_name => g_app_name
136: ,p_msg_name => 'OKL_CRITCAT_OVERLAPPING_DATES'
137: ,p_token1 => 'CRIT_CAT'
138: ,p_token1_value => l_crit_cat
139: ,p_token2 => 'NAME'
137: ,p_token1 => 'CRIT_CAT'
138: ,p_token1_value => l_crit_cat
139: ,p_token2 => 'NAME'
140: ,p_token2_value => l_crit_cat_name);
141: RAISE okl_api.g_exception_error;
142: END IF;
143:
144: -- p_ecl_tbl(i) is open end and p_ecl_tbl(j) is finite
145:
153: l_crit_cat := 'Eligibility Criteria Category';
154: ELSE
155: l_crit_cat := 'Adjustment Category';
156: END IF;
157: okl_api.set_message(p_app_name => g_app_name
158: ,p_msg_name => 'OKL_CRITCAT_OVERLAPPING_DATES'
159: ,p_token1 => 'CRIT_CAT'
160: ,p_token1_value => l_crit_cat
161: ,p_token2 => 'NAME'
159: ,p_token1 => 'CRIT_CAT'
160: ,p_token1_value => l_crit_cat
161: ,p_token2 => 'NAME'
162: ,p_token2_value => l_crit_cat_name);
163: RAISE okl_api.g_exception_error;
164: END IF;
165: END IF;
166:
167: -- p_ecl_tbl(i) is finite end and p_ecl_tbl(j) is open end
176: l_crit_cat := 'Eligibility Criteria Category';
177: ELSE
178: l_crit_cat := 'Adjustment Category';
179: END IF;
180: okl_api.set_message(p_app_name => g_app_name
181: ,p_msg_name => 'OKL_CRITCAT_OVERLAPPING_DATES'
182: ,p_token1 => 'CRIT_CAT'
183: ,p_token1_value => l_crit_cat
184: ,p_token2 => 'NAME'
182: ,p_token1 => 'CRIT_CAT'
183: ,p_token1_value => l_crit_cat
184: ,p_token2 => 'NAME'
185: ,p_token2_value => l_crit_cat_name);
186: RAISE okl_api.g_exception_error;
187: END IF;
188: END IF;
189: END IF;
190: j := j + 1;
196: okl_debug_pub.log_debug(fnd_log.level_procedure
197: ,l_module
198: ,'end debug OKLRECVB.pls.pls call validate_effective_dates');
199: END IF;
200: RETURN okl_api.g_ret_sts_success;
201: EXCEPTION
202: WHEN okl_api.g_exception_error THEN
203: RETURN okl_api.g_ret_sts_error;
204: WHEN okl_api.g_exception_unexpected_error THEN
198: ,'end debug OKLRECVB.pls.pls call validate_effective_dates');
199: END IF;
200: RETURN okl_api.g_ret_sts_success;
201: EXCEPTION
202: WHEN okl_api.g_exception_error THEN
203: RETURN okl_api.g_ret_sts_error;
204: WHEN okl_api.g_exception_unexpected_error THEN
205: RETURN okl_api.g_ret_sts_unexp_error;
206: WHEN OTHERS THEN
199: END IF;
200: RETURN okl_api.g_ret_sts_success;
201: EXCEPTION
202: WHEN okl_api.g_exception_error THEN
203: RETURN okl_api.g_ret_sts_error;
204: WHEN okl_api.g_exception_unexpected_error THEN
205: RETURN okl_api.g_ret_sts_unexp_error;
206: WHEN OTHERS THEN
207: okl_api.set_message(p_app_name => g_app_name
200: RETURN okl_api.g_ret_sts_success;
201: EXCEPTION
202: WHEN okl_api.g_exception_error THEN
203: RETURN okl_api.g_ret_sts_error;
204: WHEN okl_api.g_exception_unexpected_error THEN
205: RETURN okl_api.g_ret_sts_unexp_error;
206: WHEN OTHERS THEN
207: okl_api.set_message(p_app_name => g_app_name
208: ,p_msg_name => g_db_error
201: EXCEPTION
202: WHEN okl_api.g_exception_error THEN
203: RETURN okl_api.g_ret_sts_error;
204: WHEN okl_api.g_exception_unexpected_error THEN
205: RETURN okl_api.g_ret_sts_unexp_error;
206: WHEN OTHERS THEN
207: okl_api.set_message(p_app_name => g_app_name
208: ,p_msg_name => g_db_error
209: ,p_token1 => g_prog_name_token
203: RETURN okl_api.g_ret_sts_error;
204: WHEN okl_api.g_exception_unexpected_error THEN
205: RETURN okl_api.g_ret_sts_unexp_error;
206: WHEN OTHERS THEN
207: okl_api.set_message(p_app_name => g_app_name
208: ,p_msg_name => g_db_error
209: ,p_token1 => g_prog_name_token
210: ,p_token1_value => l_api_name
211: ,p_token2 => g_sqlcode_token
211: ,p_token2 => g_sqlcode_token
212: ,p_token2_value => sqlcode
213: ,p_token3 => g_sqlerrm_token
214: ,p_token3_value => sqlerrm);
215: RETURN okl_api.g_ret_sts_unexp_error;
216: END validate_effective_dates;
217:
218: /**
219: This procedure deletes the Eligibility criteria attached to a particular
252: i number;
253: j number;
254: l_api_name CONSTANT varchar2(30) := 'DELETE_ELIG_CRITERIA';
255: l_api_version CONSTANT number := 1.0;
256: l_return_status varchar2(1) := okl_api.g_ret_sts_success;
257: l_ec_found boolean;
258: l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.okl_ec_values_pvt.delete_eligibility_criteria';
259: l_debug_enabled varchar2(10);
260: is_debug_procedure_on boolean;
278:
279: -- call START_ACTIVITY to create savepoint, check compatibility
280: -- and initialize message list
281:
282: l_return_status := okl_api.start_activity(p_api_name => l_api_name
283: ,p_pkg_name => g_pkg_name
284: ,p_init_msg_list => p_init_msg_list
285: ,l_api_version => l_api_version
286: ,p_api_version => p_api_version
288: ,x_return_status => x_return_status);
289:
290: -- check if activity started successfully
291:
292: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
293: RAISE okl_api.g_exception_unexpected_error;
294: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
295: RAISE okl_api.g_exception_error;
296: END IF;
289:
290: -- check if activity started successfully
291:
292: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
293: RAISE okl_api.g_exception_unexpected_error;
294: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
295: RAISE okl_api.g_exception_error;
296: END IF;
297: l_source_id := p_source_id;
290: -- check if activity started successfully
291:
292: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
293: RAISE okl_api.g_exception_unexpected_error;
294: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
295: RAISE okl_api.g_exception_error;
296: END IF;
297: l_source_id := p_source_id;
298: OPEN get_ech_rec;
291:
292: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
293: RAISE okl_api.g_exception_unexpected_error;
294: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
295: RAISE okl_api.g_exception_error;
296: END IF;
297: l_source_id := p_source_id;
298: OPEN get_ech_rec;
299: FETCH get_ech_rec INTO lp_ech_rec.criteria_set_id ;
315:
316: --delete header
317:
318: okl_ech_pvt.delete_row(p_api_version => p_api_version
319: ,p_init_msg_list => okl_api.g_false
320: ,x_return_status => l_return_status
321: ,x_msg_count => x_msg_count
322: ,x_msg_data => x_msg_data
323: ,p_ech_rec => lp_ech_rec);
329: ,l_module
330: ,'Procedure okl_ech_pvt.delete_row returned with status ' ||
331: l_return_status);
332: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
333: IF l_return_status = okl_api.g_ret_sts_error THEN
334: RAISE okl_api.g_exception_error;
335: ELSIF l_return_status = okl_api.g_ret_sts_unexp_error THEN
336: RAISE okl_api.g_exception_unexpected_error;
337: END IF;
330: ,'Procedure okl_ech_pvt.delete_row returned with status ' ||
331: l_return_status);
332: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
333: IF l_return_status = okl_api.g_ret_sts_error THEN
334: RAISE okl_api.g_exception_error;
335: ELSIF l_return_status = okl_api.g_ret_sts_unexp_error THEN
336: RAISE okl_api.g_exception_unexpected_error;
337: END IF;
338: IF lp_ecl_tbl.COUNT > 0 THEN
331: l_return_status);
332: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
333: IF l_return_status = okl_api.g_ret_sts_error THEN
334: RAISE okl_api.g_exception_error;
335: ELSIF l_return_status = okl_api.g_ret_sts_unexp_error THEN
336: RAISE okl_api.g_exception_unexpected_error;
337: END IF;
338: IF lp_ecl_tbl.COUNT > 0 THEN
339:
332: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
333: IF l_return_status = okl_api.g_ret_sts_error THEN
334: RAISE okl_api.g_exception_error;
335: ELSIF l_return_status = okl_api.g_ret_sts_unexp_error THEN
336: RAISE okl_api.g_exception_unexpected_error;
337: END IF;
338: IF lp_ecl_tbl.COUNT > 0 THEN
339:
340: --delete lines
339:
340: --delete lines
341:
342: okl_ecl_pvt.delete_row(p_api_version => p_api_version
343: ,p_init_msg_list => okl_api.g_false
344: ,x_return_status => l_return_status
345: ,x_msg_count => x_msg_count
346: ,x_msg_data => x_msg_data
347: ,p_ecl_tbl => lp_ecl_tbl);
353: ,l_module
354: ,'Procedure okl_ecl_pvt.delete_row returned with status ' ||
355: l_return_status);
356: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
357: IF l_return_status = okl_api.g_ret_sts_error THEN
358: RAISE okl_api.g_exception_error;
359: ELSIF l_return_status = okl_api.g_ret_sts_unexp_error THEN
360: RAISE okl_api.g_exception_unexpected_error;
361: END IF;
354: ,'Procedure okl_ecl_pvt.delete_row returned with status ' ||
355: l_return_status);
356: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
357: IF l_return_status = okl_api.g_ret_sts_error THEN
358: RAISE okl_api.g_exception_error;
359: ELSIF l_return_status = okl_api.g_ret_sts_unexp_error THEN
360: RAISE okl_api.g_exception_unexpected_error;
361: END IF;
362: IF lp_ecv_tbl.COUNT > 0 THEN
355: l_return_status);
356: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
357: IF l_return_status = okl_api.g_ret_sts_error THEN
358: RAISE okl_api.g_exception_error;
359: ELSIF l_return_status = okl_api.g_ret_sts_unexp_error THEN
360: RAISE okl_api.g_exception_unexpected_error;
361: END IF;
362: IF lp_ecv_tbl.COUNT > 0 THEN
363:
356: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
357: IF l_return_status = okl_api.g_ret_sts_error THEN
358: RAISE okl_api.g_exception_error;
359: ELSIF l_return_status = okl_api.g_ret_sts_unexp_error THEN
360: RAISE okl_api.g_exception_unexpected_error;
361: END IF;
362: IF lp_ecv_tbl.COUNT > 0 THEN
363:
364: --delete line values
363:
364: --delete line values
365:
366: okl_ecv_pvt.delete_row(p_api_version => p_api_version
367: ,p_init_msg_list => okl_api.g_false
368: ,x_return_status => l_return_status
369: ,x_msg_count => x_msg_count
370: ,x_msg_data => x_msg_data
371: ,p_ecv_tbl => lp_ecv_tbl);
377: ,l_module
378: ,'Procedure okl_ecv_pvt.delete_row returned with status ' ||
379: l_return_status);
380: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
381: IF l_return_status = okl_api.g_ret_sts_error THEN
382: RAISE okl_api.g_exception_error;
383: ELSIF l_return_status = okl_api.g_ret_sts_unexp_error THEN
384: RAISE okl_api.g_exception_unexpected_error;
385: END IF;
378: ,'Procedure okl_ecv_pvt.delete_row returned with status ' ||
379: l_return_status);
380: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
381: IF l_return_status = okl_api.g_ret_sts_error THEN
382: RAISE okl_api.g_exception_error;
383: ELSIF l_return_status = okl_api.g_ret_sts_unexp_error THEN
384: RAISE okl_api.g_exception_unexpected_error;
385: END IF;
386: END IF;
379: l_return_status);
380: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
381: IF l_return_status = okl_api.g_ret_sts_error THEN
382: RAISE okl_api.g_exception_error;
383: ELSIF l_return_status = okl_api.g_ret_sts_unexp_error THEN
384: RAISE okl_api.g_exception_unexpected_error;
385: END IF;
386: END IF;
387: END IF;
380: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
381: IF l_return_status = okl_api.g_ret_sts_error THEN
382: RAISE okl_api.g_exception_error;
383: ELSIF l_return_status = okl_api.g_ret_sts_unexp_error THEN
384: RAISE okl_api.g_exception_unexpected_error;
385: END IF;
386: END IF;
387: END IF;
388: END IF;
387: END IF;
388: END IF;
389: x_return_status := l_return_status;
390:
391: okl_api.end_activity(x_msg_count => x_msg_count
392: ,x_msg_data => x_msg_data);
393:
394: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
395: okl_debug_pub.log_debug(fnd_log.level_procedure
397: ,'end debug OKLRECVB.pls.pls call delete_eligibility_criteria');
398: END IF;
399:
400: EXCEPTION
401: WHEN okl_api.g_exception_error THEN
402: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
403: ,p_pkg_name => g_pkg_name
404: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
405: ,x_msg_count => x_msg_count
398: END IF;
399:
400: EXCEPTION
401: WHEN okl_api.g_exception_error THEN
402: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
403: ,p_pkg_name => g_pkg_name
404: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
405: ,x_msg_count => x_msg_count
406: ,x_msg_data => x_msg_data
400: EXCEPTION
401: WHEN okl_api.g_exception_error THEN
402: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
403: ,p_pkg_name => g_pkg_name
404: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
405: ,x_msg_count => x_msg_count
406: ,x_msg_data => x_msg_data
407: ,p_api_type => g_api_type);
408: WHEN okl_api.g_exception_unexpected_error THEN
404: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
405: ,x_msg_count => x_msg_count
406: ,x_msg_data => x_msg_data
407: ,p_api_type => g_api_type);
408: WHEN okl_api.g_exception_unexpected_error THEN
409: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
410: ,p_pkg_name => g_pkg_name
411: ,p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR'
412: ,x_msg_count => x_msg_count
405: ,x_msg_count => x_msg_count
406: ,x_msg_data => x_msg_data
407: ,p_api_type => g_api_type);
408: WHEN okl_api.g_exception_unexpected_error THEN
409: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
410: ,p_pkg_name => g_pkg_name
411: ,p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR'
412: ,x_msg_count => x_msg_count
413: ,x_msg_data => x_msg_data
407: ,p_api_type => g_api_type);
408: WHEN okl_api.g_exception_unexpected_error THEN
409: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
410: ,p_pkg_name => g_pkg_name
411: ,p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR'
412: ,x_msg_count => x_msg_count
413: ,x_msg_data => x_msg_data
414: ,p_api_type => g_api_type);
415: WHEN OTHERS THEN
412: ,x_msg_count => x_msg_count
413: ,x_msg_data => x_msg_data
414: ,p_api_type => g_api_type);
415: WHEN OTHERS THEN
416: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
417: ,p_pkg_name => g_pkg_name
418: ,p_exc_name => 'OTHERS'
419: ,x_msg_count => x_msg_count
420: ,x_msg_data => x_msg_data
430: line.
431: **/
432:
433: PROCEDURE handle_eligibility_criteria(p_api_version IN number
434: ,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
435: ,x_return_status OUT NOCOPY varchar2
436: ,x_msg_count OUT NOCOPY number
437: ,x_msg_data OUT NOCOPY varchar2
438: ,p_ech_rec IN okl_ech_rec
474: k number;
475: l_child_ec_exists boolean;
476: l_api_name CONSTANT varchar2(30) := 'HANDLE_ELIG_CRITERIA';
477: l_api_version CONSTANT number := 1.0;
478: l_return_status varchar2(1) := okl_api.g_ret_sts_success;
479: l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.okl_ec_values_pvt.handle_eligibility_criteria';
480: l_debug_enabled varchar2(10);
481: is_debug_procedure_on boolean;
482: is_debug_statement_on boolean;
499:
500: -- call START_ACTIVITY to create savepoint, check compatibility
501: -- and initialize message list
502:
503: l_return_status := okl_api.start_activity(p_api_name => l_api_name
504: ,p_pkg_name => g_pkg_name
505: ,p_init_msg_list => p_init_msg_list
506: ,l_api_version => l_api_version
507: ,p_api_version => p_api_version
509: ,x_return_status => x_return_status);
510:
511: -- check if activity started successfully
512:
513: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
514: RAISE okl_api.g_exception_unexpected_error;
515: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
516: RAISE okl_api.g_exception_error;
517: END IF;
510:
511: -- check if activity started successfully
512:
513: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
514: RAISE okl_api.g_exception_unexpected_error;
515: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
516: RAISE okl_api.g_exception_error;
517: END IF;
518: lp_ech_rec := p_ech_rec;
511: -- check if activity started successfully
512:
513: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
514: RAISE okl_api.g_exception_unexpected_error;
515: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
516: RAISE okl_api.g_exception_error;
517: END IF;
518: lp_ech_rec := p_ech_rec;
519: lp_ecl_tbl := p_ecl_tbl;
512:
513: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
514: RAISE okl_api.g_exception_unexpected_error;
515: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
516: RAISE okl_api.g_exception_error;
517: END IF;
518: lp_ech_rec := p_ech_rec;
519: lp_ecl_tbl := p_ecl_tbl;
520: lp_ecv_tbl := p_ecv_tbl;
524: l_return_status := validate_effective_dates(lp_ecl_tbl
525: ,p_source_eff_from
526: ,p_source_eff_to);
527:
528: IF (l_return_status = okl_api.g_ret_sts_error) THEN
529: RAISE okl_api.g_exception_error;
530: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
531: RAISE okl_api.g_exception_unexpected_error;
532: END IF;
525: ,p_source_eff_from
526: ,p_source_eff_to);
527:
528: IF (l_return_status = okl_api.g_ret_sts_error) THEN
529: RAISE okl_api.g_exception_error;
530: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
531: RAISE okl_api.g_exception_unexpected_error;
532: END IF;
533:
526: ,p_source_eff_to);
527:
528: IF (l_return_status = okl_api.g_ret_sts_error) THEN
529: RAISE okl_api.g_exception_error;
530: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
531: RAISE okl_api.g_exception_unexpected_error;
532: END IF;
533:
534: --insert/update EC only if some criteria lines are present
527:
528: IF (l_return_status = okl_api.g_ret_sts_error) THEN
529: RAISE okl_api.g_exception_error;
530: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
531: RAISE okl_api.g_exception_unexpected_error;
532: END IF;
533:
534: --insert/update EC only if some criteria lines are present
535:
539:
540: --insert criteria set header
541:
542: okl_ech_pvt.insert_row(p_api_version
543: ,okl_api.g_false
544: ,l_return_status
545: ,x_msg_count
546: ,x_msg_data
547: ,lp_ech_rec
554: ,l_module
555: ,'Procedure okl_ech_pvt.insert_row returned with status ' ||
556: l_return_status);
557: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
558: IF (l_return_status = okl_api.g_ret_sts_error) THEN
559: RAISE okl_api.g_exception_error;
560: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
561: RAISE okl_api.g_exception_unexpected_error;
562: END IF;
555: ,'Procedure okl_ech_pvt.insert_row returned with status ' ||
556: l_return_status);
557: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
558: IF (l_return_status = okl_api.g_ret_sts_error) THEN
559: RAISE okl_api.g_exception_error;
560: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
561: RAISE okl_api.g_exception_unexpected_error;
562: END IF;
563: ELSE
556: l_return_status);
557: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
558: IF (l_return_status = okl_api.g_ret_sts_error) THEN
559: RAISE okl_api.g_exception_error;
560: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
561: RAISE okl_api.g_exception_unexpected_error;
562: END IF;
563: ELSE
564:
557: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
558: IF (l_return_status = okl_api.g_ret_sts_error) THEN
559: RAISE okl_api.g_exception_error;
560: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
561: RAISE okl_api.g_exception_unexpected_error;
562: END IF;
563: ELSE
564:
565: --update criteria set header
564:
565: --update criteria set header
566:
567: okl_ech_pvt.update_row(p_api_version
568: ,okl_api.g_false
569: ,l_return_status
570: ,x_msg_count
571: ,x_msg_data
572: ,lp_ech_rec
580: ,'Procedure okl_ech_pvt.update_row returned with status ' ||
581: l_return_status);
582: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
583:
584: IF (l_return_status = okl_api.g_ret_sts_error) THEN
585: RAISE okl_api.g_exception_error;
586: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
587: RAISE okl_api.g_exception_unexpected_error;
588: END IF;
581: l_return_status);
582: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
583:
584: IF (l_return_status = okl_api.g_ret_sts_error) THEN
585: RAISE okl_api.g_exception_error;
586: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
587: RAISE okl_api.g_exception_unexpected_error;
588: END IF;
589: END IF;
582: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
583:
584: IF (l_return_status = okl_api.g_ret_sts_error) THEN
585: RAISE okl_api.g_exception_error;
586: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
587: RAISE okl_api.g_exception_unexpected_error;
588: END IF;
589: END IF;
590:
583:
584: IF (l_return_status = okl_api.g_ret_sts_error) THEN
585: RAISE okl_api.g_exception_error;
586: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
587: RAISE okl_api.g_exception_unexpected_error;
588: END IF;
589: END IF;
590:
591: --Copy value of OUT variable in the IN record type
598: --if effective date has to get null out then initialize it to
599: --g_miss_date
600:
601: IF lp_ecl_tbl(i).effective_to_date IS NULL THEN
602: lp_ecl_tbl(i).effective_to_date := okl_api.g_miss_date;
603: END IF;
604: IF lp_ecl_tbl(i).is_new_flag = 'Y' THEN
605: okl_ecl_pvt.insert_row(p_api_version
606: ,okl_api.g_false
602: lp_ecl_tbl(i).effective_to_date := okl_api.g_miss_date;
603: END IF;
604: IF lp_ecl_tbl(i).is_new_flag = 'Y' THEN
605: okl_ecl_pvt.insert_row(p_api_version
606: ,okl_api.g_false
607: ,l_return_status
608: ,x_msg_count
609: ,x_msg_data
610: ,lp_ecl_tbl(i)
617: ,l_module
618: ,'Procedure okl_ecl_pvt.insert_row returned with status ' ||
619: l_return_status);
620: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
621: IF (l_return_status = okl_api.g_ret_sts_error) THEN
622: RAISE okl_api.g_exception_error;
623: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
624: RAISE okl_api.g_exception_unexpected_error;
625: END IF;
618: ,'Procedure okl_ecl_pvt.insert_row returned with status ' ||
619: l_return_status);
620: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
621: IF (l_return_status = okl_api.g_ret_sts_error) THEN
622: RAISE okl_api.g_exception_error;
623: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
624: RAISE okl_api.g_exception_unexpected_error;
625: END IF;
626: OPEN l_data_type_csr(lp_ecl_tbl(i).crit_cat_def_id);
619: l_return_status);
620: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
621: IF (l_return_status = okl_api.g_ret_sts_error) THEN
622: RAISE okl_api.g_exception_error;
623: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
624: RAISE okl_api.g_exception_unexpected_error;
625: END IF;
626: OPEN l_data_type_csr(lp_ecl_tbl(i).crit_cat_def_id);
627: FETCH l_data_type_csr INTO l_data_type_code
620: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
621: IF (l_return_status = okl_api.g_ret_sts_error) THEN
622: RAISE okl_api.g_exception_error;
623: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
624: RAISE okl_api.g_exception_unexpected_error;
625: END IF;
626: OPEN l_data_type_csr(lp_ecl_tbl(i).crit_cat_def_id);
627: FETCH l_data_type_csr INTO l_data_type_code
628: ,l_value_type_code
642: lp_ecv_tbl(j).value_type_code := l_value_type_code;
643: lp_ecv_tbl(j).source_yn := l_source_yn;
644: IF lp_ecv_tbl(j).criterion_value_id IS NULL THEN
645: okl_ecv_pvt.insert_row(p_api_version
646: ,okl_api.g_false
647: ,l_return_status
648: ,x_msg_count
649: ,x_msg_data
650: ,lp_ecv_tbl(j)
657: ,l_module
658: ,'Procedure okl_ecv_pvt.insert_row returned with status ' ||
659: l_return_status);
660: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
661: IF (l_return_status = okl_api.g_ret_sts_error) THEN
662: RAISE okl_api.g_exception_error;
663: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
664: RAISE okl_api.g_exception_unexpected_error;
665: END IF;
658: ,'Procedure okl_ecv_pvt.insert_row returned with status ' ||
659: l_return_status);
660: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
661: IF (l_return_status = okl_api.g_ret_sts_error) THEN
662: RAISE okl_api.g_exception_error;
663: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
664: RAISE okl_api.g_exception_unexpected_error;
665: END IF;
666: ELSE
659: l_return_status);
660: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
661: IF (l_return_status = okl_api.g_ret_sts_error) THEN
662: RAISE okl_api.g_exception_error;
663: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
664: RAISE okl_api.g_exception_unexpected_error;
665: END IF;
666: ELSE
667: okl_ecv_pvt.update_row(p_api_version
660: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
661: IF (l_return_status = okl_api.g_ret_sts_error) THEN
662: RAISE okl_api.g_exception_error;
663: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
664: RAISE okl_api.g_exception_unexpected_error;
665: END IF;
666: ELSE
667: okl_ecv_pvt.update_row(p_api_version
668: ,okl_api.g_false
664: RAISE okl_api.g_exception_unexpected_error;
665: END IF;
666: ELSE
667: okl_ecv_pvt.update_row(p_api_version
668: ,okl_api.g_false
669: ,l_return_status
670: ,x_msg_count
671: ,x_msg_data
672: ,lp_ecv_tbl(j)
679: ,l_module
680: ,'Procedure okl_ecv_pvt.update_row returned with status ' ||
681: l_return_status);
682: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
683: IF (l_return_status = okl_api.g_ret_sts_error) THEN
684: RAISE okl_api.g_exception_error;
685: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
686: RAISE okl_api.g_exception_unexpected_error;
687: END IF;
680: ,'Procedure okl_ecv_pvt.update_row returned with status ' ||
681: l_return_status);
682: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
683: IF (l_return_status = okl_api.g_ret_sts_error) THEN
684: RAISE okl_api.g_exception_error;
685: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
686: RAISE okl_api.g_exception_unexpected_error;
687: END IF;
688: END IF;
681: l_return_status);
682: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
683: IF (l_return_status = okl_api.g_ret_sts_error) THEN
684: RAISE okl_api.g_exception_error;
685: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
686: RAISE okl_api.g_exception_unexpected_error;
687: END IF;
688: END IF;
689: lx_ecv_cons_tbl(k) := lx_ecv_tbl(j);
682: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
683: IF (l_return_status = okl_api.g_ret_sts_error) THEN
684: RAISE okl_api.g_exception_error;
685: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
686: RAISE okl_api.g_exception_unexpected_error;
687: END IF;
688: END IF;
689: lx_ecv_cons_tbl(k) := lx_ecv_tbl(j);
690: k := k + 1;
691: END IF;
692: END LOOP; --of Line values
693: ELSE
694: okl_ecl_pvt.update_row(p_api_version
695: ,okl_api.g_false
696: ,l_return_status
697: ,x_msg_count
698: ,x_msg_data
699: ,lp_ecl_tbl(i)
706: ,l_module
707: ,'Procedure okl_ecl_pvt.update_row returned with status ' ||
708: l_return_status);
709: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
710: IF (l_return_status = okl_api.g_ret_sts_error) THEN
711: RAISE okl_api.g_exception_error;
712: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
713: RAISE okl_api.g_exception_unexpected_error;
714: END IF;
707: ,'Procedure okl_ecl_pvt.update_row returned with status ' ||
708: l_return_status);
709: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
710: IF (l_return_status = okl_api.g_ret_sts_error) THEN
711: RAISE okl_api.g_exception_error;
712: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
713: RAISE okl_api.g_exception_unexpected_error;
714: END IF;
715: OPEN l_data_type_csr(lp_ecl_tbl(i).crit_cat_def_id);
708: l_return_status);
709: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
710: IF (l_return_status = okl_api.g_ret_sts_error) THEN
711: RAISE okl_api.g_exception_error;
712: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
713: RAISE okl_api.g_exception_unexpected_error;
714: END IF;
715: OPEN l_data_type_csr(lp_ecl_tbl(i).crit_cat_def_id);
716: FETCH l_data_type_csr INTO l_data_type_code
709: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
710: IF (l_return_status = okl_api.g_ret_sts_error) THEN
711: RAISE okl_api.g_exception_error;
712: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
713: RAISE okl_api.g_exception_unexpected_error;
714: END IF;
715: OPEN l_data_type_csr(lp_ecl_tbl(i).crit_cat_def_id);
716: FETCH l_data_type_csr INTO l_data_type_code
717: ,l_value_type_code
731: lp_ecv_tbl(j).value_type_code := l_value_type_code;
732: lp_ecv_tbl(j).source_yn := l_source_yn;
733: IF lp_ecv_tbl(j).criterion_value_id IS NULL THEN
734: okl_ecv_pvt.insert_row(p_api_version
735: ,okl_api.g_false
736: ,l_return_status
737: ,x_msg_count
738: ,x_msg_data
739: ,lp_ecv_tbl(j)
746: ,l_module
747: ,'Procedure okl_ecv_pvt.insert_row returned with status ' ||
748: l_return_status);
749: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
750: IF (l_return_status = okl_api.g_ret_sts_error) THEN
751: RAISE okl_api.g_exception_error;
752: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
753: RAISE okl_api.g_exception_unexpected_error;
754: END IF;
747: ,'Procedure okl_ecv_pvt.insert_row returned with status ' ||
748: l_return_status);
749: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
750: IF (l_return_status = okl_api.g_ret_sts_error) THEN
751: RAISE okl_api.g_exception_error;
752: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
753: RAISE okl_api.g_exception_unexpected_error;
754: END IF;
755: ELSE
748: l_return_status);
749: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
750: IF (l_return_status = okl_api.g_ret_sts_error) THEN
751: RAISE okl_api.g_exception_error;
752: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
753: RAISE okl_api.g_exception_unexpected_error;
754: END IF;
755: ELSE
756: okl_ecv_pvt.update_row(p_api_version
749: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
750: IF (l_return_status = okl_api.g_ret_sts_error) THEN
751: RAISE okl_api.g_exception_error;
752: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
753: RAISE okl_api.g_exception_unexpected_error;
754: END IF;
755: ELSE
756: okl_ecv_pvt.update_row(p_api_version
757: ,okl_api.g_false
753: RAISE okl_api.g_exception_unexpected_error;
754: END IF;
755: ELSE
756: okl_ecv_pvt.update_row(p_api_version
757: ,okl_api.g_false
758: ,l_return_status
759: ,x_msg_count
760: ,x_msg_data
761: ,lp_ecv_tbl(j)
768: ,l_module
769: ,'Procedure okl_ecv_pvt.update_row returned with status ' ||
770: l_return_status);
771: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
772: IF (l_return_status = okl_api.g_ret_sts_error) THEN
773: RAISE okl_api.g_exception_error;
774: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
775: RAISE okl_api.g_exception_unexpected_error;
776: END IF;
769: ,'Procedure okl_ecv_pvt.update_row returned with status ' ||
770: l_return_status);
771: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
772: IF (l_return_status = okl_api.g_ret_sts_error) THEN
773: RAISE okl_api.g_exception_error;
774: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
775: RAISE okl_api.g_exception_unexpected_error;
776: END IF;
777: END IF;
770: l_return_status);
771: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
772: IF (l_return_status = okl_api.g_ret_sts_error) THEN
773: RAISE okl_api.g_exception_error;
774: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
775: RAISE okl_api.g_exception_unexpected_error;
776: END IF;
777: END IF;
778: lx_ecv_cons_tbl(k) := lx_ecv_tbl(j);
771: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
772: IF (l_return_status = okl_api.g_ret_sts_error) THEN
773: RAISE okl_api.g_exception_error;
774: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
775: RAISE okl_api.g_exception_unexpected_error;
776: END IF;
777: END IF;
778: lx_ecv_cons_tbl(k) := lx_ecv_tbl(j);
779: k := k + 1;
785: ELSE
786:
787: --if no lines are present delete header, if header exists
788:
789: IF lp_ech_rec.criteria_set_id IS NOT NULL AND lp_ech_rec.criteria_set_id <> okl_api.g_miss_num THEN
790:
791: --delete criteria set header
792:
793: okl_ech_pvt.delete_row(p_api_version
790:
791: --delete criteria set header
792:
793: okl_ech_pvt.delete_row(p_api_version
794: ,okl_api.g_false
795: ,l_return_status
796: ,x_msg_count
797: ,x_msg_data
798: ,lp_ech_rec);
804: ,l_module
805: ,'Procedure okl_ech_pvt.delete_row returned with status ' ||
806: l_return_status);
807: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
808: IF (l_return_status = okl_api.g_ret_sts_error) THEN
809: RAISE okl_api.g_exception_error;
810: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
811: RAISE okl_api.g_exception_unexpected_error;
812: END IF;
805: ,'Procedure okl_ech_pvt.delete_row returned with status ' ||
806: l_return_status);
807: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
808: IF (l_return_status = okl_api.g_ret_sts_error) THEN
809: RAISE okl_api.g_exception_error;
810: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
811: RAISE okl_api.g_exception_unexpected_error;
812: END IF;
813: END IF;
806: l_return_status);
807: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
808: IF (l_return_status = okl_api.g_ret_sts_error) THEN
809: RAISE okl_api.g_exception_error;
810: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
811: RAISE okl_api.g_exception_unexpected_error;
812: END IF;
813: END IF;
814: END IF;
807: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
808: IF (l_return_status = okl_api.g_ret_sts_error) THEN
809: RAISE okl_api.g_exception_error;
810: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
811: RAISE okl_api.g_exception_unexpected_error;
812: END IF;
813: END IF;
814: END IF;
815:
819: x_ech_rec := lx_ech_rec;
820: x_ecl_tbl := lx_ecl_tbl;
821: x_ecv_tbl := lx_ecv_cons_tbl;
822: x_return_status := l_return_status;
823: okl_api.end_activity(x_msg_count => x_msg_count
824: ,x_msg_data => x_msg_data);
825:
826: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
827: okl_debug_pub.log_debug(fnd_log.level_procedure
829: ,'end debug OKLRECVB.pls.pls call handle_eligibility_criteria');
830: END IF;
831:
832: EXCEPTION
833: WHEN okl_api.g_exception_error THEN
834: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
835: ,p_pkg_name => g_pkg_name
836: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
837: ,x_msg_count => x_msg_count
830: END IF;
831:
832: EXCEPTION
833: WHEN okl_api.g_exception_error THEN
834: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
835: ,p_pkg_name => g_pkg_name
836: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
837: ,x_msg_count => x_msg_count
838: ,x_msg_data => x_msg_data
832: EXCEPTION
833: WHEN okl_api.g_exception_error THEN
834: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
835: ,p_pkg_name => g_pkg_name
836: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
837: ,x_msg_count => x_msg_count
838: ,x_msg_data => x_msg_data
839: ,p_api_type => g_api_type);
840: WHEN okl_api.g_exception_unexpected_error THEN
836: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
837: ,x_msg_count => x_msg_count
838: ,x_msg_data => x_msg_data
839: ,p_api_type => g_api_type);
840: WHEN okl_api.g_exception_unexpected_error THEN
841: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
842: ,p_pkg_name => g_pkg_name
843: ,p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR'
844: ,x_msg_count => x_msg_count
837: ,x_msg_count => x_msg_count
838: ,x_msg_data => x_msg_data
839: ,p_api_type => g_api_type);
840: WHEN okl_api.g_exception_unexpected_error THEN
841: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
842: ,p_pkg_name => g_pkg_name
843: ,p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR'
844: ,x_msg_count => x_msg_count
845: ,x_msg_data => x_msg_data
839: ,p_api_type => g_api_type);
840: WHEN okl_api.g_exception_unexpected_error THEN
841: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
842: ,p_pkg_name => g_pkg_name
843: ,p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR'
844: ,x_msg_count => x_msg_count
845: ,x_msg_data => x_msg_data
846: ,p_api_type => g_api_type);
847: WHEN OTHERS THEN
844: ,x_msg_count => x_msg_count
845: ,x_msg_data => x_msg_data
846: ,p_api_type => g_api_type);
847: WHEN OTHERS THEN
848: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
849: ,p_pkg_name => g_pkg_name
850: ,p_exc_name => 'OTHERS'
851: ,x_msg_count => x_msg_count
852: ,x_msg_data => x_msg_data
856: This procedure removes the the criteria line record.
857: **/
858:
859: PROCEDURE remove_ec_line(p_api_version IN number
860: ,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
861: ,x_return_status OUT NOCOPY varchar2
862: ,x_msg_count OUT NOCOPY number
863: ,x_msg_data OUT NOCOPY varchar2
864: ,p_ecl_rec IN okl_ecl_rec) IS
870: FROM okl_fe_criterion_values
871: WHERE okl_fe_criterion_values.criteria_id = p_line_id;
872: l_api_name CONSTANT varchar2(30) := 'REMOVE_EC_LINE(REC)';
873: l_api_version CONSTANT number := 1.0;
874: l_return_status varchar2(1) := okl_api.g_ret_sts_success;
875: l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.okl_ec_values_pvt.remove_ec_line';
876: l_debug_enabled varchar2(10);
877: is_debug_procedure_on boolean;
878: is_debug_statement_on boolean;
895:
896: -- call START_ACTIVITY to create savepoint, check compatibility
897: -- and initialize message list
898:
899: l_return_status := okl_api.start_activity(p_api_name => l_api_name
900: ,p_pkg_name => g_pkg_name
901: ,p_init_msg_list => p_init_msg_list
902: ,l_api_version => l_api_version
903: ,p_api_version => p_api_version
905: ,x_return_status => x_return_status);
906:
907: -- check if activity started successfully
908:
909: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
910: RAISE okl_api.g_exception_unexpected_error;
911: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
912: RAISE okl_api.g_exception_error;
913: END IF;
906:
907: -- check if activity started successfully
908:
909: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
910: RAISE okl_api.g_exception_unexpected_error;
911: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
912: RAISE okl_api.g_exception_error;
913: END IF;
914: lp_ecl_rec := p_ecl_rec;
907: -- check if activity started successfully
908:
909: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
910: RAISE okl_api.g_exception_unexpected_error;
911: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
912: RAISE okl_api.g_exception_error;
913: END IF;
914: lp_ecl_rec := p_ecl_rec;
915:
908:
909: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
910: RAISE okl_api.g_exception_unexpected_error;
911: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
912: RAISE okl_api.g_exception_error;
913: END IF;
914: lp_ecl_rec := p_ecl_rec;
915:
916: --delete line values
917:
918: FOR l_ecv_csr_rec IN get_lines_values(lp_ecl_rec.criteria_id) LOOP
919: l_ecv_rec.criterion_value_id := l_ecv_csr_rec.criterion_value_id;
920: okl_ecv_pvt.delete_row(p_api_version
921: ,okl_api.g_false
922: ,l_return_status
923: ,x_msg_count
924: ,x_msg_data
925: ,l_ecv_rec);
923: ,x_msg_count
924: ,x_msg_data
925: ,l_ecv_rec);
926:
927: IF (l_return_status = okl_api.g_ret_sts_error) THEN
928: RAISE okl_api.g_exception_error;
929: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
930: RAISE okl_api.g_exception_unexpected_error;
931: END IF;
924: ,x_msg_data
925: ,l_ecv_rec);
926:
927: IF (l_return_status = okl_api.g_ret_sts_error) THEN
928: RAISE okl_api.g_exception_error;
929: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
930: RAISE okl_api.g_exception_unexpected_error;
931: END IF;
932:
925: ,l_ecv_rec);
926:
927: IF (l_return_status = okl_api.g_ret_sts_error) THEN
928: RAISE okl_api.g_exception_error;
929: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
930: RAISE okl_api.g_exception_unexpected_error;
931: END IF;
932:
933: END LOOP;
926:
927: IF (l_return_status = okl_api.g_ret_sts_error) THEN
928: RAISE okl_api.g_exception_error;
929: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
930: RAISE okl_api.g_exception_unexpected_error;
931: END IF;
932:
933: END LOOP;
934:
934:
935: --delete line
936:
937: okl_ecl_pvt.delete_row(p_api_version => p_api_version
938: ,p_init_msg_list => okl_api.g_false
939: ,x_return_status => l_return_status
940: ,x_msg_count => x_msg_count
941: ,x_msg_data => x_msg_data
942: ,p_ecl_rec => lp_ecl_rec);
940: ,x_msg_count => x_msg_count
941: ,x_msg_data => x_msg_data
942: ,p_ecl_rec => lp_ecl_rec);
943:
944: IF (l_return_status = okl_api.g_ret_sts_error) THEN
945: RAISE okl_api.g_exception_error;
946: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
947: RAISE okl_api.g_exception_unexpected_error;
948: END IF;
941: ,x_msg_data => x_msg_data
942: ,p_ecl_rec => lp_ecl_rec);
943:
944: IF (l_return_status = okl_api.g_ret_sts_error) THEN
945: RAISE okl_api.g_exception_error;
946: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
947: RAISE okl_api.g_exception_unexpected_error;
948: END IF;
949:
942: ,p_ecl_rec => lp_ecl_rec);
943:
944: IF (l_return_status = okl_api.g_ret_sts_error) THEN
945: RAISE okl_api.g_exception_error;
946: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
947: RAISE okl_api.g_exception_unexpected_error;
948: END IF;
949:
950: --Assign value to OUT variables
943:
944: IF (l_return_status = okl_api.g_ret_sts_error) THEN
945: RAISE okl_api.g_exception_error;
946: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
947: RAISE okl_api.g_exception_unexpected_error;
948: END IF;
949:
950: --Assign value to OUT variables
951:
949:
950: --Assign value to OUT variables
951:
952: x_return_status := l_return_status;
953: okl_api.end_activity(x_msg_count => x_msg_count
954: ,x_msg_data => x_msg_data);
955:
956: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
957: okl_debug_pub.log_debug(fnd_log.level_procedure
959: ,'end debug OKLRECVB.pls.pls call remove_ec_line');
960: END IF;
961:
962: EXCEPTION
963: WHEN okl_api.g_exception_error THEN
964: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
965: ,p_pkg_name => g_pkg_name
966: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
967: ,x_msg_count => x_msg_count
960: END IF;
961:
962: EXCEPTION
963: WHEN okl_api.g_exception_error THEN
964: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
965: ,p_pkg_name => g_pkg_name
966: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
967: ,x_msg_count => x_msg_count
968: ,x_msg_data => x_msg_data
962: EXCEPTION
963: WHEN okl_api.g_exception_error THEN
964: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
965: ,p_pkg_name => g_pkg_name
966: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
967: ,x_msg_count => x_msg_count
968: ,x_msg_data => x_msg_data
969: ,p_api_type => g_api_type);
970: WHEN okl_api.g_exception_unexpected_error THEN
966: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
967: ,x_msg_count => x_msg_count
968: ,x_msg_data => x_msg_data
969: ,p_api_type => g_api_type);
970: WHEN okl_api.g_exception_unexpected_error THEN
971: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
972: ,p_pkg_name => g_pkg_name
973: ,p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR'
974: ,x_msg_count => x_msg_count
967: ,x_msg_count => x_msg_count
968: ,x_msg_data => x_msg_data
969: ,p_api_type => g_api_type);
970: WHEN okl_api.g_exception_unexpected_error THEN
971: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
972: ,p_pkg_name => g_pkg_name
973: ,p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR'
974: ,x_msg_count => x_msg_count
975: ,x_msg_data => x_msg_data
969: ,p_api_type => g_api_type);
970: WHEN okl_api.g_exception_unexpected_error THEN
971: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
972: ,p_pkg_name => g_pkg_name
973: ,p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR'
974: ,x_msg_count => x_msg_count
975: ,x_msg_data => x_msg_data
976: ,p_api_type => g_api_type);
977: WHEN OTHERS THEN
974: ,x_msg_count => x_msg_count
975: ,x_msg_data => x_msg_data
976: ,p_api_type => g_api_type);
977: WHEN OTHERS THEN
978: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
979: ,p_pkg_name => g_pkg_name
980: ,p_exc_name => 'OTHERS'
981: ,x_msg_count => x_msg_count
982: ,x_msg_data => x_msg_data
1039: i number;
1040: j number;
1041: l_api_name CONSTANT varchar2(30) := 'GET_ELIG_CRIT_DT';
1042: l_api_version CONSTANT number := 1.0;
1043: l_return_status varchar2(1) := okl_api.g_ret_sts_success;
1044: l_ec_found boolean;
1045: l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.okl_ec_values_pvt.get_eligibility_criteria';
1046: l_debug_enabled varchar2(10);
1047: is_debug_procedure_on boolean;
1065:
1066: -- call START_ACTIVITY to create savepoint, check compatibility
1067: -- and initialize message list
1068:
1069: l_return_status := okl_api.start_activity(p_api_name => l_api_name
1070: ,p_pkg_name => g_pkg_name
1071: ,p_init_msg_list => p_init_msg_list
1072: ,l_api_version => l_api_version
1073: ,p_api_version => p_api_version
1075: ,x_return_status => x_return_status);
1076:
1077: -- check if activity started successfully
1078:
1079: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1080: RAISE okl_api.g_exception_unexpected_error;
1081: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1082: RAISE okl_api.g_exception_error;
1083: END IF;
1076:
1077: -- check if activity started successfully
1078:
1079: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1080: RAISE okl_api.g_exception_unexpected_error;
1081: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1082: RAISE okl_api.g_exception_error;
1083: END IF;
1084: l_source_id := p_source_id;
1077: -- check if activity started successfully
1078:
1079: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1080: RAISE okl_api.g_exception_unexpected_error;
1081: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1082: RAISE okl_api.g_exception_error;
1083: END IF;
1084: l_source_id := p_source_id;
1085: OPEN get_ech_rec;
1078:
1079: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1080: RAISE okl_api.g_exception_unexpected_error;
1081: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1082: RAISE okl_api.g_exception_error;
1083: END IF;
1084: l_source_id := p_source_id;
1085: OPEN get_ech_rec;
1086: FETCH get_ech_rec INTO x_ech_rec.criteria_set_id
1161:
1162: END IF;
1163: x_return_status := l_return_status;
1164:
1165: okl_api.end_activity(x_msg_count => x_msg_count
1166: ,x_msg_data => x_msg_data);
1167:
1168: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
1169: okl_debug_pub.log_debug(fnd_log.level_procedure
1171: ,'end debug OKLRECVB.pls.pls call get_eligibility_criteria');
1172: END IF;
1173:
1174: EXCEPTION
1175: WHEN okl_api.g_exception_error THEN
1176: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
1177: ,p_pkg_name => g_pkg_name
1178: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
1179: ,x_msg_count => x_msg_count
1172: END IF;
1173:
1174: EXCEPTION
1175: WHEN okl_api.g_exception_error THEN
1176: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
1177: ,p_pkg_name => g_pkg_name
1178: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
1179: ,x_msg_count => x_msg_count
1180: ,x_msg_data => x_msg_data
1174: EXCEPTION
1175: WHEN okl_api.g_exception_error THEN
1176: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
1177: ,p_pkg_name => g_pkg_name
1178: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
1179: ,x_msg_count => x_msg_count
1180: ,x_msg_data => x_msg_data
1181: ,p_api_type => g_api_type);
1182: WHEN okl_api.g_exception_unexpected_error THEN
1178: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
1179: ,x_msg_count => x_msg_count
1180: ,x_msg_data => x_msg_data
1181: ,p_api_type => g_api_type);
1182: WHEN okl_api.g_exception_unexpected_error THEN
1183: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
1184: ,p_pkg_name => g_pkg_name
1185: ,p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR'
1186: ,x_msg_count => x_msg_count
1179: ,x_msg_count => x_msg_count
1180: ,x_msg_data => x_msg_data
1181: ,p_api_type => g_api_type);
1182: WHEN okl_api.g_exception_unexpected_error THEN
1183: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
1184: ,p_pkg_name => g_pkg_name
1185: ,p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR'
1186: ,x_msg_count => x_msg_count
1187: ,x_msg_data => x_msg_data
1181: ,p_api_type => g_api_type);
1182: WHEN okl_api.g_exception_unexpected_error THEN
1183: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
1184: ,p_pkg_name => g_pkg_name
1185: ,p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR'
1186: ,x_msg_count => x_msg_count
1187: ,x_msg_data => x_msg_data
1188: ,p_api_type => g_api_type);
1189: WHEN OTHERS THEN
1186: ,x_msg_count => x_msg_count
1187: ,x_msg_data => x_msg_data
1188: ,p_api_type => g_api_type);
1189: WHEN OTHERS THEN
1190: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
1191: ,p_pkg_name => g_pkg_name
1192: ,p_exc_name => 'OTHERS'
1193: ,x_msg_count => x_msg_count
1194: ,x_msg_data => x_msg_data
1245: l_source_id number;
1246: l_source_type varchar2(30);
1247: l_api_name CONSTANT varchar2(30) := 'GET_ELIG_CRITERIA';
1248: l_api_version CONSTANT number := 1.0;
1249: l_return_status varchar2(1) := okl_api.g_ret_sts_success;
1250: l_ec_found boolean;
1251: l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.okl_ec_values_pvt.get_eligibility_criteria';
1252: l_debug_enabled varchar2(10);
1253: is_debug_procedure_on boolean;
1271:
1272: -- call START_ACTIVITY to create savepoint, check compatibility
1273: -- and initialize message list
1274:
1275: l_return_status := okl_api.start_activity(p_api_name => l_api_name
1276: ,p_pkg_name => g_pkg_name
1277: ,p_init_msg_list => p_init_msg_list
1278: ,l_api_version => l_api_version
1279: ,p_api_version => p_api_version
1281: ,x_return_status => x_return_status);
1282:
1283: -- check if activity started successfully
1284:
1285: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1286: RAISE okl_api.g_exception_unexpected_error;
1287: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1288: RAISE okl_api.g_exception_error;
1289: END IF;
1282:
1283: -- check if activity started successfully
1284:
1285: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1286: RAISE okl_api.g_exception_unexpected_error;
1287: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1288: RAISE okl_api.g_exception_error;
1289: END IF;
1290: l_source_id := p_source_id;
1283: -- check if activity started successfully
1284:
1285: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1286: RAISE okl_api.g_exception_unexpected_error;
1287: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1288: RAISE okl_api.g_exception_error;
1289: END IF;
1290: l_source_id := p_source_id;
1291: l_source_type := p_source_type;
1284:
1285: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1286: RAISE okl_api.g_exception_unexpected_error;
1287: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1288: RAISE okl_api.g_exception_error;
1289: END IF;
1290: l_source_id := p_source_id;
1291: l_source_type := p_source_type;
1292: OPEN get_ech_rec;
1326:
1327: END IF;
1328: x_return_status := l_return_status;
1329:
1330: okl_api.end_activity(x_msg_count => x_msg_count
1331: ,x_msg_data => x_msg_data);
1332:
1333: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
1334: okl_debug_pub.log_debug(fnd_log.level_procedure
1336: ,'end debug OKLRECVB.pls.pls call get_eligibility_criteria');
1337: END IF;
1338:
1339: EXCEPTION
1340: WHEN okl_api.g_exception_error THEN
1341: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
1342: ,p_pkg_name => g_pkg_name
1343: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
1344: ,x_msg_count => x_msg_count
1337: END IF;
1338:
1339: EXCEPTION
1340: WHEN okl_api.g_exception_error THEN
1341: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
1342: ,p_pkg_name => g_pkg_name
1343: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
1344: ,x_msg_count => x_msg_count
1345: ,x_msg_data => x_msg_data
1339: EXCEPTION
1340: WHEN okl_api.g_exception_error THEN
1341: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
1342: ,p_pkg_name => g_pkg_name
1343: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
1344: ,x_msg_count => x_msg_count
1345: ,x_msg_data => x_msg_data
1346: ,p_api_type => g_api_type);
1347: WHEN okl_api.g_exception_unexpected_error THEN
1343: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
1344: ,x_msg_count => x_msg_count
1345: ,x_msg_data => x_msg_data
1346: ,p_api_type => g_api_type);
1347: WHEN okl_api.g_exception_unexpected_error THEN
1348: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
1349: ,p_pkg_name => g_pkg_name
1350: ,p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR'
1351: ,x_msg_count => x_msg_count
1344: ,x_msg_count => x_msg_count
1345: ,x_msg_data => x_msg_data
1346: ,p_api_type => g_api_type);
1347: WHEN okl_api.g_exception_unexpected_error THEN
1348: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
1349: ,p_pkg_name => g_pkg_name
1350: ,p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR'
1351: ,x_msg_count => x_msg_count
1352: ,x_msg_data => x_msg_data
1346: ,p_api_type => g_api_type);
1347: WHEN okl_api.g_exception_unexpected_error THEN
1348: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
1349: ,p_pkg_name => g_pkg_name
1350: ,p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR'
1351: ,x_msg_count => x_msg_count
1352: ,x_msg_data => x_msg_data
1353: ,p_api_type => g_api_type);
1354: WHEN OTHERS THEN
1351: ,x_msg_count => x_msg_count
1352: ,x_msg_data => x_msg_data
1353: ,p_api_type => g_api_type);
1354: WHEN OTHERS THEN
1355: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
1356: ,p_pkg_name => g_pkg_name
1357: ,p_exc_name => 'OTHERS'
1358: ,x_msg_count => x_msg_count
1359: ,x_msg_data => x_msg_data
1394: l_ecl_tbl okl_ecl_tbl;
1395: lx_ecl_tbl okl_ecl_tbl;
1396: l_api_name CONSTANT varchar2(30) := 'END_DT_ELIG_CRIT';
1397: l_api_version CONSTANT number := 1.0;
1398: l_return_status varchar2(1) := okl_api.g_ret_sts_success;
1399: l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.okl_ec_values_pvt.end_date_eligibility_criteria';
1400: l_debug_enabled varchar2(10);
1401: is_debug_procedure_on boolean;
1402: is_debug_statement_on boolean;
1419:
1420: -- call START_ACTIVITY to create savepoint, check compatibility
1421: -- and initialize message list
1422:
1423: l_return_status := okl_api.start_activity(p_api_name => l_api_name
1424: ,p_pkg_name => g_pkg_name
1425: ,p_init_msg_list => p_init_msg_list
1426: ,l_api_version => l_api_version
1427: ,p_api_version => p_api_version
1429: ,x_return_status => x_return_status);
1430:
1431: -- check if activity started successfully
1432:
1433: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1434: RAISE okl_api.g_exception_unexpected_error;
1435: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1436: RAISE okl_api.g_exception_error;
1437: END IF;
1430:
1431: -- check if activity started successfully
1432:
1433: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1434: RAISE okl_api.g_exception_unexpected_error;
1435: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1436: RAISE okl_api.g_exception_error;
1437: END IF;
1438: l_source_id := p_source_id;
1431: -- check if activity started successfully
1432:
1433: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1434: RAISE okl_api.g_exception_unexpected_error;
1435: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1436: RAISE okl_api.g_exception_error;
1437: END IF;
1438: l_source_id := p_source_id;
1439: l_source_type := p_source_type;
1432:
1433: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1434: RAISE okl_api.g_exception_unexpected_error;
1435: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1436: RAISE okl_api.g_exception_error;
1437: END IF;
1438: l_source_id := p_source_id;
1439: l_source_type := p_source_type;
1440: i := 1;
1474: ,l_module
1475: ,'Procedure okl_ecl_pvt.update_row returned with status ' ||
1476: l_return_status);
1477: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
1478: IF (l_return_status = okl_api.g_ret_sts_error) THEN
1479: RAISE okl_api.g_exception_error;
1480: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1481: RAISE okl_api.g_exception_unexpected_error;
1482: END IF;
1475: ,'Procedure okl_ecl_pvt.update_row returned with status ' ||
1476: l_return_status);
1477: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
1478: IF (l_return_status = okl_api.g_ret_sts_error) THEN
1479: RAISE okl_api.g_exception_error;
1480: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1481: RAISE okl_api.g_exception_unexpected_error;
1482: END IF;
1483: END IF;
1476: l_return_status);
1477: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
1478: IF (l_return_status = okl_api.g_ret_sts_error) THEN
1479: RAISE okl_api.g_exception_error;
1480: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1481: RAISE okl_api.g_exception_unexpected_error;
1482: END IF;
1483: END IF;
1484: x_return_status := l_return_status;
1477: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
1478: IF (l_return_status = okl_api.g_ret_sts_error) THEN
1479: RAISE okl_api.g_exception_error;
1480: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1481: RAISE okl_api.g_exception_unexpected_error;
1482: END IF;
1483: END IF;
1484: x_return_status := l_return_status;
1485:
1482: END IF;
1483: END IF;
1484: x_return_status := l_return_status;
1485:
1486: okl_api.end_activity(x_msg_count => x_msg_count
1487: ,x_msg_data => x_msg_data);
1488:
1489: IF (l_debug_enabled = 'Y' AND is_debug_procedure_on) THEN
1490: okl_debug_pub.log_debug(fnd_log.level_procedure
1492: ,'end debug OKLRECVB.pls.pls call end_date_eligibility_criteria');
1493: END IF;
1494:
1495: EXCEPTION
1496: WHEN okl_api.g_exception_error THEN
1497: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
1498: ,p_pkg_name => g_pkg_name
1499: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
1500: ,x_msg_count => x_msg_count
1493: END IF;
1494:
1495: EXCEPTION
1496: WHEN okl_api.g_exception_error THEN
1497: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
1498: ,p_pkg_name => g_pkg_name
1499: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
1500: ,x_msg_count => x_msg_count
1501: ,x_msg_data => x_msg_data
1495: EXCEPTION
1496: WHEN okl_api.g_exception_error THEN
1497: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
1498: ,p_pkg_name => g_pkg_name
1499: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
1500: ,x_msg_count => x_msg_count
1501: ,x_msg_data => x_msg_data
1502: ,p_api_type => g_api_type);
1503: WHEN okl_api.g_exception_unexpected_error THEN
1499: ,p_exc_name => 'OKL_API.G_RET_STS_ERROR'
1500: ,x_msg_count => x_msg_count
1501: ,x_msg_data => x_msg_data
1502: ,p_api_type => g_api_type);
1503: WHEN okl_api.g_exception_unexpected_error THEN
1504: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
1505: ,p_pkg_name => g_pkg_name
1506: ,p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR'
1507: ,x_msg_count => x_msg_count
1500: ,x_msg_count => x_msg_count
1501: ,x_msg_data => x_msg_data
1502: ,p_api_type => g_api_type);
1503: WHEN okl_api.g_exception_unexpected_error THEN
1504: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
1505: ,p_pkg_name => g_pkg_name
1506: ,p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR'
1507: ,x_msg_count => x_msg_count
1508: ,x_msg_data => x_msg_data
1502: ,p_api_type => g_api_type);
1503: WHEN okl_api.g_exception_unexpected_error THEN
1504: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
1505: ,p_pkg_name => g_pkg_name
1506: ,p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR'
1507: ,x_msg_count => x_msg_count
1508: ,x_msg_data => x_msg_data
1509: ,p_api_type => g_api_type);
1510: WHEN OTHERS THEN
1507: ,x_msg_count => x_msg_count
1508: ,x_msg_data => x_msg_data
1509: ,p_api_type => g_api_type);
1510: WHEN OTHERS THEN
1511: x_return_status := okl_api.handle_exceptions(p_api_name => l_api_name
1512: ,p_pkg_name => g_pkg_name
1513: ,p_exc_name => 'OTHERS'
1514: ,x_msg_count => x_msg_count
1515: ,x_msg_data => x_msg_data