25: BEGIN
26:
27: -- initialize the return status
28:
29: x_return_status := okl_api.g_ret_sts_success;
30:
31: -- id is a required field
32:
33: IF (p_eto_rec.end_of_term_obj_id IS NULL OR p_eto_rec.end_of_term_obj_id = okl_api.g_miss_num) THEN
29: x_return_status := okl_api.g_ret_sts_success;
30:
31: -- id is a required field
32:
33: IF (p_eto_rec.end_of_term_obj_id IS NULL OR p_eto_rec.end_of_term_obj_id = okl_api.g_miss_num) THEN
34: okl_api.set_message(p_app_name => g_app_name
35: ,p_msg_name => g_required_value
36: ,p_token1 => g_col_name_token
37: ,p_token1_value => 'END_OF_TERM_OBJ_ID');
30:
31: -- id is a required field
32:
33: IF (p_eto_rec.end_of_term_obj_id IS NULL OR p_eto_rec.end_of_term_obj_id = okl_api.g_miss_num) THEN
34: okl_api.set_message(p_app_name => g_app_name
35: ,p_msg_name => g_required_value
36: ,p_token1 => g_col_name_token
37: ,p_token1_value => 'END_OF_TERM_OBJ_ID');
38:
37: ,p_token1_value => 'END_OF_TERM_OBJ_ID');
38:
39: -- notify caller of an error
40:
41: x_return_status := okl_api.g_ret_sts_error;
42:
43: -- halt further validation of this column
44:
45: RAISE g_exception_halt_validation;
54: WHEN OTHERS THEN
55:
56: -- store SQL error message on message stack for caller
57:
58: okl_api.set_message(p_app_name => g_app_name
59: ,p_msg_name => g_unexpected_error
60: ,p_token1 => g_sqlcode_token
61: ,p_token1_value => sqlcode
62: ,p_token2 => g_sqlerrm_token
63: ,p_token2_value => sqlerrm);
64:
65: -- notify caller of an UNEXPECTED error
66:
67: x_return_status := okl_api.g_ret_sts_unexp_error;
68: END validate_end_of_term_obj_id;
69:
70: -- validate the organization id
71:
81: BEGIN
82:
83: -- Initialize the return status to success
84:
85: x_return_status := okl_api.g_ret_sts_success;
86:
87: IF (p_eto_rec.organization_id IS NOT NULL AND p_eto_rec.organization_id <> okl_api.g_miss_num) THEN
88: OPEN org_exists_csr;
89: FETCH org_exists_csr INTO l_dummy_var ;
83: -- Initialize the return status to success
84:
85: x_return_status := okl_api.g_ret_sts_success;
86:
87: IF (p_eto_rec.organization_id IS NOT NULL AND p_eto_rec.organization_id <> okl_api.g_miss_num) THEN
88: OPEN org_exists_csr;
89: FETCH org_exists_csr INTO l_dummy_var ;
90: CLOSE org_exists_csr;
91:
91:
92: -- if l_dummy_var is still set to default, data was not found
93:
94: IF (l_dummy_var = '?') THEN
95: okl_api.set_message(p_app_name => g_app_name
96: ,p_msg_name => g_invalid_value
97: ,p_token1 => g_col_name_token
98: ,p_token1_value => 'organization_id');
99:
148: BEGIN
149:
150: -- Initialize the return status to success
151:
152: x_return_status := okl_api.g_ret_sts_success;
153:
154: IF (p_eto_rec.inventory_item_id IS NOT NULL AND p_eto_rec.inventory_item_id <> okl_api.g_miss_num) THEN
155: OPEN item_exists_csr;
156: FETCH item_exists_csr INTO l_dummy_var ;
150: -- Initialize the return status to success
151:
152: x_return_status := okl_api.g_ret_sts_success;
153:
154: IF (p_eto_rec.inventory_item_id IS NOT NULL AND p_eto_rec.inventory_item_id <> okl_api.g_miss_num) THEN
155: OPEN item_exists_csr;
156: FETCH item_exists_csr INTO l_dummy_var ;
157: CLOSE item_exists_csr;
158:
158:
159: -- if l_dummy_var is still set to default, data was not found
160:
161: IF (l_dummy_var = '?') THEN
162: okl_api.set_message(p_app_name => g_app_name
163: ,p_msg_name => g_invalid_value
164: ,p_token1 => g_col_name_token
165: ,p_token1_value => 'inventory_item_id');
166:
215: BEGIN
216:
217: -- Initialize the return status to success
218:
219: x_return_status := okl_api.g_ret_sts_success;
220:
221: IF (p_eto_rec.resi_category_set_id IS NOT NULL AND p_eto_rec.resi_category_set_id <> okl_api.g_miss_num) THEN
222: OPEN rcs_exists_csr;
223: FETCH rcs_exists_csr INTO l_dummy_var ;
217: -- Initialize the return status to success
218:
219: x_return_status := okl_api.g_ret_sts_success;
220:
221: IF (p_eto_rec.resi_category_set_id IS NOT NULL AND p_eto_rec.resi_category_set_id <> okl_api.g_miss_num) THEN
222: OPEN rcs_exists_csr;
223: FETCH rcs_exists_csr INTO l_dummy_var ;
224: CLOSE rcs_exists_csr;
225:
225:
226: -- if l_dummy_var is still set to default, data was not found
227:
228: IF (l_dummy_var = '?') THEN
229: okl_api.set_message(p_app_name => g_app_name
230: ,p_msg_name => g_invalid_value
231: ,p_token1 => g_col_name_token
232: ,p_token1_value => 'resi_category_set_id');
233:
366: l_eto_rec okl_eto_rec := p_eto_rec;
367:
368: BEGIN
369:
370: IF (l_eto_rec.end_of_term_obj_id = okl_api.g_miss_num) THEN
371: l_eto_rec.end_of_term_obj_id := NULL;
372: END IF;
373:
374: IF (l_eto_rec.object_version_number = okl_api.g_miss_num) THEN
370: IF (l_eto_rec.end_of_term_obj_id = okl_api.g_miss_num) THEN
371: l_eto_rec.end_of_term_obj_id := NULL;
372: END IF;
373:
374: IF (l_eto_rec.object_version_number = okl_api.g_miss_num) THEN
375: l_eto_rec.object_version_number := NULL;
376: END IF;
377:
378: IF (l_eto_rec.organization_id = okl_api.g_miss_num) THEN
374: IF (l_eto_rec.object_version_number = okl_api.g_miss_num) THEN
375: l_eto_rec.object_version_number := NULL;
376: END IF;
377:
378: IF (l_eto_rec.organization_id = okl_api.g_miss_num) THEN
379: l_eto_rec.organization_id := NULL;
380: END IF;
381:
382: IF (l_eto_rec.inventory_item_id = okl_api.g_miss_num) THEN
378: IF (l_eto_rec.organization_id = okl_api.g_miss_num) THEN
379: l_eto_rec.organization_id := NULL;
380: END IF;
381:
382: IF (l_eto_rec.inventory_item_id = okl_api.g_miss_num) THEN
383: l_eto_rec.inventory_item_id := NULL;
384: END IF;
385:
386: IF (l_eto_rec.category_set_id = okl_api.g_miss_num) THEN
382: IF (l_eto_rec.inventory_item_id = okl_api.g_miss_num) THEN
383: l_eto_rec.inventory_item_id := NULL;
384: END IF;
385:
386: IF (l_eto_rec.category_set_id = okl_api.g_miss_num) THEN
387: l_eto_rec.category_set_id := NULL;
388: END IF;
389:
390: IF (l_eto_rec.category_id = okl_api.g_miss_num) THEN
386: IF (l_eto_rec.category_set_id = okl_api.g_miss_num) THEN
387: l_eto_rec.category_set_id := NULL;
388: END IF;
389:
390: IF (l_eto_rec.category_id = okl_api.g_miss_num) THEN
391: l_eto_rec.category_id := NULL;
392: END IF;
393:
394: IF (l_eto_rec.resi_category_set_id = okl_api.g_miss_num) THEN
390: IF (l_eto_rec.category_id = okl_api.g_miss_num) THEN
391: l_eto_rec.category_id := NULL;
392: END IF;
393:
394: IF (l_eto_rec.resi_category_set_id = okl_api.g_miss_num) THEN
395: l_eto_rec.resi_category_set_id := NULL;
396: END IF;
397:
398: IF (l_eto_rec.end_of_term_ver_id = okl_api.g_miss_num) THEN
394: IF (l_eto_rec.resi_category_set_id = okl_api.g_miss_num) THEN
395: l_eto_rec.resi_category_set_id := NULL;
396: END IF;
397:
398: IF (l_eto_rec.end_of_term_ver_id = okl_api.g_miss_num) THEN
399: l_eto_rec.end_of_term_ver_id := NULL;
400: END IF;
401:
402: IF (l_eto_rec.attribute_category = okl_api.g_miss_char) THEN
398: IF (l_eto_rec.end_of_term_ver_id = okl_api.g_miss_num) THEN
399: l_eto_rec.end_of_term_ver_id := NULL;
400: END IF;
401:
402: IF (l_eto_rec.attribute_category = okl_api.g_miss_char) THEN
403: l_eto_rec.attribute_category := NULL;
404: END IF;
405:
406: IF (l_eto_rec.attribute1 = okl_api.g_miss_char) THEN
402: IF (l_eto_rec.attribute_category = okl_api.g_miss_char) THEN
403: l_eto_rec.attribute_category := NULL;
404: END IF;
405:
406: IF (l_eto_rec.attribute1 = okl_api.g_miss_char) THEN
407: l_eto_rec.attribute1 := NULL;
408: END IF;
409:
410: IF (l_eto_rec.attribute2 = okl_api.g_miss_char) THEN
406: IF (l_eto_rec.attribute1 = okl_api.g_miss_char) THEN
407: l_eto_rec.attribute1 := NULL;
408: END IF;
409:
410: IF (l_eto_rec.attribute2 = okl_api.g_miss_char) THEN
411: l_eto_rec.attribute2 := NULL;
412: END IF;
413:
414: IF (l_eto_rec.attribute3 = okl_api.g_miss_char) THEN
410: IF (l_eto_rec.attribute2 = okl_api.g_miss_char) THEN
411: l_eto_rec.attribute2 := NULL;
412: END IF;
413:
414: IF (l_eto_rec.attribute3 = okl_api.g_miss_char) THEN
415: l_eto_rec.attribute3 := NULL;
416: END IF;
417:
418: IF (l_eto_rec.attribute4 = okl_api.g_miss_char) THEN
414: IF (l_eto_rec.attribute3 = okl_api.g_miss_char) THEN
415: l_eto_rec.attribute3 := NULL;
416: END IF;
417:
418: IF (l_eto_rec.attribute4 = okl_api.g_miss_char) THEN
419: l_eto_rec.attribute4 := NULL;
420: END IF;
421:
422: IF (l_eto_rec.attribute5 = okl_api.g_miss_char) THEN
418: IF (l_eto_rec.attribute4 = okl_api.g_miss_char) THEN
419: l_eto_rec.attribute4 := NULL;
420: END IF;
421:
422: IF (l_eto_rec.attribute5 = okl_api.g_miss_char) THEN
423: l_eto_rec.attribute5 := NULL;
424: END IF;
425:
426: IF (l_eto_rec.attribute6 = okl_api.g_miss_char) THEN
422: IF (l_eto_rec.attribute5 = okl_api.g_miss_char) THEN
423: l_eto_rec.attribute5 := NULL;
424: END IF;
425:
426: IF (l_eto_rec.attribute6 = okl_api.g_miss_char) THEN
427: l_eto_rec.attribute6 := NULL;
428: END IF;
429:
430: IF (l_eto_rec.attribute7 = okl_api.g_miss_char) THEN
426: IF (l_eto_rec.attribute6 = okl_api.g_miss_char) THEN
427: l_eto_rec.attribute6 := NULL;
428: END IF;
429:
430: IF (l_eto_rec.attribute7 = okl_api.g_miss_char) THEN
431: l_eto_rec.attribute7 := NULL;
432: END IF;
433:
434: IF (l_eto_rec.attribute8 = okl_api.g_miss_char) THEN
430: IF (l_eto_rec.attribute7 = okl_api.g_miss_char) THEN
431: l_eto_rec.attribute7 := NULL;
432: END IF;
433:
434: IF (l_eto_rec.attribute8 = okl_api.g_miss_char) THEN
435: l_eto_rec.attribute8 := NULL;
436: END IF;
437:
438: IF (l_eto_rec.attribute9 = okl_api.g_miss_char) THEN
434: IF (l_eto_rec.attribute8 = okl_api.g_miss_char) THEN
435: l_eto_rec.attribute8 := NULL;
436: END IF;
437:
438: IF (l_eto_rec.attribute9 = okl_api.g_miss_char) THEN
439: l_eto_rec.attribute9 := NULL;
440: END IF;
441:
442: IF (l_eto_rec.attribute10 = okl_api.g_miss_char) THEN
438: IF (l_eto_rec.attribute9 = okl_api.g_miss_char) THEN
439: l_eto_rec.attribute9 := NULL;
440: END IF;
441:
442: IF (l_eto_rec.attribute10 = okl_api.g_miss_char) THEN
443: l_eto_rec.attribute10 := NULL;
444: END IF;
445:
446: IF (l_eto_rec.attribute11 = okl_api.g_miss_char) THEN
442: IF (l_eto_rec.attribute10 = okl_api.g_miss_char) THEN
443: l_eto_rec.attribute10 := NULL;
444: END IF;
445:
446: IF (l_eto_rec.attribute11 = okl_api.g_miss_char) THEN
447: l_eto_rec.attribute11 := NULL;
448: END IF;
449:
450: IF (l_eto_rec.attribute12 = okl_api.g_miss_char) THEN
446: IF (l_eto_rec.attribute11 = okl_api.g_miss_char) THEN
447: l_eto_rec.attribute11 := NULL;
448: END IF;
449:
450: IF (l_eto_rec.attribute12 = okl_api.g_miss_char) THEN
451: l_eto_rec.attribute12 := NULL;
452: END IF;
453:
454: IF (l_eto_rec.attribute13 = okl_api.g_miss_char) THEN
450: IF (l_eto_rec.attribute12 = okl_api.g_miss_char) THEN
451: l_eto_rec.attribute12 := NULL;
452: END IF;
453:
454: IF (l_eto_rec.attribute13 = okl_api.g_miss_char) THEN
455: l_eto_rec.attribute13 := NULL;
456: END IF;
457:
458: IF (l_eto_rec.attribute14 = okl_api.g_miss_char) THEN
454: IF (l_eto_rec.attribute13 = okl_api.g_miss_char) THEN
455: l_eto_rec.attribute13 := NULL;
456: END IF;
457:
458: IF (l_eto_rec.attribute14 = okl_api.g_miss_char) THEN
459: l_eto_rec.attribute14 := NULL;
460: END IF;
461:
462: IF (l_eto_rec.attribute15 = okl_api.g_miss_char) THEN
458: IF (l_eto_rec.attribute14 = okl_api.g_miss_char) THEN
459: l_eto_rec.attribute14 := NULL;
460: END IF;
461:
462: IF (l_eto_rec.attribute15 = okl_api.g_miss_char) THEN
463: l_eto_rec.attribute15 := NULL;
464: END IF;
465:
466: IF (l_eto_rec.created_by = okl_api.g_miss_num) THEN
462: IF (l_eto_rec.attribute15 = okl_api.g_miss_char) THEN
463: l_eto_rec.attribute15 := NULL;
464: END IF;
465:
466: IF (l_eto_rec.created_by = okl_api.g_miss_num) THEN
467: l_eto_rec.created_by := NULL;
468: END IF;
469:
470: IF (l_eto_rec.creation_date = okl_api.g_miss_date) THEN
466: IF (l_eto_rec.created_by = okl_api.g_miss_num) THEN
467: l_eto_rec.created_by := NULL;
468: END IF;
469:
470: IF (l_eto_rec.creation_date = okl_api.g_miss_date) THEN
471: l_eto_rec.creation_date := NULL;
472: END IF;
473:
474: IF (l_eto_rec.last_updated_by = okl_api.g_miss_num) THEN
470: IF (l_eto_rec.creation_date = okl_api.g_miss_date) THEN
471: l_eto_rec.creation_date := NULL;
472: END IF;
473:
474: IF (l_eto_rec.last_updated_by = okl_api.g_miss_num) THEN
475: l_eto_rec.last_updated_by := NULL;
476: END IF;
477:
478: IF (l_eto_rec.last_update_date = okl_api.g_miss_date) THEN
474: IF (l_eto_rec.last_updated_by = okl_api.g_miss_num) THEN
475: l_eto_rec.last_updated_by := NULL;
476: END IF;
477:
478: IF (l_eto_rec.last_update_date = okl_api.g_miss_date) THEN
479: l_eto_rec.last_update_date := NULL;
480: END IF;
481:
482: IF (l_eto_rec.last_update_login = okl_api.g_miss_num) THEN
478: IF (l_eto_rec.last_update_date = okl_api.g_miss_date) THEN
479: l_eto_rec.last_update_date := NULL;
480: END IF;
481:
482: IF (l_eto_rec.last_update_login = okl_api.g_miss_num) THEN
483: l_eto_rec.last_update_login := NULL;
484: END IF;
485: RETURN(l_eto_rec);
486: END null_out_defaults;
492: END get_seq_id;
493:
494: FUNCTION validate_attributes(p_eto_rec IN okl_eto_rec) RETURN VARCHAR2 IS
495: l_return_status VARCHAR2(1) := okc_api.g_ret_sts_success;
496: x_return_status VARCHAR2(1) := okl_api.g_ret_sts_success;
497:
498: BEGIN
499:
500: -- validate the id
503: ,p_eto_rec => p_eto_rec);
504:
505: -- store the highest degree of error
506:
507: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
508: IF (x_return_status <> okl_api.g_ret_sts_unexp_error) THEN
509: x_return_status := l_return_status;
510: END IF;
511: END IF;
504:
505: -- store the highest degree of error
506:
507: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
508: IF (x_return_status <> okl_api.g_ret_sts_unexp_error) THEN
509: x_return_status := l_return_status;
510: END IF;
511: END IF;
512:
511: END IF;
512:
513: -- store the highest degree of error
514:
515: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
516: IF (x_return_status <> okl_api.g_ret_sts_unexp_error) THEN
517: x_return_status := l_return_status;
518: END IF;
519: END IF;
512:
513: -- store the highest degree of error
514:
515: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
516: IF (x_return_status <> okl_api.g_ret_sts_unexp_error) THEN
517: x_return_status := l_return_status;
518: END IF;
519: END IF;
520:
524: ,p_eto_rec => p_eto_rec);
525:
526: -- store the highest degree of error
527:
528: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
529: IF (x_return_status <> okl_api.g_ret_sts_unexp_error) THEN
530: x_return_status := l_return_status;
531: END IF;
532: END IF;
525:
526: -- store the highest degree of error
527:
528: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
529: IF (x_return_status <> okl_api.g_ret_sts_unexp_error) THEN
530: x_return_status := l_return_status;
531: END IF;
532: END IF;
533:
537: ,p_eto_rec => p_eto_rec);
538:
539: -- store the highest degree of error
540:
541: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
542: IF (x_return_status <> okl_api.g_ret_sts_unexp_error) THEN
543: x_return_status := l_return_status;
544: END IF;
545: END IF;
538:
539: -- store the highest degree of error
540:
541: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
542: IF (x_return_status <> okl_api.g_ret_sts_unexp_error) THEN
543: x_return_status := l_return_status;
544: END IF;
545: END IF;
546:
550: ,p_eto_rec => p_eto_rec);
551:
552: -- store the highest degree of error
553:
554: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
555: IF (x_return_status <> okl_api.g_ret_sts_unexp_error) THEN
556: x_return_status := l_return_status;
557: END IF;
558: END IF;
551:
552: -- store the highest degree of error
553:
554: IF (l_return_status <> okl_api.g_ret_sts_success) THEN
555: IF (x_return_status <> okl_api.g_ret_sts_unexp_error) THEN
556: x_return_status := l_return_status;
557: END IF;
558: END IF;
559: RETURN(x_return_status);
560: END validate_attributes;
561:
562: FUNCTION validate_record(p_eto_rec IN okl_eto_rec) RETURN VARCHAR2 IS
563: l_return_status VARCHAR2(1) := okc_api.g_ret_sts_success;
564: x_return_status VARCHAR2(1) := okl_api.g_ret_sts_success;
565:
566: BEGIN
567: RETURN(x_return_status);
568: END validate_record;
571: -- lock_row (REC)
572: -----------------
573:
574: PROCEDURE lock_row(p_api_version IN NUMBER
575: ,p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false
576: ,x_return_status OUT NOCOPY VARCHAR2
577: ,x_msg_count OUT NOCOPY NUMBER
578: ,x_msg_data OUT NOCOPY VARCHAR2
579: ,p_def_eto_rec IN okl_eto_rec) IS
592: CURSOR lchk_csr(p_def_eto_rec IN okl_eto_rec) IS
593: SELECT object_version_number
594: FROM okl_fe_eo_term_objects
595: WHERE end_of_term_obj_id = p_def_eto_rec.end_of_term_obj_id;
596: l_return_status VARCHAR2(1) := okl_api.g_ret_sts_success;
597: l_object_version_number okl_fe_item_residual_all.object_version_number%TYPE;
598: lc_object_version_number okl_fe_item_residual_all.object_version_number%TYPE;
599: l_row_notfound BOOLEAN := false;
600: lc_row_notfound BOOLEAN := false;
611:
612: IF (lock_csr%ISOPEN) THEN
613: CLOSE lock_csr;
614: END IF;
615: okl_api.set_message(g_fnd_app
616: ,g_form_unable_to_reserve_rec);
617: RAISE app_exceptions.record_lock_exception;
618: END;
619:
624: CLOSE lchk_csr;
625: END IF;
626:
627: IF (lc_row_notfound) THEN
628: okl_api.set_message(g_fnd_app
629: ,g_form_record_deleted);
630: RAISE okl_api.g_exception_error;
631: ELSIF lc_object_version_number > p_def_eto_rec.object_version_number THEN
632: okl_api.set_message(g_fnd_app
626:
627: IF (lc_row_notfound) THEN
628: okl_api.set_message(g_fnd_app
629: ,g_form_record_deleted);
630: RAISE okl_api.g_exception_error;
631: ELSIF lc_object_version_number > p_def_eto_rec.object_version_number THEN
632: okl_api.set_message(g_fnd_app
633: ,g_form_record_changed);
634: RAISE okl_api.g_exception_error;
628: okl_api.set_message(g_fnd_app
629: ,g_form_record_deleted);
630: RAISE okl_api.g_exception_error;
631: ELSIF lc_object_version_number > p_def_eto_rec.object_version_number THEN
632: okl_api.set_message(g_fnd_app
633: ,g_form_record_changed);
634: RAISE okl_api.g_exception_error;
635: ELSIF lc_object_version_number <> p_def_eto_rec.object_version_number THEN
636: okl_api.set_message(g_fnd_app
630: RAISE okl_api.g_exception_error;
631: ELSIF lc_object_version_number > p_def_eto_rec.object_version_number THEN
632: okl_api.set_message(g_fnd_app
633: ,g_form_record_changed);
634: RAISE okl_api.g_exception_error;
635: ELSIF lc_object_version_number <> p_def_eto_rec.object_version_number THEN
636: okl_api.set_message(g_fnd_app
637: ,g_form_record_changed);
638: RAISE okl_api.g_exception_error;
632: okl_api.set_message(g_fnd_app
633: ,g_form_record_changed);
634: RAISE okl_api.g_exception_error;
635: ELSIF lc_object_version_number <> p_def_eto_rec.object_version_number THEN
636: okl_api.set_message(g_fnd_app
637: ,g_form_record_changed);
638: RAISE okl_api.g_exception_error;
639: ELSIF lc_object_version_number = - 1 THEN
640: okl_api.set_message(g_app_name
634: RAISE okl_api.g_exception_error;
635: ELSIF lc_object_version_number <> p_def_eto_rec.object_version_number THEN
636: okl_api.set_message(g_fnd_app
637: ,g_form_record_changed);
638: RAISE okl_api.g_exception_error;
639: ELSIF lc_object_version_number = - 1 THEN
640: okl_api.set_message(g_app_name
641: ,g_record_logically_deleted);
642: RAISE okl_api.g_exception_error;
636: okl_api.set_message(g_fnd_app
637: ,g_form_record_changed);
638: RAISE okl_api.g_exception_error;
639: ELSIF lc_object_version_number = - 1 THEN
640: okl_api.set_message(g_app_name
641: ,g_record_logically_deleted);
642: RAISE okl_api.g_exception_error;
643: END IF;
644: x_return_status := l_return_status;
638: RAISE okl_api.g_exception_error;
639: ELSIF lc_object_version_number = - 1 THEN
640: okl_api.set_message(g_app_name
641: ,g_record_logically_deleted);
642: RAISE okl_api.g_exception_error;
643: END IF;
644: x_return_status := l_return_status;
645: EXCEPTION
646: WHEN okl_api.g_exception_error THEN
642: RAISE okl_api.g_exception_error;
643: END IF;
644: x_return_status := l_return_status;
645: EXCEPTION
646: WHEN okl_api.g_exception_error THEN
647: x_return_status := g_ret_sts_error;
648: WHEN okl_api.g_exception_unexpected_error THEN
649: x_return_status := g_ret_sts_unexp_error;
650: WHEN OTHERS THEN
644: x_return_status := l_return_status;
645: EXCEPTION
646: WHEN okl_api.g_exception_error THEN
647: x_return_status := g_ret_sts_error;
648: WHEN okl_api.g_exception_unexpected_error THEN
649: x_return_status := g_ret_sts_unexp_error;
650: WHEN OTHERS THEN
651: okl_api.set_message(p_app_name => g_app_name
652: ,p_msg_name => g_db_error
647: x_return_status := g_ret_sts_error;
648: WHEN okl_api.g_exception_unexpected_error THEN
649: x_return_status := g_ret_sts_unexp_error;
650: WHEN OTHERS THEN
651: okl_api.set_message(p_app_name => g_app_name
652: ,p_msg_name => g_db_error
653: ,p_token1 => g_prog_name_token
654: ,p_token1_value => l_api_name
655: ,p_token2 => g_sqlcode_token
663: -- lock_row (TBL)
664: -----------------
665:
666: PROCEDURE lock_row(p_api_version IN NUMBER
667: ,p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false
668: ,x_return_status OUT NOCOPY VARCHAR2
669: ,x_msg_count OUT NOCOPY NUMBER
670: ,x_msg_data OUT NOCOPY VARCHAR2
671: ,okl_eto_tbl IN okl_eto_tbl) IS
686: ,x_msg_count => x_msg_count
687: ,x_msg_data => x_msg_data
688: ,p_def_eto_rec => okl_eto_tbl(i));
689: IF l_return_status = g_ret_sts_unexp_error THEN
690: RAISE okl_api.g_exception_unexpected_error;
691: ELSIF l_return_status = g_ret_sts_error THEN
692: RAISE okl_api.g_exception_error;
693: END IF;
694: EXIT WHEN(i = okl_eto_tbl.LAST);
688: ,p_def_eto_rec => okl_eto_tbl(i));
689: IF l_return_status = g_ret_sts_unexp_error THEN
690: RAISE okl_api.g_exception_unexpected_error;
691: ELSIF l_return_status = g_ret_sts_error THEN
692: RAISE okl_api.g_exception_error;
693: END IF;
694: EXIT WHEN(i = okl_eto_tbl.LAST);
695: i := okl_eto_tbl.next(i);
696: END IF;
698:
699: END IF;
700: x_return_status := l_return_status;
701: EXCEPTION
702: WHEN okl_api.g_exception_error THEN
703: x_return_status := g_ret_sts_error;
704: WHEN okl_api.g_exception_unexpected_error THEN
705: x_return_status := g_ret_sts_unexp_error;
706: WHEN OTHERS THEN
700: x_return_status := l_return_status;
701: EXCEPTION
702: WHEN okl_api.g_exception_error THEN
703: x_return_status := g_ret_sts_error;
704: WHEN okl_api.g_exception_unexpected_error THEN
705: x_return_status := g_ret_sts_unexp_error;
706: WHEN OTHERS THEN
707: okl_api.set_message(p_app_name => g_app_name
708: ,p_msg_name => g_db_error
703: x_return_status := g_ret_sts_error;
704: WHEN okl_api.g_exception_unexpected_error THEN
705: x_return_status := g_ret_sts_unexp_error;
706: WHEN OTHERS THEN
707: okl_api.set_message(p_app_name => g_app_name
708: ,p_msg_name => g_db_error
709: ,p_token1 => g_prog_name_token
710: ,p_token1_value => l_api_name
711: ,p_token2 => g_sqlcode_token
727: ,p_eto_rec IN okl_eto_rec
728: ,x_eto_rec OUT NOCOPY okl_eto_rec) IS
729: l_api_version CONSTANT NUMBER := 1;
730: l_api_name CONSTANT VARCHAR2(30) := 'insert_row';
731: l_return_status VARCHAR2(1) := okl_api.g_ret_sts_success;
732: l_eto_rec okl_eto_rec;
733: l_def_eto_rec okl_eto_rec;
734:
735: FUNCTION fill_who_columns(p_eto_rec IN okl_eto_rec) RETURN okl_eto_rec IS
762: ,p_api_version
763: ,'_PVT'
764: ,x_return_status);
765:
766: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
767: RAISE okc_api.g_exception_unexpected_error;
768: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
769: RAISE okc_api.g_exception_error;
770: END IF;
764: ,x_return_status);
765:
766: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
767: RAISE okc_api.g_exception_unexpected_error;
768: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
769: RAISE okc_api.g_exception_error;
770: END IF;
771: l_eto_rec := null_out_defaults(p_eto_rec);
772:
778:
779: l_return_status := set_attributes(l_eto_rec
780: ,l_def_eto_rec);
781:
782: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
783: RAISE okc_api.g_exception_unexpected_error;
784: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
785: RAISE okc_api.g_exception_error;
786: END IF;
780: ,l_def_eto_rec);
781:
782: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
783: RAISE okc_api.g_exception_unexpected_error;
784: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
785: RAISE okc_api.g_exception_error;
786: END IF;
787: l_def_eto_rec := fill_who_columns(l_def_eto_rec);
788: l_return_status := validate_attributes(l_def_eto_rec);
786: END IF;
787: l_def_eto_rec := fill_who_columns(l_def_eto_rec);
788: l_return_status := validate_attributes(l_def_eto_rec);
789:
790: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
791: RAISE okc_api.g_exception_unexpected_error;
792: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
793: RAISE okc_api.g_exception_error;
794: END IF;
788: l_return_status := validate_attributes(l_def_eto_rec);
789:
790: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
791: RAISE okc_api.g_exception_unexpected_error;
792: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
793: RAISE okc_api.g_exception_error;
794: END IF;
795: l_return_status := validate_record(l_def_eto_rec);
796:
793: RAISE okc_api.g_exception_error;
794: END IF;
795: l_return_status := validate_record(l_def_eto_rec);
796:
797: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
798: RAISE okc_api.g_exception_unexpected_error;
799: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
800: RAISE okc_api.g_exception_error;
801: END IF;
795: l_return_status := validate_record(l_def_eto_rec);
796:
797: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
798: RAISE okc_api.g_exception_unexpected_error;
799: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
800: RAISE okc_api.g_exception_error;
801: END IF;
802:
803: INSERT INTO okl_fe_eo_term_objects
859: ,l_def_eto_rec.last_updated_by
860: ,l_def_eto_rec.last_update_date
861: ,l_def_eto_rec.last_update_login);
862:
863: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
864: RAISE okc_api.g_exception_unexpected_error;
865: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
866: RAISE okc_api.g_exception_error;
867: END IF;
861: ,l_def_eto_rec.last_update_login);
862:
863: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
864: RAISE okc_api.g_exception_unexpected_error;
865: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
866: RAISE okc_api.g_exception_error;
867: END IF;
868:
869: --Set OUT Values
877: -- No action necessary. Validation can continue to next attribute/column
878:
879: NULL;
880: WHEN okc_api.g_exception_error THEN
881: x_return_status := okl_api.handle_exceptions(l_api_name
882: ,g_pkg_name
883: ,'OKL_API.G_RET_STS_ERROR'
884: ,x_msg_count
885: ,x_msg_data
879: NULL;
880: WHEN okc_api.g_exception_error THEN
881: x_return_status := okl_api.handle_exceptions(l_api_name
882: ,g_pkg_name
883: ,'OKL_API.G_RET_STS_ERROR'
884: ,x_msg_count
885: ,x_msg_data
886: ,'_PVT');
887: WHEN okc_api.g_exception_unexpected_error THEN
884: ,x_msg_count
885: ,x_msg_data
886: ,'_PVT');
887: WHEN okc_api.g_exception_unexpected_error THEN
888: x_return_status := okl_api.handle_exceptions(l_api_name
889: ,g_pkg_name
890: ,'OKL_API.G_RET_STS_UNEXP_ERROR'
891: ,x_msg_count
892: ,x_msg_data
886: ,'_PVT');
887: WHEN okc_api.g_exception_unexpected_error THEN
888: x_return_status := okl_api.handle_exceptions(l_api_name
889: ,g_pkg_name
890: ,'OKL_API.G_RET_STS_UNEXP_ERROR'
891: ,x_msg_count
892: ,x_msg_data
893: ,'_PVT');
894: WHEN OTHERS THEN
891: ,x_msg_count
892: ,x_msg_data
893: ,'_PVT');
894: WHEN OTHERS THEN
895: x_return_status := okl_api.handle_exceptions(l_api_name
896: ,g_pkg_name
897: ,'OTHERS'
898: ,x_msg_count
899: ,x_msg_data
912: ,p_eto_tbl IN okl_eto_tbl
913: ,x_eto_tbl OUT NOCOPY okl_eto_tbl) IS
914: l_api_version CONSTANT NUMBER := 1;
915: l_api_name CONSTANT VARCHAR2(30) := 'insert_row_tbl';
916: l_return_status VARCHAR2(1) := okl_api.g_ret_sts_success;
917: i NUMBER := 0;
918: l_overall_status VARCHAR2(1) := okl_api.g_ret_sts_success;
919:
920: BEGIN
914: l_api_version CONSTANT NUMBER := 1;
915: l_api_name CONSTANT VARCHAR2(30) := 'insert_row_tbl';
916: l_return_status VARCHAR2(1) := okl_api.g_ret_sts_success;
917: i NUMBER := 0;
918: l_overall_status VARCHAR2(1) := okl_api.g_ret_sts_success;
919:
920: BEGIN
921: okc_api.init_msg_list(p_init_msg_list);
922:
950: -- No action necessary. Validation can continue to next attribute/column
951:
952: NULL;
953: WHEN okc_api.g_exception_error THEN
954: x_return_status := okl_api.handle_exceptions(l_api_name
955: ,g_pkg_name
956: ,'OKL_API.G_RET_STS_ERROR'
957: ,x_msg_count
958: ,x_msg_data
952: NULL;
953: WHEN okc_api.g_exception_error THEN
954: x_return_status := okl_api.handle_exceptions(l_api_name
955: ,g_pkg_name
956: ,'OKL_API.G_RET_STS_ERROR'
957: ,x_msg_count
958: ,x_msg_data
959: ,'_PVT');
960: WHEN okc_api.g_exception_unexpected_error THEN
957: ,x_msg_count
958: ,x_msg_data
959: ,'_PVT');
960: WHEN okc_api.g_exception_unexpected_error THEN
961: x_return_status := okl_api.handle_exceptions(l_api_name
962: ,g_pkg_name
963: ,'OKL_API.G_RET_STS_UNEXP_ERROR'
964: ,x_msg_count
965: ,x_msg_data
959: ,'_PVT');
960: WHEN okc_api.g_exception_unexpected_error THEN
961: x_return_status := okl_api.handle_exceptions(l_api_name
962: ,g_pkg_name
963: ,'OKL_API.G_RET_STS_UNEXP_ERROR'
964: ,x_msg_count
965: ,x_msg_data
966: ,'_PVT');
967: WHEN OTHERS THEN
964: ,x_msg_count
965: ,x_msg_data
966: ,'_PVT');
967: WHEN OTHERS THEN
968: x_return_status := okl_api.handle_exceptions(l_api_name
969: ,g_pkg_name
970: ,'OTHERS'
971: ,x_msg_count
972: ,x_msg_data
985: ,p_eto_rec IN okl_eto_rec
986: ,x_eto_rec OUT NOCOPY okl_eto_rec) IS
987: l_api_version CONSTANT NUMBER := 1;
988: l_api_name CONSTANT VARCHAR2(30) := 'v_insert_row';
989: l_return_status VARCHAR2(1) := okl_api.g_ret_sts_success;
990: l_eto_rec okl_eto_rec := p_eto_rec;
991: l_def_eto_rec okl_eto_rec;
992: lx_eto_rec okl_eto_rec;
993:
1004: FUNCTION populate_new_record(p_eto_rec IN okl_eto_rec
1005: ,x_eto_rec OUT NOCOPY okl_eto_rec) RETURN VARCHAR2 IS
1006: l_eto_rec okl_eto_rec;
1007: l_row_notfound BOOLEAN := true;
1008: l_return_status VARCHAR2(1) := okl_api.g_ret_sts_success;
1009:
1010: BEGIN
1011: x_eto_rec := p_eto_rec;
1012:
1015: l_eto_rec := get_rec(p_eto_rec
1016: ,l_row_notfound);
1017:
1018: IF (l_row_notfound) THEN
1019: l_return_status := okl_api.g_ret_sts_unexp_error;
1020: END IF;
1021:
1022: IF (x_eto_rec.end_of_term_obj_id IS NULL) THEN
1023: x_eto_rec.end_of_term_obj_id := l_eto_rec.end_of_term_obj_id;
1154: ,p_api_version
1155: ,'_PVT'
1156: ,x_return_status);
1157:
1158: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1159: RAISE okc_api.g_exception_unexpected_error;
1160: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1161: RAISE okc_api.g_exception_error;
1162: END IF;
1156: ,x_return_status);
1157:
1158: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1159: RAISE okc_api.g_exception_unexpected_error;
1160: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1161: RAISE okc_api.g_exception_error;
1162: END IF;
1163:
1164: --Setting Item Attributes
1165:
1166: l_return_status := set_attributes(l_eto_rec
1167: ,lx_eto_rec);
1168:
1169: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1170: RAISE okc_api.g_exception_unexpected_error;
1171: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1172: RAISE okc_api.g_exception_error;
1173: END IF;
1167: ,lx_eto_rec);
1168:
1169: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1170: RAISE okc_api.g_exception_unexpected_error;
1171: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1172: RAISE okc_api.g_exception_error;
1173: END IF;
1174: l_return_status := populate_new_record(lx_eto_rec
1175: ,l_def_eto_rec);
1173: END IF;
1174: l_return_status := populate_new_record(lx_eto_rec
1175: ,l_def_eto_rec);
1176:
1177: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1178: RAISE okc_api.g_exception_unexpected_error;
1179: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1180: RAISE okc_api.g_exception_error;
1181: END IF;
1175: ,l_def_eto_rec);
1176:
1177: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1178: RAISE okc_api.g_exception_unexpected_error;
1179: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1180: RAISE okc_api.g_exception_error;
1181: END IF;
1182: l_def_eto_rec := null_out_defaults(l_def_eto_rec);
1183:
1180: RAISE okc_api.g_exception_error;
1181: END IF;
1182: l_def_eto_rec := null_out_defaults(l_def_eto_rec);
1183:
1184: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1185: RAISE okl_api.g_exception_unexpected_error;
1186: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1187: RAISE okl_api.g_exception_error;
1188: END IF;
1181: END IF;
1182: l_def_eto_rec := null_out_defaults(l_def_eto_rec);
1183:
1184: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1185: RAISE okl_api.g_exception_unexpected_error;
1186: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1187: RAISE okl_api.g_exception_error;
1188: END IF;
1189: l_def_eto_rec := fill_who_columns(l_def_eto_rec);
1182: l_def_eto_rec := null_out_defaults(l_def_eto_rec);
1183:
1184: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1185: RAISE okl_api.g_exception_unexpected_error;
1186: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1187: RAISE okl_api.g_exception_error;
1188: END IF;
1189: l_def_eto_rec := fill_who_columns(l_def_eto_rec);
1190: l_return_status := validate_attributes(l_def_eto_rec);
1183:
1184: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1185: RAISE okl_api.g_exception_unexpected_error;
1186: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1187: RAISE okl_api.g_exception_error;
1188: END IF;
1189: l_def_eto_rec := fill_who_columns(l_def_eto_rec);
1190: l_return_status := validate_attributes(l_def_eto_rec);
1191:
1188: END IF;
1189: l_def_eto_rec := fill_who_columns(l_def_eto_rec);
1190: l_return_status := validate_attributes(l_def_eto_rec);
1191:
1192: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1193: RAISE okc_api.g_exception_unexpected_error;
1194: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1195: RAISE okc_api.g_exception_error;
1196: END IF;
1190: l_return_status := validate_attributes(l_def_eto_rec);
1191:
1192: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1193: RAISE okc_api.g_exception_unexpected_error;
1194: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1195: RAISE okc_api.g_exception_error;
1196: END IF;
1197: l_return_status := validate_record(l_def_eto_rec);
1198:
1195: RAISE okc_api.g_exception_error;
1196: END IF;
1197: l_return_status := validate_record(l_def_eto_rec);
1198:
1199: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1200: RAISE okc_api.g_exception_unexpected_error;
1201: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1202: RAISE okc_api.g_exception_error;
1203: END IF;
1197: l_return_status := validate_record(l_def_eto_rec);
1198:
1199: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1200: RAISE okc_api.g_exception_unexpected_error;
1201: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1202: RAISE okc_api.g_exception_error;
1203: END IF;
1204:
1205: -- Lock the row before updating
1211: ,x_msg_data => x_msg_data
1212: ,p_def_eto_rec => l_def_eto_rec);
1213:
1214: IF (l_return_status = g_ret_sts_unexp_error) THEN
1215: RAISE okl_api.g_exception_unexpected_error;
1216: ELSIF (l_return_status = g_ret_sts_error) THEN
1217: RAISE okl_api.g_exception_error;
1218: END IF;
1219:
1213:
1214: IF (l_return_status = g_ret_sts_unexp_error) THEN
1215: RAISE okl_api.g_exception_unexpected_error;
1216: ELSIF (l_return_status = g_ret_sts_error) THEN
1217: RAISE okl_api.g_exception_error;
1218: END IF;
1219:
1220: UPDATE okl_fe_eo_term_objects
1221: SET end_of_term_obj_id = l_def_eto_rec.end_of_term_obj_id
1248: ,last_update_date = l_def_eto_rec.last_update_date
1249: ,last_update_login = l_def_eto_rec.last_update_login
1250: WHERE end_of_term_obj_id = l_def_eto_rec.end_of_term_obj_id;
1251:
1252: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1253: RAISE okc_api.g_exception_unexpected_error;
1254: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1255: RAISE okc_api.g_exception_error;
1256: END IF;
1250: WHERE end_of_term_obj_id = l_def_eto_rec.end_of_term_obj_id;
1251:
1252: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1253: RAISE okc_api.g_exception_unexpected_error;
1254: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1255: RAISE okc_api.g_exception_error;
1256: END IF;
1257:
1258: --Set OUT Values
1266: -- No action necessary. Validation can continue to next attribute/column
1267:
1268: NULL;
1269: WHEN okc_api.g_exception_error THEN
1270: x_return_status := okl_api.handle_exceptions(l_api_name
1271: ,g_pkg_name
1272: ,'OKL_API.G_RET_STS_ERROR'
1273: ,x_msg_count
1274: ,x_msg_data
1268: NULL;
1269: WHEN okc_api.g_exception_error THEN
1270: x_return_status := okl_api.handle_exceptions(l_api_name
1271: ,g_pkg_name
1272: ,'OKL_API.G_RET_STS_ERROR'
1273: ,x_msg_count
1274: ,x_msg_data
1275: ,'_PVT');
1276: WHEN okc_api.g_exception_unexpected_error THEN
1273: ,x_msg_count
1274: ,x_msg_data
1275: ,'_PVT');
1276: WHEN okc_api.g_exception_unexpected_error THEN
1277: x_return_status := okl_api.handle_exceptions(l_api_name
1278: ,g_pkg_name
1279: ,'OKL_API.G_RET_STS_UNEXP_ERROR'
1280: ,x_msg_count
1281: ,x_msg_data
1275: ,'_PVT');
1276: WHEN okc_api.g_exception_unexpected_error THEN
1277: x_return_status := okl_api.handle_exceptions(l_api_name
1278: ,g_pkg_name
1279: ,'OKL_API.G_RET_STS_UNEXP_ERROR'
1280: ,x_msg_count
1281: ,x_msg_data
1282: ,'_PVT');
1283: WHEN OTHERS THEN
1280: ,x_msg_count
1281: ,x_msg_data
1282: ,'_PVT');
1283: WHEN OTHERS THEN
1284: x_return_status := okl_api.handle_exceptions(l_api_name
1285: ,g_pkg_name
1286: ,'OTHERS'
1287: ,x_msg_count
1288: ,x_msg_data
1301: ,p_eto_tbl IN okl_eto_tbl
1302: ,x_eto_tbl OUT NOCOPY okl_eto_tbl) IS
1303: l_api_version CONSTANT NUMBER := 1;
1304: l_api_name CONSTANT VARCHAR2(30) := 'update_row_tbl';
1305: l_return_status VARCHAR2(1) := okl_api.g_ret_sts_success;
1306: i NUMBER := 0;
1307: l_overall_status VARCHAR2(1) := okl_api.g_ret_sts_success;
1308:
1309: BEGIN
1303: l_api_version CONSTANT NUMBER := 1;
1304: l_api_name CONSTANT VARCHAR2(30) := 'update_row_tbl';
1305: l_return_status VARCHAR2(1) := okl_api.g_ret_sts_success;
1306: i NUMBER := 0;
1307: l_overall_status VARCHAR2(1) := okl_api.g_ret_sts_success;
1308:
1309: BEGIN
1310: okc_api.init_msg_list(p_init_msg_list);
1311:
1339: -- No action necessary. Validation can continue to next attribute/column
1340:
1341: NULL;
1342: WHEN okc_api.g_exception_error THEN
1343: x_return_status := okl_api.handle_exceptions(l_api_name
1344: ,g_pkg_name
1345: ,'OKL_API.G_RET_STS_ERROR'
1346: ,x_msg_count
1347: ,x_msg_data
1341: NULL;
1342: WHEN okc_api.g_exception_error THEN
1343: x_return_status := okl_api.handle_exceptions(l_api_name
1344: ,g_pkg_name
1345: ,'OKL_API.G_RET_STS_ERROR'
1346: ,x_msg_count
1347: ,x_msg_data
1348: ,'_PVT');
1349: WHEN okc_api.g_exception_unexpected_error THEN
1346: ,x_msg_count
1347: ,x_msg_data
1348: ,'_PVT');
1349: WHEN okc_api.g_exception_unexpected_error THEN
1350: x_return_status := okl_api.handle_exceptions(l_api_name
1351: ,g_pkg_name
1352: ,'OKL_API.G_RET_STS_UNEXP_ERROR'
1353: ,x_msg_count
1354: ,x_msg_data
1348: ,'_PVT');
1349: WHEN okc_api.g_exception_unexpected_error THEN
1350: x_return_status := okl_api.handle_exceptions(l_api_name
1351: ,g_pkg_name
1352: ,'OKL_API.G_RET_STS_UNEXP_ERROR'
1353: ,x_msg_count
1354: ,x_msg_data
1355: ,'_PVT');
1356: WHEN OTHERS THEN
1353: ,x_msg_count
1354: ,x_msg_data
1355: ,'_PVT');
1356: WHEN OTHERS THEN
1357: x_return_status := okl_api.handle_exceptions(l_api_name
1358: ,g_pkg_name
1359: ,'OTHERS'
1360: ,x_msg_count
1361: ,x_msg_data
1373: ,x_msg_data OUT NOCOPY VARCHAR2
1374: ,p_eto_rec IN okl_eto_rec) IS
1375: l_api_version CONSTANT NUMBER := 1;
1376: l_api_name CONSTANT VARCHAR2(30) := 'delete_row';
1377: l_return_status VARCHAR2(1) := okl_api.g_ret_sts_success;
1378: l_eto_rec okl_eto_rec := p_eto_rec;
1379:
1380: BEGIN
1381: l_return_status := okc_api.start_activity(l_api_name
1385: ,p_api_version
1386: ,'_PVT'
1387: ,x_return_status);
1388:
1389: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1390: RAISE okc_api.g_exception_unexpected_error;
1391: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1392: RAISE okc_api.g_exception_error;
1393: END IF;
1387: ,x_return_status);
1388:
1389: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1390: RAISE okc_api.g_exception_unexpected_error;
1391: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1392: RAISE okc_api.g_exception_error;
1393: END IF;
1394:
1395: DELETE FROM okl_fe_eo_term_objects
1394:
1395: DELETE FROM okl_fe_eo_term_objects
1396: WHERE end_of_term_obj_id = l_eto_rec.end_of_term_obj_id;
1397:
1398: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1399: RAISE okc_api.g_exception_unexpected_error;
1400: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1401: RAISE okc_api.g_exception_error;
1402: END IF;
1396: WHERE end_of_term_obj_id = l_eto_rec.end_of_term_obj_id;
1397:
1398: IF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
1399: RAISE okc_api.g_exception_unexpected_error;
1400: ELSIF (l_return_status = okl_api.g_ret_sts_error) THEN
1401: RAISE okc_api.g_exception_error;
1402: END IF;
1403: okc_api.end_activity(x_msg_count
1404: ,x_msg_data);
1408: -- No action necessary. Validation can continue to next attribute/column
1409:
1410: NULL;
1411: WHEN okc_api.g_exception_error THEN
1412: x_return_status := okl_api.handle_exceptions(l_api_name
1413: ,g_pkg_name
1414: ,'OKL_API.G_RET_STS_ERROR'
1415: ,x_msg_count
1416: ,x_msg_data
1410: NULL;
1411: WHEN okc_api.g_exception_error THEN
1412: x_return_status := okl_api.handle_exceptions(l_api_name
1413: ,g_pkg_name
1414: ,'OKL_API.G_RET_STS_ERROR'
1415: ,x_msg_count
1416: ,x_msg_data
1417: ,'_PVT');
1418: WHEN okc_api.g_exception_unexpected_error THEN
1415: ,x_msg_count
1416: ,x_msg_data
1417: ,'_PVT');
1418: WHEN okc_api.g_exception_unexpected_error THEN
1419: x_return_status := okl_api.handle_exceptions(l_api_name
1420: ,g_pkg_name
1421: ,'OKL_API.G_RET_STS_UNEXP_ERROR'
1422: ,x_msg_count
1423: ,x_msg_data
1417: ,'_PVT');
1418: WHEN okc_api.g_exception_unexpected_error THEN
1419: x_return_status := okl_api.handle_exceptions(l_api_name
1420: ,g_pkg_name
1421: ,'OKL_API.G_RET_STS_UNEXP_ERROR'
1422: ,x_msg_count
1423: ,x_msg_data
1424: ,'_PVT');
1425: WHEN OTHERS THEN
1422: ,x_msg_count
1423: ,x_msg_data
1424: ,'_PVT');
1425: WHEN OTHERS THEN
1426: x_return_status := okl_api.handle_exceptions(l_api_name
1427: ,g_pkg_name
1428: ,'OTHERS'
1429: ,x_msg_count
1430: ,x_msg_data
1442: ,x_msg_data OUT NOCOPY VARCHAR2
1443: ,p_eto_tbl IN okl_eto_tbl) IS
1444: l_api_version CONSTANT NUMBER := 1;
1445: l_api_name CONSTANT VARCHAR2(30) := 'delete_row_tbl';
1446: l_return_status VARCHAR2(1) := okl_api.g_ret_sts_success;
1447: i NUMBER := 0;
1448: l_overall_status VARCHAR2(1) := okl_api.g_ret_sts_success;
1449:
1450: BEGIN
1444: l_api_version CONSTANT NUMBER := 1;
1445: l_api_name CONSTANT VARCHAR2(30) := 'delete_row_tbl';
1446: l_return_status VARCHAR2(1) := okl_api.g_ret_sts_success;
1447: i NUMBER := 0;
1448: l_overall_status VARCHAR2(1) := okl_api.g_ret_sts_success;
1449:
1450: BEGIN
1451: okc_api.init_msg_list(p_init_msg_list);
1452:
1479: -- No action necessary. Validation can continue to next attribute/column
1480:
1481: NULL;
1482: WHEN okc_api.g_exception_error THEN
1483: x_return_status := okl_api.handle_exceptions(l_api_name
1484: ,g_pkg_name
1485: ,'OKL_API.G_RET_STS_ERROR'
1486: ,x_msg_count
1487: ,x_msg_data
1481: NULL;
1482: WHEN okc_api.g_exception_error THEN
1483: x_return_status := okl_api.handle_exceptions(l_api_name
1484: ,g_pkg_name
1485: ,'OKL_API.G_RET_STS_ERROR'
1486: ,x_msg_count
1487: ,x_msg_data
1488: ,'_PVT');
1489: WHEN okc_api.g_exception_unexpected_error THEN
1486: ,x_msg_count
1487: ,x_msg_data
1488: ,'_PVT');
1489: WHEN okc_api.g_exception_unexpected_error THEN
1490: x_return_status := okl_api.handle_exceptions(l_api_name
1491: ,g_pkg_name
1492: ,'OKL_API.G_RET_STS_UNEXP_ERROR'
1493: ,x_msg_count
1494: ,x_msg_data
1488: ,'_PVT');
1489: WHEN okc_api.g_exception_unexpected_error THEN
1490: x_return_status := okl_api.handle_exceptions(l_api_name
1491: ,g_pkg_name
1492: ,'OKL_API.G_RET_STS_UNEXP_ERROR'
1493: ,x_msg_count
1494: ,x_msg_data
1495: ,'_PVT');
1496: WHEN OTHERS THEN
1493: ,x_msg_count
1494: ,x_msg_data
1495: ,'_PVT');
1496: WHEN OTHERS THEN
1497: x_return_status := okl_api.handle_exceptions(l_api_name
1498: ,g_pkg_name
1499: ,'OTHERS'
1500: ,x_msg_count
1501: ,x_msg_data