461: FND_MSG_PUB.initialize;
462: END IF;
463:
464: -- Debug Message
465: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
466: 'PVT: ' || l_api_name || ' start');
467:
468: -- Initialize API return status to SUCCESS
469: x_return_status := FND_API.G_RET_STS_SUCCESS;
489: FETCH C_GET_SCORECARD_ID into l_scorecard_id;
490: CLOSE C_GET_SCORECARD_ID;
491:
492: -- Debug Message
493: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
494: 'Calling SCORECARDS_Insert_Row');
495:
496: -- disable all other scoreCards if this one has enabled_flag = 'Y'
497: if nvl(l_sales_lead_scorecard_rec.start_date_active, sysdate) < trunc(sysdate) then
495:
496: -- disable all other scoreCards if this one has enabled_flag = 'Y'
497: if nvl(l_sales_lead_scorecard_rec.start_date_active, sysdate) < trunc(sysdate) then
498: -- Start Date should be today or in the future
499: AS_UTILITY_PVT.set_message(
500: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
501: p_msg_name => 'SCD_INVALID_START' );
502: x_return_status := FND_API.G_RET_STS_ERROR;
503:
504: elsif ((l_sales_lead_scorecard_rec.end_date_active <
505: l_sales_lead_scorecard_rec.start_date_active) or (l_sales_lead_scorecard_rec.end_date_active is not
506: null and l_sales_lead_scorecard_rec.start_date_active is null)) then
507: -- End Date should be greater than Start Date
508: AS_UTILITY_PVT.set_message(
509: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
510: p_msg_name => 'SCD_INVALID_END' );
511: x_return_status := FND_API.G_RET_STS_ERROR;
512:
542: END IF;
543: end if; -- end of if-then-else checking for Start and End Dates
544:
545: -- Debug Message
546: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
547: 'PVT: ' || l_api_name || ' end');
548:
549:
550: -- Standard call to get message count and if count is 1, get message info.
554: );
555:
556: EXCEPTION
557: WHEN FND_API.G_EXC_ERROR THEN
558: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
559: P_API_NAME => L_API_NAME
560: ,P_PKG_NAME => G_PKG_NAME
561: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
562: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
558: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
559: P_API_NAME => L_API_NAME
560: ,P_PKG_NAME => G_PKG_NAME
561: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
562: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
563: ,X_MSG_COUNT => X_MSG_COUNT
564: ,X_MSG_DATA => X_MSG_DATA
565: ,X_RETURN_STATUS => X_RETURN_STATUS);
566:
564: ,X_MSG_DATA => X_MSG_DATA
565: ,X_RETURN_STATUS => X_RETURN_STATUS);
566:
567: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
568: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
569: P_API_NAME => L_API_NAME
570: ,P_PKG_NAME => G_PKG_NAME
571: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
572: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
568: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
569: P_API_NAME => L_API_NAME
570: ,P_PKG_NAME => G_PKG_NAME
571: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
572: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
573: ,X_MSG_COUNT => X_MSG_COUNT
574: ,X_MSG_DATA => X_MSG_DATA
575: ,X_RETURN_STATUS => X_RETURN_STATUS);
576:
574: ,X_MSG_DATA => X_MSG_DATA
575: ,X_RETURN_STATUS => X_RETURN_STATUS);
576:
577: WHEN OTHERS THEN
578: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
579: P_API_NAME => L_API_NAME
580: ,P_PKG_NAME => G_PKG_NAME
581: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
582: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
577: WHEN OTHERS THEN
578: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
579: P_API_NAME => L_API_NAME
580: ,P_PKG_NAME => G_PKG_NAME
581: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
582: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
583: ,X_MSG_COUNT => X_MSG_COUNT
584: ,X_MSG_DATA => X_MSG_DATA
585: ,X_RETURN_STATUS => X_RETURN_STATUS);
578: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
579: P_API_NAME => L_API_NAME
580: ,P_PKG_NAME => G_PKG_NAME
581: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
582: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
583: ,X_MSG_COUNT => X_MSG_COUNT
584: ,X_MSG_DATA => X_MSG_DATA
585: ,X_RETURN_STATUS => X_RETURN_STATUS);
586:
662: FND_MSG_PUB.initialize;
663: END IF;
664:
665: -- Debug Message
666: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
667: 'PVT: ' || l_api_name || ' start');
668:
669: -- Initialize API return status to SUCCESS
670: x_return_status := FND_API.G_RET_STS_SUCCESS;
680: RAISE FND_API.G_EXC_ERROR;
681: END IF;
682: */
683: -- Debug Message
684: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
685: 'Open C_Get_sales_lead_scorecard');
686:
687: Open C_Get_Lead_Scorecard(l_SALES_LEAD_SCORECARD_rec.SCORECARD_ID);
688: Fetch C_Get_Lead_Scorecard into
708: raise FND_API.G_EXC_ERROR;
709: END IF;
710:
711: -- Debug Message
712: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
713: 'Close C_Get_lead_Scorecard');
714: Close C_Get_Lead_Scorecard;
715:
716: -- Check Whether record has been changed by someone else
731: l_ref_sales_lead_scorecard_rec.start_date_active) or
732: (l_ref_sales_lead_scorecard_rec.start_date_active is null))) AND
733: l_sales_lead_scorecard_rec.start_date_active <> FND_API.G_MISS_DATE) then
734: -- new Start Date should be today or in the future if it has been changed
735: AS_UTILITY_PVT.set_message(
736: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
737: p_msg_name => 'SCD_INVALID_START' );
738: x_return_status := FND_API.G_RET_STS_ERROR;
739:
747: (l_ref_sales_lead_scorecard_rec.end_date_active is null)))) AND
748: l_sales_lead_scorecard_rec.end_date_active <> FND_API.G_MISS_DATE)
749: then
750: -- new End Date should be greater than Start Date and in the future if it has been changed
751: AS_UTILITY_PVT.set_message(
752: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
753: p_msg_name => 'SCD_INVALID_END' );
754: x_return_status := FND_API.G_RET_STS_ERROR;
755:
776: l_ref_SALES_LEAD_SCORECARD_rec.END_DATE_ACTIVE;
777: END IF;
778:
779: -- Debug Message
780: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
781: 'Calling _SCORECARDS_Update_Row');
782:
783: -- disable all other scoreCards if this one has enabled_flag = 'Y'
784: /* kmahajan 3/27/01 active_flag validation replaced by date validation
842:
843: end if; -- end of if-then-else for Start and End dates
844:
845: -- Debug Message
846: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
847: 'PVT: ' || l_api_name || ' end');
848:
849: -- Standard call to get message count and if count is 1, get message info.
850: FND_MSG_PUB.Count_And_Get
852: p_data => x_msg_data );
853:
854: EXCEPTION
855: WHEN FND_API.G_EXC_ERROR THEN
856: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
857: P_API_NAME => L_API_NAME
858: ,P_PKG_NAME => G_PKG_NAME
859: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
860: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
856: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
857: P_API_NAME => L_API_NAME
858: ,P_PKG_NAME => G_PKG_NAME
859: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
860: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
861: ,X_MSG_COUNT => X_MSG_COUNT
862: ,X_MSG_DATA => X_MSG_DATA
863: ,X_RETURN_STATUS => X_RETURN_STATUS);
864:
862: ,X_MSG_DATA => X_MSG_DATA
863: ,X_RETURN_STATUS => X_RETURN_STATUS);
864:
865: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
866: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
867: P_API_NAME => L_API_NAME
868: ,P_PKG_NAME => G_PKG_NAME
869: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
870: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
866: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
867: P_API_NAME => L_API_NAME
868: ,P_PKG_NAME => G_PKG_NAME
869: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
870: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
871: ,X_MSG_COUNT => X_MSG_COUNT
872: ,X_MSG_DATA => X_MSG_DATA
873: ,X_RETURN_STATUS => X_RETURN_STATUS);
874:
872: ,X_MSG_DATA => X_MSG_DATA
873: ,X_RETURN_STATUS => X_RETURN_STATUS);
874:
875: WHEN OTHERS THEN
876: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
877: P_API_NAME => L_API_NAME
878: ,P_PKG_NAME => G_PKG_NAME
879: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
880: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
875: WHEN OTHERS THEN
876: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
877: P_API_NAME => L_API_NAME
878: ,P_PKG_NAME => G_PKG_NAME
879: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
880: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
881: ,X_MSG_COUNT => X_MSG_COUNT
882: ,X_MSG_DATA => X_MSG_DATA
883: ,X_RETURN_STATUS => X_RETURN_STATUS);
876: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
877: P_API_NAME => L_API_NAME
878: ,P_PKG_NAME => G_PKG_NAME
879: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
880: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
881: ,X_MSG_COUNT => X_MSG_COUNT
882: ,X_MSG_DATA => X_MSG_DATA
883: ,X_RETURN_STATUS => X_RETURN_STATUS);
884:
935: FND_MSG_PUB.initialize;
936: END IF;
937:
938: -- Debug Message
939: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
940: 'PVT:' || l_api_name || 'start');
941:
942: -- Initialize API return status to SUCCESS
943: x_return_status := FND_API.G_RET_STS_SUCCESS;
957: RAISE FND_API.G_EXC_ERROR;
958: END IF;
959:
960: -- Debug Message
961: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
962: 'Open C_Get_sales_lead_scorecard');
963:
964: Open C_Get_Lead_Scorecard(p_SCORECARD_ID);
965: Fetch C_Get_Lead_Scorecard into
975: raise FND_API.G_EXC_ERROR;
976: END IF;
977:
978: -- Debug Message
979: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
980: 'Close C_Get_scorecard_del');
981: Close C_Get_Lead_Scorecard;
982:
983: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
979: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
980: 'Close C_Get_scorecard_del');
981: Close C_Get_Lead_Scorecard;
982:
983: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
984: 'Calling _SCORECARD_Delete_Row');
985:
986: -- Invoke table handler
987: AS_SALES_LEAD_SCORECARDS_PKG.Delete_Row(
997: COMMIT WORK;
998: END IF;
999:
1000: -- Debug Message
1001: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1002: 'PVT: ' || l_api_name || ' end');
1003: FND_MSG_PUB.Count_And_Get
1004: ( p_count => x_msg_count,
1005: p_data => x_msg_data );
1005: p_data => x_msg_data );
1006:
1007: EXCEPTION
1008: WHEN FND_API.G_EXC_ERROR THEN
1009: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1010: P_API_NAME => L_API_NAME
1011: ,P_PKG_NAME => G_PKG_NAME
1012: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1013: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1009: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1010: P_API_NAME => L_API_NAME
1011: ,P_PKG_NAME => G_PKG_NAME
1012: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1013: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1014: ,X_MSG_COUNT => X_MSG_COUNT
1015: ,X_MSG_DATA => X_MSG_DATA
1016: ,X_RETURN_STATUS => X_RETURN_STATUS);
1017:
1015: ,X_MSG_DATA => X_MSG_DATA
1016: ,X_RETURN_STATUS => X_RETURN_STATUS);
1017:
1018: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1019: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1020: P_API_NAME => L_API_NAME
1021: ,P_PKG_NAME => G_PKG_NAME
1022: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1023: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1019: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1020: P_API_NAME => L_API_NAME
1021: ,P_PKG_NAME => G_PKG_NAME
1022: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1023: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1024: ,X_MSG_COUNT => X_MSG_COUNT
1025: ,X_MSG_DATA => X_MSG_DATA
1026: ,X_RETURN_STATUS => X_RETURN_STATUS);
1027:
1025: ,X_MSG_DATA => X_MSG_DATA
1026: ,X_RETURN_STATUS => X_RETURN_STATUS);
1027:
1028: WHEN OTHERS THEN
1029: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1030: P_API_NAME => L_API_NAME
1031: ,P_PKG_NAME => G_PKG_NAME
1032: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
1033: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1028: WHEN OTHERS THEN
1029: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1030: P_API_NAME => L_API_NAME
1031: ,P_PKG_NAME => G_PKG_NAME
1032: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
1033: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1034: ,X_MSG_COUNT => X_MSG_COUNT
1035: ,X_MSG_DATA => X_MSG_DATA
1036: ,X_RETURN_STATUS => X_RETURN_STATUS);
1029: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1030: P_API_NAME => L_API_NAME
1031: ,P_PKG_NAME => G_PKG_NAME
1032: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
1033: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1034: ,X_MSG_COUNT => X_MSG_COUNT
1035: ,X_MSG_DATA => X_MSG_DATA
1036: ,X_RETURN_STATUS => X_RETURN_STATUS);
1037:
1082: FND_MSG_PUB.initialize;
1083: END IF;
1084:
1085: -- Debug Message
1086: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1087: 'PVT: ' || l_api_name || ' start');
1088:
1089: -- Initialize API return status to SUCCESS
1090: x_return_status := FND_API.G_RET_STS_SUCCESS;
1106:
1107: IF ( P_validation_level >= AS_UTILITY_PUB.G_VALID_LEVEL_ITEM)
1108: THEN
1109: -- Debug message
1110: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1111: 'Calling Validate_Seed_Qual');
1112:
1113: -- Invoke validation procedures
1114: Validate_Seed_Qual(
1112:
1113: -- Invoke validation procedures
1114: Validate_Seed_Qual(
1115: P_Init_Msg_List => FND_API.G_FALSE,
1116: P_Validation_mode => AS_UTILITY_PVT.G_CREATE,
1117: P_CARDRULE_QUAL_rec => l_cardrule_qual_rec,
1118: X_Return_Status => x_return_status,
1119: X_Msg_Count => x_msg_count,
1120: X_Msg_Data => x_msg_data
1128:
1129: OPEN C_GET_QUAL_VALUE_ID;
1130: FETCH C_GET_QUAL_VALUE_ID into l_qual_value_id;
1131: CLOSE C_GET_QUAL_VALUE_ID;
1132: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1133: 'seq card qual id'||l_qual_value_id);
1134: -- Debug Message
1135: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1136: 'Calling CARDRULE_QUAL_Insert_Row');
1131: CLOSE C_GET_QUAL_VALUE_ID;
1132: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1133: 'seq card qual id'||l_qual_value_id);
1134: -- Debug Message
1135: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1136: 'Calling CARDRULE_QUAL_Insert_Row');
1137:
1138: -- Invoke table handler(CARDRULE_QUAL_Insert_Row)
1139: AS_CARD_RULE_QUAL_VALUES_PKG.Insert_Row(
1163: RAISE FND_API.G_EXC_ERROR;
1164: END IF;
1165:
1166: X_QUAL_VALUE_ID := l_qual_value_id;
1167: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1168: 'after insert '||l_qual_value_id);
1169:
1170:
1171: --
1178: COMMIT WORK;
1179: END IF;
1180:
1181: -- Debug Message
1182: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1183: 'PVT: ' || l_api_name || ' end');
1184:
1185: -- Standard call to get message count and if count is 1, get message info.
1186: FND_MSG_PUB.Count_And_Get
1189: );
1190:
1191: EXCEPTION
1192: WHEN FND_API.G_EXC_ERROR THEN
1193: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1194: P_API_NAME => L_API_NAME
1195: ,P_PKG_NAME => G_PKG_NAME
1196: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1197: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1193: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1194: P_API_NAME => L_API_NAME
1195: ,P_PKG_NAME => G_PKG_NAME
1196: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1197: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1198: ,X_MSG_COUNT => X_MSG_COUNT
1199: ,X_MSG_DATA => X_MSG_DATA
1200: ,X_RETURN_STATUS => X_RETURN_STATUS);
1201:
1199: ,X_MSG_DATA => X_MSG_DATA
1200: ,X_RETURN_STATUS => X_RETURN_STATUS);
1201:
1202: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1203: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1204: P_API_NAME => L_API_NAME
1205: ,P_PKG_NAME => G_PKG_NAME
1206: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1207: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1203: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1204: P_API_NAME => L_API_NAME
1205: ,P_PKG_NAME => G_PKG_NAME
1206: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1207: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1208: ,X_MSG_COUNT => X_MSG_COUNT
1209: ,X_MSG_DATA => X_MSG_DATA
1210: ,X_RETURN_STATUS => X_RETURN_STATUS);
1211:
1209: ,X_MSG_DATA => X_MSG_DATA
1210: ,X_RETURN_STATUS => X_RETURN_STATUS);
1211:
1212: WHEN OTHERS THEN
1213: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1214: P_API_NAME => L_API_NAME
1215: ,P_PKG_NAME => G_PKG_NAME
1216: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
1217: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1212: WHEN OTHERS THEN
1213: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1214: P_API_NAME => L_API_NAME
1215: ,P_PKG_NAME => G_PKG_NAME
1216: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
1217: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1218: ,X_MSG_COUNT => X_MSG_COUNT
1219: ,X_MSG_DATA => X_MSG_DATA
1220: ,X_RETURN_STATUS => X_RETURN_STATUS);
1213: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1214: P_API_NAME => L_API_NAME
1215: ,P_PKG_NAME => G_PKG_NAME
1216: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
1217: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1218: ,X_MSG_COUNT => X_MSG_COUNT
1219: ,X_MSG_DATA => X_MSG_DATA
1220: ,X_RETURN_STATUS => X_RETURN_STATUS);
1221:
1271: FND_MSG_PUB.initialize;
1272: END IF;
1273:
1274: -- Debug Message
1275: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1276: 'PVT: ' || l_api_name || ' start');
1277:
1278: -- Initialize API return status to SUCCESS
1279: x_return_status := FND_API.G_RET_STS_SUCCESS;
1282: -- Api body
1283: --
1284:
1285: -- Debug Message
1286: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1287: 'Open C_Get_CARDRULE_QUAL');
1288:
1289: -- dbms_output.put_line('in update_CardRule_Qual body');
1290:
1303: raise FND_API.G_EXC_ERROR;
1304: END IF;
1305:
1306: -- Debug Message
1307: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1308: 'Close C_Get_CARDRULE_QUAL');
1309: Close C_Get_CARDRULE_QUAL;
1310:
1311:
1380: -- Invoke validation procedures
1381: IF ( P_validation_level >= AS_UTILITY_PUB.G_VALID_LEVEL_ITEM)
1382: THEN
1383: -- Debug message
1384: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1385: 'Calling Validate_Seed_Qual');
1386:
1387: -- Invoke validation procedures
1388: Validate_Seed_Qual(
1386:
1387: -- Invoke validation procedures
1388: Validate_Seed_Qual(
1389: P_Init_Msg_List => FND_API.G_FALSE,
1390: P_Validation_mode => AS_UTILITY_PVT.G_CREATE,
1391: P_CARDRULE_QUAL_rec => l_cardrule_qual_rec,
1392: X_Return_Status => x_return_status,
1393: X_Msg_Count => x_msg_count,
1394: X_Msg_Data => x_msg_data
1401:
1402:
1403:
1404: -- Debug Message
1405: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1406: 'Calling _CARDRULE_QUAL_Update_Row');
1407:
1408: -- Invoke table handler(CARDRULE_QUAL_Update_Row)
1409: AS_CARD_RULE_QUAL_VALUES_PKG.Update_Row(
1443: COMMIT WORK;
1444: END IF;
1445:
1446: -- Debug Message
1447: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1448: 'PVT: ' || l_api_name || ' end');
1449:
1450: -- Standard call to get message count and if count is 1, get message info.
1451: FND_MSG_PUB.Count_And_Get
1453: p_data => x_msg_data );
1454:
1455: EXCEPTION
1456: WHEN FND_API.G_EXC_ERROR THEN
1457: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1458: P_API_NAME => L_API_NAME
1459: ,P_PKG_NAME => G_PKG_NAME
1460: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1461: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1457: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1458: P_API_NAME => L_API_NAME
1459: ,P_PKG_NAME => G_PKG_NAME
1460: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1461: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1462: ,X_MSG_COUNT => X_MSG_COUNT
1463: ,X_MSG_DATA => X_MSG_DATA
1464: ,X_RETURN_STATUS => X_RETURN_STATUS);
1465:
1463: ,X_MSG_DATA => X_MSG_DATA
1464: ,X_RETURN_STATUS => X_RETURN_STATUS);
1465:
1466: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1467: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1468: P_API_NAME => L_API_NAME
1469: ,P_PKG_NAME => G_PKG_NAME
1470: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1471: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1467: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1468: P_API_NAME => L_API_NAME
1469: ,P_PKG_NAME => G_PKG_NAME
1470: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1471: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1472: ,X_MSG_COUNT => X_MSG_COUNT
1473: ,X_MSG_DATA => X_MSG_DATA
1474: ,X_RETURN_STATUS => X_RETURN_STATUS);
1475:
1473: ,X_MSG_DATA => X_MSG_DATA
1474: ,X_RETURN_STATUS => X_RETURN_STATUS);
1475:
1476: WHEN OTHERS THEN
1477: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1478: P_API_NAME => L_API_NAME
1479: ,P_PKG_NAME => G_PKG_NAME
1480: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
1481: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1476: WHEN OTHERS THEN
1477: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1478: P_API_NAME => L_API_NAME
1479: ,P_PKG_NAME => G_PKG_NAME
1480: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
1481: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1482: ,X_MSG_COUNT => X_MSG_COUNT
1483: ,X_MSG_DATA => X_MSG_DATA
1484: ,X_RETURN_STATUS => X_RETURN_STATUS);
1477: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1478: P_API_NAME => L_API_NAME
1479: ,P_PKG_NAME => G_PKG_NAME
1480: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
1481: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1482: ,X_MSG_COUNT => X_MSG_COUNT
1483: ,X_MSG_DATA => X_MSG_DATA
1484: ,X_RETURN_STATUS => X_RETURN_STATUS);
1485: END Update_CardRule_Qual;
1529: FND_MSG_PUB.initialize;
1530: END IF;
1531:
1532: -- Debug Message
1533: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1534: 'PVT:' || l_api_name || 'start');
1535:
1536: -- Initialize API return status to SUCCESS
1537: x_return_status := FND_API.G_RET_STS_SUCCESS;
1551: RAISE FND_API.G_EXC_ERROR;
1552: END IF;
1553:
1554: -- Debug Message
1555: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1556: 'Open C_Get_CARDRULE_QUAL');
1557:
1558: Open C_Get_CARDRULE_QUAL(l_QUAL_VALUE_ID);
1559: Fetch C_Get_CARDRULE_QUAL into
1569: raise FND_API.G_EXC_ERROR;
1570: END IF;
1571:
1572: -- Debug Message
1573: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1574: 'Close C_Get_CARDRULE_QUAL_del');
1575: Close C_Get_CARDRULE_QUAL;
1576:
1577: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1573: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1574: 'Close C_Get_CARDRULE_QUAL_del');
1575: Close C_Get_CARDRULE_QUAL;
1576:
1577: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1578: 'Calling _CARDRULE_QUAL_Delete_Row');
1579:
1580: -- Invoke table handler
1581: AS_CARD_RULE_QUAL_VALUES_PKG.Delete_Row(
1591: COMMIT WORK;
1592: END IF;
1593:
1594: -- Debug Message
1595: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1596: 'PVT: ' || l_api_name || ' end');
1597: FND_MSG_PUB.Count_And_Get
1598: ( p_count => x_msg_count,
1599: p_data => x_msg_data );
1599: p_data => x_msg_data );
1600:
1601: EXCEPTION
1602: WHEN FND_API.G_EXC_ERROR THEN
1603: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1604: P_API_NAME => L_API_NAME
1605: ,P_PKG_NAME => G_PKG_NAME
1606: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1607: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1603: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1604: P_API_NAME => L_API_NAME
1605: ,P_PKG_NAME => G_PKG_NAME
1606: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1607: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1608: ,X_MSG_COUNT => X_MSG_COUNT
1609: ,X_MSG_DATA => X_MSG_DATA
1610: ,X_RETURN_STATUS => X_RETURN_STATUS);
1611:
1609: ,X_MSG_DATA => X_MSG_DATA
1610: ,X_RETURN_STATUS => X_RETURN_STATUS);
1611:
1612: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1613: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1614: P_API_NAME => L_API_NAME
1615: ,P_PKG_NAME => G_PKG_NAME
1616: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1617: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1613: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1614: P_API_NAME => L_API_NAME
1615: ,P_PKG_NAME => G_PKG_NAME
1616: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1617: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1618: ,X_MSG_COUNT => X_MSG_COUNT
1619: ,X_MSG_DATA => X_MSG_DATA
1620: ,X_RETURN_STATUS => X_RETURN_STATUS);
1621:
1619: ,X_MSG_DATA => X_MSG_DATA
1620: ,X_RETURN_STATUS => X_RETURN_STATUS);
1621:
1622: WHEN OTHERS THEN
1623: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1624: P_API_NAME => L_API_NAME
1625: ,P_PKG_NAME => G_PKG_NAME
1626: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
1627: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1622: WHEN OTHERS THEN
1623: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1624: P_API_NAME => L_API_NAME
1625: ,P_PKG_NAME => G_PKG_NAME
1626: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
1627: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1628: ,X_MSG_COUNT => X_MSG_COUNT
1629: ,X_MSG_DATA => X_MSG_DATA
1630: ,X_RETURN_STATUS => X_RETURN_STATUS);
1623: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1624: P_API_NAME => L_API_NAME
1625: ,P_PKG_NAME => G_PKG_NAME
1626: ,P_EXCEPTION_LEVEL => AS_UTILITY_PVT.G_EXC_OTHERS
1627: ,P_PACKAGE_TYPE => AS_UTILITY_PVT.G_PVT
1628: ,X_MSG_COUNT => X_MSG_COUNT
1629: ,X_MSG_DATA => X_MSG_DATA
1630: ,X_RETURN_STATUS => X_RETURN_STATUS);
1631: