59: x_return_status := FND_API.G_RET_STS_SUCCESS;
60: DBMS_SQL.close_cursor(l_cursor);
61: EXCEPTION
62: WHEN OTHERS THEN
63: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
64: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
65: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
66: FND_MESSAGE.Set_Token('REASON', SQLERRM);
67: FND_MSG_PUB.Add;
60: DBMS_SQL.close_cursor(l_cursor);
61: EXCEPTION
62: WHEN OTHERS THEN
63: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
64: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
65: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
66: FND_MESSAGE.Set_Token('REASON', SQLERRM);
67: FND_MSG_PUB.Add;
68:
61: EXCEPTION
62: WHEN OTHERS THEN
63: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
64: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
65: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
66: FND_MESSAGE.Set_Token('REASON', SQLERRM);
67: FND_MSG_PUB.Add;
68:
69: x_return_status := FND_API.G_RET_STS_ERROR;
62: WHEN OTHERS THEN
63: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
64: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
65: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
66: FND_MESSAGE.Set_Token('REASON', SQLERRM);
67: FND_MSG_PUB.Add;
68:
69: x_return_status := FND_API.G_RET_STS_ERROR;
70: DBMS_SQL.close_cursor(l_cursor);
778: p_data => x_msg_data,
779: p_encoded => 'F');
780:
781: WHEN OTHERS THEN
782: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
783: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
784: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
785: FND_MESSAGE.Set_Token('REASON', SQLERRM);
786: FND_MSG_PUB.Add;
779: p_encoded => 'F');
780:
781: WHEN OTHERS THEN
782: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
783: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
784: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
785: FND_MESSAGE.Set_Token('REASON', SQLERRM);
786: FND_MSG_PUB.Add;
787:
780:
781: WHEN OTHERS THEN
782: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
783: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
784: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
785: FND_MESSAGE.Set_Token('REASON', SQLERRM);
786: FND_MSG_PUB.Add;
787:
788: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
781: WHEN OTHERS THEN
782: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
783: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
784: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
785: FND_MESSAGE.Set_Token('REASON', SQLERRM);
786: FND_MSG_PUB.Add;
787:
788: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
789:
877: -- display_name
878: IF ((p_display_name IS NULL) OR
879: (p_display_name = FND_API.G_MISS_CHAR))
880: THEN
881: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_INVALID_DSP_NAME');
882: FND_MSG_PUB.Add;
883: RAISE FND_API.G_EXC_ERROR;
884: END IF;
885:
886: -- section_type_code
887: IF ((p_section_type_code IS NULL) OR
888: (p_section_type_code = FND_API.G_MISS_CHAR))
889: THEN
890: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_INVALID_SCT_TYPE');
891: FND_MSG_PUB.Add;
892: RAISE FND_API.G_EXC_ERROR;
893: END IF;
894:
895: -- status_code
896: IF ((p_status_code IS NULL) OR
897: (p_status_code = FND_API.G_MISS_CHAR))
898: THEN
899: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_INVALID_STATUS');
900: FND_MSG_PUB.Add;
901: RAISE FND_API.G_EXC_ERROR;
902: END IF;
903:
904: -- start_date_active
905: IF ((p_start_date_active IS NULL) OR
906: (p_start_date_active = FND_API.G_MISS_DATE))
907: THEN
908: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_INVALID_START_DATE');
909: FND_MSG_PUB.Add;
910: RAISE FND_API.G_EXC_ERROR;
911: END IF;
912:
919: THEN
920: IF(p_available_in_all_sites_flag <> 'Y' AND
921: p_available_in_all_sites_flag <> 'N')
922: THEN
923: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_INVALID_AVL_FLAG');
924: FND_MSG_PUB.Add;
925: RAISE FND_API.G_EXC_ERROR;
926: END IF;
927: END IF;
938:
939: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
940: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
941: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
942: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_INVALID_AUTO_PLACE');
943: FND_MESSAGE.Set_Token('AUTO_PLACEMENT_RULE', p_auto_placement_rule);
944: FND_MSG_PUB.Add;
945: RAISE FND_API.G_EXC_ERROR;
946: END IF;
939: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
940: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
941: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
942: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_INVALID_AUTO_PLACE');
943: FND_MESSAGE.Set_Token('AUTO_PLACEMENT_RULE', p_auto_placement_rule);
944: FND_MSG_PUB.Add;
945: RAISE FND_API.G_EXC_ERROR;
946: END IF;
947:
960:
961: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
962: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
963: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
964: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_INVALID_ORDER_BY');
965: FND_MESSAGE.Set_Token('ORDER_BY_CLAUSE', p_order_by_clause);
966: FND_MSG_PUB.Add;
967: RAISE FND_API.G_EXC_ERROR;
968: END IF;
961: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
962: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
963: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
964: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_INVALID_ORDER_BY');
965: FND_MESSAGE.Set_Token('ORDER_BY_CLAUSE', p_order_by_clause);
966: FND_MSG_PUB.Add;
967: RAISE FND_API.G_EXC_ERROR;
968: END IF;
969:
980:
981: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
982: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
983: ELSIF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
984: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_DUPLICATE_SECT');
985: FND_MSG_PUB.Add;
986: RAISE FND_API.G_EXC_ERROR; -- duplicate section
987: END IF;
988:
997: SELECT context_id INTO l_display_context_id FROM ibe_dsp_context_b
998: WHERE context_id = p_display_context_id;
999: EXCEPTION
1000: WHEN NO_DATA_FOUND THEN
1001: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_DSP_CTX');
1002: FND_MESSAGE.Set_Token('DISPLAY_CONTEXT', p_display_context_id);
1003: FND_MSG_PUB.Add;
1004: RAISE FND_API.G_EXC_ERROR;
1005: WHEN OTHERS THEN
998: WHERE context_id = p_display_context_id;
999: EXCEPTION
1000: WHEN NO_DATA_FOUND THEN
1001: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_DSP_CTX');
1002: FND_MESSAGE.Set_Token('DISPLAY_CONTEXT', p_display_context_id);
1003: FND_MSG_PUB.Add;
1004: RAISE FND_API.G_EXC_ERROR;
1005: WHEN OTHERS THEN
1006: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1002: FND_MESSAGE.Set_Token('DISPLAY_CONTEXT', p_display_context_id);
1003: FND_MSG_PUB.Add;
1004: RAISE FND_API.G_EXC_ERROR;
1005: WHEN OTHERS THEN
1006: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1007: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1008: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1009: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1010: FND_MSG_PUB.Add;
1003: FND_MSG_PUB.Add;
1004: RAISE FND_API.G_EXC_ERROR;
1005: WHEN OTHERS THEN
1006: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1007: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1008: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1009: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1010: FND_MSG_PUB.Add;
1011:
1004: RAISE FND_API.G_EXC_ERROR;
1005: WHEN OTHERS THEN
1006: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1007: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1008: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1009: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1010: FND_MSG_PUB.Add;
1011:
1012: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_DSP_CTX');
1005: WHEN OTHERS THEN
1006: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1007: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1008: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1009: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1010: FND_MSG_PUB.Add;
1011:
1012: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_DSP_CTX');
1013: FND_MSG_PUB.Add;
1008: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1009: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1010: FND_MSG_PUB.Add;
1011:
1012: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_DSP_CTX');
1013: FND_MSG_PUB.Add;
1014: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1015: END;
1016: END IF;
1023: SELECT item_id INTO l_deliverable_id FROM jtf_amv_items_b
1024: WHERE item_id = p_deliverable_id;
1025: EXCEPTION
1026: WHEN NO_DATA_FOUND THEN
1027: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_DLVRBL');
1028: FND_MESSAGE.Set_Token('DELIVERABLE', p_deliverable_id);
1029: FND_MSG_PUB.Add;
1030: RAISE FND_API.G_EXC_ERROR;
1031: WHEN OTHERS THEN
1024: WHERE item_id = p_deliverable_id;
1025: EXCEPTION
1026: WHEN NO_DATA_FOUND THEN
1027: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_DLVRBL');
1028: FND_MESSAGE.Set_Token('DELIVERABLE', p_deliverable_id);
1029: FND_MSG_PUB.Add;
1030: RAISE FND_API.G_EXC_ERROR;
1031: WHEN OTHERS THEN
1032: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1028: FND_MESSAGE.Set_Token('DELIVERABLE', p_deliverable_id);
1029: FND_MSG_PUB.Add;
1030: RAISE FND_API.G_EXC_ERROR;
1031: WHEN OTHERS THEN
1032: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1033: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1034: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1035: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1036: FND_MSG_PUB.Add;
1029: FND_MSG_PUB.Add;
1030: RAISE FND_API.G_EXC_ERROR;
1031: WHEN OTHERS THEN
1032: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1033: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1034: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1035: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1036: FND_MSG_PUB.Add;
1037:
1030: RAISE FND_API.G_EXC_ERROR;
1031: WHEN OTHERS THEN
1032: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1033: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1034: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1035: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1036: FND_MSG_PUB.Add;
1037:
1038: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_DLVRBL');
1031: WHEN OTHERS THEN
1032: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1033: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1034: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1035: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1036: FND_MSG_PUB.Add;
1037:
1038: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_DLVRBL');
1039: FND_MSG_PUB.Add;
1034: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1035: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1036: FND_MSG_PUB.Add;
1037:
1038: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_DLVRBL');
1039: FND_MSG_PUB.Add;
1040: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1041: END;
1042: END IF;
1049: lookup_code = p_section_type_code AND
1050: language = USERENV('LANG');
1051: EXCEPTION
1052: WHEN NO_DATA_FOUND THEN
1053: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_SCT_TYPE');
1054: FND_MESSAGE.Set_Token('SECTION_TYPE', p_section_type_code);
1055: FND_MSG_PUB.Add;
1056: RAISE FND_API.G_EXC_ERROR;
1057: WHEN OTHERS THEN
1050: language = USERENV('LANG');
1051: EXCEPTION
1052: WHEN NO_DATA_FOUND THEN
1053: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_SCT_TYPE');
1054: FND_MESSAGE.Set_Token('SECTION_TYPE', p_section_type_code);
1055: FND_MSG_PUB.Add;
1056: RAISE FND_API.G_EXC_ERROR;
1057: WHEN OTHERS THEN
1058: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1054: FND_MESSAGE.Set_Token('SECTION_TYPE', p_section_type_code);
1055: FND_MSG_PUB.Add;
1056: RAISE FND_API.G_EXC_ERROR;
1057: WHEN OTHERS THEN
1058: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1059: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1060: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1061: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1062: FND_MSG_PUB.Add;
1055: FND_MSG_PUB.Add;
1056: RAISE FND_API.G_EXC_ERROR;
1057: WHEN OTHERS THEN
1058: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1059: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1060: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1061: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1062: FND_MSG_PUB.Add;
1063:
1056: RAISE FND_API.G_EXC_ERROR;
1057: WHEN OTHERS THEN
1058: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1059: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1060: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1061: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1062: FND_MSG_PUB.Add;
1063:
1064: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_SCT_TYPE');
1057: WHEN OTHERS THEN
1058: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1059: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1060: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1061: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1062: FND_MSG_PUB.Add;
1063:
1064: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_SCT_TYPE');
1065: FND_MSG_PUB.Add;
1060: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1061: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1062: FND_MSG_PUB.Add;
1063:
1064: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_SCT_TYPE');
1065: FND_MSG_PUB.Add;
1066: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1067: END;
1068:
1071: OPEN c3(p_status_code);
1072: FETCH c3 INTO l_tmp_str;
1073: IF (c3%NOTFOUND) THEN
1074: CLOSE c3;
1075: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_STATUS');
1076: FND_MESSAGE.Set_Token('STATUS', p_status_code);
1077: FND_MSG_PUB.Add;
1078: RAISE FND_API.G_EXC_ERROR;
1079: END IF;
1072: FETCH c3 INTO l_tmp_str;
1073: IF (c3%NOTFOUND) THEN
1074: CLOSE c3;
1075: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_STATUS');
1076: FND_MESSAGE.Set_Token('STATUS', p_status_code);
1077: FND_MSG_PUB.Add;
1078: RAISE FND_API.G_EXC_ERROR;
1079: END IF;
1080: CLOSE c3;
1093: p_data => x_msg_data,
1094: p_encoded => 'F');
1095:
1096: WHEN OTHERS THEN
1097: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1098: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1099: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1100: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1101: FND_MSG_PUB.Add;
1094: p_encoded => 'F');
1095:
1096: WHEN OTHERS THEN
1097: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1098: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1099: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1100: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1101: FND_MSG_PUB.Add;
1102:
1095:
1096: WHEN OTHERS THEN
1097: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1098: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1099: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1100: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1101: FND_MSG_PUB.Add;
1102:
1103: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1096: WHEN OTHERS THEN
1097: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1098: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1099: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1100: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1101: FND_MSG_PUB.Add;
1102:
1103: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1104:
1192: -- Check null values for required fields
1193: --
1194: -- section_id
1195: IF (p_section_id IS NULL) THEN
1196: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NULL_SCT_ID');
1197: FND_MSG_PUB.Add;
1198: RAISE FND_API.G_EXC_ERROR;
1199: END IF;
1200:
1199: END IF;
1200:
1201: -- display_name
1202: IF (p_display_name IS NULL) THEN
1203: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NULL_DSP_NAME');
1204: FND_MSG_PUB.Add;
1205: RAISE FND_API.G_EXC_ERROR;
1206: END IF;
1207:
1206: END IF;
1207:
1208: -- section_type_code
1209: IF (p_section_type_code IS NULL) THEN
1210: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NULL_SCT_TYPE');
1211: FND_MSG_PUB.Add;
1212: RAISE FND_API.G_EXC_ERROR;
1213: END IF;
1214:
1213: END IF;
1214:
1215: -- status_code
1216: IF (p_status_code IS NULL) THEN
1217: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NULL_STATUS');
1218: FND_MSG_PUB.Add;
1219: RAISE FND_API.G_EXC_ERROR;
1220: END IF;
1221:
1220: END IF;
1221:
1222: -- start_date_active
1223: IF (p_start_date_active IS NULL) THEN
1224: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NULL_START_DATE');
1225: FND_MSG_PUB.Add;
1226: RAISE FND_API.G_EXC_ERROR;
1227: END IF;
1228:
1232: THEN
1233: IF(p_available_in_all_sites_flag <> 'Y' AND
1234: p_available_in_all_sites_flag <> 'N')
1235: THEN
1236: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_INVALID_AVL_FLAG');
1237: FND_MSG_PUB.Add;
1238: RAISE FND_API.G_EXC_ERROR;
1239: END IF;
1240: END IF;
1251:
1252: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1253: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1254: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1255: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_INVALID_AUTO_PLACE');
1256: FND_MESSAGE.Set_Token('AUTO_PLACEMENT_RULE', p_auto_placement_rule);
1257: FND_MSG_PUB.Add;
1258: RAISE FND_API.G_EXC_ERROR;
1259: END IF;
1252: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1253: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1254: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1255: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_INVALID_AUTO_PLACE');
1256: FND_MESSAGE.Set_Token('AUTO_PLACEMENT_RULE', p_auto_placement_rule);
1257: FND_MSG_PUB.Add;
1258: RAISE FND_API.G_EXC_ERROR;
1259: END IF;
1260:
1273:
1274: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1275: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1276: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1277: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_INVALID_ORDER_BY');
1278: FND_MESSAGE.Set_Token('ORDER_BY_CLAUSE', p_order_by_clause);
1279: FND_MSG_PUB.Add;
1280: RAISE FND_API.G_EXC_ERROR;
1281: END IF;
1274: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1275: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1276: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1277: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_INVALID_ORDER_BY');
1278: FND_MESSAGE.Set_Token('ORDER_BY_CLAUSE', p_order_by_clause);
1279: FND_MSG_PUB.Add;
1280: RAISE FND_API.G_EXC_ERROR;
1281: END IF;
1282:
1294:
1295: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1296: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1297: ELSIF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
1298: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_DUPLICATE_SECT');
1299: FND_MSG_PUB.Add;
1300: RAISE FND_API.G_EXC_ERROR; -- duplicate fields
1301: END IF;
1302:
1311: SELECT context_id INTO l_display_context_id FROM ibe_dsp_context_b
1312: WHERE context_id = p_display_context_id;
1313: EXCEPTION
1314: WHEN NO_DATA_FOUND THEN
1315: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_DSP_CTX');
1316: FND_MESSAGE.Set_Token('DISPLAY_CONTEXT', p_display_context_id);
1317: FND_MSG_PUB.Add;
1318: RAISE FND_API.G_EXC_ERROR;
1319: WHEN OTHERS THEN
1312: WHERE context_id = p_display_context_id;
1313: EXCEPTION
1314: WHEN NO_DATA_FOUND THEN
1315: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_DSP_CTX');
1316: FND_MESSAGE.Set_Token('DISPLAY_CONTEXT', p_display_context_id);
1317: FND_MSG_PUB.Add;
1318: RAISE FND_API.G_EXC_ERROR;
1319: WHEN OTHERS THEN
1320: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1316: FND_MESSAGE.Set_Token('DISPLAY_CONTEXT', p_display_context_id);
1317: FND_MSG_PUB.Add;
1318: RAISE FND_API.G_EXC_ERROR;
1319: WHEN OTHERS THEN
1320: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1321: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1322: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1323: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1324: FND_MSG_PUB.Add;
1317: FND_MSG_PUB.Add;
1318: RAISE FND_API.G_EXC_ERROR;
1319: WHEN OTHERS THEN
1320: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1321: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1322: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1323: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1324: FND_MSG_PUB.Add;
1325:
1318: RAISE FND_API.G_EXC_ERROR;
1319: WHEN OTHERS THEN
1320: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1321: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1322: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1323: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1324: FND_MSG_PUB.Add;
1325:
1326: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_DSP_CTX');
1319: WHEN OTHERS THEN
1320: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1321: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1322: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1323: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1324: FND_MSG_PUB.Add;
1325:
1326: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_DSP_CTX');
1327: FND_MSG_PUB.Add;
1322: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1323: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1324: FND_MSG_PUB.Add;
1325:
1326: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_DSP_CTX');
1327: FND_MSG_PUB.Add;
1328: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1329: END;
1330: END IF;
1337: SELECT item_id INTO l_deliverable_id FROM jtf_amv_items_b
1338: WHERE item_id = p_deliverable_id;
1339: EXCEPTION
1340: WHEN NO_DATA_FOUND THEN
1341: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_DLVRBL');
1342: FND_MESSAGE.Set_Token('DELIVERABLE', p_deliverable_id);
1343: FND_MSG_PUB.Add;
1344: RAISE FND_API.G_EXC_ERROR;
1345: WHEN OTHERS THEN
1338: WHERE item_id = p_deliverable_id;
1339: EXCEPTION
1340: WHEN NO_DATA_FOUND THEN
1341: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_DLVRBL');
1342: FND_MESSAGE.Set_Token('DELIVERABLE', p_deliverable_id);
1343: FND_MSG_PUB.Add;
1344: RAISE FND_API.G_EXC_ERROR;
1345: WHEN OTHERS THEN
1346: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1342: FND_MESSAGE.Set_Token('DELIVERABLE', p_deliverable_id);
1343: FND_MSG_PUB.Add;
1344: RAISE FND_API.G_EXC_ERROR;
1345: WHEN OTHERS THEN
1346: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1347: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1348: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1349: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1350: FND_MSG_PUB.Add;
1343: FND_MSG_PUB.Add;
1344: RAISE FND_API.G_EXC_ERROR;
1345: WHEN OTHERS THEN
1346: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1347: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1348: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1349: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1350: FND_MSG_PUB.Add;
1351:
1344: RAISE FND_API.G_EXC_ERROR;
1345: WHEN OTHERS THEN
1346: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1347: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1348: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1349: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1350: FND_MSG_PUB.Add;
1351:
1352: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_DLVRBL');
1345: WHEN OTHERS THEN
1346: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1347: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1348: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1349: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1350: FND_MSG_PUB.Add;
1351:
1352: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_DLVRBL');
1353: FND_MSG_PUB.Add;
1348: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1349: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1350: FND_MSG_PUB.Add;
1351:
1352: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_DLVRBL');
1353: FND_MSG_PUB.Add;
1354: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1355: END;
1356: END IF;
1364: lookup_code = p_section_type_code AND
1365: language = USERENV('LANG');
1366: EXCEPTION
1367: WHEN NO_DATA_FOUND THEN
1368: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_SCT_TYPE');
1369: FND_MESSAGE.Set_Token('SECTION_TYPE', p_section_type_code);
1370: FND_MSG_PUB.Add;
1371: RAISE FND_API.G_EXC_ERROR;
1372: WHEN OTHERS THEN
1365: language = USERENV('LANG');
1366: EXCEPTION
1367: WHEN NO_DATA_FOUND THEN
1368: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_SCT_TYPE');
1369: FND_MESSAGE.Set_Token('SECTION_TYPE', p_section_type_code);
1370: FND_MSG_PUB.Add;
1371: RAISE FND_API.G_EXC_ERROR;
1372: WHEN OTHERS THEN
1373: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1369: FND_MESSAGE.Set_Token('SECTION_TYPE', p_section_type_code);
1370: FND_MSG_PUB.Add;
1371: RAISE FND_API.G_EXC_ERROR;
1372: WHEN OTHERS THEN
1373: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1374: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1375: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1376: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1377: FND_MSG_PUB.Add;
1370: FND_MSG_PUB.Add;
1371: RAISE FND_API.G_EXC_ERROR;
1372: WHEN OTHERS THEN
1373: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1374: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1375: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1376: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1377: FND_MSG_PUB.Add;
1378:
1371: RAISE FND_API.G_EXC_ERROR;
1372: WHEN OTHERS THEN
1373: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1374: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1375: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1376: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1377: FND_MSG_PUB.Add;
1378:
1379: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_SCT_TYPE');
1372: WHEN OTHERS THEN
1373: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1374: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1375: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1376: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1377: FND_MSG_PUB.Add;
1378:
1379: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_SCT_TYPE');
1380: FND_MSG_PUB.Add;
1375: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1376: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1377: FND_MSG_PUB.Add;
1378:
1379: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_SCT_TYPE');
1380: FND_MSG_PUB.Add;
1381: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1382: END;
1383: END IF;
1388: OPEN c3(p_status_code);
1389: FETCH c3 INTO l_tmp_str;
1390: IF (c3%NOTFOUND) THEN
1391: CLOSE c3;
1392: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_STATUS');
1393: FND_MESSAGE.Set_Token('STATUS', p_status_code);
1394: FND_MSG_PUB.Add;
1395: RAISE FND_API.G_EXC_ERROR;
1396: END IF;
1389: FETCH c3 INTO l_tmp_str;
1390: IF (c3%NOTFOUND) THEN
1391: CLOSE c3;
1392: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_STATUS');
1393: FND_MESSAGE.Set_Token('STATUS', p_status_code);
1394: FND_MSG_PUB.Add;
1395: RAISE FND_API.G_EXC_ERROR;
1396: END IF;
1397: CLOSE c3;
1411: p_data => x_msg_data,
1412: p_encoded => 'F');
1413:
1414: WHEN OTHERS THEN
1415: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1416: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1417: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1418: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1419: FND_MSG_PUB.Add;
1412: p_encoded => 'F');
1413:
1414: WHEN OTHERS THEN
1415: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1416: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1417: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1418: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1419: FND_MSG_PUB.Add;
1420:
1413:
1414: WHEN OTHERS THEN
1415: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1416: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1417: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1418: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1419: FND_MSG_PUB.Add;
1420:
1421: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1414: WHEN OTHERS THEN
1415: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1416: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1417: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1418: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1419: FND_MSG_PUB.Add;
1420:
1421: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1422:
1558:
1559: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1560: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1561: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1562: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_INVALID_CREATE');
1563: FND_MSG_PUB.Add;
1564: RAISE FND_API.G_EXC_ERROR; -- invalid section
1565: END IF;
1566:
1611: x_section_id
1612: );
1613: EXCEPTION
1614: WHEN NO_DATA_FOUND THEN
1615: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_INSERT_FAIL');
1616: FND_MSG_PUB.Add;
1617: RAISE FND_API.G_EXC_ERROR;
1618: WHEN OTHERS THEN
1619: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1615: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_INSERT_FAIL');
1616: FND_MSG_PUB.Add;
1617: RAISE FND_API.G_EXC_ERROR;
1618: WHEN OTHERS THEN
1619: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1620: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1621: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1622: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1623: FND_MSG_PUB.Add;
1616: FND_MSG_PUB.Add;
1617: RAISE FND_API.G_EXC_ERROR;
1618: WHEN OTHERS THEN
1619: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1620: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1621: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1622: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1623: FND_MSG_PUB.Add;
1624:
1617: RAISE FND_API.G_EXC_ERROR;
1618: WHEN OTHERS THEN
1619: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1620: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1621: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1622: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1623: FND_MSG_PUB.Add;
1624:
1625: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_INSERT_FAIL');
1618: WHEN OTHERS THEN
1619: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1620: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1621: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1622: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1623: FND_MSG_PUB.Add;
1624:
1625: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_INSERT_FAIL');
1626: FND_MSG_PUB.Add;
1621: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1622: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1623: FND_MSG_PUB.Add;
1624:
1625: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_INSERT_FAIL');
1626: FND_MSG_PUB.Add;
1627: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1628: END;
1629:
1658:
1659: WHEN OTHERS THEN
1660: ROLLBACK TO CREATE_SECTION_GRP;
1661:
1662: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1663: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1664: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1665: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1666: FND_MSG_PUB.Add;
1659: WHEN OTHERS THEN
1660: ROLLBACK TO CREATE_SECTION_GRP;
1661:
1662: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1663: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1664: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1665: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1666: FND_MSG_PUB.Add;
1667:
1660: ROLLBACK TO CREATE_SECTION_GRP;
1661:
1662: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1663: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1664: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1665: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1666: FND_MSG_PUB.Add;
1667:
1668: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1661:
1662: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1663: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1664: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1665: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1666: FND_MSG_PUB.Add;
1667:
1668: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1669:
1770: SELECT section_id INTO l_section_id FROM ibe_dsp_sections_b
1771: WHERE access_name = p_access_name;
1772: EXCEPTION
1773: WHEN NO_DATA_FOUND THEN
1774: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_SCT_ACSS_NAME');
1775: FND_MESSAGE.Set_Token('ACCESS_NAME', p_access_name);
1776: FND_MSG_PUB.Add;
1777: RAISE FND_API.G_EXC_ERROR;
1778: WHEN OTHERS THEN
1771: WHERE access_name = p_access_name;
1772: EXCEPTION
1773: WHEN NO_DATA_FOUND THEN
1774: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_SCT_ACSS_NAME');
1775: FND_MESSAGE.Set_Token('ACCESS_NAME', p_access_name);
1776: FND_MSG_PUB.Add;
1777: RAISE FND_API.G_EXC_ERROR;
1778: WHEN OTHERS THEN
1779: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1775: FND_MESSAGE.Set_Token('ACCESS_NAME', p_access_name);
1776: FND_MSG_PUB.Add;
1777: RAISE FND_API.G_EXC_ERROR;
1778: WHEN OTHERS THEN
1779: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1780: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1781: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1782: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1783: FND_MSG_PUB.Add;
1776: FND_MSG_PUB.Add;
1777: RAISE FND_API.G_EXC_ERROR;
1778: WHEN OTHERS THEN
1779: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1780: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1781: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1782: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1783: FND_MSG_PUB.Add;
1784:
1777: RAISE FND_API.G_EXC_ERROR;
1778: WHEN OTHERS THEN
1779: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1780: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1781: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1782: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1783: FND_MSG_PUB.Add;
1784:
1785: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_SCT_ACSS_NAME');
1778: WHEN OTHERS THEN
1779: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1780: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1781: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1782: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1783: FND_MSG_PUB.Add;
1784:
1785: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_SCT_ACSS_NAME');
1786: FND_MESSAGE.Set_Token('ACCESS_NAME', p_access_name);
1781: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1782: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1783: FND_MSG_PUB.Add;
1784:
1785: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_SCT_ACSS_NAME');
1786: FND_MESSAGE.Set_Token('ACCESS_NAME', p_access_name);
1787: FND_MSG_PUB.Add;
1788: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1789: END;
1782: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1783: FND_MSG_PUB.Add;
1784:
1785: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_SCT_ACSS_NAME');
1786: FND_MESSAGE.Set_Token('ACCESS_NAME', p_access_name);
1787: FND_MSG_PUB.Add;
1788: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1789: END;
1790: ELSE
1788: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1789: END;
1790: ELSE
1791: -- neither section_id nor access_name is specified
1792: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_ID_OR_ACSS');
1793: FND_MSG_PUB.Add;
1794: RAISE FND_API.G_EXC_ERROR;
1795: END IF;
1796:
1841:
1842: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1843: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1844: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1845: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_INVALID_CREATE');
1846: FND_MSG_PUB.Add;
1847: RAISE FND_API.G_EXC_ERROR; -- invalid section
1848: END IF;
1849:
1888: FND_GLOBAL.login_id
1889: );
1890: EXCEPTION
1891: WHEN NO_DATA_FOUND THEN
1892: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_UPDATE_FAIL');
1893: FND_MSG_PUB.Add;
1894: RAISE FND_API.G_EXC_ERROR;
1895: WHEN OTHERS THEN
1896: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1892: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_UPDATE_FAIL');
1893: FND_MSG_PUB.Add;
1894: RAISE FND_API.G_EXC_ERROR;
1895: WHEN OTHERS THEN
1896: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1897: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1898: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1899: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1900: FND_MSG_PUB.Add;
1893: FND_MSG_PUB.Add;
1894: RAISE FND_API.G_EXC_ERROR;
1895: WHEN OTHERS THEN
1896: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1897: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1898: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1899: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1900: FND_MSG_PUB.Add;
1901:
1894: RAISE FND_API.G_EXC_ERROR;
1895: WHEN OTHERS THEN
1896: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1897: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1898: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1899: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1900: FND_MSG_PUB.Add;
1901:
1902: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_UPDATE_FAIL');
1895: WHEN OTHERS THEN
1896: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1897: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1898: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1899: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1900: FND_MSG_PUB.Add;
1901:
1902: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_UPDATE_FAIL');
1903: FND_MSG_PUB.Add;
1898: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1899: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1900: FND_MSG_PUB.Add;
1901:
1902: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_UPDATE_FAIL');
1903: FND_MSG_PUB.Add;
1904: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1905: END;
1906:
1935:
1936: WHEN OTHERS THEN
1937: ROLLBACK TO UPDATE_SECTION_GRP;
1938:
1939: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1940: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1941: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1942: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1943: FND_MSG_PUB.Add;
1936: WHEN OTHERS THEN
1937: ROLLBACK TO UPDATE_SECTION_GRP;
1938:
1939: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1940: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1941: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1942: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1943: FND_MSG_PUB.Add;
1944:
1937: ROLLBACK TO UPDATE_SECTION_GRP;
1938:
1939: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1940: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1941: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1942: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1943: FND_MSG_PUB.Add;
1944:
1945: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1938:
1939: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1940: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1941: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1942: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1943: FND_MSG_PUB.Add;
1944:
1945: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1946:
2026: SELECT section_id INTO l_section_id FROM ibe_dsp_sections_b
2027: WHERE access_name = p_access_name;
2028: EXCEPTION
2029: WHEN NO_DATA_FOUND THEN
2030: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_SCT_ACSS_NAME');
2031: FND_MESSAGE.Set_Token('ACCESS_NAME', p_access_name);
2032: FND_MSG_PUB.Add;
2033: RAISE FND_API.G_EXC_ERROR;
2034: WHEN OTHERS THEN
2027: WHERE access_name = p_access_name;
2028: EXCEPTION
2029: WHEN NO_DATA_FOUND THEN
2030: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_SCT_ACSS_NAME');
2031: FND_MESSAGE.Set_Token('ACCESS_NAME', p_access_name);
2032: FND_MSG_PUB.Add;
2033: RAISE FND_API.G_EXC_ERROR;
2034: WHEN OTHERS THEN
2035: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2031: FND_MESSAGE.Set_Token('ACCESS_NAME', p_access_name);
2032: FND_MSG_PUB.Add;
2033: RAISE FND_API.G_EXC_ERROR;
2034: WHEN OTHERS THEN
2035: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2036: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2037: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2038: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2039: FND_MSG_PUB.Add;
2032: FND_MSG_PUB.Add;
2033: RAISE FND_API.G_EXC_ERROR;
2034: WHEN OTHERS THEN
2035: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2036: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2037: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2038: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2039: FND_MSG_PUB.Add;
2040:
2033: RAISE FND_API.G_EXC_ERROR;
2034: WHEN OTHERS THEN
2035: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2036: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2037: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2038: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2039: FND_MSG_PUB.Add;
2040:
2041: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_SCT_ACSS_NAME');
2034: WHEN OTHERS THEN
2035: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2036: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2037: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2038: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2039: FND_MSG_PUB.Add;
2040:
2041: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_SCT_ACSS_NAME');
2042: FND_MESSAGE.Set_Token('ACCESS_NAME', p_access_name);
2037: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2038: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2039: FND_MSG_PUB.Add;
2040:
2041: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_SCT_ACSS_NAME');
2042: FND_MESSAGE.Set_Token('ACCESS_NAME', p_access_name);
2043: FND_MSG_PUB.Add;
2044: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2045: END;
2038: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2039: FND_MSG_PUB.Add;
2040:
2041: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_SCT_ACSS_NAME');
2042: FND_MESSAGE.Set_Token('ACCESS_NAME', p_access_name);
2043: FND_MSG_PUB.Add;
2044: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2045: END;
2046: ELSE
2044: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2045: END;
2046: ELSE
2047: -- neither section_id nor access_name is specified, therefore cannot delete
2048: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_ID_OR_ACSS');
2049: FND_MSG_PUB.Add;
2050: RAISE FND_API.G_EXC_ERROR;
2051: END IF;
2052:
2058: -- If yes, then cannot delete this section
2059: OPEN c3(l_section_id);
2060: FETCH c3 INTO l_mini_site_id;
2061: IF (c3%FOUND) THEN
2062: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_MSITE_REF');
2063: FND_MESSAGE.Set_Token('SECTION_ID', l_section_id);
2064: FND_MESSAGE.Set_Token('MINI_SITE_ID', l_mini_site_id);
2065: FND_MSG_PUB.Add;
2066: RAISE FND_API.G_EXC_ERROR;
2059: OPEN c3(l_section_id);
2060: FETCH c3 INTO l_mini_site_id;
2061: IF (c3%FOUND) THEN
2062: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_MSITE_REF');
2063: FND_MESSAGE.Set_Token('SECTION_ID', l_section_id);
2064: FND_MESSAGE.Set_Token('MINI_SITE_ID', l_mini_site_id);
2065: FND_MSG_PUB.Add;
2066: RAISE FND_API.G_EXC_ERROR;
2067: END IF;
2060: FETCH c3 INTO l_mini_site_id;
2061: IF (c3%FOUND) THEN
2062: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_MSITE_REF');
2063: FND_MESSAGE.Set_Token('SECTION_ID', l_section_id);
2064: FND_MESSAGE.Set_Token('MINI_SITE_ID', l_mini_site_id);
2065: FND_MSG_PUB.Add;
2066: RAISE FND_API.G_EXC_ERROR;
2067: END IF;
2068:
2149:
2150: WHEN OTHERS THEN
2151: ROLLBACK TO DELETE_SECTION_GRP;
2152:
2153: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2154: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2155: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2156: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2157: FND_MSG_PUB.Add;
2150: WHEN OTHERS THEN
2151: ROLLBACK TO DELETE_SECTION_GRP;
2152:
2153: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2154: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2155: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2156: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2157: FND_MSG_PUB.Add;
2158:
2151: ROLLBACK TO DELETE_SECTION_GRP;
2152:
2153: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2154: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2155: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2156: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2157: FND_MSG_PUB.Add;
2158:
2159: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2152:
2153: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2154: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2155: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2156: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2157: FND_MSG_PUB.Add;
2158:
2159: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2160:
2250:
2251: WHEN OTHERS THEN
2252: ROLLBACK TO UPDATE_DSP_CONTEXT_TO_NULL_GRP;
2253:
2254: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2255: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2256: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2257: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2258: FND_MSG_PUB.Add;
2251: WHEN OTHERS THEN
2252: ROLLBACK TO UPDATE_DSP_CONTEXT_TO_NULL_GRP;
2253:
2254: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2255: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2256: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2257: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2258: FND_MSG_PUB.Add;
2259:
2252: ROLLBACK TO UPDATE_DSP_CONTEXT_TO_NULL_GRP;
2253:
2254: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2255: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2256: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2257: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2258: FND_MSG_PUB.Add;
2259:
2260: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2253:
2254: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2255: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2256: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2257: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2258: FND_MSG_PUB.Add;
2259:
2260: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2261:
2351:
2352: WHEN OTHERS THEN
2353: ROLLBACK TO UPDATE_DELIVERABLE_TO_NULL_GRP;
2354:
2355: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2356: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2357: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2358: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2359: FND_MSG_PUB.Add;
2352: WHEN OTHERS THEN
2353: ROLLBACK TO UPDATE_DELIVERABLE_TO_NULL_GRP;
2354:
2355: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2356: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2357: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2358: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2359: FND_MSG_PUB.Add;
2360:
2353: ROLLBACK TO UPDATE_DELIVERABLE_TO_NULL_GRP;
2354:
2355: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2356: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2357: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2358: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2359: FND_MSG_PUB.Add;
2360:
2361: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2354:
2355: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2356: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2357: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2358: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2359: FND_MSG_PUB.Add;
2360:
2361: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2362: