189: -- -----------------------------------------------------------------
190: -- Ensure that the grant name is not null.
191: -- -----------------------------------------------------------------
192: IF (p_grant_name IS NULL) THEN
193: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_NO_GRANT_NAME');
194: FND_MSG_PUB.Add;
195: RAISE FND_API.G_EXC_ERROR;
196: END IF;
197:
212: -- -----------------------------------------------------------------
213: IF (p_function_id IS NOT NULL) THEN
214: l_function_id := Validate_Function_ID (p_function_id => p_function_id);
215: IF (l_function_id <= 0) THEN
216: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_FUNC_FOR_GRNT');
217: FND_MESSAGE.SET_TOKEN('GRANT_NAME', p_grant_name);
218: RAISE FND_API.G_EXC_ERROR;
219: END IF;
220: END IF;
213: IF (p_function_id IS NOT NULL) THEN
214: l_function_id := Validate_Function_ID (p_function_id => p_function_id);
215: IF (l_function_id <= 0) THEN
216: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_FUNC_FOR_GRNT');
217: FND_MESSAGE.SET_TOKEN('GRANT_NAME', p_grant_name);
218: RAISE FND_API.G_EXC_ERROR;
219: END IF;
220: END IF;
221:
224: -- -----------------------------------------------------------------
225: l_obj_group_id := Validate_Obj_Grp_ID (p_group_id => p_obj_group_id);
226:
227: IF (l_obj_group_id <= 0) THEN
228: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_OBJ_GROUP');
229: FND_MSG_PUB.Add;
230: RAISE FND_API.G_EXC_ERROR;
231: END IF;
232:
235: -- -----------------------------------------------------------------
236: l_user_group_id := Validate_User_Grp_ID (p_user_group_id => p_user_group_id);
237:
238: IF (l_user_group_id <= 0) THEN
239: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_USER_GROUP');
240: FND_MSG_PUB.Add;
241: RAISE FND_API.G_EXC_ERROR;
242: END IF;
243:
421: -- Validate that the grant exists.
422: -- -----------------------------------------------------------------
423: l_grant_id := Validate_Grant_ID (p_grant_id => p_grant_id);
424: IF (l_grant_id <= 0) THEN
425: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_GRANT');
426: FND_MSG_PUB.Add;
427: RAISE FND_API.G_EXC_ERROR;
428: END IF;
429:
432: -- -----------------------------------------------------------------
433: IF (p_obj_attrib_id IS NOT NULL) THEN
434: l_obj_attr_id := Validate_Obj_Attr_ID (p_obj_attr_id => p_obj_attrib_id);
435: IF (l_obj_attr_id <= 0) THEN
436: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_OBJ_ATTR');
437: FND_MSG_PUB.Add;
438: RAISE FND_API.G_EXC_ERROR;
439: END IF;
440: END IF;
444: -- -----------------------------------------------------------------
445: IF (p_user_attrib_id IS NOT NULL) THEN
446: l_user_attr_id := Validate_User_Attr_ID (p_user_attr_id => p_user_attrib_id);
447: IF (l_user_attr_id <= 0) THEN
448: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_USR_ATTR');
449: FND_MSG_PUB.Add;
450: RAISE FND_API.G_EXC_ERROR;
451: END IF;
452: END IF;
454: -- -----------------------------------------------------------------
455: -- Check to make sure that the Grant Condition Number given is legal
456: -- -----------------------------------------------------------------
457: IF (p_grant_cond_num <= 0) THEN
458: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_COND_NUM');
459: FND_MSG_PUB.Add;
460: RAISE FND_API.G_EXC_ERROR;
461: END IF;
462:
619: -- Check if admin mode is enabled
620: -- -----------------------------------------------------------------
621: IF IGS_SC_GRANTS_PVT.admin_mode <> 'Y' AND g_upgrade_mode <> 'Y' THEN
622:
623: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_ADMIN_MODE_OFF');
624: FND_MSG_PUB.Add;
625: RAISE FND_API.G_EXC_ERROR;
626:
627: END IF;
629: -- -----------------------------------------------------------------
630: -- Ensure that the object group name is NOT NULL
631: -- -----------------------------------------------------------------
632: IF (p_obj_group_name IS NULL) THEN
633: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_NULL_OBJ_GRP_NAME');
634: FND_MSG_PUB.Add;
635: RAISE FND_API.G_EXC_ERROR;
636: END IF;
637:
640: -- -----------------------------------------------------------------
641: IF (p_default_policy_type IN ('G', 'R')) THEN
642: l_default_policy_type := p_default_policy_type;
643: ELSE
644: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_DEF_POLICY_TYPE');
645: FND_MESSAGE.SET_TOKEN('DEFAULT_POLICY', p_default_policy_type);
646: FND_MSG_PUB.Add;
647: RAISE FND_API.G_EXC_ERROR;
648: END IF;
641: IF (p_default_policy_type IN ('G', 'R')) THEN
642: l_default_policy_type := p_default_policy_type;
643: ELSE
644: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_DEF_POLICY_TYPE');
645: FND_MESSAGE.SET_TOKEN('DEFAULT_POLICY', p_default_policy_type);
646: FND_MSG_PUB.Add;
647: RAISE FND_API.G_EXC_ERROR;
648: END IF;
649:
782: -- Check if admin mode is enabled
783: -- -----------------------------------------------------------------
784: IF IGS_SC_GRANTS_PVT.admin_mode <> 'Y' AND g_upgrade_mode <> 'Y' THEN
785:
786: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_ADMIN_MODE_OFF');
787: FND_MSG_PUB.Add;
788: RAISE FND_API.G_EXC_ERROR;
789:
790: END IF;
794: -- -----------------------------------------------------------------
795: l_obj_group_id := Validate_Obj_Grp_ID (p_group_id => p_obj_group_id);
796:
797: IF (l_obj_group_id <= 0) THEN
798: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_OBJ_GROUP');
799: FND_MSG_PUB.Add;
800: RAISE FND_API.G_EXC_ERROR;
801: END IF;
802:
803: -- -----------------------------------------------------------------
804: -- Ensure that the object attribute name is valid
805: -- -----------------------------------------------------------------
806: IF (p_obj_attrib_name IS NULL) THEN
807: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_OBJ_ATTR_NAME');
808: FND_MSG_PUB.Add;
809: RAISE FND_API.G_EXC_ERROR;
810: END IF;
811:
956: -- Check if admin mode is enabled
957: -- -----------------------------------------------------------------
958: IF IGS_SC_GRANTS_PVT.admin_mode <> 'Y' AND g_upgrade_mode <> 'Y' THEN
959:
960: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_ADMIN_MODE_OFF');
961: FND_MSG_PUB.Add;
962: RAISE FND_API.G_EXC_ERROR;
963:
964: END IF;
968: -- -----------------------------------------------------------------
969: l_object_id := Validate_Object_ID (p_object_id => p_object_id);
970:
971: IF (l_object_id <= 0) THEN
972: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_OBJECT');
973: FND_MSG_PUB.Add;
974: RAISE FND_API.G_EXC_ERROR;
975: END IF;
976:
980:
981: l_obj_attrib_id := Validate_Obj_Attr_ID (p_obj_attr_id => p_obj_attrib_id);
982:
983: IF (l_obj_attrib_id <= 0) THEN
984: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_OBJ_ATTR');
985: FND_MSG_PUB.Add;
986: RAISE FND_API.G_EXC_ERROR;
987: END IF;
988:
992:
993: l_obj_attrib_type := Validate_Obj_Attr_type (p_obj_att_type => p_obj_attrib_type);
994:
995: IF (l_obj_attrib_type IS NULL) THEN
996: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_OBJ_ATTR_TYPE');
997: FND_MSG_PUB.Add;
998: RAISE FND_API.G_EXC_ERROR;
999: END IF;
1000:
1000:
1001: l_static_type := Validate_Static_Type (p_static_type => p_static_type);
1002:
1003: IF (l_static_type IS NULL) THEN
1004: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_STATIC_TYPE');
1005: FND_MSG_PUB.Add;
1006: RAISE FND_API.G_EXC_ERROR;
1007: END IF;
1008:
1010: OPEN c_table_name(p_object_id);
1011: FETCH c_table_name INTO l_object_name;
1012: CLOSE c_table_name;
1013: IF NOT check_attrib_text ( l_object_name, p_select_text,l_obj_attrib_type) THEN
1014: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRNT_TXT_ERR');
1015: FND_MESSAGE.SET_TOKEN('OBJ_NAME',l_object_name);
1016: FND_MESSAGE.SET_TOKEN('GRNT_TEXT', p_select_text);
1017: FND_MSG_PUB.Add;
1018: RAISE FND_API.G_EXC_ERROR;
1011: FETCH c_table_name INTO l_object_name;
1012: CLOSE c_table_name;
1013: IF NOT check_attrib_text ( l_object_name, p_select_text,l_obj_attrib_type) THEN
1014: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRNT_TXT_ERR');
1015: FND_MESSAGE.SET_TOKEN('OBJ_NAME',l_object_name);
1016: FND_MESSAGE.SET_TOKEN('GRNT_TEXT', p_select_text);
1017: FND_MSG_PUB.Add;
1018: RAISE FND_API.G_EXC_ERROR;
1019:
1012: CLOSE c_table_name;
1013: IF NOT check_attrib_text ( l_object_name, p_select_text,l_obj_attrib_type) THEN
1014: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRNT_TXT_ERR');
1015: FND_MESSAGE.SET_TOKEN('OBJ_NAME',l_object_name);
1016: FND_MESSAGE.SET_TOKEN('GRNT_TEXT', p_select_text);
1017: FND_MSG_PUB.Add;
1018: RAISE FND_API.G_EXC_ERROR;
1019:
1020: END IF;
1160: -- Check if admin mode is enabled
1161: -- -----------------------------------------------------------------
1162: IF IGS_SC_GRANTS_PVT.admin_mode <> 'Y' AND g_upgrade_mode <> 'Y' THEN
1163:
1164: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_ADMIN_MODE_OFF');
1165: FND_MSG_PUB.Add;
1166: RAISE FND_API.G_EXC_ERROR;
1167:
1168: END IF;
1172: -- -----------------------------------------------------------------
1173: l_obj_group_id := Validate_Obj_Grp_ID (p_group_id => p_obj_group_id);
1174:
1175: IF (l_obj_group_id <= 0) THEN
1176: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_OBJ_GROUP');
1177: FND_MSG_PUB.Add;
1178: RAISE FND_API.G_EXC_ERROR;
1179: END IF;
1180:
1181: -- -----------------------------------------------------------------
1182: -- Ensure that the function name is not null.
1183: -- -----------------------------------------------------------------
1184: IF (p_function_name IS NULL) THEN
1185: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_FUNC_NAME');
1186: FND_MSG_PUB.Add;
1187: RAISE FND_API.G_EXC_ERROR;
1188: END IF;
1189:
1354: -- Check if admin mode is enabled
1355: -- -----------------------------------------------------------------
1356: IF IGS_SC_GRANTS_PVT.admin_mode <> 'Y' AND g_upgrade_mode <> 'Y' THEN
1357:
1358: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_ADMIN_MODE_OFF');
1359: FND_MSG_PUB.Add;
1360: RAISE FND_API.G_EXC_ERROR;
1361:
1362: END IF;
1366: -- -----------------------------------------------------------------
1367: l_obj_group_id := Validate_Obj_Grp_ID (p_group_id => p_obj_group_id);
1368:
1369: IF (l_obj_group_id <= 0) THEN
1370: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_OBJ_GROUP');
1371: FND_MSG_PUB.Add;
1372: RAISE FND_API.G_EXC_ERROR;
1373: END IF;
1374:
1576: -- Check if admin mode is enabled
1577: -- -----------------------------------------------------------------
1578: IF IGS_SC_GRANTS_PVT.admin_mode <> 'Y' AND g_upgrade_mode <> 'Y' THEN
1579:
1580: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_ADMIN_MODE_OFF');
1581: FND_MSG_PUB.Add;
1582: RAISE FND_API.G_EXC_ERROR;
1583:
1584: END IF;
1586: -- -----------------------------------------------------------------
1587: -- Validate that the attribute name is valid.
1588: -- -----------------------------------------------------------------
1589: IF (p_user_attrib_name IS NULL) THEN
1590: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_USR_ATTR_NAME');
1591: FND_MSG_PUB.Add;
1592: RAISE FND_API.G_EXC_ERROR;
1593: END IF;
1594:
1595: -- -----------------------------------------------------------------
1596: -- Ensure that there is SELECT text provided.
1597: -- -----------------------------------------------------------------
1598: IF (p_select_text IS NULL) THEN
1599: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_SELECT_TEXT');
1600: FND_MSG_PUB.Add;
1601: RAISE FND_API.G_EXC_ERROR;
1602: END IF;
1603:
1606: -- -----------------------------------------------------------------
1607: l_user_attrib_type := Validate_User_Attr_Type (p_usr_att_type => p_user_attrib_type);
1608:
1609: IF (l_user_attrib_type IS NULL) THEN
1610: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_USR_ATT_TYPE');
1611: FND_MSG_PUB.Add;
1612: RAISE FND_API.G_EXC_ERROR;
1613: END IF;
1614:
1617: -- -----------------------------------------------------------------
1618: l_static_type := Validate_Static_Type (p_static_type => p_static_type);
1619:
1620: IF (l_static_type IS NULL) THEN
1621: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_STATIC_TYPE');
1622: FND_MSG_PUB.Add;
1623: RAISE FND_API.G_EXC_ERROR;
1624: END IF;
1625:
1624: END IF;
1625:
1626: IF NOT check_attrib_text ( 'DUAL', p_select_text,l_user_attrib_type) THEN
1627:
1628: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRNT_TXT_ERR');
1629: FND_MESSAGE.SET_TOKEN('OBJ_NAME','USER_ATTRIB');
1630: FND_MESSAGE.SET_TOKEN('GRNT_TEXT', p_select_text);
1631: FND_MSG_PUB.Add;
1632: RAISE FND_API.G_EXC_ERROR;
1625:
1626: IF NOT check_attrib_text ( 'DUAL', p_select_text,l_user_attrib_type) THEN
1627:
1628: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRNT_TXT_ERR');
1629: FND_MESSAGE.SET_TOKEN('OBJ_NAME','USER_ATTRIB');
1630: FND_MESSAGE.SET_TOKEN('GRNT_TEXT', p_select_text);
1631: FND_MSG_PUB.Add;
1632: RAISE FND_API.G_EXC_ERROR;
1633:
1626: IF NOT check_attrib_text ( 'DUAL', p_select_text,l_user_attrib_type) THEN
1627:
1628: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRNT_TXT_ERR');
1629: FND_MESSAGE.SET_TOKEN('OBJ_NAME','USER_ATTRIB');
1630: FND_MESSAGE.SET_TOKEN('GRNT_TEXT', p_select_text);
1631: FND_MSG_PUB.Add;
1632: RAISE FND_API.G_EXC_ERROR;
1633:
1634: END IF;
1979: FETCH c_fnd_user_name INTO l_user_found;
1980:
1981: IF c_fnd_user_name%NOTFOUND THEN
1982:
1983: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_USR_NOT_FOUND');
1984: FND_MSG_PUB.Add;
1985: RAISE FND_API.G_EXC_ERROR;
1986:
1987: END IF;
2169: -- Check if admin mode is enabled
2170: -- -----------------------------------------------------------------
2171: IF IGS_SC_GRANTS_PVT.admin_mode <> 'Y' AND g_upgrade_mode <> 'Y' THEN
2172:
2173: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_ADMIN_MODE_OFF');
2174: FND_MSG_PUB.Add;
2175: RAISE FND_API.G_EXC_ERROR;
2176:
2177: END IF;
2181: -- -----------------------------------------------------------------
2182: l_obj_group_id := Validate_Obj_Grp_ID (p_group_id => p_obj_group_id);
2183:
2184: IF (l_obj_group_id <= 0) THEN
2185: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_OBJ_GROUP');
2186: FND_MSG_PUB.Add;
2187: RAISE FND_API.G_EXC_ERROR;
2188: END IF;
2189:
2196: CLOSE c_table_name;
2197:
2198: IF l_object_name IS NULL THEN
2199:
2200: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_OBJECT');
2201: FND_MSG_PUB.Add;
2202: RAISE FND_API.G_EXC_ERROR;
2203:
2204: END IF;
2704:
2705:
2706: IF (c_get_grants_values%NOTFOUND) THEN
2707: CLOSE c_get_grants_values; --mmkumar
2708: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_NOT_FOUND');
2709: FND_MSG_PUB.Add;
2710: RAISE FND_API.G_EXC_ERROR;
2711: END IF;
2712:
2719: -- -----------------------------------------------------------------
2720: IF ((p_function_id IS NOT NULL) ) THEN
2721: l_function_id := Validate_Function_ID (p_function_id => p_function_id);
2722: IF (l_function_id <= 0) THEN
2723: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_FUNC_FOR_GRNT');
2724: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
2725: FND_MSG_PUB.Add;
2726: RAISE FND_API.G_EXC_ERROR;
2727: END IF;
2720: IF ((p_function_id IS NOT NULL) ) THEN
2721: l_function_id := Validate_Function_ID (p_function_id => p_function_id);
2722: IF (l_function_id <= 0) THEN
2723: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_FUNC_FOR_GRNT');
2724: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
2725: FND_MSG_PUB.Add;
2726: RAISE FND_API.G_EXC_ERROR;
2727: END IF;
2728: END IF;
2743: -- -----------------------------------------------------------------
2744: -- Make sure that the locked flag has a correct value.
2745: -- -----------------------------------------------------------------
2746: IF (l_locked_flag = 'Y') THEN
2747: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
2748: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_update_oper);
2749: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
2750: FND_MSG_PUB.Add;
2751: RAISE FND_API.G_EXC_ERROR;
2744: -- Make sure that the locked flag has a correct value.
2745: -- -----------------------------------------------------------------
2746: IF (l_locked_flag = 'Y') THEN
2747: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
2748: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_update_oper);
2749: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
2750: FND_MSG_PUB.Add;
2751: RAISE FND_API.G_EXC_ERROR;
2752: END IF;
2745: -- -----------------------------------------------------------------
2746: IF (l_locked_flag = 'Y') THEN
2747: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
2748: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_update_oper);
2749: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
2750: FND_MSG_PUB.Add;
2751: RAISE FND_API.G_EXC_ERROR;
2752: END IF;
2753:
2947: FETCH c_get_grant_name
2948: INTO l_grant_name;
2949:
2950: CLOSE c_get_grant_name; --mmkumar
2951: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
2952: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_update_oper);
2953: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
2954: FND_MSG_PUB.Add;
2955: RAISE FND_API.G_EXC_ERROR;
2948: INTO l_grant_name;
2949:
2950: CLOSE c_get_grant_name; --mmkumar
2951: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
2952: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_update_oper);
2953: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
2954: FND_MSG_PUB.Add;
2955: RAISE FND_API.G_EXC_ERROR;
2956: END IF;
2949:
2950: CLOSE c_get_grant_name; --mmkumar
2951: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
2952: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_update_oper);
2953: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
2954: FND_MSG_PUB.Add;
2955: RAISE FND_API.G_EXC_ERROR;
2956: END IF;
2957:
2968: -- -----------------------------------------------------------------
2969: IF ((p_obj_attrib_id IS NOT NULL)) THEN
2970: l_obj_attrib_id := Validate_Obj_Attr_ID (p_obj_attr_id => p_obj_attrib_id);
2971: IF (l_obj_attrib_id <= 0) THEN
2972: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_OBJ_ATTR');
2973: FND_MSG_PUB.Add;
2974: RAISE FND_API.G_EXC_ERROR;
2975: END IF;
2976: END IF;
2977:
2978: IF ((p_user_attrib_id IS NOT NULL) ) THEN
2979: l_user_attrib_id := Validate_User_Attr_ID (p_user_attr_id => p_user_attrib_id);
2980: IF (l_user_attrib_id <= 0) THEN
2981: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_USR_ATTR');
2982: FND_MSG_PUB.Add;
2983: RAISE FND_API.G_EXC_ERROR;
2984: END IF;
2985: END IF;
3169: l_default_policy_type;
3170:
3171: IF (c_get_obj_group%NOTFOUND) THEN
3172: CLOSE c_get_obj_group; --mmkumar
3173: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_OBJ_GRP_NOT_FOUND');
3174: FND_MSG_PUB.Add;
3175: RAISE FND_API.G_EXC_ERROR;
3176: END IF;
3177:
3195: -- -----------------------------------------------------------------
3196: -- Ensure that the default policy value is valid.
3197: -- -----------------------------------------------------------------
3198: IF (l_default_policy_type NOT IN ('G', 'R')) THEN
3199: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_DEF_POLICY_TYPE');
3200: FND_MESSAGE.SET_TOKEN('DEFAULT_POLICY', l_default_policy_type);
3201: FND_MSG_PUB.Add;
3202: RAISE FND_API.G_EXC_ERROR;
3203: END IF;
3196: -- Ensure that the default policy value is valid.
3197: -- -----------------------------------------------------------------
3198: IF (l_default_policy_type NOT IN ('G', 'R')) THEN
3199: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_DEF_POLICY_TYPE');
3200: FND_MESSAGE.SET_TOKEN('DEFAULT_POLICY', l_default_policy_type);
3201: FND_MSG_PUB.Add;
3202: RAISE FND_API.G_EXC_ERROR;
3203: END IF;
3204:
3374: -- Check if admin mode is enabled
3375: -- -----------------------------------------------------------------
3376: IF IGS_SC_GRANTS_PVT.admin_mode <> 'Y' AND g_upgrade_mode <> 'Y' THEN
3377:
3378: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_ADMIN_MODE_OFF');
3379: FND_MSG_PUB.Add;
3380: RAISE FND_API.G_EXC_ERROR;
3381:
3382: END IF;
3395: -- Check to determine if the grant is locked or not. If not locked
3396: -- then the update to the condition can happen.
3397: -- -----------------------------------------------------------------
3398: IF (Is_Grant_Locked(l_grant_id) = 'Y') THEN
3399: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
3400: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_update_oper);
3401: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
3402: FND_MSG_PUB.Add;
3403: RAISE FND_API.G_EXC_ERROR;
3396: -- then the update to the condition can happen.
3397: -- -----------------------------------------------------------------
3398: IF (Is_Grant_Locked(l_grant_id) = 'Y') THEN
3399: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
3400: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_update_oper);
3401: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
3402: FND_MSG_PUB.Add;
3403: RAISE FND_API.G_EXC_ERROR;
3404: END IF;
3397: -- -----------------------------------------------------------------
3398: IF (Is_Grant_Locked(l_grant_id) = 'Y') THEN
3399: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
3400: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_update_oper);
3401: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
3402: FND_MSG_PUB.Add;
3403: RAISE FND_API.G_EXC_ERROR;
3404: END IF;
3405:
3436: x_return_message => x_return_message );
3437: return;
3438:
3439:
3440: /* FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_OBJ_MTHD_NOT_FOUND');
3441: FND_MSG_PUB.Add;
3442: RAISE FND_API.G_EXC_ERROR;
3443: */
3444: END IF;
3448: -- -----------------------------------------------------------------
3449: IF ((p_obj_attrib_type IS NOT NULL) ) THEN
3450: l_obj_attrib_type := Validate_Obj_Attr_type (p_obj_att_type => p_obj_attrib_type);
3451: IF (l_obj_attrib_type IS NULL) THEN
3452: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_OBJ_ATTR_TYPE');
3453: FND_MSG_PUB.Add;
3454: RAISE FND_API.G_EXC_ERROR;
3455: END IF;
3456: END IF;
3457:
3458: IF ((p_static_type IS NOT NULL) ) THEN
3459: l_static_type := Validate_Static_Type (p_static_type => p_static_type);
3460: IF (l_static_type IS NULL) THEN
3461: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_STATIC_TYPE');
3462: FND_MSG_PUB.Add;
3463: RAISE FND_API.G_EXC_ERROR;
3464: END IF;
3465: END IF;
3477: OPEN c_table_name(p_object_id);
3478: FETCH c_table_name INTO l_object_name;
3479: CLOSE c_table_name;
3480: IF NOT check_attrib_text ( l_object_name, l_select_text,l_obj_attrib_type) THEN
3481: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRNT_TXT_ERR');
3482: FND_MESSAGE.SET_TOKEN('OBJ_NAME',l_object_name);
3483: FND_MESSAGE.SET_TOKEN('GRNT_TEXT', p_select_text);
3484: FND_MSG_PUB.Add;
3485: RAISE FND_API.G_EXC_ERROR;
3478: FETCH c_table_name INTO l_object_name;
3479: CLOSE c_table_name;
3480: IF NOT check_attrib_text ( l_object_name, l_select_text,l_obj_attrib_type) THEN
3481: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRNT_TXT_ERR');
3482: FND_MESSAGE.SET_TOKEN('OBJ_NAME',l_object_name);
3483: FND_MESSAGE.SET_TOKEN('GRNT_TEXT', p_select_text);
3484: FND_MSG_PUB.Add;
3485: RAISE FND_API.G_EXC_ERROR;
3486: END IF;
3479: CLOSE c_table_name;
3480: IF NOT check_attrib_text ( l_object_name, l_select_text,l_obj_attrib_type) THEN
3481: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRNT_TXT_ERR');
3482: FND_MESSAGE.SET_TOKEN('OBJ_NAME',l_object_name);
3483: FND_MESSAGE.SET_TOKEN('GRNT_TEXT', p_select_text);
3484: FND_MSG_PUB.Add;
3485: RAISE FND_API.G_EXC_ERROR;
3486: END IF;
3487: END IF;
3644: -- Check if admin mode is enabled
3645: -- -----------------------------------------------------------------
3646: IF IGS_SC_GRANTS_PVT.admin_mode <> 'Y' AND g_upgrade_mode <> 'Y' THEN
3647:
3648: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_ADMIN_MODE_OFF');
3649: FND_MSG_PUB.Add;
3650: RAISE FND_API.G_EXC_ERROR;
3651:
3652: END IF;
3661:
3662: WHILE (c_get_grants%FOUND) LOOP
3663:
3664: IF (Is_Grant_Locked(l_grant_id) = 'Y') THEN
3665: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
3666: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_update_oper);
3667: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
3668: FND_MSG_PUB.Add;
3669: RAISE FND_API.G_EXC_ERROR;
3662: WHILE (c_get_grants%FOUND) LOOP
3663:
3664: IF (Is_Grant_Locked(l_grant_id) = 'Y') THEN
3665: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
3666: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_update_oper);
3667: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
3668: FND_MSG_PUB.Add;
3669: RAISE FND_API.G_EXC_ERROR;
3670: END IF;
3663:
3664: IF (Is_Grant_Locked(l_grant_id) = 'Y') THEN
3665: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
3666: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_update_oper);
3667: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
3668: FND_MSG_PUB.Add;
3669: RAISE FND_API.G_EXC_ERROR;
3670: END IF;
3671:
3683: INTO l_obj_group_id,
3684: l_function_name;
3685:
3686: IF (c_get_func_values%NOTFOUND) THEN
3687: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_OBJ_FUNC_NOT_FOUND');
3688: FND_MSG_PUB.Add;
3689: RAISE FND_API.G_EXC_ERROR;
3690: END IF;
3691:
3840: -- Check if admin mode is enabled
3841: -- -----------------------------------------------------------------
3842: IF IGS_SC_GRANTS_PVT.admin_mode <> 'Y' AND g_upgrade_mode <> 'Y' THEN
3843:
3844: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_ADMIN_MODE_OFF');
3845: FND_MSG_PUB.Add;
3846: RAISE FND_API.G_EXC_ERROR;
3847:
3848: END IF;
3862: -- Check to determine if the grant is locked or not. If not locked
3863: -- then the update to the condition can happen.
3864: -- -----------------------------------------------------------------
3865: IF (Is_Grant_Locked(l_grant_id) = 'Y') THEN
3866: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
3867: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_update_oper);
3868: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
3869: FND_MSG_PUB.Add;
3870: RAISE FND_API.G_EXC_ERROR;
3863: -- then the update to the condition can happen.
3864: -- -----------------------------------------------------------------
3865: IF (Is_Grant_Locked(l_grant_id) = 'Y') THEN
3866: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
3867: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_update_oper);
3868: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
3869: FND_MSG_PUB.Add;
3870: RAISE FND_API.G_EXC_ERROR;
3871: END IF;
3864: -- -----------------------------------------------------------------
3865: IF (Is_Grant_Locked(l_grant_id) = 'Y') THEN
3866: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
3867: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_update_oper);
3868: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
3869: FND_MSG_PUB.Add;
3870: RAISE FND_API.G_EXC_ERROR;
3871: END IF;
3872:
3887: l_obj_attrib_name;
3888:
3889: IF (c_get_obj_attrib%NOTFOUND) THEN
3890: CLOSE c_get_obj_attrib; --mmkumar
3891: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_OBJ_ATTR_NOT_FOUND');
3892: FND_MSG_PUB.Add;
3893: RAISE FND_API.G_EXC_ERROR;
3894: END IF;
3895:
4056: -- Check if admin mode is enabled
4057: -- -----------------------------------------------------------------
4058: IF IGS_SC_GRANTS_PVT.admin_mode <> 'Y' AND g_upgrade_mode <> 'Y' THEN
4059:
4060: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_ADMIN_MODE_OFF');
4061: FND_MSG_PUB.Add;
4062: RAISE FND_API.G_EXC_ERROR;
4063:
4064: END IF;
4080: -- Check to determine if the grant is locked or not. If not locked
4081: -- then the update to the condition can happen.
4082: -- -----------------------------------------------------------------
4083: IF (Is_Grant_Locked(l_grant_id) = 'Y') THEN
4084: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
4085: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_update_oper);
4086: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
4087: FND_MSG_PUB.Add;
4088: RAISE FND_API.G_EXC_ERROR;
4081: -- then the update to the condition can happen.
4082: -- -----------------------------------------------------------------
4083: IF (Is_Grant_Locked(l_grant_id) = 'Y') THEN
4084: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
4085: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_update_oper);
4086: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
4087: FND_MSG_PUB.Add;
4088: RAISE FND_API.G_EXC_ERROR;
4089: END IF;
4082: -- -----------------------------------------------------------------
4083: IF (Is_Grant_Locked(l_grant_id) = 'Y') THEN
4084: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
4085: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_update_oper);
4086: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
4087: FND_MSG_PUB.Add;
4088: RAISE FND_API.G_EXC_ERROR;
4089: END IF;
4090:
4107: l_select_text;
4108:
4109: IF (c_get_usr_attrib%NOTFOUND) THEN
4110: CLOSE c_get_usr_attrib; --mmkumar
4111: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_USR_ATTR_NOT_FOUND');
4112: FND_MSG_PUB.Add;
4113: RAISE FND_API.G_EXC_ERROR;
4114: END IF;
4115:
4123: -- -----------------------------------------------------------------
4124: IF ((p_user_attrib_type IS NOT NULL) ) THEN
4125: l_user_attrib_type := Validate_User_Attr_Type (p_usr_att_type => p_user_attrib_type);
4126: IF (l_user_attrib_type IS NULL) THEN
4127: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_USR_ATT_TYPE');
4128: FND_MSG_PUB.Add;
4129: RAISE FND_API.G_EXC_ERROR;
4130: END IF;
4131: END IF;
4131: END IF;
4132:
4133: l_static_type := Validate_Static_Type (p_static_type => p_static_type);
4134: IF (l_static_type IS NULL) THEN
4135: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_INV_STATIC_TYPE');
4136: FND_MSG_PUB.Add;
4137: RAISE FND_API.G_EXC_ERROR;
4138: END IF;
4139:
4148:
4149:
4150: IF NOT check_attrib_text ( 'DUAL', l_select_text,l_user_attrib_type) THEN
4151:
4152: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRNT_TXT_ERR');
4153: FND_MESSAGE.SET_TOKEN('OBJ_NAME','USER_ATTRIB');
4154: FND_MESSAGE.SET_TOKEN('GRNT_TEXT', l_select_text);
4155: FND_MSG_PUB.Add;
4156: RAISE FND_API.G_EXC_ERROR;
4149:
4150: IF NOT check_attrib_text ( 'DUAL', l_select_text,l_user_attrib_type) THEN
4151:
4152: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRNT_TXT_ERR');
4153: FND_MESSAGE.SET_TOKEN('OBJ_NAME','USER_ATTRIB');
4154: FND_MESSAGE.SET_TOKEN('GRNT_TEXT', l_select_text);
4155: FND_MSG_PUB.Add;
4156: RAISE FND_API.G_EXC_ERROR;
4157:
4150: IF NOT check_attrib_text ( 'DUAL', l_select_text,l_user_attrib_type) THEN
4151:
4152: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRNT_TXT_ERR');
4153: FND_MESSAGE.SET_TOKEN('OBJ_NAME','USER_ATTRIB');
4154: FND_MESSAGE.SET_TOKEN('GRNT_TEXT', l_select_text);
4155: FND_MSG_PUB.Add;
4156: RAISE FND_API.G_EXC_ERROR;
4157:
4158: END IF;
4351: -- Check if admin mode is enabled
4352: -- -----------------------------------------------------------------
4353: IF IGS_SC_GRANTS_PVT.admin_mode <> 'Y' AND g_upgrade_mode <> 'Y' THEN
4354:
4355: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_ADMIN_MODE_OFF');
4356: FND_MSG_PUB.Add;
4357: RAISE FND_API.G_EXC_ERROR;
4358:
4359: END IF;
4636: -- Check if admin mode is enabled
4637: -- -----------------------------------------------------------------
4638: IF IGS_SC_GRANTS_PVT.admin_mode <> 'Y' AND g_upgrade_mode <> 'Y' THEN
4639:
4640: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_ADMIN_MODE_OFF');
4641: FND_MSG_PUB.Add;
4642: RAISE FND_API.G_EXC_ERROR;
4643:
4644: END IF;
4833: -- Check if admin mode is enabled
4834: -- -----------------------------------------------------------------
4835: IF IGS_SC_GRANTS_PVT.admin_mode <> 'Y' AND g_upgrade_mode <> 'Y' THEN
4836:
4837: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_ADMIN_MODE_OFF');
4838: FND_MSG_PUB.Add;
4839: RAISE FND_API.G_EXC_ERROR;
4840:
4841: END IF;
4967: -- Check if admin mode is enabled
4968: -- -----------------------------------------------------------------
4969: IF IGS_SC_GRANTS_PVT.admin_mode <> 'Y' AND g_upgrade_mode <> 'Y' THEN
4970:
4971: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_ADMIN_MODE_OFF');
4972: FND_MSG_PUB.Add;
4973: RAISE FND_API.G_EXC_ERROR;
4974:
4975: END IF;
5123: -- Check if admin mode is enabled
5124: -- -----------------------------------------------------------------
5125: IF IGS_SC_GRANTS_PVT.admin_mode <> 'Y' AND g_upgrade_mode <> 'Y' THEN
5126:
5127: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_ADMIN_MODE_OFF');
5128: FND_MSG_PUB.Add;
5129: RAISE FND_API.G_EXC_ERROR;
5130:
5131: END IF;
5248: -- Check if admin mode is enabled
5249: -- -----------------------------------------------------------------
5250: IF IGS_SC_GRANTS_PVT.admin_mode <> 'Y' AND g_upgrade_mode <> 'Y' THEN
5251:
5252: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_ADMIN_MODE_OFF');
5253: FND_MSG_PUB.Add;
5254: RAISE FND_API.G_EXC_ERROR;
5255:
5256: END IF;
5399: -- Check if admin mode is enabled
5400: -- -----------------------------------------------------------------
5401: IF IGS_SC_GRANTS_PVT.admin_mode <> 'Y' AND g_upgrade_mode <> 'Y' THEN
5402:
5403: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_ADMIN_MODE_OFF');
5404: FND_MSG_PUB.Add;
5405: RAISE FND_API.G_EXC_ERROR;
5406:
5407: END IF;
5417: l_grant_name;
5418:
5419: IF (c_get_grant_conds%FOUND) THEN
5420: CLOSE c_get_grant_conds; --mmkumar
5421: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_PRSNT');
5422: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
5423: FND_MSG_PUB.Add;
5424: RAISE FND_API.G_EXC_ERROR;
5425: END IF;
5418:
5419: IF (c_get_grant_conds%FOUND) THEN
5420: CLOSE c_get_grant_conds; --mmkumar
5421: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_PRSNT');
5422: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
5423: FND_MSG_PUB.Add;
5424: RAISE FND_API.G_EXC_ERROR;
5425: END IF;
5426:
5755: INTO l_grant_name;
5756:
5757: CLOSE c_get_grant_name; --mmkumar
5758:
5759: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
5760: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_delete_oper);
5761: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
5762: FND_MSG_PUB.Add;
5763: RAISE FND_API.G_EXC_ERROR;
5756:
5757: CLOSE c_get_grant_name; --mmkumar
5758:
5759: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
5760: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_delete_oper);
5761: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
5762: FND_MSG_PUB.Add;
5763: RAISE FND_API.G_EXC_ERROR;
5764:
5757: CLOSE c_get_grant_name; --mmkumar
5758:
5759: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
5760: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_delete_oper);
5761: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
5762: FND_MSG_PUB.Add;
5763: RAISE FND_API.G_EXC_ERROR;
5764:
5765: END IF;
5942: INTO l_grant_name;
5943:
5944: CLOSE c_get_grant_name; --mmkumar
5945:
5946: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
5947: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_delete_oper);
5948: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
5949: FND_MSG_PUB.Add;
5950: RAISE FND_API.G_EXC_ERROR;
5943:
5944: CLOSE c_get_grant_name; --mmkumar
5945:
5946: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
5947: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_delete_oper);
5948: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
5949: FND_MSG_PUB.Add;
5950: RAISE FND_API.G_EXC_ERROR;
5951:
5944: CLOSE c_get_grant_name; --mmkumar
5945:
5946: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_GRANT_LOCKED_NO_OPS');
5947: FND_MESSAGE.SET_TOKEN('OPS_TYPE', l_delete_oper);
5948: FND_MESSAGE.SET_TOKEN('GRANT_NAME', l_grant_name);
5949: FND_MSG_PUB.Add;
5950: RAISE FND_API.G_EXC_ERROR;
5951:
5952: END IF;
6372: INTO l_grant_id;
6373:
6374: IF (c_check_grant%NOTFOUND) THEN
6375:
6376: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_NO_GRANT_AVAIL');
6377: FND_MESSAGE.SET_TOKEN('GRANT_NAME', p_grant_id);
6378: FND_MSG_PUB.Add;
6379: RAISE FND_API.G_EXC_ERROR;
6380:
6373:
6374: IF (c_check_grant%NOTFOUND) THEN
6375:
6376: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_NO_GRANT_AVAIL');
6377: FND_MESSAGE.SET_TOKEN('GRANT_NAME', p_grant_id);
6378: FND_MSG_PUB.Add;
6379: RAISE FND_API.G_EXC_ERROR;
6380:
6381: ELSE
6552: INTO l_grant_id;
6553:
6554: IF (c_check_grant%NOTFOUND) THEN
6555:
6556: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_NO_GRANT_AVAIL');
6557: FND_MESSAGE.SET_TOKEN('GRANT_NAME', p_grant_id);
6558: FND_MSG_PUB.Add;
6559: RAISE FND_API.G_EXC_ERROR;
6560:
6553:
6554: IF (c_check_grant%NOTFOUND) THEN
6555:
6556: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_NO_GRANT_AVAIL');
6557: FND_MESSAGE.SET_TOKEN('GRANT_NAME', p_grant_id);
6558: FND_MSG_PUB.Add;
6559: RAISE FND_API.G_EXC_ERROR;
6560:
6561: ELSE
7845: -- Check if admin mode is enabled
7846: -- -----------------------------------------------------------------
7847: IF IGS_SC_GRANTS_PVT.admin_mode <> 'Y' AND g_upgrade_mode <> 'Y' THEN
7848:
7849: FND_MESSAGE.SET_NAME('IGS', 'IGS_SC_ADMIN_MODE_OFF');
7850: FND_MSG_PUB.Add;
7851: RAISE FND_API.G_EXC_ERROR;
7852:
7853: END IF;
8560: EXCEPTION
8561: WHEN UTL_FILE.INVALID_PATH THEN
8562: ROLLBACK TO Generate_SQL_file;
8563: x_return_status := FND_API.G_RET_STS_ERROR;
8564: FND_MESSAGE.set_name('IGS', 'IGS_DS_INVALID_PATH');
8565: FND_MSG_PUB.Add;
8566:
8567: WHEN UTL_FILE.WRITE_ERROR THEN
8568: ROLLBACK TO Generate_SQL_file;
8566:
8567: WHEN UTL_FILE.WRITE_ERROR THEN
8568: ROLLBACK TO Generate_SQL_file;
8569: x_return_status := FND_API.G_RET_STS_ERROR;
8570: FND_MESSAGE.set_name('IGS', 'IGS_DS_WRITE_ERROR');
8571: FND_MSG_PUB.Add;
8572:
8573: WHEN UTL_FILE.INVALID_FILEHANDLE THEN
8574: ROLLBACK TO Generate_SQL_file;
8572:
8573: WHEN UTL_FILE.INVALID_FILEHANDLE THEN
8574: ROLLBACK TO Generate_SQL_file;
8575: x_return_status := FND_API.G_RET_STS_ERROR;
8576: FND_MESSAGE.set_name('IGS', 'IGS_DS_INVALID_FILEHANDLE');
8577: FND_MSG_PUB.Add;
8578:
8579: WHEN FND_API.G_EXC_ERROR THEN
8580: