64: and rlt.role_id = p_role_id --added vide bug#2474811
65: and rlt.role_resource_type = 'RS_GROUP_MEMBER'
66: and nvl(rlt.delete_flag, 'N') <> 'Y'
67: and rlt.start_date_active between p_old_start_date and
68: to_date(to_char(nvl(p_old_end_date, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR');
69: l_grp_valid BOOLEAN := TRUE;
70:
71:
72: cursor team_mem_cur
83: and rlt.role_id = p_role_id --added vide bug#2474811
84: and rlt.role_resource_type = 'RS_TEAM_MEMBER'
85: and nvl(rlt.delete_flag, 'N') <> 'Y'
86: and rlt.start_date_active between p_old_start_date and
87: to_date(to_char(nvl(p_old_end_date, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR') ;
88: l_team_valid BOOLEAN := TRUE;
89:
90: /* removed the below parameter since it is not used anywhere */
91: -- l_end_date date := to_date(to_char(fnd_api.g_miss_date, 'DD-MM-RRRR'), 'DD-MM-RRRR');
87: to_date(to_char(nvl(p_old_end_date, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR') ;
88: l_team_valid BOOLEAN := TRUE;
89:
90: /* removed the below parameter since it is not used anywhere */
91: -- l_end_date date := to_date(to_char(fnd_api.g_miss_date, 'DD-MM-RRRR'), 'DD-MM-RRRR');
92: begin
93:
94: open rsc_cur(p_resource_id);
95: fetch rsc_cur INTO rsc_rec;
95: fetch rsc_cur INTO rsc_rec;
96: close rsc_cur;
97: IF((rsc_rec.start_date_active > p_new_start_date)
98: -- changed by sudarsana 11 feb 2002
99: OR (rsc_rec.end_date_active < to_date(to_char(nvl(p_new_end_date, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR')))
100: THEN
101: fnd_message.set_name ('JTF', 'JTF_RS_RES_DATE_ERR');
102: FND_MSG_PUB.add;
103: l_valid := FALSE;
105:
106: for grp_mem_rec in grp_mem_cur
107: loop
108: if(grp_mem_rec.start_date_active not between p_new_start_date
109: and to_date(to_char(nvl(p_new_end_date, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR'))
110: then
111: l_grp_valid := FALSE;
112: end if;
113:
110: then
111: l_grp_valid := FALSE;
112: end if;
113:
114: if(to_date(to_char(nvl(grp_mem_rec.end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR') not between p_new_start_date
115: and to_date(to_char(nvl(p_new_end_date, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR'))
116: then
117: l_grp_valid := FALSE;
118: end if;
111: l_grp_valid := FALSE;
112: end if;
113:
114: if(to_date(to_char(nvl(grp_mem_rec.end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR') not between p_new_start_date
115: and to_date(to_char(nvl(p_new_end_date, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR'))
116: then
117: l_grp_valid := FALSE;
118: end if;
119:
127:
128: for team_mem_rec in team_mem_cur
129: loop
130: if(team_mem_rec.start_date_active not between p_new_start_date
131: and to_date(to_char(nvl(p_new_end_date, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR'))
132: then
133: l_team_valid := FALSE;
134: end if;
135:
132: then
133: l_team_valid := FALSE;
134: end if;
135:
136: if(to_date(to_char(nvl(team_mem_rec.end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR')
137: not between p_new_start_date and to_date(to_char(nvl(p_new_end_date, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR'))
138: then
139: l_team_valid := FALSE;
140: end if;
133: l_team_valid := FALSE;
134: end if;
135:
136: if(to_date(to_char(nvl(team_mem_rec.end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR')
137: not between p_new_start_date and to_date(to_char(nvl(p_new_end_date, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR'))
138: then
139: l_team_valid := FALSE;
140: end if;
141:
490: --dbms_output.put_line ('Debug Message begin 10');
491: --Standard Start of API SAVEPOINT
492: SAVEPOINT ROLE_RELATE_SP;
493:
494: x_return_status := fnd_api.g_ret_sts_success;
495:
496: --Standard Call to check API compatibility
497: IF NOT FND_API.Compatible_API_CALL(L_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
498: THEN
493:
494: x_return_status := fnd_api.g_ret_sts_success;
495:
496: --Standard Call to check API compatibility
497: IF NOT FND_API.Compatible_API_CALL(L_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
498: THEN
499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
500: END IF;
501:
495:
496: --Standard Call to check API compatibility
497: IF NOT FND_API.Compatible_API_CALL(L_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
498: THEN
499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
500: END IF;
501:
502: --Initialize the message List if P_INIT_MSG_LIST is set to TRUE
503: IF FND_API.To_boolean(P_INIT_MSG_LIST)
499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
500: END IF;
501:
502: --Initialize the message List if P_INIT_MSG_LIST is set to TRUE
503: IF FND_API.To_boolean(P_INIT_MSG_LIST)
504: THEN
505: FND_MSG_PUB.Initialize;
506: END IF;
507:
529: P_END_DATE_ACTIVE => p_end_date_active,
530: p_data => L_data,
531: p_count => L_count,
532: P_return_code => l_return_code);
533: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
534: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
535: FND_MSG_PUB.add;
536: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
537: RAISE FND_API.G_EXC_ERROR;
532: P_return_code => l_return_code);
533: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
534: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
535: FND_MSG_PUB.add;
536: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
537: RAISE FND_API.G_EXC_ERROR;
538: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
539: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
540: END IF;
533: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
534: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
535: FND_MSG_PUB.add;
536: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
537: RAISE FND_API.G_EXC_ERROR;
538: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
539: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
540: END IF;
541: end if;
534: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
535: FND_MSG_PUB.add;
536: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
537: RAISE FND_API.G_EXC_ERROR;
538: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
539: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
540: END IF;
541: end if;
542: end if;
535: FND_MSG_PUB.add;
536: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
537: RAISE FND_API.G_EXC_ERROR;
538: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
539: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
540: END IF;
541: end if;
542: end if;
543: end if;
556: P_END_DATE_ACTIVE => p_end_date_active,
557: p_data => L_data,
558: p_count => L_count,
559: P_return_code => l_return_code);
560: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
561: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
562: FND_MSG_PUB.add;
563: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
564: RAISE FND_API.G_EXC_ERROR;
559: P_return_code => l_return_code);
560: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
561: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
562: FND_MSG_PUB.add;
563: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
564: RAISE FND_API.G_EXC_ERROR;
565: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
566: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
567: END IF;
560: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
561: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
562: FND_MSG_PUB.add;
563: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
564: RAISE FND_API.G_EXC_ERROR;
565: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
566: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
567: END IF;
568: end if;
561: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
562: FND_MSG_PUB.add;
563: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
564: RAISE FND_API.G_EXC_ERROR;
565: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
566: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
567: END IF;
568: end if;
569: end if;
562: FND_MSG_PUB.add;
563: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
564: RAISE FND_API.G_EXC_ERROR;
565: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
566: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
567: END IF;
568: end if;
569: end if;
570: end if;
583: P_END_DATE_ACTIVE => p_end_date_active,
584: p_data => L_data,
585: p_count => L_count,
586: P_return_code => l_return_code);
587: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
588: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
589: FND_MSG_PUB.add;
590: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
591: RAISE FND_API.G_EXC_ERROR;
586: P_return_code => l_return_code);
587: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
588: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
589: FND_MSG_PUB.add;
590: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
591: RAISE FND_API.G_EXC_ERROR;
592: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
593: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
594: END IF;
587: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
588: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
589: FND_MSG_PUB.add;
590: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
591: RAISE FND_API.G_EXC_ERROR;
592: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
593: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
594: END IF;
595: end if;
588: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
589: FND_MSG_PUB.add;
590: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
591: RAISE FND_API.G_EXC_ERROR;
592: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
593: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
594: END IF;
595: end if;
596: end if;
589: FND_MSG_PUB.add;
590: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
591: RAISE FND_API.G_EXC_ERROR;
592: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
593: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
594: END IF;
595: end if;
596: end if;
597: end if;
605: IF(l_start_date_active is NULL)
606: THEN
607: fnd_message.set_name ('JTF', 'JTF_RS_DATE_RANGE_ERR');
608: FND_MSG_PUB.add;
609: RAISE fnd_api.g_exc_error;
610: END IF;
611:
612:
613: --check start date less than end date
614: IF(l_start_date_active > l_end_date_active)
615: THEN
616: fnd_message.set_name ('JTF', 'JTF_RS_DATE_RANGE_ERR');
617: FND_MSG_PUB.add;
618: RAISE fnd_api.g_exc_error;
619: END IF;
620:
621: IF(l_role_resource_type = 'RS_TEAM' or
622: l_role_resource_type = 'RS_GROUP' or
629:
630: if (l_role_type_valid = false) then
631: fnd_message.set_name ('JTF', 'JTF_RS_ROLE_TYPE_INACTIVE');
632: FND_MSG_PUB.add;
633: RAISE fnd_api.g_exc_error;
634: end if;
635: END IF;
636:
637: --dbms_output.put_line ('Debug Message 12');
652: l_date_invalid := TRUE;
653: END IF;
654:
655:
656: IF((to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR')
657: between check_date_rec.start_date_active and
658: to_date(to_char(nvl(check_date_rec.end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR'))
659: OR (l_end_date_active IS NULL AND
660: check_date_rec.end_date_active IS NULL))
654:
655:
656: IF((to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR')
657: between check_date_rec.start_date_active and
658: to_date(to_char(nvl(check_date_rec.end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR'))
659: OR (l_end_date_active IS NULL AND
660: check_date_rec.end_date_active IS NULL))
661: THEN
662: l_date_invalid := TRUE;
663: END IF;
664:
665: -- added this check as a date range outside of the existing ranges was getting entered
666: if(l_start_date_active < check_date_rec.start_date_active
667: and to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR') >
668: to_date(to_char(nvl(check_date_rec.end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR'))
669: THEN
670: l_date_invalid := TRUE;
671: END IF;
664:
665: -- added this check as a date range outside of the existing ranges was getting entered
666: if(l_start_date_active < check_date_rec.start_date_active
667: and to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR') >
668: to_date(to_char(nvl(check_date_rec.end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR'))
669: THEN
670: l_date_invalid := TRUE;
671: END IF;
672:
681: IF(l_date_invalid)
682: THEN
683: fnd_message.set_name ('JTF', 'JTF_RS_OVERLAP_DATE_ERR');
684: FND_MSG_PUB.add;
685: RAISE fnd_api.g_exc_error;
686: END IF;
687: --end of overlapping date range check
688:
689:
727: ELSE
728: l_role_valid := FALSE;
729: fnd_message.set_name ('JTF', 'JTF_RS_ROLE_OR_DATE_ERR');
730: FND_MSG_PUB.add;
731: RAISE fnd_api.g_exc_error;
732: END IF;
733: close res_role_cur;
734: ELSIF((l_role_resource_type = 'RS_TEAM_MEMBER') AND
735: (l_team_resource_type = 'GROUP'))
751: ELSE
752: l_role_valid := FALSE;
753: fnd_message.set_name ('JTF', 'JTF_RS_ROLE_OR_DATE_ERR');
754: FND_MSG_PUB.add;
755: RAISE fnd_api.g_exc_error;
756: END IF;
757: close grp_role_cur;
758: END IF;
759: -- end of valid role for the resource if being entered as a group member and team member
768: open team_cur(l_role_resource_id);
769: fetch team_cur INTO team_rec;
770: close team_cur;
771: IF((trunc(team_rec.start_date_active) > trunc(l_start_date_active))
772: OR to_date(to_char(nvl(team_rec.end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR') < to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR'))
773: THEN
774: fnd_message.set_name ('JTF', 'JTF_RS_TM_GRP_DT_ERR');
775: FND_MSG_PUB.add;
776: RAISE fnd_api.g_exc_error;
772: OR to_date(to_char(nvl(team_rec.end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR') < to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR'))
773: THEN
774: fnd_message.set_name ('JTF', 'JTF_RS_TM_GRP_DT_ERR');
775: FND_MSG_PUB.add;
776: RAISE fnd_api.g_exc_error;
777: END IF;
778:
779: IF(team_rec.end_date_active is not null AND l_end_date_active is null)
780: THEN
779: IF(team_rec.end_date_active is not null AND l_end_date_active is null)
780: THEN
781: fnd_message.set_name ('JTF', 'JTF_RS_TM_GRP_DT_ERR');
782: FND_MSG_PUB.add;
783: RAISE fnd_api.g_exc_error;
784: END IF;
785:
786: --dbms_output.put_line ('Debug Message 17');
787:
793: fetch group_cur INTO group_rec;
794: close group_cur;
795:
796: IF((trunc(group_rec.start_date_active) > trunc(l_start_date_active))
797: OR to_date(to_char(nvl(group_rec.end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR') < to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR'))
798: THEN
799: fnd_message.set_name ('JTF', 'JTF_RS_TM_GRP_DT_ERR');
800: FND_MSG_PUB.add;
801: RAISE fnd_api.g_exc_error;
797: OR to_date(to_char(nvl(group_rec.end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR') < to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR'))
798: THEN
799: fnd_message.set_name ('JTF', 'JTF_RS_TM_GRP_DT_ERR');
800: FND_MSG_PUB.add;
801: RAISE fnd_api.g_exc_error;
802: END IF;
803:
804:
805: IF(group_rec.end_date_active is not null AND l_end_date_active is null)
805: IF(group_rec.end_date_active is not null AND l_end_date_active is null)
806: THEN
807: fnd_message.set_name ('JTF', 'JTF_RS_TM_GRP_DT_ERR');
808: FND_MSG_PUB.add;
809: RAISE fnd_api.g_exc_error;
810: END IF;
811:
812: --exclusive flag validation
813: open c_exclusive_group_check_cur(l_role_resource_id,
818: IF(c_exclusive_group_check_cur%FOUND)
819: THEN
820: fnd_message.set_name ('JTF', 'JTF_RS_RES_USAGE_ERR');
821: FND_MSG_PUB.add;
822: RAISE fnd_api.g_exc_error;
823: END IF;
824:
825: close c_exclusive_group_check_cur;
826:
831: fetch rsc_cur INTO rsc_rec;
832: close rsc_cur;
833: IF((rsc_rec.start_date_active > l_start_date_active)
834: -- changed by sudarsana 11 feb 2002
835: OR (rsc_rec.end_date_active < to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR')))
836: THEN
837: fnd_message.set_name ('JTF', 'JTF_RS_RES_DATE_ERR');
838: FND_MSG_PUB.add;
839: RAISE fnd_api.g_exc_error;
835: OR (rsc_rec.end_date_active < to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date), 'DD-MM-RRRR'), 'DD-MM-RRRR')))
836: THEN
837: fnd_message.set_name ('JTF', 'JTF_RS_RES_DATE_ERR');
838: FND_MSG_PUB.add;
839: RAISE fnd_api.g_exc_error;
840: END IF;
841: ELSIF(l_role_resource_type = 'RS_GROUP')
842: --check against group start and end dates
843: THEN
846: close group_dt_cur;
847: IF((group_dt_rec.start_date_active > l_start_date_active)
848: -- changed by nsinghai 20 May 2002 to handle null value of l_end_date_active
849: --OR (group_dt_rec.end_date_active < l_end_date_active))
850: OR (to_date(to_char(nvl(group_dt_rec.end_date_active,fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR')
851: < (to_date(to_char(nvl(l_end_date_active,fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))))
852: THEN
853: fnd_message.set_name ('JTF', 'JTF_RS_GRP_DT_ERR');
854: FND_MSG_PUB.add;
847: IF((group_dt_rec.start_date_active > l_start_date_active)
848: -- changed by nsinghai 20 May 2002 to handle null value of l_end_date_active
849: --OR (group_dt_rec.end_date_active < l_end_date_active))
850: OR (to_date(to_char(nvl(group_dt_rec.end_date_active,fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR')
851: < (to_date(to_char(nvl(l_end_date_active,fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))))
852: THEN
853: fnd_message.set_name ('JTF', 'JTF_RS_GRP_DT_ERR');
854: FND_MSG_PUB.add;
855: RAISE fnd_api.g_exc_error;
851: < (to_date(to_char(nvl(l_end_date_active,fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))))
852: THEN
853: fnd_message.set_name ('JTF', 'JTF_RS_GRP_DT_ERR');
854: FND_MSG_PUB.add;
855: RAISE fnd_api.g_exc_error;
856: END IF;
857: ELSIF(l_role_resource_type = 'RS_TEAM')
858: --check against team start and end dates
859: THEN
862: close team_dt_cur;
863: IF((team_dt_rec.start_date_active > l_start_date_active)
864: -- changed by nsinghai 20 May 2002 to handle null value of l_end_date_active
865: --OR (team_dt_rec.end_date_active < l_end_date_active))
866: OR (to_date(to_char(nvl(team_dt_rec.end_date_active,fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR')
867: < (to_date(to_char(nvl(l_end_date_active,fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))))
868: THEN
869: fnd_message.set_name ('JTF', 'JTF_RS_TEAM_DT_ERR');
870: FND_MSG_PUB.add;
863: IF((team_dt_rec.start_date_active > l_start_date_active)
864: -- changed by nsinghai 20 May 2002 to handle null value of l_end_date_active
865: --OR (team_dt_rec.end_date_active < l_end_date_active))
866: OR (to_date(to_char(nvl(team_dt_rec.end_date_active,fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR')
867: < (to_date(to_char(nvl(l_end_date_active,fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))))
868: THEN
869: fnd_message.set_name ('JTF', 'JTF_RS_TEAM_DT_ERR');
870: FND_MSG_PUB.add;
871: RAISE fnd_api.g_exc_error;
867: < (to_date(to_char(nvl(l_end_date_active,fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))))
868: THEN
869: fnd_message.set_name ('JTF', 'JTF_RS_TEAM_DT_ERR');
870: FND_MSG_PUB.add;
871: RAISE fnd_api.g_exc_error;
872: END IF;
873: END IF;
874:
875: --dbms_output.put_line ('Debug Message 19');
895: X_RETURN_STATUS => l_return_status,
896: X_MSG_COUNT => l_msg_count,
897: X_MSG_DATA => l_msg_data );
898:
899: IF(l_return_status <> fnd_api.g_ret_sts_success)
900: THEN
901: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
902: RAISE FND_API.G_EXC_ERROR;
903: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
897: X_MSG_DATA => l_msg_data );
898:
899: IF(l_return_status <> fnd_api.g_ret_sts_success)
900: THEN
901: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
902: RAISE FND_API.G_EXC_ERROR;
903: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
904: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
905: END IF;
898:
899: IF(l_return_status <> fnd_api.g_ret_sts_success)
900: THEN
901: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
902: RAISE FND_API.G_EXC_ERROR;
903: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
904: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
905: END IF;
906: END IF;
899: IF(l_return_status <> fnd_api.g_ret_sts_success)
900: THEN
901: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
902: RAISE FND_API.G_EXC_ERROR;
903: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
904: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
905: END IF;
906: END IF;
907:
900: THEN
901: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
902: RAISE FND_API.G_EXC_ERROR;
903: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
904: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
905: END IF;
906: END IF;
907:
908: --dbms_output.put_line ('Debug Message 20');
1006: fnd_message.set_token('P_SQLCODE',SQLCODE);
1007: fnd_message.set_token('P_SQLERRM',SQLERRM);
1008: fnd_message.set_token('P_API_NAME', l_api_name);
1009: FND_MSG_PUB.add;
1010: RAISE fnd_api.g_exc_unexpected_error;
1011:
1012:
1013: end;
1014:
1033: fnd_message.set_token('P_SQLCODE',SQLCODE);
1034: fnd_message.set_token('P_SQLERRM',SQLERRM);
1035: fnd_message.set_token('P_API_NAME', l_api_name);
1036: FND_MSG_PUB.add;
1037: RAISE fnd_api.g_exc_unexpected_error;
1038: end;
1039:
1040: else
1041: --call to insert records in jtf_rs_rep_managers
1047: X_RETURN_STATUS => l_return_status,
1048: X_MSG_COUNT => l_msg_count,
1049: X_MSG_DATA => l_msg_data);
1050:
1051: IF(l_return_status <> fnd_api.g_ret_sts_success)
1052: THEN
1053: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
1054: RAISE FND_API.G_EXC_ERROR;
1055: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
1049: X_MSG_DATA => l_msg_data);
1050:
1051: IF(l_return_status <> fnd_api.g_ret_sts_success)
1052: THEN
1053: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
1054: RAISE FND_API.G_EXC_ERROR;
1055: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
1056: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1057: END IF;
1050:
1051: IF(l_return_status <> fnd_api.g_ret_sts_success)
1052: THEN
1053: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
1054: RAISE FND_API.G_EXC_ERROR;
1055: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
1056: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1057: END IF;
1058: END IF;
1051: IF(l_return_status <> fnd_api.g_ret_sts_success)
1052: THEN
1053: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
1054: RAISE FND_API.G_EXC_ERROR;
1055: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
1056: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1057: END IF;
1058: END IF;
1059: END IF; -- end of count check
1052: THEN
1053: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
1054: RAISE FND_API.G_EXC_ERROR;
1055: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
1056: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1057: END IF;
1058: END IF;
1059: END IF; -- end of count check
1060: END IF;
1072: P_END_DATE_ACTIVE => p_end_date_active,
1073: p_data => L_data,
1074: p_count => L_count,
1075: P_return_code => l_return_code);
1076: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
1077: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
1078: FND_MSG_PUB.add;
1079: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1080: RAISE FND_API.G_EXC_ERROR;
1075: P_return_code => l_return_code);
1076: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
1077: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
1078: FND_MSG_PUB.add;
1079: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1080: RAISE FND_API.G_EXC_ERROR;
1081: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1082: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1083: END IF;
1076: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
1077: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
1078: FND_MSG_PUB.add;
1079: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1080: RAISE FND_API.G_EXC_ERROR;
1081: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1082: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1083: END IF;
1084: end if;
1077: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
1078: FND_MSG_PUB.add;
1079: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1080: RAISE FND_API.G_EXC_ERROR;
1081: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1082: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1083: END IF;
1084: end if;
1085: end if;
1078: FND_MSG_PUB.add;
1079: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1080: RAISE FND_API.G_EXC_ERROR;
1081: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1082: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1083: END IF;
1084: end if;
1085: end if;
1086:
1101: P_END_DATE_ACTIVE => p_end_date_active,
1102: p_data => L_data,
1103: p_count => L_count,
1104: P_return_code => l_return_code);
1105: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
1106: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
1107: FND_MSG_PUB.add;
1108: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1109: RAISE FND_API.G_EXC_ERROR;
1104: P_return_code => l_return_code);
1105: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
1106: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
1107: FND_MSG_PUB.add;
1108: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1109: RAISE FND_API.G_EXC_ERROR;
1110: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1111: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1112: END IF;
1105: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
1106: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
1107: FND_MSG_PUB.add;
1108: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1109: RAISE FND_API.G_EXC_ERROR;
1110: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1111: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1112: END IF;
1113: end if;
1106: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
1107: FND_MSG_PUB.add;
1108: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1109: RAISE FND_API.G_EXC_ERROR;
1110: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1111: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1112: END IF;
1113: end if;
1114: end if;
1107: FND_MSG_PUB.add;
1108: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1109: RAISE FND_API.G_EXC_ERROR;
1110: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1111: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1112: END IF;
1113: end if;
1114: end if;
1115: end if;
1128: P_END_DATE_ACTIVE => p_end_date_active,
1129: p_data => L_data,
1130: p_count => L_count,
1131: P_return_code => l_return_code);
1132: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
1133: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
1134: FND_MSG_PUB.add;
1135: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1136: RAISE FND_API.G_EXC_ERROR;
1131: P_return_code => l_return_code);
1132: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
1133: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
1134: FND_MSG_PUB.add;
1135: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1136: RAISE FND_API.G_EXC_ERROR;
1137: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1138: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1139: END IF;
1132: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
1133: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
1134: FND_MSG_PUB.add;
1135: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1136: RAISE FND_API.G_EXC_ERROR;
1137: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1138: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1139: END IF;
1140: end if;
1133: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
1134: FND_MSG_PUB.add;
1135: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1136: RAISE FND_API.G_EXC_ERROR;
1137: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1138: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1139: END IF;
1140: end if;
1141: end if;
1134: FND_MSG_PUB.add;
1135: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1136: RAISE FND_API.G_EXC_ERROR;
1137: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1138: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1139: END IF;
1140: end if;
1141: end if;
1142: end if;
1184: p_bind_data_id => l_bind_data_id,
1185: x_return_code => x_return_status);
1186:
1187:
1188: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1189: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
1190: RAISE FND_API.G_EXC_ERROR;
1191: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
1192: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1185: x_return_code => x_return_status);
1186:
1187:
1188: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1189: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
1190: RAISE FND_API.G_EXC_ERROR;
1191: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
1192: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1193: END IF;
1186:
1187:
1188: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1189: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
1190: RAISE FND_API.G_EXC_ERROR;
1191: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
1192: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1193: END IF;
1194:
1187:
1188: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1189: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
1190: RAISE FND_API.G_EXC_ERROR;
1191: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
1192: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1193: END IF;
1194:
1195: END IF;
1188: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
1189: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
1190: RAISE FND_API.G_EXC_ERROR;
1191: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
1192: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1193: END IF;
1194:
1195: END IF;
1196:
1199: END IF;
1200: END IF;
1201:
1202: --standard commit
1203: IF fnd_api.to_boolean (p_commit)
1204: THEN
1205: COMMIT WORK;
1206: END IF;
1207:
1213:
1214: begin
1215: jtf_rs_wf_events_pub.create_resource_role_relate
1216: (p_api_version => 1.0
1217: ,p_init_msg_list => fnd_api.g_false
1218: ,p_commit => fnd_api.g_false
1219: ,p_role_relate_id => l_role_relate_id
1220: ,p_role_resource_type => l_role_resource_type
1221: ,p_role_resource_id => l_role_resource_id
1214: begin
1215: jtf_rs_wf_events_pub.create_resource_role_relate
1216: (p_api_version => 1.0
1217: ,p_init_msg_list => fnd_api.g_false
1218: ,p_commit => fnd_api.g_false
1219: ,p_role_relate_id => l_role_relate_id
1220: ,p_role_resource_type => l_role_resource_type
1221: ,p_role_resource_id => l_role_resource_id
1222: ,p_role_id => l_role_id
1232:
1233: /* End of publish API call */
1234:
1235: EXCEPTION
1236: WHEN fnd_api.g_exc_error THEN
1237: ROLLBACK TO ROLE_RELATE_SP;
1238: x_return_status := fnd_api.g_ret_sts_error;
1239: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
1240: p_data => x_msg_data);
1234:
1235: EXCEPTION
1236: WHEN fnd_api.g_exc_error THEN
1237: ROLLBACK TO ROLE_RELATE_SP;
1238: x_return_status := fnd_api.g_ret_sts_error;
1239: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
1240: p_data => x_msg_data);
1241: WHEN fnd_api.g_exc_unexpected_error THEN
1242: ROLLBACK TO ROLE_RELATE_SP;
1237: ROLLBACK TO ROLE_RELATE_SP;
1238: x_return_status := fnd_api.g_ret_sts_error;
1239: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
1240: p_data => x_msg_data);
1241: WHEN fnd_api.g_exc_unexpected_error THEN
1242: ROLLBACK TO ROLE_RELATE_SP;
1243: x_return_status := fnd_api.g_ret_sts_unexp_error;
1244: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
1245: p_data => x_msg_data);
1239: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
1240: p_data => x_msg_data);
1241: WHEN fnd_api.g_exc_unexpected_error THEN
1242: ROLLBACK TO ROLE_RELATE_SP;
1243: x_return_status := fnd_api.g_ret_sts_unexp_error;
1244: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
1245: p_data => x_msg_data);
1246: WHEN OTHERS THEN
1247: ROLLBACK TO ROLE_RELATE_SP;
1249: fnd_message.set_token('P_SQLCODE',SQLCODE);
1250: fnd_message.set_token('P_SQLERRM',SQLERRM);
1251: fnd_message.set_token('P_API_NAME', l_api_name);
1252: FND_MSG_PUB.add;
1253: x_return_status := fnd_api.g_ret_sts_unexp_error;
1254: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
1255: p_data => x_msg_data);
1256:
1257: END create_resource_role_relate;
1634:
1635: --Standard Start of API SAVEPOINT
1636: SAVEPOINT ROLE_RELATE_SP;
1637:
1638: x_return_status := fnd_api.g_ret_sts_success;
1639:
1640: --Standard Call to check API compatibility
1641: IF NOT FND_API.Compatible_API_CALL(L_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
1642: THEN
1637:
1638: x_return_status := fnd_api.g_ret_sts_success;
1639:
1640: --Standard Call to check API compatibility
1641: IF NOT FND_API.Compatible_API_CALL(L_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
1642: THEN
1643: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1644: END IF;
1645:
1639:
1640: --Standard Call to check API compatibility
1641: IF NOT FND_API.Compatible_API_CALL(L_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
1642: THEN
1643: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1644: END IF;
1645:
1646: --Initialize the message List if P_INIT_MSG_LIST is set to TRUE
1647: IF FND_API.To_boolean(P_INIT_MSG_LIST)
1643: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1644: END IF;
1645:
1646: --Initialize the message List if P_INIT_MSG_LIST is set to TRUE
1647: IF FND_API.To_boolean(P_INIT_MSG_LIST)
1648: THEN
1649: FND_MSG_PUB.Initialize;
1650: END IF;
1651:
1667: P_OBJECT_VERSION_NUM => P_OBJECT_VERSION_NUM,
1668: p_data => L_data,
1669: p_count => L_count,
1670: P_return_code => l_return_code);
1671: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
1672: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
1673: FND_MSG_PUB.add;
1674: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1675: RAISE FND_API.G_EXC_ERROR;
1670: P_return_code => l_return_code);
1671: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
1672: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
1673: FND_MSG_PUB.add;
1674: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1675: RAISE FND_API.G_EXC_ERROR;
1676: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1677: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1678: END IF;
1671: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
1672: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
1673: FND_MSG_PUB.add;
1674: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1675: RAISE FND_API.G_EXC_ERROR;
1676: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1677: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1678: END IF;
1679:
1672: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
1673: FND_MSG_PUB.add;
1674: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1675: RAISE FND_API.G_EXC_ERROR;
1676: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1677: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1678: END IF;
1679:
1680: end if;
1673: FND_MSG_PUB.add;
1674: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1675: RAISE FND_API.G_EXC_ERROR;
1676: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1677: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1678: END IF;
1679:
1680: end if;
1681: end if;
1694: P_OBJECT_VERSION_NUM => P_OBJECT_VERSION_NUM,
1695: p_data => L_data,
1696: p_count => L_count,
1697: P_return_code => l_return_code);
1698: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
1699: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
1700: FND_MSG_PUB.add;
1701: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1702: RAISE FND_API.G_EXC_ERROR;
1697: P_return_code => l_return_code);
1698: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
1699: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
1700: FND_MSG_PUB.add;
1701: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1702: RAISE FND_API.G_EXC_ERROR;
1703: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1704: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1705: END IF;
1698: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
1699: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
1700: FND_MSG_PUB.add;
1701: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1702: RAISE FND_API.G_EXC_ERROR;
1703: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1704: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1705: END IF;
1706:
1699: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
1700: FND_MSG_PUB.add;
1701: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1702: RAISE FND_API.G_EXC_ERROR;
1703: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1704: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1705: END IF;
1706:
1707: end if;
1700: FND_MSG_PUB.add;
1701: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1702: RAISE FND_API.G_EXC_ERROR;
1703: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1704: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1705: END IF;
1706:
1707: end if;
1708: end if;
1721: P_OBJECT_VERSION_NUM => P_OBJECT_VERSION_NUM,
1722: p_data => L_data,
1723: p_count => L_count,
1724: P_return_code => l_return_code);
1725: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
1726: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
1727: FND_MSG_PUB.add;
1728: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1729: RAISE FND_API.G_EXC_ERROR;
1724: P_return_code => l_return_code);
1725: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
1726: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
1727: FND_MSG_PUB.add;
1728: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1729: RAISE FND_API.G_EXC_ERROR;
1730: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1731: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1732: END IF;
1725: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
1726: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
1727: FND_MSG_PUB.add;
1728: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1729: RAISE FND_API.G_EXC_ERROR;
1730: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1731: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1732: END IF;
1733: end if;
1726: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
1727: FND_MSG_PUB.add;
1728: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1729: RAISE FND_API.G_EXC_ERROR;
1730: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1731: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1732: END IF;
1733: end if;
1734: end if;
1727: FND_MSG_PUB.add;
1728: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
1729: RAISE FND_API.G_EXC_ERROR;
1730: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
1731: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1732: END IF;
1733: end if;
1734: end if;
1735: end if;
1748:
1749: l_role_resource_type := role_relate_rec.role_resource_type;
1750: l_role_resource_id := role_relate_rec.role_resource_id;
1751: l_role_id := role_relate_rec.role_id;
1752: IF(p_start_date_active = FND_API.G_MISS_DATE)
1753: THEN
1754: l_start_date_active := role_relate_rec.start_date_active;
1755: ELSE
1756: l_start_date_active := p_start_date_active;
1754: l_start_date_active := role_relate_rec.start_date_active;
1755: ELSE
1756: l_start_date_active := p_start_date_active;
1757: END IF;
1758: IF(p_end_date_active = FND_API.G_MISS_DATE)
1759: THEN
1760: l_end_date_active := role_relate_rec.end_date_active;
1761: ELSE
1762: l_end_date_active := p_end_date_active;
1760: l_end_date_active := role_relate_rec.end_date_active;
1761: ELSE
1762: l_end_date_active := p_end_date_active;
1763: END IF;
1764: IF(p_attribute1 = FND_API.G_MISS_CHAR)
1765: THEN
1766: l_attribute1 := role_relate_rec.attribute1;
1767: ELSE
1768: l_attribute1 := p_attribute1;
1766: l_attribute1 := role_relate_rec.attribute1;
1767: ELSE
1768: l_attribute1 := p_attribute1;
1769: END IF;
1770: IF(p_attribute2= FND_API.G_MISS_CHAR)
1771: THEN
1772: l_attribute2 := role_relate_rec.attribute2;
1773: ELSE
1774: l_attribute2 := p_attribute2;
1772: l_attribute2 := role_relate_rec.attribute2;
1773: ELSE
1774: l_attribute2 := p_attribute2;
1775: END IF;
1776: IF(p_attribute3 = FND_API.G_MISS_CHAR)
1777: THEN
1778: l_attribute3 := role_relate_rec.attribute3;
1779: ELSE
1780: l_attribute3 := p_attribute3;
1778: l_attribute3 := role_relate_rec.attribute3;
1779: ELSE
1780: l_attribute3 := p_attribute3;
1781: END IF;
1782: IF(p_attribute4 = FND_API.G_MISS_CHAR)
1783: THEN
1784: l_attribute4 := role_relate_rec.attribute1;
1785: ELSE
1786: l_attribute4 := p_attribute4;
1784: l_attribute4 := role_relate_rec.attribute1;
1785: ELSE
1786: l_attribute4 := p_attribute4;
1787: END IF;
1788: IF(p_attribute5 = FND_API.G_MISS_CHAR)
1789: THEN
1790: l_attribute5 := role_relate_rec.attribute5;
1791: ELSE
1792: l_attribute5 := p_attribute5;
1790: l_attribute5 := role_relate_rec.attribute5;
1791: ELSE
1792: l_attribute5 := p_attribute5;
1793: END IF;
1794: IF(p_attribute6 = FND_API.G_MISS_CHAR)
1795: THEN
1796: l_attribute6 := role_relate_rec.attribute1;
1797: ELSE
1798: l_attribute6 := p_attribute6;
1796: l_attribute6 := role_relate_rec.attribute1;
1797: ELSE
1798: l_attribute6 := p_attribute6;
1799: END IF;
1800: IF(p_attribute7 = FND_API.G_MISS_CHAR)
1801: THEN
1802: l_attribute7 := role_relate_rec.attribute7;
1803: ELSE
1804: l_attribute7 := p_attribute7;
1802: l_attribute7 := role_relate_rec.attribute7;
1803: ELSE
1804: l_attribute7 := p_attribute7;
1805: END IF;
1806: IF(p_attribute8 = FND_API.G_MISS_CHAR)
1807: THEN
1808: l_attribute8 := role_relate_rec.attribute8;
1809: ELSE
1810: l_attribute8 := p_attribute8;
1808: l_attribute8 := role_relate_rec.attribute8;
1809: ELSE
1810: l_attribute8 := p_attribute8;
1811: END IF;
1812: IF(p_attribute9 = FND_API.G_MISS_CHAR)
1813: THEN
1814: l_attribute9 := role_relate_rec.attribute9;
1815: ELSE
1816: l_attribute9 := p_attribute9;
1814: l_attribute9 := role_relate_rec.attribute9;
1815: ELSE
1816: l_attribute9 := p_attribute9;
1817: END IF;
1818: IF(p_attribute10 = FND_API.G_MISS_CHAR)
1819: THEN
1820: l_attribute10 := role_relate_rec.attribute10;
1821: ELSE
1822: l_attribute10 := p_attribute10;
1820: l_attribute10 := role_relate_rec.attribute10;
1821: ELSE
1822: l_attribute10 := p_attribute10;
1823: END IF;
1824: IF(p_attribute11 = FND_API.G_MISS_CHAR)
1825: THEN
1826: l_attribute11 := role_relate_rec.attribute11;
1827: ELSE
1828: l_attribute11 := p_attribute11;
1826: l_attribute11 := role_relate_rec.attribute11;
1827: ELSE
1828: l_attribute11 := p_attribute11;
1829: END IF;
1830: IF(p_attribute12 = FND_API.G_MISS_CHAR)
1831: THEN
1832: l_attribute12 := role_relate_rec.attribute12;
1833: ELSE
1834: l_attribute12 := p_attribute12;
1832: l_attribute12 := role_relate_rec.attribute12;
1833: ELSE
1834: l_attribute12 := p_attribute12;
1835: END IF;
1836: IF(p_attribute13 = FND_API.G_MISS_CHAR)
1837: THEN
1838: l_attribute13 := role_relate_rec.attribute13;
1839: ELSE
1840: l_attribute13 := p_attribute13;
1838: l_attribute13 := role_relate_rec.attribute13;
1839: ELSE
1840: l_attribute13 := p_attribute13;
1841: END IF;
1842: IF(p_attribute14 = FND_API.G_MISS_CHAR)
1843: THEN
1844: l_attribute14 := role_relate_rec.attribute14;
1845: ELSE
1846: l_attribute14 := p_attribute14;
1844: l_attribute14 := role_relate_rec.attribute14;
1845: ELSE
1846: l_attribute14 := p_attribute14;
1847: END IF;
1848: IF(p_attribute15 = FND_API.G_MISS_CHAR)
1849: THEN
1850: l_attribute15 := role_relate_rec.attribute15;
1851: ELSE
1852: l_attribute15 := p_attribute15;
1851: ELSE
1852: l_attribute15 := p_attribute15;
1853: END IF;
1854:
1855: IF(p_attribute_category = FND_API.G_MISS_CHAR)
1856: THEN
1857: l_attribute_category := role_relate_rec.attribute_category;
1858: ELSE
1859: l_attribute_category := p_attribute_category;
1872: IF(l_start_date_active is NULL)
1873: THEN
1874: fnd_message.set_name ('JTF', 'JTF_RS_DATE_RANGE_ERR');
1875: FND_MSG_PUB.add;
1876: RAISE fnd_api.g_exc_error;
1877: END IF;
1878:
1879:
1880:
1883: THEN
1884:
1885: fnd_message.set_name ('JTF', 'JTF_RS_DATE_RANGE_ERR');
1886: FND_MSG_PUB.add;
1887: RAISE fnd_api.g_exc_error;
1888: END IF;
1889:
1890:
1891: IF(l_role_resource_type = 'RS_TEAM' or
1899:
1900: if (l_role_type_valid = false) then
1901: fnd_message.set_name ('JTF', 'JTF_RS_ROLE_TYPE_INACTIVE');
1902: FND_MSG_PUB.add;
1903: RAISE fnd_api.g_exc_error;
1904: end if;
1905: END IF;
1906:
1907:
1926: l_date_invalid := TRUE;
1927: END IF;
1928:
1929: --IF((l_end_date_active between check_date_rec.start_date_active and check_date_rec.end_date_active)
1930: IF((to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR')
1931: between check_date_rec.start_date_active and
1932: to_date(to_char(nvl(check_date_rec.end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))
1933: OR (l_end_date_active IS NULL AND
1934: check_date_rec.end_date_active IS NULL))
1928:
1929: --IF((l_end_date_active between check_date_rec.start_date_active and check_date_rec.end_date_active)
1930: IF((to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR')
1931: between check_date_rec.start_date_active and
1932: to_date(to_char(nvl(check_date_rec.end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))
1933: OR (l_end_date_active IS NULL AND
1934: check_date_rec.end_date_active IS NULL))
1935: THEN
1936:
1937: l_date_invalid := TRUE;
1938: END IF;
1939: -- added this check as a date range outside of the existing ranges was getting entered
1940: if(l_start_date_active < check_date_rec.start_date_active
1941: and to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR') >
1942: to_date(to_char(nvl(check_date_rec.end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))
1943: THEN
1944: l_date_invalid := TRUE;
1945: END IF;
1938: END IF;
1939: -- added this check as a date range outside of the existing ranges was getting entered
1940: if(l_start_date_active < check_date_rec.start_date_active
1941: and to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR') >
1942: to_date(to_char(nvl(check_date_rec.end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))
1943: THEN
1944: l_date_invalid := TRUE;
1945: END IF;
1946:
1954: IF(l_date_invalid)
1955: THEN
1956: fnd_message.set_name ('JTF', 'JTF_RS_DATE_RANGE_ERR');
1957: FND_MSG_PUB.add;
1958: RAISE fnd_api.g_exc_error;
1959: END IF;
1960:
1961: --end of overlapping date range check
1962:
2003:
2004: l_role_valid := FALSE;
2005: fnd_message.set_name ('JTF', 'JTF_RS_ROLE_OR_DATE_ERR');
2006: FND_MSG_PUB.add;
2007: RAISE fnd_api.g_exc_error;
2008: END IF;
2009: close res_role_cur;
2010: ELSIF((l_role_resource_type = 'RS_TEAM_MEMBER') AND
2011: (l_team_resource_type = 'GROUP'))
2026: ELSE
2027: l_role_valid := FALSE;
2028: fnd_message.set_name ('JTF', 'JTF_RS_ROLE_OR_DATE_ERR');
2029: FND_MSG_PUB.add;
2030: RAISE fnd_api.g_exc_error;
2031: END IF;
2032: close grp_role_cur;
2033:
2034: END IF;
2041: open team_cur(l_role_resource_id);
2042: fetch team_cur INTO team_rec;
2043: close team_cur;
2044: IF((trunc(team_rec.start_date_active) > trunc(l_start_date_active))
2045: OR to_date(to_char(nvl(team_rec.end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR') < to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))
2046: THEN
2047: fnd_message.set_name ('JTF', 'JTF_RS_TM_GRP_DT_ERR');
2048: FND_MSG_PUB.add;
2049: RAISE fnd_api.g_exc_error;
2045: OR to_date(to_char(nvl(team_rec.end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR') < to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))
2046: THEN
2047: fnd_message.set_name ('JTF', 'JTF_RS_TM_GRP_DT_ERR');
2048: FND_MSG_PUB.add;
2049: RAISE fnd_api.g_exc_error;
2050: END IF;
2051:
2052: IF(team_rec.end_date_active is not null AND l_end_date_active is null)
2053: THEN
2052: IF(team_rec.end_date_active is not null AND l_end_date_active is null)
2053: THEN
2054: fnd_message.set_name ('JTF', 'JTF_RS_TM_GRP_DT_ERR');
2055: FND_MSG_PUB.add;
2056: RAISE fnd_api.g_exc_error;
2057: END IF;
2058:
2059: ELSIF(l_role_resource_type = 'RS_GROUP_MEMBER')
2060: THEN
2062: fetch group_cur INTO group_rec;
2063: close group_cur;
2064:
2065: IF((trunc(group_rec.start_date_active) > trunc(l_start_date_active))
2066: OR to_date(to_char(nvl(group_rec.end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR') < to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))
2067: THEN
2068:
2069: fnd_message.set_name ('JTF', 'JTF_RS_TM_GRP_DT_ERR');
2070: FND_MSG_PUB.add;
2067: THEN
2068:
2069: fnd_message.set_name ('JTF', 'JTF_RS_TM_GRP_DT_ERR');
2070: FND_MSG_PUB.add;
2071: RAISE fnd_api.g_exc_error;
2072: END IF;
2073:
2074:
2075:
2076: IF(group_rec.end_date_active is not null AND l_end_date_active is null)
2077: THEN
2078: fnd_message.set_name ('JTF', 'JTF_RS_TM_GRP_DT_ERR');
2079: FND_MSG_PUB.add;
2080: RAISE fnd_api.g_exc_error;
2081: END IF;
2082:
2083: --exclusive flag validation
2084: open c_exclusive_group_check_cur(l_role_resource_id,
2089: IF(c_exclusive_group_check_cur%FOUND)
2090: THEN
2091: fnd_message.set_name ('JTF', 'JTF_RS_RES_USAGE_ERR');
2092: FND_MSG_PUB.add;
2093: RAISE fnd_api.g_exc_error;
2094: END IF;
2095:
2096: close c_exclusive_group_check_cur;
2097: ELSIF(l_role_resource_type = 'RS_INDIVIDUAL')
2102: close rsc_cur;
2103:
2104: IF((rsc_rec.start_date_active > l_start_date_active)
2105: --changed by sudarsana 11 feb 2002
2106: OR (rsc_rec.end_date_active < to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR')))
2107: -- OR (rsc_rec.end_date_active < l_end_date_active))
2108: THEN
2109: fnd_message.set_name ('JTF', 'JTF_RS_RES_DATE_ERR');
2110: FND_MSG_PUB.add;
2107: -- OR (rsc_rec.end_date_active < l_end_date_active))
2108: THEN
2109: fnd_message.set_name ('JTF', 'JTF_RS_RES_DATE_ERR');
2110: FND_MSG_PUB.add;
2111: RAISE fnd_api.g_exc_error;
2112: END IF;
2113:
2114: ELSIF(l_role_resource_type = 'RS_GROUP')
2115: THEN
2118: close group_dt_cur;
2119: IF((group_dt_rec.start_date_active > l_start_date_active)
2120: -- changed by nsinghai 20 May 2002 to handle null value of l_end_date_active
2121: --OR (group_dt_rec.end_date_active < l_end_date_active))
2122: OR (to_date(to_char(nvl(group_dt_rec.end_date_active,fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR')
2123: < (to_date(to_char(nvl(l_end_date_active,fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))))
2124: THEN
2125: fnd_message.set_name ('JTF', 'JTF_RS_GRP_DT_ERR');
2126: FND_MSG_PUB.add;
2119: IF((group_dt_rec.start_date_active > l_start_date_active)
2120: -- changed by nsinghai 20 May 2002 to handle null value of l_end_date_active
2121: --OR (group_dt_rec.end_date_active < l_end_date_active))
2122: OR (to_date(to_char(nvl(group_dt_rec.end_date_active,fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR')
2123: < (to_date(to_char(nvl(l_end_date_active,fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))))
2124: THEN
2125: fnd_message.set_name ('JTF', 'JTF_RS_GRP_DT_ERR');
2126: FND_MSG_PUB.add;
2127: RAISE fnd_api.g_exc_error;
2123: < (to_date(to_char(nvl(l_end_date_active,fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))))
2124: THEN
2125: fnd_message.set_name ('JTF', 'JTF_RS_GRP_DT_ERR');
2126: FND_MSG_PUB.add;
2127: RAISE fnd_api.g_exc_error;
2128: END IF;
2129: ELSIF(l_role_resource_type = 'RS_TEAM')
2130: THEN
2131: open team_dt_cur(l_role_resource_id);
2133: close team_dt_cur;
2134: IF((team_dt_rec.start_date_active > l_start_date_active)
2135: -- changed by nsinghai 20 May 2002 to handle null value of l_end_date_active
2136: --OR (team_dt_rec.end_date_active < l_end_date_active))
2137: OR (to_date(to_char(nvl(team_dt_rec.end_date_active,fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR')
2138: < (to_date(to_char(nvl(l_end_date_active,fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))))
2139: THEN
2140: fnd_message.set_name ('JTF', 'JTF_RS_TEAM_DT_ERR');
2141: FND_MSG_PUB.add;
2134: IF((team_dt_rec.start_date_active > l_start_date_active)
2135: -- changed by nsinghai 20 May 2002 to handle null value of l_end_date_active
2136: --OR (team_dt_rec.end_date_active < l_end_date_active))
2137: OR (to_date(to_char(nvl(team_dt_rec.end_date_active,fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR')
2138: < (to_date(to_char(nvl(l_end_date_active,fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))))
2139: THEN
2140: fnd_message.set_name ('JTF', 'JTF_RS_TEAM_DT_ERR');
2141: FND_MSG_PUB.add;
2142: RAISE fnd_api.g_exc_error;
2138: < (to_date(to_char(nvl(l_end_date_active,fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))))
2139: THEN
2140: fnd_message.set_name ('JTF', 'JTF_RS_TEAM_DT_ERR');
2141: FND_MSG_PUB.add;
2142: RAISE fnd_api.g_exc_error;
2143: END IF;
2144: END IF;
2145:
2146: --if resource type is RS_INDIVIDUAL then check whether the start and end dates do not
2155:
2156: If(res_team_cur%found)
2157: THEN
2158:
2159: x_return_status := fnd_api.g_ret_sts_error;
2160: fnd_message.set_name ('JTF', 'JTF_RS_RES_MEM_DT_ERR');
2161: FND_MSG_PUB.add;
2162: RAISE fnd_api.g_exc_error;
2163: END IF;
2158:
2159: x_return_status := fnd_api.g_ret_sts_error;
2160: fnd_message.set_name ('JTF', 'JTF_RS_RES_MEM_DT_ERR');
2161: FND_MSG_PUB.add;
2162: RAISE fnd_api.g_exc_error;
2163: END IF;
2164: close res_team_cur;
2165:
2166: open res_group_cur(l_role_resource_id,
2172: If(res_group_cur%found)
2173: THEN
2174: fnd_message.set_name ('JTF', 'JTF_RS_RES_MEM_DT_ERR');
2175: FND_MSG_PUB.add;
2176: RAISE fnd_api.g_exc_error;
2177: END IF;
2178: close res_group_cur;
2179:
2180:
2192: If NOT(l_valid)
2193: THEN
2194: --fnd_message.set_name ('JTF', 'JTF_RS_RES_UPD_DT_ERR');
2195: --FND_MSG_PUB.add;
2196: RAISE fnd_api.g_exc_error;
2197: END IF;
2198:
2199: END IF;
2200:
2210:
2211: WHEN OTHERS THEN
2212: fnd_message.set_name('JTF', 'JTF_RS_ROW_LOCK_ERROR');
2213: fnd_msg_pub.add;
2214: RAISE fnd_api.g_exc_error;
2215:
2216: END;
2217:
2218: l_object_version_number := l_object_version_number +1;
2232: X_RETURN_STATUS => l_return_status,
2233: X_MSG_COUNT => l_msg_count,
2234: X_MSG_DATA => l_msg_data );
2235:
2236: IF(l_return_status <> fnd_api.g_ret_sts_success)
2237: THEN
2238: fnd_message.set_name ('JTF', 'JTF_RS_AUDIT_ERR');
2239: FND_MSG_PUB.add;
2240: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
2236: IF(l_return_status <> fnd_api.g_ret_sts_success)
2237: THEN
2238: fnd_message.set_name ('JTF', 'JTF_RS_AUDIT_ERR');
2239: FND_MSG_PUB.add;
2240: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
2241: RAISE FND_API.G_EXC_ERROR;
2242: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
2243: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2244: END IF;
2237: THEN
2238: fnd_message.set_name ('JTF', 'JTF_RS_AUDIT_ERR');
2239: FND_MSG_PUB.add;
2240: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
2241: RAISE FND_API.G_EXC_ERROR;
2242: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
2243: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2244: END IF;
2245:
2238: fnd_message.set_name ('JTF', 'JTF_RS_AUDIT_ERR');
2239: FND_MSG_PUB.add;
2240: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
2241: RAISE FND_API.G_EXC_ERROR;
2242: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
2243: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2244: END IF;
2245:
2246: END IF;
2239: FND_MSG_PUB.add;
2240: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
2241: RAISE FND_API.G_EXC_ERROR;
2242: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
2243: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2244: END IF;
2245:
2246: END IF;
2247:
2251: begin
2252:
2253: jtf_rs_wf_events_pub.update_resource_role_relate
2254: (p_api_version => 1.0
2255: ,p_init_msg_list => fnd_api.g_false
2256: ,p_commit => fnd_api.g_false
2257: ,p_role_relate_id => l_role_relate_id
2258: ,p_role_resource_type => l_role_resource_type
2259: ,p_role_resource_id => l_role_resource_id
2252:
2253: jtf_rs_wf_events_pub.update_resource_role_relate
2254: (p_api_version => 1.0
2255: ,p_init_msg_list => fnd_api.g_false
2256: ,p_commit => fnd_api.g_false
2257: ,p_role_relate_id => l_role_relate_id
2258: ,p_role_resource_type => l_role_resource_type
2259: ,p_role_resource_id => l_role_resource_id
2260: ,p_role_id => l_role_id
2357: fnd_message.set_token('P_SQLCODE',SQLCODE);
2358: fnd_message.set_token('P_SQLERRM',SQLERRM);
2359: fnd_message.set_token('P_API_NAME', l_api_name);
2360: FND_MSG_PUB.add;
2361: RAISE fnd_api.g_exc_unexpected_error;
2362:
2363:
2364: end;
2365:
2384: fnd_message.set_token('P_SQLCODE',SQLCODE);
2385: fnd_message.set_token('P_SQLERRM',SQLERRM);
2386: fnd_message.set_token('P_API_NAME', l_api_name);
2387: FND_MSG_PUB.add;
2388: RAISE fnd_api.g_exc_unexpected_error;
2389: end;
2390:
2391: else
2392:
2401: X_RETURN_STATUS => l_return_status,
2402: X_MSG_COUNT => l_msg_count,
2403: X_MSG_DATA => l_msg_data);
2404:
2405: IF(l_return_status <> fnd_api.g_ret_sts_success)
2406: THEN
2407: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
2408: RAISE FND_API.G_EXC_ERROR;
2409: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
2403: X_MSG_DATA => l_msg_data);
2404:
2405: IF(l_return_status <> fnd_api.g_ret_sts_success)
2406: THEN
2407: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
2408: RAISE FND_API.G_EXC_ERROR;
2409: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
2410: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2411: END IF;
2404:
2405: IF(l_return_status <> fnd_api.g_ret_sts_success)
2406: THEN
2407: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
2408: RAISE FND_API.G_EXC_ERROR;
2409: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
2410: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2411: END IF;
2412:
2405: IF(l_return_status <> fnd_api.g_ret_sts_success)
2406: THEN
2407: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
2408: RAISE FND_API.G_EXC_ERROR;
2409: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
2410: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2411: END IF;
2412:
2413:
2406: THEN
2407: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
2408: RAISE FND_API.G_EXC_ERROR;
2409: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
2410: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2411: END IF;
2412:
2413:
2414: END IF;
2425: P_OBJECT_VERSION_NUM => P_OBJECT_VERSION_NUM,
2426: p_data => L_data,
2427: p_count => L_count,
2428: P_return_code => l_return_code);
2429: if( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
2430: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
2431: FND_MSG_PUB.add;
2432: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2433: RAISE FND_API.G_EXC_ERROR;
2428: P_return_code => l_return_code);
2429: if( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
2430: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
2431: FND_MSG_PUB.add;
2432: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2433: RAISE FND_API.G_EXC_ERROR;
2434: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2435: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2436: END IF;
2429: if( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
2430: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
2431: FND_MSG_PUB.add;
2432: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2433: RAISE FND_API.G_EXC_ERROR;
2434: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2435: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2436: END IF;
2437:
2430: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
2431: FND_MSG_PUB.add;
2432: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2433: RAISE FND_API.G_EXC_ERROR;
2434: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2435: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2436: END IF;
2437:
2438: end if;
2431: FND_MSG_PUB.add;
2432: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2433: RAISE FND_API.G_EXC_ERROR;
2434: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2435: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2436: END IF;
2437:
2438: end if;
2439: end if;
2451: P_OBJECT_VERSION_NUM => P_OBJECT_VERSION_NUM,
2452: p_data => L_data,
2453: p_count => L_count,
2454: P_return_code => l_return_code);
2455: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
2456: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
2457: FND_MSG_PUB.add;
2458: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2459: RAISE FND_API.G_EXC_ERROR;
2454: P_return_code => l_return_code);
2455: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
2456: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
2457: FND_MSG_PUB.add;
2458: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2459: RAISE FND_API.G_EXC_ERROR;
2460: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2461: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2462: END IF;
2455: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
2456: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
2457: FND_MSG_PUB.add;
2458: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2459: RAISE FND_API.G_EXC_ERROR;
2460: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2461: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2462: END IF;
2463:
2456: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
2457: FND_MSG_PUB.add;
2458: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2459: RAISE FND_API.G_EXC_ERROR;
2460: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2461: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2462: END IF;
2463:
2464: end if;
2457: FND_MSG_PUB.add;
2458: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2459: RAISE FND_API.G_EXC_ERROR;
2460: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2461: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2462: END IF;
2463:
2464: end if;
2465: end if;
2479: P_OBJECT_VERSION_NUM => P_OBJECT_VERSION_NUM,
2480: p_data => L_data,
2481: p_count => L_count,
2482: P_return_code => l_return_code);
2483: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS)
2484: then
2485: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
2486: FND_MSG_PUB.add;
2487: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2483: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS)
2484: then
2485: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
2486: FND_MSG_PUB.add;
2487: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2488: RAISE FND_API.G_EXC_ERROR;
2489: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2490: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2491: END IF;
2484: then
2485: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
2486: FND_MSG_PUB.add;
2487: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2488: RAISE FND_API.G_EXC_ERROR;
2489: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2490: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2491: END IF;
2492: end if;
2485: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
2486: FND_MSG_PUB.add;
2487: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2488: RAISE FND_API.G_EXC_ERROR;
2489: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2490: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2491: END IF;
2492: end if;
2493: end if;
2486: FND_MSG_PUB.add;
2487: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2488: RAISE FND_API.G_EXC_ERROR;
2489: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2490: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2491: END IF;
2492: end if;
2493: end if;
2494: end if;
2533: p_bind_data_id => l_bind_data_id,
2534: x_return_code => x_return_status);
2535:
2536:
2537: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
2538: -- x_return_status := fnd_api.g_ret_sts_error;
2539:
2540: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
2541: fnd_msg_pub.add;
2534: x_return_code => x_return_status);
2535:
2536:
2537: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
2538: -- x_return_status := fnd_api.g_ret_sts_error;
2539:
2540: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
2541: fnd_msg_pub.add;
2542: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
2538: -- x_return_status := fnd_api.g_ret_sts_error;
2539:
2540: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
2541: fnd_msg_pub.add;
2542: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
2543: RAISE FND_API.G_EXC_ERROR;
2544: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
2545: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2546: END IF;
2539:
2540: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
2541: fnd_msg_pub.add;
2542: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
2543: RAISE FND_API.G_EXC_ERROR;
2544: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
2545: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2546: END IF;
2547:
2540: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
2541: fnd_msg_pub.add;
2542: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
2543: RAISE FND_API.G_EXC_ERROR;
2544: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
2545: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2546: END IF;
2547:
2548:
2541: fnd_msg_pub.add;
2542: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
2543: RAISE FND_API.G_EXC_ERROR;
2544: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
2545: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2546: END IF;
2547:
2548:
2549: END IF;
2556:
2557:
2558:
2559:
2560: IF fnd_api.to_boolean (p_commit)
2561: THEN
2562: COMMIT WORK;
2563: END IF;
2564:
2565:
2566: FND_MSG_PUB.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
2567:
2568: EXCEPTION
2569: WHEN fnd_api.g_exc_error THEN
2570: ROLLBACK TO ROLE_RELATE_SP;
2571: x_return_status := fnd_api.g_ret_sts_error;
2572: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
2573: p_data => x_msg_data);
2567:
2568: EXCEPTION
2569: WHEN fnd_api.g_exc_error THEN
2570: ROLLBACK TO ROLE_RELATE_SP;
2571: x_return_status := fnd_api.g_ret_sts_error;
2572: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
2573: p_data => x_msg_data);
2574: WHEN fnd_api.g_exc_unexpected_error THEN
2575: ROLLBACK TO ROLE_RELATE_SP;
2570: ROLLBACK TO ROLE_RELATE_SP;
2571: x_return_status := fnd_api.g_ret_sts_error;
2572: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
2573: p_data => x_msg_data);
2574: WHEN fnd_api.g_exc_unexpected_error THEN
2575: ROLLBACK TO ROLE_RELATE_SP;
2576: x_return_status := fnd_api.g_ret_sts_unexp_error;
2577: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
2578: p_data => x_msg_data);
2572: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
2573: p_data => x_msg_data);
2574: WHEN fnd_api.g_exc_unexpected_error THEN
2575: ROLLBACK TO ROLE_RELATE_SP;
2576: x_return_status := fnd_api.g_ret_sts_unexp_error;
2577: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
2578: p_data => x_msg_data);
2579: WHEN OTHERS THEN
2580: ROLLBACK TO ROLE_RELATE_SP;
2582: fnd_message.set_token('P_SQLCODE',SQLCODE);
2583: fnd_message.set_token('P_SQLERRM',SQLERRM);
2584: fnd_message.set_token('P_API_NAME', l_api_name);
2585: FND_MSG_PUB.add;
2586: x_return_status := fnd_api.g_ret_sts_unexp_error;
2587: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
2588: p_data => x_msg_data);
2589:
2590: END update_resource_role_relate;
2646: AND rlt.role_resource_id = mem.group_member_id
2647: AND rlt.role_resource_type = 'RS_GROUP_MEMBER'
2648: AND rlt.role_id = l_role_id
2649: --AND nvl(end_date_active, TRUNC(sysdate) + 1) > TRUNC(sysdate)
2650: AND (start_date_active between l_start_date_active and to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR')
2651: OR to_date(to_char(nvl(end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR') between l_start_date_active and to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))
2652: AND nvl(rlt.delete_flag, '0') <> 'Y';
2653:
2654: chk_grp_rec chk_grp_cur%rowtype;
2647: AND rlt.role_resource_type = 'RS_GROUP_MEMBER'
2648: AND rlt.role_id = l_role_id
2649: --AND nvl(end_date_active, TRUNC(sysdate) + 1) > TRUNC(sysdate)
2650: AND (start_date_active between l_start_date_active and to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR')
2651: OR to_date(to_char(nvl(end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR') between l_start_date_active and to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))
2652: AND nvl(rlt.delete_flag, '0') <> 'Y';
2653:
2654: chk_grp_rec chk_grp_cur%rowtype;
2655:
2666: AND rlt.role_resource_id = mem.team_member_id
2667: AND rlt.role_resource_type = 'RS_TEAM_MEMBER'
2668: AND rlt.role_id = l_role_id
2669: --AND nvl(rlt.end_date_active, TRUNC(sysdate) + 1) > TRUNC(sysdate)
2670: AND (start_date_active between l_start_date_active and to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR')
2671: OR to_date(to_char(nvl(end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR') between l_start_date_active and to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))
2672: AND nvl(rlt.delete_flag, '0') <> 'Y';
2673:
2674:
2667: AND rlt.role_resource_type = 'RS_TEAM_MEMBER'
2668: AND rlt.role_id = l_role_id
2669: --AND nvl(rlt.end_date_active, TRUNC(sysdate) + 1) > TRUNC(sysdate)
2670: AND (start_date_active between l_start_date_active and to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR')
2671: OR to_date(to_char(nvl(end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR') between l_start_date_active and to_date(to_char(nvl(l_end_date_active, fnd_api.g_miss_date),'DD-MM-RRRR'),'DD-MM-RRRR'))
2672: AND nvl(rlt.delete_flag, '0') <> 'Y';
2673:
2674:
2675: chk_team_rec chk_team_cur%rowtype;
2754:
2755: --Standard Start of API SAVEPOINT
2756: SAVEPOINT ROLE_RELATE_SP;
2757:
2758: x_return_status := fnd_api.g_ret_sts_success;
2759:
2760: --Standard Call to check API compatibility
2761: IF NOT FND_API.Compatible_API_CALL(L_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
2762: THEN
2757:
2758: x_return_status := fnd_api.g_ret_sts_success;
2759:
2760: --Standard Call to check API compatibility
2761: IF NOT FND_API.Compatible_API_CALL(L_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
2762: THEN
2763: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2764: END IF;
2765:
2759:
2760: --Standard Call to check API compatibility
2761: IF NOT FND_API.Compatible_API_CALL(L_API_VERSION,P_API_VERSION,L_API_NAME,G_PKG_NAME)
2762: THEN
2763: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2764: END IF;
2765:
2766: --Initialize the message List if P_INIT_MSG_LIST is set to TRUE
2767: IF FND_API.To_boolean(P_INIT_MSG_LIST)
2763: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2764: END IF;
2765:
2766: --Initialize the message List if P_INIT_MSG_LIST is set to TRUE
2767: IF FND_API.To_boolean(P_INIT_MSG_LIST)
2768: THEN
2769: FND_MSG_PUB.Initialize;
2770: END IF;
2771:
2779: P_OBJECT_VERSION_NUM => p_object_version_num,
2780: p_data => L_data,
2781: p_count => L_count,
2782: P_return_code => l_return_code);
2783: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
2784: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
2785: FND_MSG_PUB.add;
2786: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2787: RAISE FND_API.G_EXC_ERROR;
2782: P_return_code => l_return_code);
2783: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
2784: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
2785: FND_MSG_PUB.add;
2786: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2787: RAISE FND_API.G_EXC_ERROR;
2788: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2789: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2790: END IF;
2783: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
2784: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
2785: FND_MSG_PUB.add;
2786: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2787: RAISE FND_API.G_EXC_ERROR;
2788: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2789: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2790: END IF;
2791:
2784: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_CUST_USR_HOOK');
2785: FND_MSG_PUB.add;
2786: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2787: RAISE FND_API.G_EXC_ERROR;
2788: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2789: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2790: END IF;
2791:
2792: end if;
2785: FND_MSG_PUB.add;
2786: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2787: RAISE FND_API.G_EXC_ERROR;
2788: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2789: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2790: END IF;
2791:
2792: end if;
2793: end if;
2804: P_OBJECT_VERSION_NUM => p_object_version_num,
2805: p_data => L_data,
2806: p_count => L_count,
2807: P_return_code => l_return_code);
2808: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
2809: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
2810: FND_MSG_PUB.add;
2811: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2812: RAISE FND_API.G_EXC_ERROR;
2807: P_return_code => l_return_code);
2808: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
2809: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
2810: FND_MSG_PUB.add;
2811: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2812: RAISE FND_API.G_EXC_ERROR;
2813: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2814: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2815: END IF;
2808: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
2809: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
2810: FND_MSG_PUB.add;
2811: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2812: RAISE FND_API.G_EXC_ERROR;
2813: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2814: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2815: END IF;
2816:
2809: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_VERT_USR_HOOK');
2810: FND_MSG_PUB.add;
2811: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2812: RAISE FND_API.G_EXC_ERROR;
2813: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2814: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2815: END IF;
2816:
2817: end if;
2810: FND_MSG_PUB.add;
2811: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2812: RAISE FND_API.G_EXC_ERROR;
2813: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2814: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2815: END IF;
2816:
2817: end if;
2818: end if;
2829: P_OBJECT_VERSION_NUM => p_object_version_num,
2830: p_data => L_data,
2831: p_count => L_count,
2832: P_return_code => l_return_code);
2833: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
2834: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
2835: FND_MSG_PUB.add;
2836: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2837: RAISE FND_API.G_EXC_ERROR;
2832: P_return_code => l_return_code);
2833: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
2834: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
2835: FND_MSG_PUB.add;
2836: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2837: RAISE FND_API.G_EXC_ERROR;
2838: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2839: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2840: END IF;
2833: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
2834: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
2835: FND_MSG_PUB.add;
2836: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2837: RAISE FND_API.G_EXC_ERROR;
2838: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2839: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2840: END IF;
2841:
2834: fnd_message.set_name ('JTF', 'JTF_RS_ERR_PRE_INT_USR_HOOK');
2835: FND_MSG_PUB.add;
2836: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2837: RAISE FND_API.G_EXC_ERROR;
2838: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2839: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2840: END IF;
2841:
2842: end if;
2835: FND_MSG_PUB.add;
2836: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
2837: RAISE FND_API.G_EXC_ERROR;
2838: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
2839: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2840: END IF;
2841:
2842: end if;
2843: end if;
2883: IF(chk_team_cur%FOUND) THEN
2884: fnd_message.set_name ('JTF', 'JTF_RS_MEM_ROLE_EXIST_ERR');
2885: FND_MSG_PUB.add;
2886: CLOSE chk_team_cur;
2887: RAISE fnd_api.g_exc_error;
2888: END IF;
2889: CLOSE chk_team_cur;
2890: OPEN chk_grp_cur (chk_type_rec.role_resource_id ,
2891: chk_type_rec.role_id,
2895: IF(chk_grp_cur%FOUND) THEN
2896: fnd_message.set_name ('JTF', 'JTF_RS_MEM_ROLE_EXIST_ERR');
2897: FND_MSG_PUB.add;
2898: CLOSE chk_grp_cur;
2899: RAISE fnd_api.g_exc_error;
2900: END IF;
2901: CLOSE chk_grp_cur;
2902: END IF;
2903:
2920: X_RETURN_STATUS => l_return_status,
2921: X_MSG_COUNT => l_msg_count,
2922: X_MSG_DATA => l_msg_data );
2923:
2924: IF(l_return_status <> fnd_api.g_ret_sts_success)
2925: THEN
2926: --fnd_message.set_name ('JTF', 'JTF_RS_AUDIT_ERR');
2927: --FND_MSG_PUB.add;
2928: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
2924: IF(l_return_status <> fnd_api.g_ret_sts_success)
2925: THEN
2926: --fnd_message.set_name ('JTF', 'JTF_RS_AUDIT_ERR');
2927: --FND_MSG_PUB.add;
2928: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
2929: RAISE FND_API.G_EXC_ERROR;
2930: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
2931: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2932: END IF;
2925: THEN
2926: --fnd_message.set_name ('JTF', 'JTF_RS_AUDIT_ERR');
2927: --FND_MSG_PUB.add;
2928: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
2929: RAISE FND_API.G_EXC_ERROR;
2930: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
2931: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2932: END IF;
2933:
2926: --fnd_message.set_name ('JTF', 'JTF_RS_AUDIT_ERR');
2927: --FND_MSG_PUB.add;
2928: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
2929: RAISE FND_API.G_EXC_ERROR;
2930: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
2931: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2932: END IF;
2933:
2934: END IF;
2927: --FND_MSG_PUB.add;
2928: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
2929: RAISE FND_API.G_EXC_ERROR;
2930: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
2931: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2932: END IF;
2933:
2934: END IF;
2935:
3021: fnd_message.set_token('P_SQLCODE',SQLCODE);
3022: fnd_message.set_token('P_SQLERRM',SQLERRM);
3023: fnd_message.set_token('P_API_NAME', l_api_name);
3024: FND_MSG_PUB.add;
3025: RAISE fnd_api.g_exc_unexpected_error;
3026:
3027:
3028: end;
3029:
3048: fnd_message.set_token('P_SQLERRM',SQLERRM);
3049: fnd_message.set_token('P_API_NAME', l_api_name);
3050: FND_MSG_PUB.add;
3051:
3052: RAISE fnd_api.g_exc_unexpected_error;
3053: end;
3054:
3055: else
3056:
3064: X_RETURN_STATUS => l_return_status,
3065: X_MSG_COUNT => l_msg_count,
3066: X_MSG_DATA => l_msg_data);
3067:
3068: IF(l_return_status <> fnd_api.g_ret_sts_success)
3069: THEN
3070: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
3071: RAISE FND_API.G_EXC_ERROR;
3072: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
3066: X_MSG_DATA => l_msg_data);
3067:
3068: IF(l_return_status <> fnd_api.g_ret_sts_success)
3069: THEN
3070: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
3071: RAISE FND_API.G_EXC_ERROR;
3072: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
3073: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3074: END IF;
3067:
3068: IF(l_return_status <> fnd_api.g_ret_sts_success)
3069: THEN
3070: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
3071: RAISE FND_API.G_EXC_ERROR;
3072: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
3073: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3074: END IF;
3075:
3068: IF(l_return_status <> fnd_api.g_ret_sts_success)
3069: THEN
3070: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
3071: RAISE FND_API.G_EXC_ERROR;
3072: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
3073: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3074: END IF;
3075:
3076: END IF;
3069: THEN
3070: IF L_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
3071: RAISE FND_API.G_EXC_ERROR;
3072: ELSIF L_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
3073: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3074: END IF;
3075:
3076: END IF;
3077: END IF; -- END OF COUNT CHECK
3087: P_OBJECT_VERSION_NUM => p_object_version_num,
3088: p_data => L_data,
3089: p_count => L_count,
3090: P_return_code => l_return_code);
3091: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
3092: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
3093: FND_MSG_PUB.add;
3094: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
3095: RAISE FND_API.G_EXC_ERROR;
3090: P_return_code => l_return_code);
3091: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
3092: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
3093: FND_MSG_PUB.add;
3094: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
3095: RAISE FND_API.G_EXC_ERROR;
3096: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
3097: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3098: END IF;
3091: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
3092: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
3093: FND_MSG_PUB.add;
3094: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
3095: RAISE FND_API.G_EXC_ERROR;
3096: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
3097: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3098: END IF;
3099: end if;
3092: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_CUST_USR_HOOK');
3093: FND_MSG_PUB.add;
3094: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
3095: RAISE FND_API.G_EXC_ERROR;
3096: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
3097: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3098: END IF;
3099: end if;
3100: end if;
3093: FND_MSG_PUB.add;
3094: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
3095: RAISE FND_API.G_EXC_ERROR;
3096: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
3097: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3098: END IF;
3099: end if;
3100: end if;
3101: end if;
3112: P_OBJECT_VERSION_NUM => p_object_version_num,
3113: p_data => L_data,
3114: p_count => L_count,
3115: P_return_code => l_return_code);
3116: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
3117: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
3118: FND_MSG_PUB.add;
3119: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
3120: RAISE FND_API.G_EXC_ERROR;
3115: P_return_code => l_return_code);
3116: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
3117: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
3118: FND_MSG_PUB.add;
3119: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
3120: RAISE FND_API.G_EXC_ERROR;
3121: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
3122: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3123: END IF;
3116: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
3117: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
3118: FND_MSG_PUB.add;
3119: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
3120: RAISE FND_API.G_EXC_ERROR;
3121: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
3122: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3123: END IF;
3124: end if;
3117: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_VERT_USR_HOOK');
3118: FND_MSG_PUB.add;
3119: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
3120: RAISE FND_API.G_EXC_ERROR;
3121: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
3122: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3123: END IF;
3124: end if;
3125: end if;
3118: FND_MSG_PUB.add;
3119: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
3120: RAISE FND_API.G_EXC_ERROR;
3121: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
3122: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3123: END IF;
3124: end if;
3125: end if;
3126: end if;
3138: P_OBJECT_VERSION_NUM => p_object_version_num,
3139: p_data => L_data,
3140: p_count => L_count,
3141: P_return_code => l_return_code);
3142: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
3143: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
3144: FND_MSG_PUB.add;
3145: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
3146: RAISE FND_API.G_EXC_ERROR;
3141: P_return_code => l_return_code);
3142: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
3143: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
3144: FND_MSG_PUB.add;
3145: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
3146: RAISE FND_API.G_EXC_ERROR;
3147: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
3148: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3149: END IF;
3142: if ( l_return_code <> FND_API.G_RET_STS_SUCCESS) then
3143: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
3144: FND_MSG_PUB.add;
3145: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
3146: RAISE FND_API.G_EXC_ERROR;
3147: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
3148: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3149: END IF;
3150: end if;
3143: fnd_message.set_name ('JTF', 'JTF_RS_ERR_POST_INT_USR_HOOK');
3144: FND_MSG_PUB.add;
3145: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
3146: RAISE FND_API.G_EXC_ERROR;
3147: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
3148: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3149: END IF;
3150: end if;
3151: end if;
3144: FND_MSG_PUB.add;
3145: IF l_return_code = FND_API.G_RET_STS_ERROR THEN
3146: RAISE FND_API.G_EXC_ERROR;
3147: ELSIF l_return_code = FND_API.G_RET_STS_UNEXP_ERROR THEN
3148: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3149: END IF;
3150: end if;
3151: end if;
3152: end if;
3190: p_bind_data_id => l_bind_data_id,
3191: x_return_code => x_return_status);
3192:
3193:
3194: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
3195: --x_return_status := fnd_api.g_ret_sts_error;
3196:
3197: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
3198: fnd_msg_pub.add;
3191: x_return_code => x_return_status);
3192:
3193:
3194: IF NOT (x_return_status = fnd_api.g_ret_sts_success) THEN
3195: --x_return_status := fnd_api.g_ret_sts_error;
3196:
3197: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
3198: fnd_msg_pub.add;
3199:
3196:
3197: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
3198: fnd_msg_pub.add;
3199:
3200: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
3201: RAISE FND_API.G_EXC_ERROR;
3202: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
3203: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3204: END IF;
3197: fnd_message.set_name('JTF', 'JTF_RS_ERR_MESG_GENERATE_API');
3198: fnd_msg_pub.add;
3199:
3200: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
3201: RAISE FND_API.G_EXC_ERROR;
3202: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
3203: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3204: END IF;
3205:
3198: fnd_msg_pub.add;
3199:
3200: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
3201: RAISE FND_API.G_EXC_ERROR;
3202: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
3203: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3204: END IF;
3205:
3206: END IF;
3199:
3200: IF X_RETURN_STATUS = FND_API.G_RET_STS_ERROR THEN
3201: RAISE FND_API.G_EXC_ERROR;
3202: ELSIF X_RETURN_STATUS = FND_API.G_RET_STS_UNEXP_ERROR THEN
3203: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3204: END IF;
3205:
3206: END IF;
3207:
3212:
3213:
3214: -- end of user hook call
3215:
3216: IF fnd_api.to_boolean (p_commit)
3217: THEN
3218: COMMIT WORK;
3219: END IF;
3220:
3223:
3224: begin
3225: jtf_rs_wf_events_pub.delete_resource_role_relate
3226: (p_api_version => 1.0
3227: ,p_init_msg_list => fnd_api.g_false
3228: ,p_commit => fnd_api.g_false
3229: ,p_role_relate_id => l_role_relate_id
3230: ,x_return_status => l_return_status
3231: ,x_msg_count => l_msg_count
3224: begin
3225: jtf_rs_wf_events_pub.delete_resource_role_relate
3226: (p_api_version => 1.0
3227: ,p_init_msg_list => fnd_api.g_false
3228: ,p_commit => fnd_api.g_false
3229: ,p_role_relate_id => l_role_relate_id
3230: ,x_return_status => l_return_status
3231: ,x_msg_count => l_msg_count
3232: ,x_msg_data => l_msg_data);
3239:
3240: FND_MSG_PUB.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
3241:
3242: EXCEPTION
3243: WHEN fnd_api.g_exc_error THEN
3244: ROLLBACK TO ROLE_RELATE_SP;
3245: x_return_status := fnd_api.g_ret_sts_error;
3246: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
3247: p_data => x_msg_data);
3241:
3242: EXCEPTION
3243: WHEN fnd_api.g_exc_error THEN
3244: ROLLBACK TO ROLE_RELATE_SP;
3245: x_return_status := fnd_api.g_ret_sts_error;
3246: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
3247: p_data => x_msg_data);
3248: WHEN fnd_api.g_exc_unexpected_error THEN
3249: ROLLBACK TO ROLE_RELATE_SP;
3244: ROLLBACK TO ROLE_RELATE_SP;
3245: x_return_status := fnd_api.g_ret_sts_error;
3246: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
3247: p_data => x_msg_data);
3248: WHEN fnd_api.g_exc_unexpected_error THEN
3249: ROLLBACK TO ROLE_RELATE_SP;
3250: x_return_status := fnd_api.g_ret_sts_unexp_error;
3251: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
3252: p_data => x_msg_data);
3246: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
3247: p_data => x_msg_data);
3248: WHEN fnd_api.g_exc_unexpected_error THEN
3249: ROLLBACK TO ROLE_RELATE_SP;
3250: x_return_status := fnd_api.g_ret_sts_unexp_error;
3251: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
3252: p_data => x_msg_data);
3253: WHEN OTHERS THEN
3254: ROLLBACK TO ROLE_RELATE_SP;
3256: fnd_message.set_token('P_SQLCODE',SQLCODE);
3257: fnd_message.set_token('P_SQLERRM',SQLERRM);
3258: fnd_message.set_token('P_API_NAME', l_api_name);
3259: FND_MSG_PUB.add;
3260: x_return_status := fnd_api.g_ret_sts_unexp_error;
3261: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
3262: p_data => x_msg_data);
3263:
3264: END delete_resource_role_relate;