70: PROCEDURE LOCK_ACCESS_HOURS
71: ( p_access_hour_id in number,
72: p_API_VERSION NUMBER,
73: p_init_msg_list varchar2 default NULL,
74: -- p_commit in varchar2 default fnd_api.g_false,
75: p_object_version_number in number,
76: x_return_status OUT NOCOPY VARCHAR2,
77: x_msg_data OUT NOCOPY VARCHAR2,
78: x_msg_count OUT NOCOPY NUMBER)
92:
93: BEGIN
94:
95: SAVEPOINT lock_access_hours_pub;
96: x_return_status := fnd_api.g_ret_sts_success;
97:
98: IF NOT fnd_api.compatible_api_call (
99: l_api_version,
100: p_api_version,
94:
95: SAVEPOINT lock_access_hours_pub;
96: x_return_status := fnd_api.g_ret_sts_success;
97:
98: IF NOT fnd_api.compatible_api_call (
99: l_api_version,
100: p_api_version,
101: l_api_name_full,
102: g_pkg_name
101: l_api_name_full,
102: g_pkg_name
103: )
104: then
105: raise fnd_Api.g_exc_unexpected_error;
106: end if;
107:
108: IF fnd_api.to_boolean( nvl(p_init_msg_list,fnd_api.g_false)) then
109: fnd_msg_pub.initialize;
104: then
105: raise fnd_Api.g_exc_unexpected_error;
106: end if;
107:
108: IF fnd_api.to_boolean( nvl(p_init_msg_list,fnd_api.g_false)) then
109: fnd_msg_pub.initialize;
110: end if;
111:
112:
113:
114: If p_ACCESS_HOUR_ID is NULL then
115: fnd_message.set_name ('CSF','CSF_ACCESS_INVALID_PARAMETER');--message required
116: fnd_msg_pub.add;
117: raise fnd_api.g_exc_error;
118: end if;
119:
120: CSF_ACCESS_HOURS_PVT.LOCK_ACCESS_HOURS(
121:
127: x_msg_count => l_cnt,
128: x_msg_data => l_msg
129: );
130:
131: If l_return_status = fnd_api.g_ret_sts_error then
132: raise fnd_api.g_exc_error;
133: end if;
134:
135: If l_return_status = fnd_api.g_ret_sts_unexp_error then
128: x_msg_data => l_msg
129: );
130:
131: If l_return_status = fnd_api.g_ret_sts_error then
132: raise fnd_api.g_exc_error;
133: end if;
134:
135: If l_return_status = fnd_api.g_ret_sts_unexp_error then
136: raise fnd_Api.g_exc_unexpected_error;
131: If l_return_status = fnd_api.g_ret_sts_error then
132: raise fnd_api.g_exc_error;
133: end if;
134:
135: If l_return_status = fnd_api.g_ret_sts_unexp_error then
136: raise fnd_Api.g_exc_unexpected_error;
137: end if;
138:
139: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
132: raise fnd_api.g_exc_error;
133: end if;
134:
135: If l_return_status = fnd_api.g_ret_sts_unexp_error then
136: raise fnd_Api.g_exc_unexpected_error;
137: end if;
138:
139: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
140:
139: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
140:
141: EXCEPTION
142:
143: WHEN fnd_api.g_exc_error then
144: ROLLBACK TO lock_access_hours_pub;
145: x_return_status :=fnd_api.g_ret_sts_error;
146: /*x_msg_count := l_msg_count;
147: x_msg_data := l_msg_data;*/
141: EXCEPTION
142:
143: WHEN fnd_api.g_exc_error then
144: ROLLBACK TO lock_access_hours_pub;
145: x_return_status :=fnd_api.g_ret_sts_error;
146: /*x_msg_count := l_msg_count;
147: x_msg_data := l_msg_data;*/
148: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
149:
146: /*x_msg_count := l_msg_count;
147: x_msg_data := l_msg_data;*/
148: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
149:
150: WHEN fnd_api.g_exc_unexpected_error then
151: ROLLBACK TO lock_access_hours_pub;
152: x_return_status := fnd_api.g_ret_sts_unexp_error;
153: /*x_msg_count := l_msg_count;
154: x_msg_data := l_msg_data;*/
148: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
149:
150: WHEN fnd_api.g_exc_unexpected_error then
151: ROLLBACK TO lock_access_hours_pub;
152: x_return_status := fnd_api.g_ret_sts_unexp_error;
153: /*x_msg_count := l_msg_count;
154: x_msg_data := l_msg_data;*/
155: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
156:
155: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
156:
157: WHEN OTHERS then
158: ROLLBACK TO lock_access_hours_pub;
159: x_return_status := fnd_api.g_ret_sts_unexp_error;
160: /*x_msg_count := l_msg_count;
161: x_msg_data := l_msg_data;*/
162: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
163:
364:
365: IF l_task_status ='W' or l_task_status='X' or (l_task_status='A' and p_calling_routine='DELETE_ROW') then
366: fnd_message.set_name('CSF','CSF_ACCESS_INVALID_STATUS');-- require message
367: fnd_msg_pub.add;
368: raise fnd_api.g_exc_error;
369: end if;
370:
371: IF l_task_status ='A' and p_CALLING_ROUTINE='INSERT_ROW' then
372: IF p_MONDAY_FIRST_START is not NULL
402: OR nvl(p_AFTER_HOURS_FLAG,'N') ='Y'
403: then
404: fnd_message.set_name('CSF','CSF_ACCESS_INVALID_INSERT');---require message
405: fnd_msg_pub.add;
406: raise fnd_api.g_exc_error;
407: end if;
408: end if;
409:
410: -- in case of UPDATE_ROW function
456:
457: if nvl(p_ACCESS_HOUR_REQD,'N') ='Y' and nvl(p_AFTER_HOURS_FLAG,'N') ='Y' then
458: fnd_message.set_name('CSF','CSF_ACCESS_BOTH_FLAGS_INV');-- require message
459: fnd_msg_pub.add;
460: raise fnd_api.g_exc_error;
461: end if;
462:
463:
464:
481:
482: then
483: fnd_message.set_name('CSF','CSF_INV_START_END_NOT_NULL');
484: fnd_msg_pub.add;
485: raise fnd_api.g_exc_error;
486: end if;
487:
488: -- when access_hours flag is set atleast one slot should be entered
489:
497: and p_SUNDAY_FIRST_START is null
498: then
499: fnd_message.set_name('CSF','CSF_ENTER_ATLEAST_ONE_SLOT');-- require message here
500: fnd_msg_pub.add;
501: raise fnd_api.g_exc_error;
502: end if;
503:
504: -- start to be enetered first and then the end
505:
520:
521: then
522: fnd_message.set_name('CSF','CSF_ACCESS_START_FIRST');-- need new messgae for this
523: fnd_msg_pub.add;
524: raise fnd_api.g_exc_error;
525: end if;
526: -- second slots for a day to be entered only after end times are entered
527:
528: IF( (p_MONDAY_FIRST_START is null and p_MONDAY_FIRST_END is null)
542:
543: then
544: fnd_message.set_name('CSF','CSF_SECOND_SLOT_FIRST_SLOT');-- need new messgae for this
545: fnd_msg_pub.add;
546: raise fnd_api.g_exc_error;
547: end if;
548:
549: --- start time should be less than the end time for each slot
550:
565:
566: then
567: fnd_message.set_name('CSF','CSF_INV_START_END');
568: fnd_msg_pub.add;
569: raise fnd_api.g_exc_error;
570: end if;
571:
572: -- start time of the second slot should be greater than the end time of the first slot for a day
573: IF (p_MONDAY_FIRST_END > p_MONDAY_SECOND_START )
580:
581: then
582: fnd_message.set_name('CSF','CSF_INV_SLOTS');
583: fnd_msg_pub.add;
584: raise fnd_api.g_exc_error;
585: end if;
586:
587: /*-- both flags should not be set to Y together
588:
588:
589: if nvl(p_ACCESS_HOUR_REQD,'N') ='Y' and nvl(p_AFTER_HOURS_FLAG,'N') ='Y' then
590: fnd_message.set_name('CSF','CSF_INV_SLOTS');-- require message
591: fnd_msg_pub.add;
592: raise fnd_api.g_exc_error;
593: end if;
594:
595: -- when access_hours flag is set atleast one slot should be entered
596:
604: and p_SUNDAY_FIRST_START is null
605: then
606: fnd_message.set_name('CSF','CSF_INV_START_END_NOT_NULL');-- require message here
607: fnd_msg_pub.add;
608: raise fnd_api.g_exc_error;
609: end if;*/
610:
611: end if;
612:
610:
611: end if;
612:
613: EXCEPTION
614: WHEN fnd_api.g_exc_error then
615: x_return_status := fnd_api.g_ret_sts_error;
616: --fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
617:
618: WHEN fnd_api.g_exc_unexpected_error then
611: end if;
612:
613: EXCEPTION
614: WHEN fnd_api.g_exc_error then
615: x_return_status := fnd_api.g_ret_sts_error;
616: --fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
617:
618: WHEN fnd_api.g_exc_unexpected_error then
619: x_return_status :=fnd_api.g_ret_sts_unexp_error;
614: WHEN fnd_api.g_exc_error then
615: x_return_status := fnd_api.g_ret_sts_error;
616: --fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
617:
618: WHEN fnd_api.g_exc_unexpected_error then
619: x_return_status :=fnd_api.g_ret_sts_unexp_error;
620: --fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
621:
622: WHEN others then
615: x_return_status := fnd_api.g_ret_sts_error;
616: --fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
617:
618: WHEN fnd_api.g_exc_unexpected_error then
619: x_return_status :=fnd_api.g_ret_sts_unexp_error;
620: --fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
621:
622: WHEN others then
623: x_return_status :=fnd_api.g_ret_sts_unexp_error;
619: x_return_status :=fnd_api.g_ret_sts_unexp_error;
620: --fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
621:
622: WHEN others then
623: x_return_status :=fnd_api.g_ret_sts_unexp_error;
624: --fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
625:
626:
627: END CHECK_PARAMETERS;
667: p_CREATION_DATE DATE ,
668: p_LAST_UPDATED_BY NUMBER ,
669: p_LAST_UPDATE_DATE DATE,
670: p_LAST_UPDATE_LOGIN NUMBER ,
671: p_commit in varchar2 default fnd_api.g_true,
672: x_return_status OUT NOCOPY VARCHAR2,
673: x_msg_data OUT NOCOPY VARCHAR2,
674: x_msg_count OUT NOCOPY NUMBER
675:
691: CURSOR C_EXISTS(p_task_id number) is select 'Y' from csf_access_hours_vl where task_id=p_task_id;
692:
693: BEGIN
694: SAVEPOINT create_access_hours_pub;
695: x_return_status := fnd_api.g_ret_sts_success;
696:
697: IF NOT fnd_api.compatible_api_call (
698: l_api_version,
699: p_api_version,
693: BEGIN
694: SAVEPOINT create_access_hours_pub;
695: x_return_status := fnd_api.g_ret_sts_success;
696:
697: IF NOT fnd_api.compatible_api_call (
698: l_api_version,
699: p_api_version,
700: l_api_name_full,
701: g_pkg_name
700: l_api_name_full,
701: g_pkg_name
702: )
703: then
704: raise fnd_Api.g_exc_unexpected_error;
705: end if;
706:
707: IF fnd_api.to_boolean( nvl(p_init_msg_list,fnd_Api.g_false)) then
708: fnd_msg_pub.initialize;
703: then
704: raise fnd_Api.g_exc_unexpected_error;
705: end if;
706:
707: IF fnd_api.to_boolean( nvl(p_init_msg_list,fnd_Api.g_false)) then
708: fnd_msg_pub.initialize;
709: end if;
710:
711: If p_task_id is NULL then
710:
711: If p_task_id is NULL then
712: fnd_message.set_name ('CSF','CSF_ACCESS_INVALID_PARAMETER');--message required
713: fnd_msg_pub.add;
714: raise fnd_api.g_exc_error;
715: end if;
716:
717: open c_exists(p_task_id);
718: fetch c_exists into l_temp;
721: else
722: close c_exists;
723: fnd_message.set_name('CSF','CSF_ACCESS_ROW_EXISTS');
724: fnd_msg_pub.add;
725: raise fnd_api.g_exc_error;
726: end if;
727:
728: check_parameters
729: (
765: x_msg_data => l_msg_data
766:
767: );
768:
769: If l_return_status = fnd_api.g_ret_sts_error then
770: raise fnd_api.g_exc_error;
771: end if;
772:
773: If l_return_status = fnd_api.g_ret_sts_unexp_error then
766:
767: );
768:
769: If l_return_status = fnd_api.g_ret_sts_error then
770: raise fnd_api.g_exc_error;
771: end if;
772:
773: If l_return_status = fnd_api.g_ret_sts_unexp_error then
774: raise fnd_Api.g_exc_unexpected_error;
769: If l_return_status = fnd_api.g_ret_sts_error then
770: raise fnd_api.g_exc_error;
771: end if;
772:
773: If l_return_status = fnd_api.g_ret_sts_unexp_error then
774: raise fnd_Api.g_exc_unexpected_error;
775: end if;
776:
777: CSF_ACCESS_HOURS_PVT.CREATE_ACCESS_HOURS
770: raise fnd_api.g_exc_error;
771: end if;
772:
773: If l_return_status = fnd_api.g_ret_sts_unexp_error then
774: raise fnd_Api.g_exc_unexpected_error;
775: end if;
776:
777: CSF_ACCESS_HOURS_PVT.CREATE_ACCESS_HOURS
778: (
819:
820: );
821:
822:
823: If l_return_status = fnd_api.g_ret_sts_error then
824: raise fnd_api.g_exc_error;
825: end if;
826:
827: If l_return_status = fnd_api.g_ret_sts_unexp_error then
820: );
821:
822:
823: If l_return_status = fnd_api.g_ret_sts_error then
824: raise fnd_api.g_exc_error;
825: end if;
826:
827: If l_return_status = fnd_api.g_ret_sts_unexp_error then
828: raise fnd_Api.g_exc_unexpected_error;
823: If l_return_status = fnd_api.g_ret_sts_error then
824: raise fnd_api.g_exc_error;
825: end if;
826:
827: If l_return_status = fnd_api.g_ret_sts_unexp_error then
828: raise fnd_Api.g_exc_unexpected_error;
829: end if;
830:
831: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
824: raise fnd_api.g_exc_error;
825: end if;
826:
827: If l_return_status = fnd_api.g_ret_sts_unexp_error then
828: raise fnd_Api.g_exc_unexpected_error;
829: end if;
830:
831: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
832:
830:
831: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
832:
833: EXCEPTION
834: WHEN fnd_api.g_exc_error then
835: ROLLBACK TO create_access_hours_pub;
836: x_return_status := fnd_api.g_ret_sts_error;
837: /*x_msg_count := l_msg_count;
838: x_msg_data := l_msg_data;*/
832:
833: EXCEPTION
834: WHEN fnd_api.g_exc_error then
835: ROLLBACK TO create_access_hours_pub;
836: x_return_status := fnd_api.g_ret_sts_error;
837: /*x_msg_count := l_msg_count;
838: x_msg_data := l_msg_data;*/
839: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
840:
837: /*x_msg_count := l_msg_count;
838: x_msg_data := l_msg_data;*/
839: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
840:
841: WHEN fnd_api.g_exc_unexpected_error then
842: ROLLBACK TO create_access_hours_pub;
843: x_return_status :=fnd_api.g_ret_sts_unexp_error ;
844: /*x_msg_count := l_msg_count;
845: x_msg_data := l_msg_data;*/
839: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
840:
841: WHEN fnd_api.g_exc_unexpected_error then
842: ROLLBACK TO create_access_hours_pub;
843: x_return_status :=fnd_api.g_ret_sts_unexp_error ;
844: /*x_msg_count := l_msg_count;
845: x_msg_data := l_msg_data;*/
846: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
847:
846: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
847:
848: WHEN OTHERS then
849: ROLLBACK TO create_task_assignment_pub;
850: x_return_status := fnd_api.g_ret_sts_unexp_error;
851: /*x_msg_count := l_msg_count;
852: x_msg_data := l_msg_data;*/
853: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
854:
994: CURSOR C_EXISTS(p_task_id number) is select 'Y' from csf_access_hours_vl where task_id=p_task_id;
995:
996: BEGIN
997: SAVEPOINT update_access_hours_pub;
998: x_return_status := fnd_api.g_ret_sts_success;
999:
1000: IF NOT fnd_api.compatible_api_call (
1001: l_api_version,
1002: p_api_version,
996: BEGIN
997: SAVEPOINT update_access_hours_pub;
998: x_return_status := fnd_api.g_ret_sts_success;
999:
1000: IF NOT fnd_api.compatible_api_call (
1001: l_api_version,
1002: p_api_version,
1003: l_api_name_full,
1004: g_pkg_name
1003: l_api_name_full,
1004: g_pkg_name
1005: )
1006: then
1007: raise fnd_Api.g_exc_unexpected_error;
1008: end if;
1009:
1010: IF fnd_api.to_boolean(nvl(p_init_msg_list,fnd_Api.g_false)) then
1011: fnd_msg_pub.initialize;
1006: then
1007: raise fnd_Api.g_exc_unexpected_error;
1008: end if;
1009:
1010: IF fnd_api.to_boolean(nvl(p_init_msg_list,fnd_Api.g_false)) then
1011: fnd_msg_pub.initialize;
1012: end if;
1013:
1014:
1014:
1015: If p_task_id is NULL or p_ACCESS_HOUR_ID is NULL then
1016: fnd_message.set_name ('CSF','CSF_ACCESS_INVALID_PARAMETER');--message required
1017: fnd_msg_pub.add;
1018: raise fnd_api.g_exc_error;
1019: end if;
1020:
1021: open c_exists(p_task_id);
1022: fetch c_exists into l_temp;
1023: if c_exists%notfound then
1024: close c_exists;
1025: fnd_message.set_name('CSF','CSF_ACCESS_NO_ROW_EXISTS');
1026: fnd_msg_pub.add;
1027: raise fnd_api.g_exc_error;
1028: else
1029: close c_exists;
1030: end if;
1031:
1071: OR (l_AFTER_HOURS_FLAG ='N' and p_AFTER_HOURS_FLAG='Y'))
1072: then
1073: fnd_message.set_name ('CSF','CSF_INV_FLAG_CHANGE');--message required
1074: fnd_msg_pub.add;
1075: raise fnd_api.g_exc_error;
1076: end if;
1077:
1078: IF p_MONDAY_FIRST_START is not null
1079: OR p_MONDAY_FIRST_END is not null
1105: OR p_SUNDAY_SECOND_END is not null then
1106:
1107: fnd_message.set_name ('CSF','CSF_INV_DATE_CHANGE');--message required
1108: fnd_msg_pub.add;
1109: raise fnd_api.g_exc_error;
1110: end if;
1111: end if;
1112:
1113: --- now copy all existing values and the new values to the local variable b4 calling the update_row procedure of csf_access_hours_pvt
1303: x_msg_data => l_msg_data
1304:
1305: );
1306:
1307: If l_return_status = fnd_api.g_ret_sts_error then
1308: raise fnd_api.g_exc_error;
1309: end if;
1310:
1311: If l_return_status = fnd_api.g_ret_sts_unexp_error then
1304:
1305: );
1306:
1307: If l_return_status = fnd_api.g_ret_sts_error then
1308: raise fnd_api.g_exc_error;
1309: end if;
1310:
1311: If l_return_status = fnd_api.g_ret_sts_unexp_error then
1312: raise fnd_Api.g_exc_unexpected_error;
1307: If l_return_status = fnd_api.g_ret_sts_error then
1308: raise fnd_api.g_exc_error;
1309: end if;
1310:
1311: If l_return_status = fnd_api.g_ret_sts_unexp_error then
1312: raise fnd_Api.g_exc_unexpected_error;
1313: end if;
1314:
1315:
1308: raise fnd_api.g_exc_error;
1309: end if;
1310:
1311: If l_return_status = fnd_api.g_ret_sts_unexp_error then
1312: raise fnd_Api.g_exc_unexpected_error;
1313: end if;
1314:
1315:
1316: CSF_ACCESS_HOURS_PVT.UPDATE_ACCESS_HOURS(
1349: p_SUNDAY_SECOND_START =>l_SUNDAY_SECOND_START ,
1350: p_SUNDAY_SECOND_END =>l_SUNDAY_SECOND_END ,
1351: p_DESCRIPTION => l_DESCRIPTION,
1352: px_object_version_number => px_object_version_number,
1353: p_commit => nvl(p_commit,fnd_Api.g_false),
1354: x_return_status => l_return_status,
1355: x_msg_count => l_msg_count,
1356: x_msg_data => l_msg_data
1357:
1356: x_msg_data => l_msg_data
1357:
1358: );
1359:
1360: If l_return_status = fnd_api.g_ret_sts_error then
1361: raise fnd_api.g_exc_error;
1362: end if;
1363:
1364: If l_return_status = fnd_api.g_ret_sts_unexp_error then
1357:
1358: );
1359:
1360: If l_return_status = fnd_api.g_ret_sts_error then
1361: raise fnd_api.g_exc_error;
1362: end if;
1363:
1364: If l_return_status = fnd_api.g_ret_sts_unexp_error then
1365: raise fnd_api.g_exc_unexpected_error;
1360: If l_return_status = fnd_api.g_ret_sts_error then
1361: raise fnd_api.g_exc_error;
1362: end if;
1363:
1364: If l_return_status = fnd_api.g_ret_sts_unexp_error then
1365: raise fnd_api.g_exc_unexpected_error;
1366: end if;
1367:
1368: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1361: raise fnd_api.g_exc_error;
1362: end if;
1363:
1364: If l_return_status = fnd_api.g_ret_sts_unexp_error then
1365: raise fnd_api.g_exc_unexpected_error;
1366: end if;
1367:
1368: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1369:
1368: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1369:
1370:
1371: EXCEPTION
1372: WHEN fnd_api.g_exc_error then
1373: ROLLBACK TO update_access_hours_pub;
1374: x_return_status := fnd_api.g_ret_sts_error;
1375: /*x_msg_count := l_msg_count;
1376: x_msg_data := l_msg_data;*/
1370:
1371: EXCEPTION
1372: WHEN fnd_api.g_exc_error then
1373: ROLLBACK TO update_access_hours_pub;
1374: x_return_status := fnd_api.g_ret_sts_error;
1375: /*x_msg_count := l_msg_count;
1376: x_msg_data := l_msg_data;*/
1377: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1378:
1375: /*x_msg_count := l_msg_count;
1376: x_msg_data := l_msg_data;*/
1377: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1378:
1379: WHEN fnd_api.g_exc_unexpected_error then
1380: ROLLBACK TO update_access_hours_pub;
1381: x_return_status := fnd_api.g_ret_sts_unexp_error;
1382: /*x_msg_count := l_msg_count;
1383: x_msg_data := l_msg_data;*/
1377: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1378:
1379: WHEN fnd_api.g_exc_unexpected_error then
1380: ROLLBACK TO update_access_hours_pub;
1381: x_return_status := fnd_api.g_ret_sts_unexp_error;
1382: /*x_msg_count := l_msg_count;
1383: x_msg_data := l_msg_data;*/
1384: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1385:
1384: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1385:
1386: WHEN OTHERS then
1387: ROLLBACK TO update_access_hours_pub;
1388: x_return_status := fnd_api.g_ret_sts_unexp_error;
1389: /*x_msg_count := l_msg_count;
1390: x_msg_data := l_msg_data;*/
1391: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1392:
1397: p_TASK_ID NUMBER,
1398: p_ACCESS_HOUR_ID NUMBER,
1399: p_API_VERSION NUMBER,
1400: p_init_msg_list varchar2 default null,
1401: -- p_commit in varchar2 default fnd_api.g_false,
1402: x_return_status OUT NOCOPY VARCHAR2,
1403: x_msg_data OUT NOCOPY VARCHAR2,
1404: x_msg_count OUT NOCOPY NUMBER)
1405: IS
1417: CURSOR C_EXISTS(p_task_id number) is select 'Y' from csf_access_hours_vl where task_id=p_task_id;
1418:
1419: BEGIN
1420: SAVEPOINT delete_access_hours_pub;
1421: x_return_status := fnd_api.g_ret_sts_success;
1422:
1423: IF NOT fnd_api.compatible_api_call (
1424: l_api_version,
1425: p_api_version,
1419: BEGIN
1420: SAVEPOINT delete_access_hours_pub;
1421: x_return_status := fnd_api.g_ret_sts_success;
1422:
1423: IF NOT fnd_api.compatible_api_call (
1424: l_api_version,
1425: p_api_version,
1426: l_api_name_full,
1427: g_pkg_name
1426: l_api_name_full,
1427: g_pkg_name
1428: )
1429: then
1430: raise fnd_Api.g_exc_unexpected_error;
1431: end if;
1432:
1433: IF fnd_api.to_boolean( nvl(p_init_msg_list,fnd_Api.g_false)) then
1434: fnd_msg_pub.initialize;
1429: then
1430: raise fnd_Api.g_exc_unexpected_error;
1431: end if;
1432:
1433: IF fnd_api.to_boolean( nvl(p_init_msg_list,fnd_Api.g_false)) then
1434: fnd_msg_pub.initialize;
1435: end if;
1436:
1437: If p_task_id is NULL or p_ACCESS_HOUR_ID is NULL then
1436:
1437: If p_task_id is NULL or p_ACCESS_HOUR_ID is NULL then
1438: fnd_message.set_name ('CSF','CSF_ACCESS_INVALID_PARAMETER');--message required
1439: fnd_msg_pub.add;
1440: raise fnd_api.g_exc_error;
1441: end if;
1442:
1443: open c_exists(p_task_id);
1444: fetch c_exists into l_temp;
1445: if c_exists%notfound then
1446: close c_exists;
1447: fnd_message.set_name('CSF','CSF_ACCESS_NO_ROW_EXISTS');
1448: fnd_msg_pub.add;
1449: raise fnd_api.g_exc_error;
1450: else
1451: close c_exists;
1452: end if;
1453:
1460: x_msg_data => l_msg_data
1461:
1462: );
1463:
1464: If l_return_status = fnd_api.g_ret_sts_error then
1465: raise fnd_api.g_exc_error;
1466: end if;
1467:
1468: If l_return_status = fnd_api.g_ret_sts_unexp_error then
1461:
1462: );
1463:
1464: If l_return_status = fnd_api.g_ret_sts_error then
1465: raise fnd_api.g_exc_error;
1466: end if;
1467:
1468: If l_return_status = fnd_api.g_ret_sts_unexp_error then
1469: raise fnd_Api.g_exc_unexpected_error;
1464: If l_return_status = fnd_api.g_ret_sts_error then
1465: raise fnd_api.g_exc_error;
1466: end if;
1467:
1468: If l_return_status = fnd_api.g_ret_sts_unexp_error then
1469: raise fnd_Api.g_exc_unexpected_error;
1470: end if;
1471:
1472:
1465: raise fnd_api.g_exc_error;
1466: end if;
1467:
1468: If l_return_status = fnd_api.g_ret_sts_unexp_error then
1469: raise fnd_Api.g_exc_unexpected_error;
1470: end if;
1471:
1472:
1473: CSF_ACCESS_HOURS_PVT.DELETE_ACCESS_HOURS(
1473: CSF_ACCESS_HOURS_PVT.DELETE_ACCESS_HOURS(
1474: p_API_VERSION => 1.0,
1475: p_INIT_MSG_LIST => 'F',
1476: p_ACCESS_HOUR_ID =>p_ACCESS_HOUR_ID,
1477: p_commit =>fnd_api.g_true, --p_commit,--fnd_api.g_true,
1478: x_return_status => l_return_status,
1479: x_msg_count => l_msg_count,
1480: x_msg_data => l_msg_data
1481: );
1490: /* If (SQL%NOTFOUND) then
1491: RAISE NO_DATA_FOUND;
1492: end if;*/
1493:
1494: If l_return_status = fnd_api.g_ret_sts_error then
1495: raise fnd_api.g_exc_error;
1496: end if;
1497:
1498: If l_return_status = fnd_api.g_ret_sts_unexp_error then
1491: RAISE NO_DATA_FOUND;
1492: end if;*/
1493:
1494: If l_return_status = fnd_api.g_ret_sts_error then
1495: raise fnd_api.g_exc_error;
1496: end if;
1497:
1498: If l_return_status = fnd_api.g_ret_sts_unexp_error then
1499: raise fnd_Api.g_exc_unexpected_error;
1494: If l_return_status = fnd_api.g_ret_sts_error then
1495: raise fnd_api.g_exc_error;
1496: end if;
1497:
1498: If l_return_status = fnd_api.g_ret_sts_unexp_error then
1499: raise fnd_Api.g_exc_unexpected_error;
1500: end if;
1501:
1502: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1495: raise fnd_api.g_exc_error;
1496: end if;
1497:
1498: If l_return_status = fnd_api.g_ret_sts_unexp_error then
1499: raise fnd_Api.g_exc_unexpected_error;
1500: end if;
1501:
1502: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1503:
1501:
1502: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1503:
1504: EXCEPTION
1505: WHEN fnd_api.g_exc_error then
1506: ROLLBACK TO delete_access_hours_pub;
1507: x_return_status := fnd_api.g_ret_sts_error;
1508: /*x_msg_count := l_msg_count;
1509: x_msg_data := l_msg_data;*/
1503:
1504: EXCEPTION
1505: WHEN fnd_api.g_exc_error then
1506: ROLLBACK TO delete_access_hours_pub;
1507: x_return_status := fnd_api.g_ret_sts_error;
1508: /*x_msg_count := l_msg_count;
1509: x_msg_data := l_msg_data;*/
1510: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1511:
1508: /*x_msg_count := l_msg_count;
1509: x_msg_data := l_msg_data;*/
1510: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1511:
1512: WHEN fnd_api.g_exc_unexpected_error then
1513: ROLLBACK TO delete_access_hours_pub;
1514: x_return_status := fnd_api.g_ret_sts_unexp_error;
1515: /*x_msg_count := l_msg_count;
1516: x_msg_data := l_msg_data;*/
1510: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1511:
1512: WHEN fnd_api.g_exc_unexpected_error then
1513: ROLLBACK TO delete_access_hours_pub;
1514: x_return_status := fnd_api.g_ret_sts_unexp_error;
1515: /*x_msg_count := l_msg_count;
1516: x_msg_data := l_msg_data;*/
1517: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1518:
1517: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1518:
1519: WHEN OTHERS then
1520: ROLLBACK TO delete_access_hours_pub;
1521: x_return_status := fnd_api.g_ret_sts_unexp_error;
1522: /*x_msg_count := l_msg_count;
1523: x_msg_data := l_msg_data;*/
1524: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1525:
1562:
1563: BEGIN
1564:
1565: SAVEPOINT update_access_hours_pub2;
1566: x_return_status := fnd_api.g_ret_sts_success;
1567:
1568: IF NOT fnd_api.compatible_api_call (
1569: l_api_version,
1570: p_api_version,
1564:
1565: SAVEPOINT update_access_hours_pub2;
1566: x_return_status := fnd_api.g_ret_sts_success;
1567:
1568: IF NOT fnd_api.compatible_api_call (
1569: l_api_version,
1570: p_api_version,
1571: l_api_name_full,
1572: g_pkg_name
1571: l_api_name_full,
1572: g_pkg_name
1573: )
1574: then
1575: raise fnd_Api.g_exc_unexpected_error;
1576: end if;
1577: IF fnd_api.to_boolean(nvl(p_init_msg_list,fnd_api.g_false)) then
1578: fnd_msg_pub.initialize;
1579: end if;
1573: )
1574: then
1575: raise fnd_Api.g_exc_unexpected_error;
1576: end if;
1577: IF fnd_api.to_boolean(nvl(p_init_msg_list,fnd_api.g_false)) then
1578: fnd_msg_pub.initialize;
1579: end if;
1580:
1581:
1581:
1582: If p_task_id is NULL then
1583: fnd_message.set_name ('CSF','CSF_ACCESS_INVALID_PARAMETER');--message required
1584: fnd_msg_pub.add;
1585: raise fnd_api.g_exc_error;
1586: end if;
1587:
1588:
1589:
1592: if c_existing_values%notfound then
1593: close c_existing_values;
1594: fnd_message.set_name('CSF','CSF_ACCESS_NO_ROW_EXISTS');
1595: fnd_msg_pub.add;
1596: raise fnd_api.g_exc_error;
1597: end if;
1598: close c_existing_values;
1599:
1600: l_object_version_number := l_rec.object_version_number;
1602: UPDATE_ACCESS_HOURS(
1603: p_ACCESS_HOUR_ID => l_rec.access_hour_id,
1604: p_TASK_ID =>P_TASK_ID,
1605: p_API_VERSION =>l_api_version,
1606: p_init_msg_list =>nvl(p_init_msg_list,fnd_api.g_false),
1607: p_commit => nvl(p_commit,fnd_api.g_false),
1608: p_ACCESS_HOUR_REQD=>p_Access_hour_reqd ,
1609: p_AFTER_HOURS_FLAG=> l_rec.after_hours_flag,
1610: p_MONDAY_FIRST_START =>NULL,
1603: p_ACCESS_HOUR_ID => l_rec.access_hour_id,
1604: p_TASK_ID =>P_TASK_ID,
1605: p_API_VERSION =>l_api_version,
1606: p_init_msg_list =>nvl(p_init_msg_list,fnd_api.g_false),
1607: p_commit => nvl(p_commit,fnd_api.g_false),
1608: p_ACCESS_HOUR_REQD=>p_Access_hour_reqd ,
1609: p_AFTER_HOURS_FLAG=> l_rec.after_hours_flag,
1610: p_MONDAY_FIRST_START =>NULL,
1611: p_MONDAY_FIRST_END =>NULL,
1643: );
1644: x_object_version_number := l_object_version_number;
1645:
1646: EXCEPTION
1647: WHEN fnd_api.g_exc_error then
1648: ROLLBACK TO update_access_hours_pub2;
1649: x_return_status := fnd_api.g_ret_sts_error;
1650: /*x_msg_count := l_msg_count;
1651: x_msg_data := l_msg_data;*/
1645:
1646: EXCEPTION
1647: WHEN fnd_api.g_exc_error then
1648: ROLLBACK TO update_access_hours_pub2;
1649: x_return_status := fnd_api.g_ret_sts_error;
1650: /*x_msg_count := l_msg_count;
1651: x_msg_data := l_msg_data;*/
1652: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1653:
1650: /*x_msg_count := l_msg_count;
1651: x_msg_data := l_msg_data;*/
1652: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1653:
1654: WHEN fnd_api.g_exc_unexpected_error then
1655: ROLLBACK TO update_access_hours_pub2;
1656: x_return_status := fnd_api.g_ret_sts_unexp_error;
1657: /*x_msg_count := l_msg_count;
1658: x_msg_data := l_msg_data;*/
1652: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1653:
1654: WHEN fnd_api.g_exc_unexpected_error then
1655: ROLLBACK TO update_access_hours_pub2;
1656: x_return_status := fnd_api.g_ret_sts_unexp_error;
1657: /*x_msg_count := l_msg_count;
1658: x_msg_data := l_msg_data;*/
1659: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1660:
1659: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1660:
1661: WHEN OTHERS then
1662: ROLLBACK TO update_access_hours_pub2;
1663: x_return_status := fnd_api.g_ret_sts_unexp_error;
1664: /*x_msg_count := l_msg_count;
1665: x_msg_data := l_msg_data;*/
1666: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
1667: