[Home] [Help]
118: WHERE orig_sys_header_ref = p_orig_sys_header_ref
119: AND orig_sys_line_ref = p_orig_sys_line_ref
120: AND request_id = p_request_id;
121:
122: fnd_message.set_name('QP', 'QP_DUPLICATE_LIST_LINES');
123: l_msg := fnd_message.Get;
124:
125: SELECT qp_interface_errors_s.NEXTVAL
126: INTO l_error_id
119: AND orig_sys_line_ref = p_orig_sys_line_ref
120: AND request_id = p_request_id;
121:
122: fnd_message.set_name('QP', 'QP_DUPLICATE_LIST_LINES');
123: l_msg := fnd_message.Get;
124:
125: SELECT qp_interface_errors_s.NEXTVAL
126: INTO l_error_id
127: FROM dual;
607: ELSE
608: -- Prepare the encoded message by setting it on the message
609: -- dictionary stack. Then, add it to the API message list.
610:
611: FND_MESSAGE.Set_Encoded(FND_FLEX_DESCVAL.Encoded_Error_Message);
612:
613: -- Derive return status.
614:
615: IF FND_FLEX_DESCVAL.value_error OR
1020: THEN
1021:
1022: p_header_rec.process_status_flag(I):=NULL; --'E';
1023:
1024: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
1025: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','ORIG_SYS_HEADER_ID');
1026: QP_BULK_MSG.ADD(l_msg_rec);
1027:
1028: END IF;
1021:
1022: p_header_rec.process_status_flag(I):=NULL; --'E';
1023:
1024: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
1025: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','ORIG_SYS_HEADER_ID');
1026: QP_BULK_MSG.ADD(l_msg_rec);
1027:
1028: END IF;
1029: END IF;
1034: THEN
1035: p_header_rec.list_type_code(I):= '1';
1036: P_header_rec.process_status_flag(I):=NULL; --'E';
1037:
1038: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
1039: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','LIST_TYPE_CODE');
1040: QP_BULK_MSG.ADD(l_msg_rec);
1041:
1042: END IF;
1035: p_header_rec.list_type_code(I):= '1';
1036: P_header_rec.process_status_flag(I):=NULL; --'E';
1037:
1038: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
1039: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','LIST_TYPE_CODE');
1040: QP_BULK_MSG.ADD(l_msg_rec);
1041:
1042: END IF;
1043:
1046: THEN
1047: p_header_rec.currency_code(I) := '1';
1048: P_header_rec.process_status_flag(I):=NULL; --'E';
1049:
1050: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
1051: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','CURRENCY_CODE');
1052: QP_BULK_MSG.ADD(l_msg_rec);
1053: qp_bulk_loader_pub.write_log('Currency Validation failed');
1054:
1047: p_header_rec.currency_code(I) := '1';
1048: P_header_rec.process_status_flag(I):=NULL; --'E';
1049:
1050: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
1051: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','CURRENCY_CODE');
1052: QP_BULK_MSG.ADD(l_msg_rec);
1053: qp_bulk_loader_pub.write_log('Currency Validation failed');
1054:
1055: END IF;
1059: THEN
1060: p_header_rec.name(I) := '1';
1061: p_header_rec.process_status_flag(I):=NULL; --'E';
1062:
1063: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
1064: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','NAME');
1065: QP_BULK_MSG.ADD(l_msg_rec);
1066:
1067: END IF;
1060: p_header_rec.name(I) := '1';
1061: p_header_rec.process_status_flag(I):=NULL; --'E';
1062:
1063: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
1064: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','NAME');
1065: QP_BULK_MSG.ADD(l_msg_rec);
1066:
1067: END IF;
1068:
1071: THEN
1072: p_header_rec.rounding_factor(I):= -1;
1073: P_header_rec.process_status_flag(I):=NULL;
1074:
1075: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
1076: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','ROUNDING_FACTOR');
1077: QP_BULK_MSG.ADD(l_msg_rec);
1078:
1079: END IF;
1072: p_header_rec.rounding_factor(I):= -1;
1073: P_header_rec.process_status_flag(I):=NULL;
1074:
1075: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
1076: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','ROUNDING_FACTOR');
1077: QP_BULK_MSG.ADD(l_msg_rec);
1078:
1079: END IF;
1080:
1084: THEN
1085: p_header_rec.language(I):= '1';
1086: P_header_rec.process_status_flag(I):=NULL;
1087:
1088: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
1089: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','LANGUAGE');
1090: QP_BULK_MSG.ADD(l_msg_rec);
1091:
1092: END IF;
1085: p_header_rec.language(I):= '1';
1086: P_header_rec.process_status_flag(I):=NULL;
1087:
1088: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
1089: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','LANGUAGE');
1090: QP_BULK_MSG.ADD(l_msg_rec);
1091:
1092: END IF;
1093:
1096: THEN
1097: p_header_rec.source_lang(I):= '1';
1098: p_header_rec.process_status_flag(I):=NULL;
1099:
1100: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
1101: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','SOURCE_LANG');
1102: QP_BULK_MSG.ADD(l_msg_rec);
1103:
1104: END IF;
1097: p_header_rec.source_lang(I):= '1';
1098: p_header_rec.process_status_flag(I):=NULL;
1099:
1100: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
1101: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','SOURCE_LANG');
1102: QP_BULK_MSG.ADD(l_msg_rec);
1103:
1104: END IF;
1105: END IF;
1109: AND p_header_rec.currency_header_id(I) IS NULL
1110: THEN
1111:
1112: p_header_rec.process_status_flag(I):=NULL;
1113: FND_MESSAGE.SET_NAME('QP','QP_MUL_CURR_REQD');
1114: QP_BULK_MSG.ADD(l_msg_rec);
1115:
1116: END IF;
1117:
1139:
1140: IF l_date_length<>10 or l_first_date_hash<>'/' or l_second_date_hash<>'/'
1141: THEN
1142: p_header_rec.process_status_flag(I):=NULL;
1143: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_DATE');
1144: QP_BULK_MSG.Add(l_msg_rec);
1145: END IF;
1146:
1147: l_start_date := to_date(p_header_rec.start_date_active(I),'YYYY/MM/DD');
1147: l_start_date := to_date(p_header_rec.start_date_active(I),'YYYY/MM/DD');
1148: exception
1149: when others then
1150: p_header_rec.process_status_flag(I):=NULL;
1151: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_DATE');
1152: QP_BULK_MSG.Add(l_msg_rec);
1153: end;
1154: END IF;
1155:
1169:
1170: IF l_date_length<>10 or l_first_date_hash<>'/' or l_second_date_hash<>'/'
1171: THEN
1172: p_header_rec.process_status_flag(I):=NULL;
1173: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_DATE');
1174: QP_BULK_MSG.Add(l_msg_rec);
1175: END IF;
1176:
1177: l_end_date := to_date(p_header_rec.end_date_active(I),'YYYY/MM/DD');
1177: l_end_date := to_date(p_header_rec.end_date_active(I),'YYYY/MM/DD');
1178: exception
1179: when others then
1180: p_header_rec.process_status_flag(I):=NULL;
1181: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_DATE');
1182: QP_BULK_MSG.Add(l_msg_rec);
1183: end;
1184: END IF;
1185: -- Bug 4904393 END RAVI (5138015,5207598,5207612,5414062)
1193: AND l_start_date IS NOT NULL
1194: THEN
1195: IF l_start_date > l_end_date THEN
1196: p_header_rec.process_status_flag(I):=NULL;
1197: FND_MESSAGE.SET_NAME('QP', 'QP_STRT_DATE_BFR_END_DATE');
1198: QP_BULK_MSG.Add(l_msg_rec);
1199: END IF;
1200: END IF;
1201: -- Bug 4929691 END RAVI (5207598,5207612)
1212: WHERE CURRENCY_CODE = P_header_rec.CURRENCY_CODE(I);
1213: EXCEPTION
1214: WHEN NO_DATA_FOUND THEN
1215: p_header_rec.process_status_flag(I):=NULL;
1216: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
1217: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','rounding_factor');
1218: qp_bulk_msg.add(l_msg_rec);
1219: END;
1220: END IF;
1213: EXCEPTION
1214: WHEN NO_DATA_FOUND THEN
1215: p_header_rec.process_status_flag(I):=NULL;
1216: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
1217: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','rounding_factor');
1218: qp_bulk_msg.add(l_msg_rec);
1219: END;
1220: END IF;
1221:
1226:
1227: IF l_price_rounding = 'PRECISION' THEN
1228: IF p_header_rec.rounding_factor(I) <> l_precision THEN
1229: p_header_rec.process_status_flag(I):=NULL;
1230: FND_MESSAGE.SET_NAME('QP', 'QP_ROUNDING_FACTOR_NO_UPDATE');
1231: qp_bulk_msg.add(l_msg_rec);
1232: END IF;
1233: END IF;
1234:
1234:
1235: IF (p_header_rec.rounding_factor(I))
1236: < nvl((l_precision), (p_header_rec.rounding_factor(I))) THEN
1237: p_header_rec.process_status_flag(I):=NULL;
1238: FND_MESSAGE.SET_NAME('QP', 'OE_PRL_INVALID_ROUNDING_FACTOR');
1239: FND_MESSAGE.SET_TOKEN('PRECISION', l_precision);
1240: qp_bulk_msg.add(l_msg_rec);
1241: END IF;
1242:
1235: IF (p_header_rec.rounding_factor(I))
1236: < nvl((l_precision), (p_header_rec.rounding_factor(I))) THEN
1237: p_header_rec.process_status_flag(I):=NULL;
1238: FND_MESSAGE.SET_NAME('QP', 'OE_PRL_INVALID_ROUNDING_FACTOR');
1239: FND_MESSAGE.SET_TOKEN('PRECISION', l_precision);
1240: qp_bulk_msg.add(l_msg_rec);
1241: END IF;
1242:
1243: ELSE
1243: ELSE
1244: IF l_price_rounding = 'PRECISION' THEN
1245: IF p_header_rec.rounding_factor(I) <> l_extended_precision THEN
1246: p_header_rec.process_status_flag(I):=NULL;
1247: FND_MESSAGE.SET_NAME('QP', 'QP_ROUNDING_FACTOR_NO_UPDATE');
1248: qp_bulk_msg.add(l_msg_rec);
1249: END IF;
1250: END IF;
1251:
1251:
1252: IF (p_header_rec.rounding_factor(I))
1253: < nvl((l_extended_precision),(p_header_rec.rounding_factor(I))) THEN
1254: p_header_rec.process_status_flag(I):=NULL;
1255: FND_MESSAGE.SET_NAME('QP', 'OE_PRL_INVALID_ROUNDING_FACTOR');
1256: FND_MESSAGE.SET_TOKEN('PRECISION', l_extended_precision);
1257: qp_bulk_msg.add(l_msg_rec);
1258: END IF;
1259: END IF;
1252: IF (p_header_rec.rounding_factor(I))
1253: < nvl((l_extended_precision),(p_header_rec.rounding_factor(I))) THEN
1254: p_header_rec.process_status_flag(I):=NULL;
1255: FND_MESSAGE.SET_NAME('QP', 'OE_PRL_INVALID_ROUNDING_FACTOR');
1256: FND_MESSAGE.SET_TOKEN('PRECISION', l_extended_precision);
1257: qp_bulk_msg.add(l_msg_rec);
1258: END IF;
1259: END IF;
1260:
1272: THEN
1273: IF p_header_rec.active_flag(I) NOT IN ('Y', 'N', 'y', 'n')
1274: THEN
1275: p_header_rec.process_status_flag(I):=NULL;
1276: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
1277: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','active_flag');
1278: qp_bulk_msg.add(l_msg_rec);
1279: END IF;
1280: END IF;
1273: IF p_header_rec.active_flag(I) NOT IN ('Y', 'N', 'y', 'n')
1274: THEN
1275: p_header_rec.process_status_flag(I):=NULL;
1276: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
1277: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','active_flag');
1278: qp_bulk_msg.add(l_msg_rec);
1279: END IF;
1280: END IF;
1281:
1283: THEN
1284: IF p_header_rec.automatic_flag(I) NOT IN ('Y', 'N', 'y', 'n')
1285: THEN
1286: p_header_rec.process_status_flag(I):=NULL;
1287: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
1288: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','automatic_flag');
1289: qp_bulk_msg.add(l_msg_rec);
1290: END IF;
1291: END IF;
1284: IF p_header_rec.automatic_flag(I) NOT IN ('Y', 'N', 'y', 'n')
1285: THEN
1286: p_header_rec.process_status_flag(I):=NULL;
1287: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
1288: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','automatic_flag');
1289: qp_bulk_msg.add(l_msg_rec);
1290: END IF;
1291: END IF;
1292:
1292:
1293: IF p_header_rec.global_flag(I) NOT IN ('Y', 'N', 'n')
1294: THEN
1295: p_header_rec.process_status_flag(I):=NULL;
1296: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
1297: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','global_flag');
1298: qp_bulk_msg.add(l_msg_rec);
1299: END IF;
1300:
1293: IF p_header_rec.global_flag(I) NOT IN ('Y', 'N', 'n')
1294: THEN
1295: p_header_rec.process_status_flag(I):=NULL;
1296: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
1297: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','global_flag');
1298: qp_bulk_msg.add(l_msg_rec);
1299: END IF;
1300:
1301: --added for MOAC
1307: --if security is OFF, global_flag cannot be 'N'
1308: IF (l_security_profile = 'N'
1309: and p_header_rec.global_flag(I) in ('N', 'n')) THEN
1310: p_header_rec.process_status_flag(I):=NULL;
1311: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
1312: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','global_flag');
1313: qp_bulk_msg.add(l_msg_rec);
1314: END IF;
1315:
1308: IF (l_security_profile = 'N'
1309: and p_header_rec.global_flag(I) in ('N', 'n')) THEN
1310: p_header_rec.process_status_flag(I):=NULL;
1311: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
1312: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','global_flag');
1313: qp_bulk_msg.add(l_msg_rec);
1314: END IF;
1315:
1316: IF l_security_profile = 'Y' THEN
1321: if security is ON and global_flag is 'N', orig_org_id cannot be null
1322: **/
1323: and p_header_rec.orig_org_id(I) is null) THEN
1324: p_header_rec.process_status_flag(I):=NULL;
1325: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
1326: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','ORIG_ORG_ID');
1327: qp_bulk_msg.add(l_msg_rec);
1328:
1329: END IF;
1322: **/
1323: and p_header_rec.orig_org_id(I) is null) THEN
1324: p_header_rec.process_status_flag(I):=NULL;
1325: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
1326: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','ORIG_ORG_ID');
1327: qp_bulk_msg.add(l_msg_rec);
1328:
1329: END IF;
1330:
1332: --if orig_org_id is not null and it is not a valid org
1333: IF (p_header_rec.orig_org_id(I) is not null
1334: and QP_UTIL.validate_org_id(p_header_rec.orig_org_id(I)) = 'N') THEN
1335: p_header_rec.process_status_flag(I):=NULL;
1336: FND_MESSAGE.SET_NAME('FND','FND_MO_ORG_INVALID');
1337: -- FND_MESSAGE.SET_TOKEN('ATTRIBUTE','orig_org_id');
1338: qp_bulk_msg.add(l_msg_rec);
1339: END IF;
1340: */
1333: IF (p_header_rec.orig_org_id(I) is not null
1334: and QP_UTIL.validate_org_id(p_header_rec.orig_org_id(I)) = 'N') THEN
1335: p_header_rec.process_status_flag(I):=NULL;
1336: FND_MESSAGE.SET_NAME('FND','FND_MO_ORG_INVALID');
1337: -- FND_MESSAGE.SET_TOKEN('ATTRIBUTE','orig_org_id');
1338: qp_bulk_msg.add(l_msg_rec);
1339: END IF;
1340: */
1341: END IF;--IF l_security_profile = 'Y'
1343: --global_flag 'Y', org_id not null combination is invalid
1344: IF ((p_header_rec.global_flag(I) = 'Y'
1345: and p_header_rec.orig_org_id(I) is not null) OR (p_header_rec.global_flag(I) = 'N' and p_header_rec.orig_org_id(I) is null)) THEN
1346: p_header_rec.process_status_flag(I):=NULL;
1347: FND_MESSAGE.SET_NAME('QP', 'QP_GLOBAL_OU_VALIDATION');
1348: qp_bulk_msg.add(l_msg_rec);
1349: END IF;--p_header_rec.global_flag
1350: END IF;
1351: --end validations for moac
1354: THEN
1355: IF p_header_rec.mobile_download(I) NOT IN ('Y', 'N', 'y', 'n')
1356: THEN
1357: p_header_rec.process_status_flag(I):=NULL;
1358: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
1359: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','mobile_download');
1360: qp_bulk_msg.add(l_msg_rec);
1361: END IF;
1362: END IF;
1355: IF p_header_rec.mobile_download(I) NOT IN ('Y', 'N', 'y', 'n')
1356: THEN
1357: p_header_rec.process_status_flag(I):=NULL;
1358: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
1359: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','mobile_download');
1360: qp_bulk_msg.add(l_msg_rec);
1361: END IF;
1362: END IF;
1363:
1385: End;
1386:
1387: If l_exist = 1 THEN
1388: p_header_rec.process_status_flag(I):=NULL;
1389: fnd_message.set_name('QP', 'SO_OTHER_NAME_ALREADY_IN_USE');
1390: qp_bulk_msg.add(l_msg_rec);
1391: END IF;
1392:
1393: l_exist := NULL;
1401: and process_status_flag = 'P'; --is null;
1402:
1403: IF l_exist >0 THEN
1404: p_header_rec.process_status_flag(I):=NULL;
1405: fnd_message.set_name('QP', 'SO_OTHER_NAME_ALREADY_IN_USE');
1406: qp_bulk_msg.add(l_msg_rec);
1407: END IF;
1408: END IF;
1409:
1428: END;
1429:
1430: IF p_header_rec.interface_action_code(I) = 'INSERT' AND l_exist =1 THEN
1431: p_header_rec.process_status_flag(I):=NULL;
1432: fnd_message.set_name('QP', 'ORIG_SYS_HEADER_REF_NOT_UNIQUE');
1433: FND_MESSAGE.SET_TOKEN('REF_NO', p_header_rec.orig_sys_header_ref(I));
1434: FND_MESSAGE.SET_TOKEN('LS_CODE', p_header_rec.list_source_code(I));
1435: qp_bulk_msg.add(l_msg_rec);
1436: ELSIF p_header_rec.interface_action_code(I) = 'UPDATE' AND l_exist =0 THEN
1429:
1430: IF p_header_rec.interface_action_code(I) = 'INSERT' AND l_exist =1 THEN
1431: p_header_rec.process_status_flag(I):=NULL;
1432: fnd_message.set_name('QP', 'ORIG_SYS_HEADER_REF_NOT_UNIQUE');
1433: FND_MESSAGE.SET_TOKEN('REF_NO', p_header_rec.orig_sys_header_ref(I));
1434: FND_MESSAGE.SET_TOKEN('LS_CODE', p_header_rec.list_source_code(I));
1435: qp_bulk_msg.add(l_msg_rec);
1436: ELSIF p_header_rec.interface_action_code(I) = 'UPDATE' AND l_exist =0 THEN
1437: p_header_rec.process_status_flag(I):=NULL;
1430: IF p_header_rec.interface_action_code(I) = 'INSERT' AND l_exist =1 THEN
1431: p_header_rec.process_status_flag(I):=NULL;
1432: fnd_message.set_name('QP', 'ORIG_SYS_HEADER_REF_NOT_UNIQUE');
1433: FND_MESSAGE.SET_TOKEN('REF_NO', p_header_rec.orig_sys_header_ref(I));
1434: FND_MESSAGE.SET_TOKEN('LS_CODE', p_header_rec.list_source_code(I));
1435: qp_bulk_msg.add(l_msg_rec);
1436: ELSIF p_header_rec.interface_action_code(I) = 'UPDATE' AND l_exist =0 THEN
1437: p_header_rec.process_status_flag(I):=NULL;
1438: fnd_message.set_name('QP', 'HEADER_RECORD_DOES_NOT_EXIST');
1434: FND_MESSAGE.SET_TOKEN('LS_CODE', p_header_rec.list_source_code(I));
1435: qp_bulk_msg.add(l_msg_rec);
1436: ELSIF p_header_rec.interface_action_code(I) = 'UPDATE' AND l_exist =0 THEN
1437: p_header_rec.process_status_flag(I):=NULL;
1438: fnd_message.set_name('QP', 'HEADER_RECORD_DOES_NOT_EXIST');
1439: FND_MESSAGE.SET_TOKEN('REF_NO', p_header_rec.orig_sys_header_ref(I));
1440: FND_MESSAGE.SET_TOKEN('LS_CODE', p_header_rec.list_source_code(I));
1441: qp_bulk_msg.add(l_msg_rec);
1442: END IF;
1435: qp_bulk_msg.add(l_msg_rec);
1436: ELSIF p_header_rec.interface_action_code(I) = 'UPDATE' AND l_exist =0 THEN
1437: p_header_rec.process_status_flag(I):=NULL;
1438: fnd_message.set_name('QP', 'HEADER_RECORD_DOES_NOT_EXIST');
1439: FND_MESSAGE.SET_TOKEN('REF_NO', p_header_rec.orig_sys_header_ref(I));
1440: FND_MESSAGE.SET_TOKEN('LS_CODE', p_header_rec.list_source_code(I));
1441: qp_bulk_msg.add(l_msg_rec);
1442: END IF;
1443:
1436: ELSIF p_header_rec.interface_action_code(I) = 'UPDATE' AND l_exist =0 THEN
1437: p_header_rec.process_status_flag(I):=NULL;
1438: fnd_message.set_name('QP', 'HEADER_RECORD_DOES_NOT_EXIST');
1439: FND_MESSAGE.SET_TOKEN('REF_NO', p_header_rec.orig_sys_header_ref(I));
1440: FND_MESSAGE.SET_TOKEN('LS_CODE', p_header_rec.list_source_code(I));
1441: qp_bulk_msg.add(l_msg_rec);
1442: END IF;
1443:
1444: --bug 6961376 start
1469:
1470: IF l_exist >1 THEN
1471: qp_bulk_loader_pub.write_log('Entity Header l_exist of orig is: '||l_exist);
1472: p_header_rec.process_status_flag(I):=NULL;
1473: fnd_message.set_name('QP','ORIG_SYS_HEADER_REF_NOT_UNIQUE');
1474: FND_MESSAGE.SET_TOKEN('REF_NO', p_header_rec.orig_sys_header_ref(I));
1475: FND_MESSAGE.SET_TOKEN('LS_CODE', p_header_rec.list_source_code(I));
1476: qp_bulk_msg.add(l_msg_rec);
1477: END IF;
1470: IF l_exist >1 THEN
1471: qp_bulk_loader_pub.write_log('Entity Header l_exist of orig is: '||l_exist);
1472: p_header_rec.process_status_flag(I):=NULL;
1473: fnd_message.set_name('QP','ORIG_SYS_HEADER_REF_NOT_UNIQUE');
1474: FND_MESSAGE.SET_TOKEN('REF_NO', p_header_rec.orig_sys_header_ref(I));
1475: FND_MESSAGE.SET_TOKEN('LS_CODE', p_header_rec.list_source_code(I));
1476: qp_bulk_msg.add(l_msg_rec);
1477: END IF;
1478: ELSIF p_header_rec.interface_action_code(I) = 'UPDATE' AND l_header_id_null = 'N' THEN
1471: qp_bulk_loader_pub.write_log('Entity Header l_exist of orig is: '||l_exist);
1472: p_header_rec.process_status_flag(I):=NULL;
1473: fnd_message.set_name('QP','ORIG_SYS_HEADER_REF_NOT_UNIQUE');
1474: FND_MESSAGE.SET_TOKEN('REF_NO', p_header_rec.orig_sys_header_ref(I));
1475: FND_MESSAGE.SET_TOKEN('LS_CODE', p_header_rec.list_source_code(I));
1476: qp_bulk_msg.add(l_msg_rec);
1477: END IF;
1478: ELSIF p_header_rec.interface_action_code(I) = 'UPDATE' AND l_header_id_null = 'N' THEN
1479: qp_bulk_loader_pub.write_log('checking for unique orig_sys_header_ref: ' || p_header_rec.orig_sys_header_ref(I));
1505:
1506: IF l_exist >1 THEN
1507: qp_bulk_loader_pub.write_log('Entity Header l_exist of orig is: '||l_exist);
1508: p_header_rec.process_status_flag(I):=NULL;
1509: fnd_message.set_name('QP','ORIG_SYS_HEADER_REF_NOT_UNIQUE');
1510: FND_MESSAGE.SET_TOKEN('REF_NO', p_header_rec.orig_sys_header_ref(I));
1511: FND_MESSAGE.SET_TOKEN('LS_CODE', p_header_rec.list_source_code(I));
1512: qp_bulk_msg.add(l_msg_rec);
1513: END IF;
1506: IF l_exist >1 THEN
1507: qp_bulk_loader_pub.write_log('Entity Header l_exist of orig is: '||l_exist);
1508: p_header_rec.process_status_flag(I):=NULL;
1509: fnd_message.set_name('QP','ORIG_SYS_HEADER_REF_NOT_UNIQUE');
1510: FND_MESSAGE.SET_TOKEN('REF_NO', p_header_rec.orig_sys_header_ref(I));
1511: FND_MESSAGE.SET_TOKEN('LS_CODE', p_header_rec.list_source_code(I));
1512: qp_bulk_msg.add(l_msg_rec);
1513: END IF;
1514: END IF;
1507: qp_bulk_loader_pub.write_log('Entity Header l_exist of orig is: '||l_exist);
1508: p_header_rec.process_status_flag(I):=NULL;
1509: fnd_message.set_name('QP','ORIG_SYS_HEADER_REF_NOT_UNIQUE');
1510: FND_MESSAGE.SET_TOKEN('REF_NO', p_header_rec.orig_sys_header_ref(I));
1511: FND_MESSAGE.SET_TOKEN('LS_CODE', p_header_rec.list_source_code(I));
1512: qp_bulk_msg.add(l_msg_rec);
1513: END IF;
1514: END IF;
1515: --bug 6961376 end
1520: IF QP_security.check_function( p_function_name => QP_Security.G_FUNCTION_UPDATE,
1521: p_instance_type => QP_Security.G_PRICELIST_OBJECT,
1522: p_instance_pk1 => p_header_rec.list_header_id(I)) <> 'T' THEN
1523: p_header_rec.process_status_flag(I):=NULL;
1524: fnd_message.set_name('QP', 'QP_NO_PRIVILEGE');
1525: fnd_message.set_token('PRICING_OBJECT', 'Price List');
1526: qp_bulk_msg.add(l_msg_rec);
1527: END IF;
1528: END IF;
1521: p_instance_type => QP_Security.G_PRICELIST_OBJECT,
1522: p_instance_pk1 => p_header_rec.list_header_id(I)) <> 'T' THEN
1523: p_header_rec.process_status_flag(I):=NULL;
1524: fnd_message.set_name('QP', 'QP_NO_PRIVILEGE');
1525: fnd_message.set_token('PRICING_OBJECT', 'Price List');
1526: qp_bulk_msg.add(l_msg_rec);
1527: END IF;
1528: END IF;
1529:
1562:
1563: QP_BULK_MSG.ADD(l_msg_rec);
1564:
1565: -- Log Error Message
1566: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
1567: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
1568: 'Entity:Flexfield:Header_Desc_Flex');
1569: P_header_rec.process_status_flag(I):=NULL;
1570:
1563: QP_BULK_MSG.ADD(l_msg_rec);
1564:
1565: -- Log Error Message
1566: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
1567: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
1568: 'Entity:Flexfield:Header_Desc_Flex');
1569: P_header_rec.process_status_flag(I):=NULL;
1570:
1571: QP_BULK_MSG.ADD(l_msg_rec);
1679: qp_bulk_loader_pub.write_log( 'Update pte_code : '||l_old_price_list_rec.pte_code);
1680: IF l_old_price_list_rec.source_system_code <> p_header_rec.source_system_code(I) or
1681: l_old_price_list_rec.pte_code <> p_header_rec.pte_code(I) THEN
1682: p_header_rec.process_status_flag(I):=NULL;
1683: fnd_message.set_name('QP', 'QP_NO_UPDATE_ATTRIBUTE');
1684: fnd_message.set_token('ATTRIBUTE', 'Source System Code / PTE Code');
1685: qp_bulk_msg.add(l_msg_rec);
1686: END IF;
1687: END IF;
1680: IF l_old_price_list_rec.source_system_code <> p_header_rec.source_system_code(I) or
1681: l_old_price_list_rec.pte_code <> p_header_rec.pte_code(I) THEN
1682: p_header_rec.process_status_flag(I):=NULL;
1683: fnd_message.set_name('QP', 'QP_NO_UPDATE_ATTRIBUTE');
1684: fnd_message.set_token('ATTRIBUTE', 'Source System Code / PTE Code');
1685: qp_bulk_msg.add(l_msg_rec);
1686: END IF;
1687: END IF;
1688:
1768: Exception
1769: When no_data_found then
1770: p_line_rec.list_header_id(I) := -1;
1771: p_line_rec.process_status_flag(I):=NULL;
1772: fnd_message.set_name('QP', 'QP_INVALID_HEADER_REF');
1773: FND_MESSAGE.SET_TOKEN('REF_NO', p_line_rec.orig_sys_header_ref(I));
1774: FND_MESSAGE.SET_TOKEN('LS_CODE', NULL);
1775: qp_bulk_msg.add(l_msg_rec);
1776: End;
1769: When no_data_found then
1770: p_line_rec.list_header_id(I) := -1;
1771: p_line_rec.process_status_flag(I):=NULL;
1772: fnd_message.set_name('QP', 'QP_INVALID_HEADER_REF');
1773: FND_MESSAGE.SET_TOKEN('REF_NO', p_line_rec.orig_sys_header_ref(I));
1774: FND_MESSAGE.SET_TOKEN('LS_CODE', NULL);
1775: qp_bulk_msg.add(l_msg_rec);
1776: End;
1777: IF p_line_rec.list_header_id(I) IS NOT NULL or
1770: p_line_rec.list_header_id(I) := -1;
1771: p_line_rec.process_status_flag(I):=NULL;
1772: fnd_message.set_name('QP', 'QP_INVALID_HEADER_REF');
1773: FND_MESSAGE.SET_TOKEN('REF_NO', p_line_rec.orig_sys_header_ref(I));
1774: FND_MESSAGE.SET_TOKEN('LS_CODE', NULL);
1775: qp_bulk_msg.add(l_msg_rec);
1776: End;
1777: IF p_line_rec.list_header_id(I) IS NOT NULL or
1778: p_line_rec.list_header_id(I) <> 0 THEN
1792: --1.orig_sys_line_ref,
1793: IF p_line_rec.orig_sys_line_ref(I) IS NULL
1794: THEN
1795: p_line_rec.process_status_flag(I):=NULL;
1796: fnd_message.set_name('QP', 'QP_ATTRIBUTE_REQUIRED');
1797: fnd_message.set_token('ATTRIBUTE', 'ORIG_SYS_LINE_REF');
1798: qp_bulk_msg.add(l_msg_rec);
1799: END IF;
1800:
1793: IF p_line_rec.orig_sys_line_ref(I) IS NULL
1794: THEN
1795: p_line_rec.process_status_flag(I):=NULL;
1796: fnd_message.set_name('QP', 'QP_ATTRIBUTE_REQUIRED');
1797: fnd_message.set_token('ATTRIBUTE', 'ORIG_SYS_LINE_REF');
1798: qp_bulk_msg.add(l_msg_rec);
1799: END IF;
1800:
1801: --Bug#5359974 RAVI START
1811: IF p_line_rec.list_line_type_code(I) IS NULL
1812: THEN
1813: p_line_rec.list_line_type_code(I):= '1';
1814: p_line_rec.process_status_flag(I):=NULL;
1815: fnd_message.set_name('QP', 'QP_ATTRIBUTE_REQUIRED');
1816: fnd_message.set_token('ATTRIBUTE', 'LIST_LINE_TYPE_CODE');
1817: qp_bulk_msg.add(l_msg_rec);
1818: END IF;
1819:
1812: THEN
1813: p_line_rec.list_line_type_code(I):= '1';
1814: p_line_rec.process_status_flag(I):=NULL;
1815: fnd_message.set_name('QP', 'QP_ATTRIBUTE_REQUIRED');
1816: fnd_message.set_token('ATTRIBUTE', 'LIST_LINE_TYPE_CODE');
1817: qp_bulk_msg.add(l_msg_rec);
1818: END IF;
1819:
1820: IF p_line_rec.list_line_type_code(I) <>'PLL' AND p_line_rec.list_line_type_code(I)<>'PBH' THEN
1818: END IF;
1819:
1820: IF p_line_rec.list_line_type_code(I) <>'PLL' AND p_line_rec.list_line_type_code(I)<>'PBH' THEN
1821: p_line_rec.process_status_flag(I):=NULL;
1822: fnd_message.set_name('QP', 'QP_INVALID_ATTRIBUTE');
1823: fnd_message.set_token('ATTRIBUTE', 'LIST_LINE_TYPE_CODE');
1824: qp_bulk_msg.add(l_msg_rec);
1825: END IF;
1826:
1819:
1820: IF p_line_rec.list_line_type_code(I) <>'PLL' AND p_line_rec.list_line_type_code(I)<>'PBH' THEN
1821: p_line_rec.process_status_flag(I):=NULL;
1822: fnd_message.set_name('QP', 'QP_INVALID_ATTRIBUTE');
1823: fnd_message.set_token('ATTRIBUTE', 'LIST_LINE_TYPE_CODE');
1824: qp_bulk_msg.add(l_msg_rec);
1825: END IF;
1826:
1827: --3. Arithmetic Operator
1828: IF p_line_rec.arithmetic_operator(I) IS NULL
1829: THEN
1830: p_line_rec.arithmetic_operator(I):= '1';
1831: p_line_rec.process_status_flag(I):=NULL;
1832: fnd_message.set_name('QP', 'QP_ATTRIBUTE_REQUIRED');
1833: fnd_message.set_token('ATTRIBUTE', 'ARITHMETIC_OPERATOR1');
1834: qp_bulk_msg.add(l_msg_rec);
1835: ELSE
1836: IF p_line_rec.arithmetic_operator(I) = 'BLOCK_PRICE' AND
1829: THEN
1830: p_line_rec.arithmetic_operator(I):= '1';
1831: p_line_rec.process_status_flag(I):=NULL;
1832: fnd_message.set_name('QP', 'QP_ATTRIBUTE_REQUIRED');
1833: fnd_message.set_token('ATTRIBUTE', 'ARITHMETIC_OPERATOR1');
1834: qp_bulk_msg.add(l_msg_rec);
1835: ELSE
1836: IF p_line_rec.arithmetic_operator(I) = 'BLOCK_PRICE' AND
1837: p_line_rec.list_line_type_code(I) <> 'PBH' AND
1837: p_line_rec.list_line_type_code(I) <> 'PBH' AND
1838: p_line_rec.price_break_header_ref(I) IS NULL THEN
1839: p_line_rec.arithmetic_operator(I):= '1';
1840: p_line_rec.process_status_flag(I):=NULL;
1841: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
1842: fnd_message.set_token('ATTRIBUTE', 'ARITHMETIC_OPERATOR 2');
1843: qp_bulk_msg.add(l_msg_rec);
1844: END IF;
1845: IF p_line_rec.arithmetic_operator(I) = 'BREAKUNIT_PRICE' THEN
1838: p_line_rec.price_break_header_ref(I) IS NULL THEN
1839: p_line_rec.arithmetic_operator(I):= '1';
1840: p_line_rec.process_status_flag(I):=NULL;
1841: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
1842: fnd_message.set_token('ATTRIBUTE', 'ARITHMETIC_OPERATOR 2');
1843: qp_bulk_msg.add(l_msg_rec);
1844: END IF;
1845: IF p_line_rec.arithmetic_operator(I) = 'BREAKUNIT_PRICE' THEN
1846: IF p_line_rec.list_line_type_code(I) = 'PLL' AND
1848: NULL;
1849: ELSE
1850: p_line_rec.arithmetic_operator(I):= '1';
1851: p_line_rec.process_status_flag(I):=NULL;
1852: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
1853: fnd_message.set_token('ATTRIBUTE', 'ARITHMETIC_OPERATOR 3');
1854: qp_bulk_msg.add(l_msg_rec);
1855: END IF;
1856: END IF;
1849: ELSE
1850: p_line_rec.arithmetic_operator(I):= '1';
1851: p_line_rec.process_status_flag(I):=NULL;
1852: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
1853: fnd_message.set_token('ATTRIBUTE', 'ARITHMETIC_OPERATOR 3');
1854: qp_bulk_msg.add(l_msg_rec);
1855: END IF;
1856: END IF;
1857: --End arithemetic operator check
1904:
1905: if l_exist = 0 then
1906: p_line_rec.arithmetic_operator(I):= '1';
1907: p_line_rec.process_status_flag(I):=NULL;
1908: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
1909: fnd_message.set_token('ATTRIBUTE', 'ARITHMETIC_OPERATOR 4');
1910: qp_bulk_msg.add(l_msg_rec);
1911: else
1912: l_servicable_item := 'Y';
1905: if l_exist = 0 then
1906: p_line_rec.arithmetic_operator(I):= '1';
1907: p_line_rec.process_status_flag(I):=NULL;
1908: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
1909: fnd_message.set_token('ATTRIBUTE', 'ARITHMETIC_OPERATOR 4');
1910: qp_bulk_msg.add(l_msg_rec);
1911: else
1912: l_servicable_item := 'Y';
1913: end if;
1934: END;
1935:
1936: If p_line_rec.interface_action_code(I)='INSERT' AND l_exist >= 1 THEN
1937: p_line_rec.process_status_flag(I):=NULL;
1938: fnd_message.set_name('QP', 'ORIG_SYS_LINE_REF_NOT_UNIQUE');
1939: FND_MESSAGE.SET_TOKEN('REF_NO', p_line_rec.orig_sys_line_ref(I));
1940: qp_bulk_msg.add(l_msg_rec);
1941: ELSIF p_line_rec.interface_action_code(I)='UPDATE' AND l_exist = 0 THEN
1942: p_line_rec.process_status_flag(I):=NULL;
1935:
1936: If p_line_rec.interface_action_code(I)='INSERT' AND l_exist >= 1 THEN
1937: p_line_rec.process_status_flag(I):=NULL;
1938: fnd_message.set_name('QP', 'ORIG_SYS_LINE_REF_NOT_UNIQUE');
1939: FND_MESSAGE.SET_TOKEN('REF_NO', p_line_rec.orig_sys_line_ref(I));
1940: qp_bulk_msg.add(l_msg_rec);
1941: ELSIF p_line_rec.interface_action_code(I)='UPDATE' AND l_exist = 0 THEN
1942: p_line_rec.process_status_flag(I):=NULL;
1943: fnd_message.set_name('QP', 'LINE_RECORD_DOES_NOT_EXIST');
1939: FND_MESSAGE.SET_TOKEN('REF_NO', p_line_rec.orig_sys_line_ref(I));
1940: qp_bulk_msg.add(l_msg_rec);
1941: ELSIF p_line_rec.interface_action_code(I)='UPDATE' AND l_exist = 0 THEN
1942: p_line_rec.process_status_flag(I):=NULL;
1943: fnd_message.set_name('QP', 'LINE_RECORD_DOES_NOT_EXIST');
1944: FND_MESSAGE.SET_TOKEN('REF_NO', p_line_rec.orig_sys_line_ref(I));
1945: qp_bulk_msg.add(l_msg_rec);
1946: END IF;
1947:
1940: qp_bulk_msg.add(l_msg_rec);
1941: ELSIF p_line_rec.interface_action_code(I)='UPDATE' AND l_exist = 0 THEN
1942: p_line_rec.process_status_flag(I):=NULL;
1943: fnd_message.set_name('QP', 'LINE_RECORD_DOES_NOT_EXIST');
1944: FND_MESSAGE.SET_TOKEN('REF_NO', p_line_rec.orig_sys_line_ref(I));
1945: qp_bulk_msg.add(l_msg_rec);
1946: END IF;
1947:
1948: If p_line_rec.interface_action_code(I)='INSERT' THEN
1954: and orig_sys_header_ref = p_line_rec.orig_sys_header_ref(I);
1955:
1956: IF l_exist >1 THEN
1957: p_line_rec.process_status_flag(I):=NULL;
1958: fnd_message.set_name('QP', 'ORIG_SYS_LINE_REF_NOT_UNIQUE');
1959: FND_MESSAGE.SET_TOKEN('REF_NO', p_line_rec.orig_sys_line_ref(I));
1960: qp_bulk_msg.add(l_msg_rec);
1961: END IF;
1962: end if;
1955:
1956: IF l_exist >1 THEN
1957: p_line_rec.process_status_flag(I):=NULL;
1958: fnd_message.set_name('QP', 'ORIG_SYS_LINE_REF_NOT_UNIQUE');
1959: FND_MESSAGE.SET_TOKEN('REF_NO', p_line_rec.orig_sys_line_ref(I));
1960: qp_bulk_msg.add(l_msg_rec);
1961: END IF;
1962: end if;
1963:
1981: and qpll.list_line_id <> p_line_rec.list_line_id(I);
1982:
1983: IF l_exist = 1 THEN
1984: p_line_rec.process_status_flag(I):=NULL;
1985: fnd_message.set_name('QP', 'ORIG_SYS_LINE_REF_NOT_UNIQUE');
1986: FND_MESSAGE.SET_TOKEN('REF_NO', p_line_rec.orig_sys_line_ref(I));
1987: qp_bulk_msg.add(l_msg_rec);
1988: END IF;
1989: end if;*/
1982:
1983: IF l_exist = 1 THEN
1984: p_line_rec.process_status_flag(I):=NULL;
1985: fnd_message.set_name('QP', 'ORIG_SYS_LINE_REF_NOT_UNIQUE');
1986: FND_MESSAGE.SET_TOKEN('REF_NO', p_line_rec.orig_sys_line_ref(I));
1987: qp_bulk_msg.add(l_msg_rec);
1988: END IF;
1989: end if;*/
1990: --bug 9247305 end
1992: --- check for conditionally required fields --------
1993: IF p_line_rec.list_line_type_code(I) = 'PBH' then
1994: IF p_line_rec.price_break_type_code(I) IS NULL then
1995: p_line_rec.process_status_flag(I):=NULL;
1996: fnd_message.set_name('QP', 'QP_ATTRIBUTE_REQUIRED');
1997: fnd_message.set_token('ATTRIBUTE', 'PRICE_BREAK_TYPE_CODE');
1998: qp_bulk_msg.add(l_msg_rec);
1999: END IF;
2000: ELSE
1993: IF p_line_rec.list_line_type_code(I) = 'PBH' then
1994: IF p_line_rec.price_break_type_code(I) IS NULL then
1995: p_line_rec.process_status_flag(I):=NULL;
1996: fnd_message.set_name('QP', 'QP_ATTRIBUTE_REQUIRED');
1997: fnd_message.set_token('ATTRIBUTE', 'PRICE_BREAK_TYPE_CODE');
1998: qp_bulk_msg.add(l_msg_rec);
1999: END IF;
2000: ELSE
2001: IF p_line_rec.price_break_header_ref(I) IS NULL and
2000: ELSE
2001: IF p_line_rec.price_break_header_ref(I) IS NULL and
2002: p_line_rec.price_break_type_code(I) IS NOT NULL then
2003: p_line_rec.process_status_flag(I):=NULL;
2004: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2005: fnd_message.set_token('ATTRIBUTE', 'PRICE_BREAK_TYPE_CODE');
2006: qp_bulk_msg.add(l_msg_rec);
2007: END IF;
2008: END IF;
2001: IF p_line_rec.price_break_header_ref(I) IS NULL and
2002: p_line_rec.price_break_type_code(I) IS NOT NULL then
2003: p_line_rec.process_status_flag(I):=NULL;
2004: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2005: fnd_message.set_token('ATTRIBUTE', 'PRICE_BREAK_TYPE_CODE');
2006: qp_bulk_msg.add(l_msg_rec);
2007: END IF;
2008: END IF;
2009:
2009:
2010: IF p_line_rec.price_break_header_ref(I) IS NOT NULL then
2011: IF p_line_rec.rltd_modifier_grp_type(I) IS NULL then
2012: p_line_rec.process_status_flag(I):=NULL;
2013: fnd_message.set_name('QP', 'QP_ATTRIBUTE_REQUIRED');
2014: fnd_message.set_token('ATTRIBUTE', 'RLTD_MODIFIER_GRP_TYPE');
2015: qp_bulk_msg.add(l_msg_rec);
2016: END IF;
2017: END IF;
2010: IF p_line_rec.price_break_header_ref(I) IS NOT NULL then
2011: IF p_line_rec.rltd_modifier_grp_type(I) IS NULL then
2012: p_line_rec.process_status_flag(I):=NULL;
2013: fnd_message.set_name('QP', 'QP_ATTRIBUTE_REQUIRED');
2014: fnd_message.set_token('ATTRIBUTE', 'RLTD_MODIFIER_GRP_TYPE');
2015: qp_bulk_msg.add(l_msg_rec);
2016: END IF;
2017: END IF;
2018:
2031:
2032: -- if any price breaks are BLOCK
2033: IF (l_dummy > 0) THEN
2034: p_line_rec.process_status_flag(I):=NULL;
2035: FND_MESSAGE.SET_NAME('QP','QP_INVALID_CHILD_APPL_METHOD');
2036: qp_bulk_msg.add(l_msg_rec);
2037: END IF;
2038:
2039: -- Bug# 5228560 RAVI START
2051:
2052: -- if any price breaks are BLOCK in old lines
2053: IF (l_dummy > 0) THEN
2054: p_line_rec.process_status_flag(I):=NULL;
2055: FND_MESSAGE.SET_NAME('QP','QP_INVALID_CHILD_APPL_METHOD');
2056: qp_bulk_msg.add(l_msg_rec);
2057: END IF;
2058: -- Bug# 5228560 RAVI END
2059: END IF;
2079: AND (arithmetic_operator = 'UNIT_PRICE' OR recurring_value IS NOT NULL);
2080:
2081: IF (l_dummy > 0) THEN
2082: p_line_rec.process_status_flag(I):=NULL;
2083: FND_MESSAGE.SET_NAME('QP','QP_INVALID_PRICE_BREAK');
2084: qp_bulk_msg.add(l_msg_rec);
2085: END IF;
2086:
2087: END IF;
2102: END IF;
2103:
2104: IF (l_dummy > 0) THEN
2105: p_line_rec.process_status_flag(I):=NULL;
2106: FND_MESSAGE.SET_NAME('QP','QP_INVALID_PRICE_BREAK');
2107: qp_bulk_msg.add(l_msg_rec);
2108: END IF;
2109:
2110: l_dummy := null;
2121: END IF;
2122:
2123: IF (l_dummy > 0) THEN
2124: p_line_rec.process_status_flag(I):=NULL;
2125: FND_MESSAGE.SET_NAME('QP','QP_INVALID_PRICE_BREAK');
2126: qp_bulk_msg.add(l_msg_rec);
2127: END IF;
2128: END IF;
2129: -- Bug# 5228560 RAVI END
2136:
2137: IF p_line_rec.arithmetic_operator(I) = 'BREAKUNIT_PRICE' and
2138: p_line_rec.recurring_value(I) is not NULL THEN
2139: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2140: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2141: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Recurring Value');
2142: QP_BULK_MSG.ADD(l_msg_rec);
2143: END IF;
2144:
2137: IF p_line_rec.arithmetic_operator(I) = 'BREAKUNIT_PRICE' and
2138: p_line_rec.recurring_value(I) is not NULL THEN
2139: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2140: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2141: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Recurring Value');
2142: QP_BULK_MSG.ADD(l_msg_rec);
2143: END IF;
2144:
2145: BEGIN
2157: **/
2158: IF p_line_rec.price_break_type_code(I) IS NULL OR
2159: l_pb_type_code IS NULL THEN
2160: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2161: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2162: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Recurring Value');
2163: QP_BULK_MSG.ADD(l_msg_rec);
2164: qp_bulk_loader_pub.write_log('PRICE BREAK TYPE CODE NULL');
2165: ELSE
2158: IF p_line_rec.price_break_type_code(I) IS NULL OR
2159: l_pb_type_code IS NULL THEN
2160: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2161: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2162: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Recurring Value');
2163: QP_BULK_MSG.ADD(l_msg_rec);
2164: qp_bulk_loader_pub.write_log('PRICE BREAK TYPE CODE NULL');
2165: ELSE
2166: IF p_line_rec.price_break_type_code(I) = l_pb_type_code
2167: THEN
2168: NULL;
2169: ELSE
2170: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2171: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2172: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Recurring Value');
2173: QP_BULK_MSG.ADD(l_msg_rec);
2174: qp_bulk_loader_pub.write_log('PRICE BREAK TYPE CODE OF PARENT AND CHILD UNEQUAL');
2175: END IF;
2168: NULL;
2169: ELSE
2170: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2171: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2172: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Recurring Value');
2173: QP_BULK_MSG.ADD(l_msg_rec);
2174: qp_bulk_loader_pub.write_log('PRICE BREAK TYPE CODE OF PARENT AND CHILD UNEQUAL');
2175: END IF;
2176: END IF;
2180: IF l_art_opr <> 'UNIT_PRICE'
2181: and l_art_opr <> 'PERCENT_PRICE'
2182: THEN
2183: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2184: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2185: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Arithmetic Operator');
2186: QP_BULK_MSG.ADD(l_msg_rec);
2187: END IF;
2188: ELSIF p_line_rec.arithmetic_operator(I) = 'BLOCK_PRICE' THEN
2181: and l_art_opr <> 'PERCENT_PRICE'
2182: THEN
2183: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2184: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2185: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Arithmetic Operator');
2186: QP_BULK_MSG.ADD(l_msg_rec);
2187: END IF;
2188: ELSIF p_line_rec.arithmetic_operator(I) = 'BLOCK_PRICE' THEN
2189: IF l_art_opr <> 'BLOCK_PRICE' THEN
2187: END IF;
2188: ELSIF p_line_rec.arithmetic_operator(I) = 'BLOCK_PRICE' THEN
2189: IF l_art_opr <> 'BLOCK_PRICE' THEN
2190: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2191: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2192: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Arithmetic Operator');
2193: QP_BULK_MSG.ADD(l_msg_rec);
2194: END IF;
2195: ELSIF p_line_rec.arithmetic_operator(I) = 'BREAKUNIT_PRICE' THEN
2188: ELSIF p_line_rec.arithmetic_operator(I) = 'BLOCK_PRICE' THEN
2189: IF l_art_opr <> 'BLOCK_PRICE' THEN
2190: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2191: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2192: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Arithmetic Operator');
2193: QP_BULK_MSG.ADD(l_msg_rec);
2194: END IF;
2195: ELSIF p_line_rec.arithmetic_operator(I) = 'BREAKUNIT_PRICE' THEN
2196: IF l_art_opr <> 'BLOCK_PRICE' OR l_pb_type_code <> 'RANGE' THEN
2194: END IF;
2195: ELSIF p_line_rec.arithmetic_operator(I) = 'BREAKUNIT_PRICE' THEN
2196: IF l_art_opr <> 'BLOCK_PRICE' OR l_pb_type_code <> 'RANGE' THEN
2197: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2198: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2199: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Arithmetic Operator');
2200: QP_BULK_MSG.ADD(l_msg_rec);
2201: END IF;
2202: END IF;
2195: ELSIF p_line_rec.arithmetic_operator(I) = 'BREAKUNIT_PRICE' THEN
2196: IF l_art_opr <> 'BLOCK_PRICE' OR l_pb_type_code <> 'RANGE' THEN
2197: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2198: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2199: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Arithmetic Operator');
2200: QP_BULK_MSG.ADD(l_msg_rec);
2201: END IF;
2202: END IF;
2203: END IF;
2221: IF l_servicable_item='N' THEN
2222: IF p_line_rec.arithmetic_operator(I) = 'UNIT_PRICE' THEN
2223: IF l_art_opr <> 'UNIT_PRICE' THEN
2224: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2225: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2226: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Arithmetic Operator - Orderable item - PBC UNIT_PRICE -- PBH Wrong');
2227: QP_BULK_MSG.ADD(l_msg_rec);
2228: END IF;
2229: ELSIF p_line_rec.arithmetic_operator(I) = 'BLOCK_PRICE' THEN
2222: IF p_line_rec.arithmetic_operator(I) = 'UNIT_PRICE' THEN
2223: IF l_art_opr <> 'UNIT_PRICE' THEN
2224: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2225: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2226: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Arithmetic Operator - Orderable item - PBC UNIT_PRICE -- PBH Wrong');
2227: QP_BULK_MSG.ADD(l_msg_rec);
2228: END IF;
2229: ELSIF p_line_rec.arithmetic_operator(I) = 'BLOCK_PRICE' THEN
2230: IF l_art_opr <> 'BLOCK_PRICE' THEN
2228: END IF;
2229: ELSIF p_line_rec.arithmetic_operator(I) = 'BLOCK_PRICE' THEN
2230: IF l_art_opr <> 'BLOCK_PRICE' THEN
2231: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2232: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2233: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Arithmetic Operator - Orderable item - PBC BLOCK_PRICE -- PBH Wrong');
2234: QP_BULK_MSG.ADD(l_msg_rec);
2235: END IF;
2236: ELSIF p_line_rec.arithmetic_operator(I) = 'BREAKUNIT_PRICE' THEN
2229: ELSIF p_line_rec.arithmetic_operator(I) = 'BLOCK_PRICE' THEN
2230: IF l_art_opr <> 'BLOCK_PRICE' THEN
2231: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2232: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2233: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Arithmetic Operator - Orderable item - PBC BLOCK_PRICE -- PBH Wrong');
2234: QP_BULK_MSG.ADD(l_msg_rec);
2235: END IF;
2236: ELSIF p_line_rec.arithmetic_operator(I) = 'BREAKUNIT_PRICE' THEN
2237: IF l_art_opr <> 'BLOCK_PRICE' OR l_pb_type_code <> 'RANGE' THEN
2235: END IF;
2236: ELSIF p_line_rec.arithmetic_operator(I) = 'BREAKUNIT_PRICE' THEN
2237: IF l_art_opr <> 'BLOCK_PRICE' OR l_pb_type_code <> 'RANGE' THEN
2238: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2239: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2240: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Arithmetic Operator - Orderable item - PBC BREAKUNIT_PRICE -- PBH Wrong');
2241: QP_BULK_MSG.ADD(l_msg_rec);
2242: END IF;
2243: END IF;
2236: ELSIF p_line_rec.arithmetic_operator(I) = 'BREAKUNIT_PRICE' THEN
2237: IF l_art_opr <> 'BLOCK_PRICE' OR l_pb_type_code <> 'RANGE' THEN
2238: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2239: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2240: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Arithmetic Operator - Orderable item - PBC BREAKUNIT_PRICE -- PBH Wrong');
2241: QP_BULK_MSG.ADD(l_msg_rec);
2242: END IF;
2243: END IF;
2244: ELSIF l_servicable_item='Y' THEN
2244: ELSIF l_servicable_item='Y' THEN
2245: IF p_line_rec.arithmetic_operator(I) = 'UNIT_PRICE' THEN
2246: IF l_art_opr <> 'UNIT_PRICE' and l_art_opr <> 'PERCENT_PRICE' THEN
2247: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2248: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2249: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Arithmetic Operator - Servicable item - PBC UNIT_PRICE -- PBH Wrong');
2250: QP_BULK_MSG.ADD(l_msg_rec);
2251: END IF;
2252: ELSIF p_line_rec.arithmetic_operator(I) = 'BLOCK_PRICE' THEN
2245: IF p_line_rec.arithmetic_operator(I) = 'UNIT_PRICE' THEN
2246: IF l_art_opr <> 'UNIT_PRICE' and l_art_opr <> 'PERCENT_PRICE' THEN
2247: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2248: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2249: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Arithmetic Operator - Servicable item - PBC UNIT_PRICE -- PBH Wrong');
2250: QP_BULK_MSG.ADD(l_msg_rec);
2251: END IF;
2252: ELSIF p_line_rec.arithmetic_operator(I) = 'BLOCK_PRICE' THEN
2253: IF l_art_opr <> 'BLOCK_PRICE' THEN
2251: END IF;
2252: ELSIF p_line_rec.arithmetic_operator(I) = 'BLOCK_PRICE' THEN
2253: IF l_art_opr <> 'BLOCK_PRICE' THEN
2254: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2255: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2256: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Arithmetic Operator - Servicable item - PBC BLOCK_PRICE -- PBH Wrong');
2257: QP_BULK_MSG.ADD(l_msg_rec);
2258: END IF;
2259: ELSIF p_line_rec.arithmetic_operator(I) = 'BREAKUNIT_PRICE' THEN
2252: ELSIF p_line_rec.arithmetic_operator(I) = 'BLOCK_PRICE' THEN
2253: IF l_art_opr <> 'BLOCK_PRICE' THEN
2254: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2255: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2256: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Arithmetic Operator - Servicable item - PBC BLOCK_PRICE -- PBH Wrong');
2257: QP_BULK_MSG.ADD(l_msg_rec);
2258: END IF;
2259: ELSIF p_line_rec.arithmetic_operator(I) = 'BREAKUNIT_PRICE' THEN
2260: IF l_art_opr <> 'BLOCK_PRICE' THEN
2258: END IF;
2259: ELSIF p_line_rec.arithmetic_operator(I) = 'BREAKUNIT_PRICE' THEN
2260: IF l_art_opr <> 'BLOCK_PRICE' THEN
2261: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2262: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2263: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Arithmetic Operator - Servicable item - PBC BREAKUNIT_PRICE -- PBH Wrong');
2264: QP_BULK_MSG.ADD(l_msg_rec);
2265: END IF;
2266: ELSIF p_line_rec.arithmetic_operator(I) = 'PERCENT_PRICE' THEN
2259: ELSIF p_line_rec.arithmetic_operator(I) = 'BREAKUNIT_PRICE' THEN
2260: IF l_art_opr <> 'BLOCK_PRICE' THEN
2261: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2262: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2263: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Arithmetic Operator - Servicable item - PBC BREAKUNIT_PRICE -- PBH Wrong');
2264: QP_BULK_MSG.ADD(l_msg_rec);
2265: END IF;
2266: ELSIF p_line_rec.arithmetic_operator(I) = 'PERCENT_PRICE' THEN
2267: IF l_art_opr <> 'BLOCK_PRICE' OR
2268: l_art_opr <> 'PERCENT_PRICE' OR
2269: l_art_opr <> 'UNIT_PRICE'
2270: THEN
2271: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2272: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2273: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Arithmetic Operator - Servicable item - PBC PERCENT_PRICE -- PBH Wrong');
2274: QP_BULK_MSG.ADD(l_msg_rec);
2275: END IF;
2276: END IF;
2269: l_art_opr <> 'UNIT_PRICE'
2270: THEN
2271: P_LINE_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
2272: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
2273: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Arithmetic Operator - Servicable item - PBC PERCENT_PRICE -- PBH Wrong');
2274: QP_BULK_MSG.ADD(l_msg_rec);
2275: END IF;
2276: END IF;
2277: END IF;
2292: and p_LINE_rec.generate_using_formula_id(I) IS NULL
2293: THEN
2294:
2295: p_line_rec.process_status_flag(I):=NULL;
2296: FND_MESSAGE.SET_NAME('QP','QP_OPERAND_FORMULA');
2297: QP_BULK_MSG.ADD(l_msg_rec);
2298:
2299: END IF;
2300:
2305: Recurring value allowed only for RANGE and BLOCK PRICE
2306: **/
2307: IF p_line_rec.recurring_value(I) is not null THEN
2308: IF p_line_rec.recurring_value(I) < 1 Then
2309: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
2310: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Recurring Value');
2311: QP_BULK_MSG.ADD(l_msg_rec);
2312: ELSIF p_line_rec.arithmetic_operator(I) <> 'BLOCK_PRICE'
2313: OR l_art_opr <> 'BLOCK_PRICE'
2306: **/
2307: IF p_line_rec.recurring_value(I) is not null THEN
2308: IF p_line_rec.recurring_value(I) < 1 Then
2309: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
2310: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Recurring Value');
2311: QP_BULK_MSG.ADD(l_msg_rec);
2312: ELSIF p_line_rec.arithmetic_operator(I) <> 'BLOCK_PRICE'
2313: OR l_art_opr <> 'BLOCK_PRICE'
2314: OR l_pb_type_code <> 'RANGE'
2312: ELSIF p_line_rec.arithmetic_operator(I) <> 'BLOCK_PRICE'
2313: OR l_art_opr <> 'BLOCK_PRICE'
2314: OR l_pb_type_code <> 'RANGE'
2315: THEN
2316: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
2317: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Recurring Value');
2318: QP_BULK_MSG.ADD(l_msg_rec);
2319: END IF;
2320: END IF;
2313: OR l_art_opr <> 'BLOCK_PRICE'
2314: OR l_pb_type_code <> 'RANGE'
2315: THEN
2316: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
2317: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Recurring Value');
2318: QP_BULK_MSG.ADD(l_msg_rec);
2319: END IF;
2320: END IF;
2321: /**
2320: END IF;
2321: /**
2322: IF p_line_rec.recurring_value(I) is not null
2323: And p_line_rec.recurring_value(I) < 1 Then
2324: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
2325: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Recurring Value');
2326: QP_BULK_MSG.ADD(l_msg_rec);
2327: END IF;
2328: **/
2321: /**
2322: IF p_line_rec.recurring_value(I) is not null
2323: And p_line_rec.recurring_value(I) < 1 Then
2324: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
2325: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Recurring Value');
2326: QP_BULK_MSG.ADD(l_msg_rec);
2327: END IF;
2328: **/
2329: -- Bug 4995724 END RAVI
2334: OR p_line_rec.start_date_active(I) IS NULL
2335: THEN
2336: Null;
2337: ELSIF (p_line_rec.start_date_active(I) > p_line_rec.end_date_active(I) ) THEN
2338: FND_MESSAGE.SET_NAME('QP', 'QP_STRT_DATE_BFR_END_DATE');
2339: QP_BULK_MSG.Add(l_msg_rec);
2340: --Bug# 5228368 RAVI
2341: p_line_rec.process_status_flag(I):=NULL;
2342: END IF;
2380:
2381: IF p_line_rec.start_date_active(I) < l_header_start_date OR
2382: p_line_rec.end_date_active(I) > l_header_end_date
2383: THEN
2384: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_DATE');
2385: QP_BULK_MSG.Add(l_msg_rec);
2386: p_line_rec.process_status_flag(I):=NULL;
2387: END IF;
2388: -- Bug 5246745 RAVI END
2433:
2434: IF l_PBH_start_date <> p_line_rec.start_date_active(I) OR
2435: l_PBH_end_date <> p_line_rec.end_date_active(I)
2436: THEN
2437: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_DATE');
2438: QP_BULK_MSG.Add(l_msg_rec);
2439: p_line_rec.process_status_flag(I):=NULL;
2440: END IF;
2441: END IF;
2467:
2468: QP_BULK_MSG.ADD(l_msg_rec);
2469:
2470: -- Log Error Message
2471: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
2472: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2473: 'Entity:Flexfield:Line_Desc_Flex');
2474: p_line_rec.process_status_flag(I):=NULL;
2475:
2468: QP_BULK_MSG.ADD(l_msg_rec);
2469:
2470: -- Log Error Message
2471: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
2472: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2473: 'Entity:Flexfield:Line_Desc_Flex');
2474: p_line_rec.process_status_flag(I):=NULL;
2475:
2476: QP_BULK_MSG.ADD(l_msg_rec);
2662: --------qualifier_attr_value, qualifier_attr_value_to -----------------*/
2663:
2664: IF p_qualifier_rec.qualifier_grouping_no(I) IS NULL THEN
2665: p_qualifier_rec.process_status_flag(I):=NULL;
2666: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
2667: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER GROUPING NO');
2668: QP_BULK_MSG.ADD(l_msg_rec);
2669: END IF;
2670:
2663:
2664: IF p_qualifier_rec.qualifier_grouping_no(I) IS NULL THEN
2665: p_qualifier_rec.process_status_flag(I):=NULL;
2666: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
2667: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER GROUPING NO');
2668: QP_BULK_MSG.ADD(l_msg_rec);
2669: END IF;
2670:
2671: IF p_qualifier_rec.list_line_id(I) IS NOT NULL THEN
2670:
2671: IF p_qualifier_rec.list_line_id(I) IS NOT NULL THEN
2672: IF p_qualifier_rec.list_line_id(I) <> -1 THEN
2673: p_qualifier_rec.process_status_flag(I):=NULL;
2674: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
2675: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','LIST_LINE_ID');
2676: QP_BULK_MSG.ADD(l_msg_rec);
2677: END IF;
2678: ELSE
2671: IF p_qualifier_rec.list_line_id(I) IS NOT NULL THEN
2672: IF p_qualifier_rec.list_line_id(I) <> -1 THEN
2673: p_qualifier_rec.process_status_flag(I):=NULL;
2674: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
2675: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','LIST_LINE_ID');
2676: QP_BULK_MSG.ADD(l_msg_rec);
2677: END IF;
2678: ELSE
2679: p_qualifier_rec.list_line_id(I):=-1;
2681: -- Qualifier Context
2682: /* IF p_qualifier_rec.qualifier_context(I) IS NULL THEN
2683: p_qualifier_rec.qualifier_context(I) := '1';
2684: p_qualifier_rec.process_status_flag(I):=NULL;
2685: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
2686: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER CONTEXT');
2687: QP_BULK_MSG.ADD(l_msg_rec);
2688: END IF; */
2689:
2682: /* IF p_qualifier_rec.qualifier_context(I) IS NULL THEN
2683: p_qualifier_rec.qualifier_context(I) := '1';
2684: p_qualifier_rec.process_status_flag(I):=NULL;
2685: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
2686: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER CONTEXT');
2687: QP_BULK_MSG.ADD(l_msg_rec);
2688: END IF; */
2689:
2690:
2694:
2695: -- IF p_qualifier_rec.qualifier_attribute_code(I) IS NULL THEN
2696: p_qualifier_rec.qualifier_attribute_code(I):= '1';
2697: p_qualifier_rec.process_status_flag(I):=NULL;
2698: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
2699: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2700: QP_BULK_MSG.ADD(l_msg_rec);
2701: /* ELSE
2702:
2695: -- IF p_qualifier_rec.qualifier_attribute_code(I) IS NULL THEN
2696: p_qualifier_rec.qualifier_attribute_code(I):= '1';
2697: p_qualifier_rec.process_status_flag(I):=NULL;
2698: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
2699: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2700: QP_BULK_MSG.ADD(l_msg_rec);
2701: /* ELSE
2702:
2703: BEGIN
2709:
2710: IF p_qualifier_rec.qualifier_attribute(I) IS NULL THEN
2711: p_qualifier_rec.qualifier_attribute(I):='1';
2712: p_qualifier_rec.process_status_flag(I):=NULL;
2713: FND_MESSAGE.SET_NAME('QP','QP_VALUE_TO_ID_ERROR');
2714: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','qualifier_attribute');
2715: QP_BULK_MSG.ADD(l_msg_rec);
2716: END IF;
2717: EXCEPTION
2710: IF p_qualifier_rec.qualifier_attribute(I) IS NULL THEN
2711: p_qualifier_rec.qualifier_attribute(I):='1';
2712: p_qualifier_rec.process_status_flag(I):=NULL;
2713: FND_MESSAGE.SET_NAME('QP','QP_VALUE_TO_ID_ERROR');
2714: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','qualifier_attribute');
2715: QP_BULK_MSG.ADD(l_msg_rec);
2716: END IF;
2717: EXCEPTION
2718: WHEN NO_DATA_FOUND THEN
2717: EXCEPTION
2718: WHEN NO_DATA_FOUND THEN
2719: p_qualifier_rec.qualifier_attribute(I):='1';
2720: p_qualifier_rec.process_status_flag(I):=NULL;
2721: FND_MESSAGE.SET_NAME('QP','QP_VALUE_TO_ID_ERROR');
2722: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','qualifier_attribute');
2723: QP_BULK_MSG.ADD(l_msg_rec);
2724: END;
2725: END IF; */
2718: WHEN NO_DATA_FOUND THEN
2719: p_qualifier_rec.qualifier_attribute(I):='1';
2720: p_qualifier_rec.process_status_flag(I):=NULL;
2721: FND_MESSAGE.SET_NAME('QP','QP_VALUE_TO_ID_ERROR');
2722: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','qualifier_attribute');
2723: QP_BULK_MSG.ADD(l_msg_rec);
2724: END;
2725: END IF; */
2726:
2730: THEN
2731: IF p_qualifier_rec.qualify_hier_descendents_flag(I) NOT IN ('Y', 'N', 'y', 'n')
2732: THEN
2733: p_qualifier_rec.process_status_flag(I):=NULL;
2734: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
2735: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFY HIER DESCENDENTS FLAG ');
2736: qp_bulk_msg.add(l_msg_rec);
2737: ELSIF p_qualifier_rec.qualify_hier_descendents_flag(I) in ('Y','y') THEN
2738: BEGIN
2731: IF p_qualifier_rec.qualify_hier_descendents_flag(I) NOT IN ('Y', 'N', 'y', 'n')
2732: THEN
2733: p_qualifier_rec.process_status_flag(I):=NULL;
2734: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
2735: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFY HIER DESCENDENTS FLAG ');
2736: qp_bulk_msg.add(l_msg_rec);
2737: ELSIF p_qualifier_rec.qualify_hier_descendents_flag(I) in ('Y','y') THEN
2738: BEGIN
2739: select 'Y' into l_hierarchy_enabled
2748: and qs.party_hierarchy_enabled_flag ='Y');
2749: p_qualifier_rec.qualify_hier_descendents_flag(I) := 'Y';
2750: EXCEPTION WHEN NO_DATA_FOUND THEN
2751: p_qualifier_rec.process_status_flag(I):=NULL;
2752: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
2753: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFY HIER DESCENDENTS FLAG ');
2754: qp_bulk_msg.add(l_msg_rec);
2755: END;
2756: ELSE
2749: p_qualifier_rec.qualify_hier_descendents_flag(I) := 'Y';
2750: EXCEPTION WHEN NO_DATA_FOUND THEN
2751: p_qualifier_rec.process_status_flag(I):=NULL;
2752: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
2753: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFY HIER DESCENDENTS FLAG ');
2754: qp_bulk_msg.add(l_msg_rec);
2755: END;
2756: ELSE
2757: null;
2764: IF p_qualifier_rec.start_date_active(I) is not null THEN
2765: IF p_qualifier_rec.start_date_active(I) > p_qualifier_rec.end_date_active(I) THEN
2766: qp_bulk_loader_pub.write_log('End Date is before Start Date');
2767: p_qualifier_rec.process_status_flag(I):=NULL;
2768: FND_MESSAGE.SET_NAME('QP', 'QP_STRT_DATE_BFR_END_DATE');
2769: QP_BULK_MSG.Add(l_msg_rec);
2770: END IF;
2771: ELSE
2772: qp_bulk_loader_pub.write_log('Qualifier Start Date is null');
2770: END IF;
2771: ELSE
2772: qp_bulk_loader_pub.write_log('Qualifier Start Date is null');
2773: p_qualifier_rec.process_status_flag(I):=NULL;
2774: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_DATE');
2775: QP_BULK_MSG.Add(l_msg_rec);
2776: END IF;
2777: END IF;
2778: -- Bug# 5214576 RAVI END
2791: select 1 into l_exist from qp_list_headers_b
2792: where list_header_id = to_number(p_qualifier_rec.qualifier_attr_value(I));
2793: exception when others then
2794: p_qualifier_rec.process_status_flag(I):=NULL;
2795: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
2796: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER_ATTR_VALUE');
2797: QP_BULK_MSG.ADD(l_msg_rec);
2798: end;
2799: ELSE
2792: where list_header_id = to_number(p_qualifier_rec.qualifier_attr_value(I));
2793: exception when others then
2794: p_qualifier_rec.process_status_flag(I):=NULL;
2795: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
2796: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER_ATTR_VALUE');
2797: QP_BULK_MSG.ADD(l_msg_rec);
2798: end;
2799: ELSE
2800:
2823: );
2824:
2825: IF l_error_code IS NULL THEN
2826: p_qualifier_rec.process_status_flag(I):=NULL;
2827: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
2828: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2829: QP_BULK_MSG.ADD(l_msg_rec);
2830: ELSE
2831: IF l_error_code=1 THEN
2824:
2825: IF l_error_code IS NULL THEN
2826: p_qualifier_rec.process_status_flag(I):=NULL;
2827: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
2828: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2829: QP_BULK_MSG.ADD(l_msg_rec);
2830: ELSE
2831: IF l_error_code=1 THEN
2832: qp_bulk_loader_pub.write_log('Qualifier Flexfield_name is not passed.');
2830: ELSE
2831: IF l_error_code=1 THEN
2832: qp_bulk_loader_pub.write_log('Qualifier Flexfield_name is not passed.');
2833: p_qualifier_rec.process_status_flag(I):=NULL;
2834: FND_MESSAGE.SET_NAME('QP','QP_QLF_FLXFLD_NULL');
2835: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2836: QP_BULK_MSG.ADD(l_msg_rec);
2837: ELSIF l_error_code=2 THEN
2838: qp_bulk_loader_pub.write_log('Qualifier Context is not passed');
2831: IF l_error_code=1 THEN
2832: qp_bulk_loader_pub.write_log('Qualifier Flexfield_name is not passed.');
2833: p_qualifier_rec.process_status_flag(I):=NULL;
2834: FND_MESSAGE.SET_NAME('QP','QP_QLF_FLXFLD_NULL');
2835: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2836: QP_BULK_MSG.ADD(l_msg_rec);
2837: ELSIF l_error_code=2 THEN
2838: qp_bulk_loader_pub.write_log('Qualifier Context is not passed');
2839: p_qualifier_rec.process_status_flag(I):=NULL;
2836: QP_BULK_MSG.ADD(l_msg_rec);
2837: ELSIF l_error_code=2 THEN
2838: qp_bulk_loader_pub.write_log('Qualifier Context is not passed');
2839: p_qualifier_rec.process_status_flag(I):=NULL;
2840: FND_MESSAGE.SET_NAME('QP','QP_QLF_CNTXT_NULL');
2841: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2842: QP_BULK_MSG.ADD(l_msg_rec);
2843: ELSIF l_error_code=3 THEN
2844: qp_bulk_loader_pub.write_log('Qualifier Attribute is not passed.');
2837: ELSIF l_error_code=2 THEN
2838: qp_bulk_loader_pub.write_log('Qualifier Context is not passed');
2839: p_qualifier_rec.process_status_flag(I):=NULL;
2840: FND_MESSAGE.SET_NAME('QP','QP_QLF_CNTXT_NULL');
2841: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2842: QP_BULK_MSG.ADD(l_msg_rec);
2843: ELSIF l_error_code=3 THEN
2844: qp_bulk_loader_pub.write_log('Qualifier Attribute is not passed.');
2845: p_qualifier_rec.process_status_flag(I):=NULL;
2842: QP_BULK_MSG.ADD(l_msg_rec);
2843: ELSIF l_error_code=3 THEN
2844: qp_bulk_loader_pub.write_log('Qualifier Attribute is not passed.');
2845: p_qualifier_rec.process_status_flag(I):=NULL;
2846: FND_MESSAGE.SET_NAME('QP','QP_QLF_ATTR_NULL');
2847: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2848: QP_BULK_MSG.ADD(l_msg_rec);
2849: ELSIF l_error_code=4 THEN
2850: qp_bulk_loader_pub.write_log('Qualifier Value is not passed');
2843: ELSIF l_error_code=3 THEN
2844: qp_bulk_loader_pub.write_log('Qualifier Attribute is not passed.');
2845: p_qualifier_rec.process_status_flag(I):=NULL;
2846: FND_MESSAGE.SET_NAME('QP','QP_QLF_ATTR_NULL');
2847: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2848: QP_BULK_MSG.ADD(l_msg_rec);
2849: ELSIF l_error_code=4 THEN
2850: qp_bulk_loader_pub.write_log('Qualifier Value is not passed');
2851: p_qualifier_rec.process_status_flag(I):=NULL;
2848: QP_BULK_MSG.ADD(l_msg_rec);
2849: ELSIF l_error_code=4 THEN
2850: qp_bulk_loader_pub.write_log('Qualifier Value is not passed');
2851: p_qualifier_rec.process_status_flag(I):=NULL;
2852: FND_MESSAGE.SET_NAME('QP','QP_QLF_ATTR_VAL_NULL');
2853: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2854: QP_BULK_MSG.ADD(l_msg_rec);
2855: ELSIF l_error_code=5 THEN
2856: qp_bulk_loader_pub.write_log('Qualifier Application short name is not passed');
2849: ELSIF l_error_code=4 THEN
2850: qp_bulk_loader_pub.write_log('Qualifier Value is not passed');
2851: p_qualifier_rec.process_status_flag(I):=NULL;
2852: FND_MESSAGE.SET_NAME('QP','QP_QLF_ATTR_VAL_NULL');
2853: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2854: QP_BULK_MSG.ADD(l_msg_rec);
2855: ELSIF l_error_code=5 THEN
2856: qp_bulk_loader_pub.write_log('Qualifier Application short name is not passed');
2857: p_qualifier_rec.process_status_flag(I):=NULL;
2854: QP_BULK_MSG.ADD(l_msg_rec);
2855: ELSIF l_error_code=5 THEN
2856: qp_bulk_loader_pub.write_log('Qualifier Application short name is not passed');
2857: p_qualifier_rec.process_status_flag(I):=NULL;
2858: FND_MESSAGE.SET_NAME('QP','QP_QLF_APP_NAME_NULL');
2859: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2860: QP_BULK_MSG.ADD(l_msg_rec);
2861: ELSIF l_error_code=6 THEN
2862: qp_bulk_loader_pub.write_log('Qualifier Invalid application short name.');
2855: ELSIF l_error_code=5 THEN
2856: qp_bulk_loader_pub.write_log('Qualifier Application short name is not passed');
2857: p_qualifier_rec.process_status_flag(I):=NULL;
2858: FND_MESSAGE.SET_NAME('QP','QP_QLF_APP_NAME_NULL');
2859: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2860: QP_BULK_MSG.ADD(l_msg_rec);
2861: ELSIF l_error_code=6 THEN
2862: qp_bulk_loader_pub.write_log('Qualifier Invalid application short name.');
2863: p_qualifier_rec.process_status_flag(I):=NULL;
2860: QP_BULK_MSG.ADD(l_msg_rec);
2861: ELSIF l_error_code=6 THEN
2862: qp_bulk_loader_pub.write_log('Qualifier Invalid application short name.');
2863: p_qualifier_rec.process_status_flag(I):=NULL;
2864: FND_MESSAGE.SET_NAME('QP','QP_QLF_INVALID_APP_NAME');
2865: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2866: QP_BULK_MSG.ADD(l_msg_rec);
2867: ELSIF l_error_code=7 THEN
2868: qp_bulk_loader_pub.write_log('Qualifier Invalid context passed');
2861: ELSIF l_error_code=6 THEN
2862: qp_bulk_loader_pub.write_log('Qualifier Invalid application short name.');
2863: p_qualifier_rec.process_status_flag(I):=NULL;
2864: FND_MESSAGE.SET_NAME('QP','QP_QLF_INVALID_APP_NAME');
2865: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2866: QP_BULK_MSG.ADD(l_msg_rec);
2867: ELSIF l_error_code=7 THEN
2868: qp_bulk_loader_pub.write_log('Qualifier Invalid context passed');
2869: p_qualifier_rec.process_status_flag(I):=NULL;
2866: QP_BULK_MSG.ADD(l_msg_rec);
2867: ELSIF l_error_code=7 THEN
2868: qp_bulk_loader_pub.write_log('Qualifier Invalid context passed');
2869: p_qualifier_rec.process_status_flag(I):=NULL;
2870: FND_MESSAGE.SET_NAME('QP','QP_QLF_INVALID_CNTXT');
2871: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2872: QP_BULK_MSG.ADD(l_msg_rec);
2873: ELSIF l_error_code=8 THEN
2874: qp_bulk_loader_pub.write_log('Qualifier Invalid Attribute passed');
2867: ELSIF l_error_code=7 THEN
2868: qp_bulk_loader_pub.write_log('Qualifier Invalid context passed');
2869: p_qualifier_rec.process_status_flag(I):=NULL;
2870: FND_MESSAGE.SET_NAME('QP','QP_QLF_INVALID_CNTXT');
2871: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2872: QP_BULK_MSG.ADD(l_msg_rec);
2873: ELSIF l_error_code=8 THEN
2874: qp_bulk_loader_pub.write_log('Qualifier Invalid Attribute passed');
2875: p_qualifier_rec.process_status_flag(I):=NULL;
2872: QP_BULK_MSG.ADD(l_msg_rec);
2873: ELSIF l_error_code=8 THEN
2874: qp_bulk_loader_pub.write_log('Qualifier Invalid Attribute passed');
2875: p_qualifier_rec.process_status_flag(I):=NULL;
2876: FND_MESSAGE.SET_NAME('QP','QP_QLF_INVALID_ATTRIB');
2877: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2878: QP_BULK_MSG.ADD(l_msg_rec);
2879: ELSIF l_error_code=9 THEN
2880: qp_bulk_loader_pub.write_log('Qualifier Value does not exist');
2873: ELSIF l_error_code=8 THEN
2874: qp_bulk_loader_pub.write_log('Qualifier Invalid Attribute passed');
2875: p_qualifier_rec.process_status_flag(I):=NULL;
2876: FND_MESSAGE.SET_NAME('QP','QP_QLF_INVALID_ATTRIB');
2877: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2878: QP_BULK_MSG.ADD(l_msg_rec);
2879: ELSIF l_error_code=9 THEN
2880: qp_bulk_loader_pub.write_log('Qualifier Value does not exist');
2881: p_qualifier_rec.process_status_flag(I):=NULL;
2878: QP_BULK_MSG.ADD(l_msg_rec);
2879: ELSIF l_error_code=9 THEN
2880: qp_bulk_loader_pub.write_log('Qualifier Value does not exist');
2881: p_qualifier_rec.process_status_flag(I):=NULL;
2882: FND_MESSAGE.SET_NAME('QP','QP_QLF_INVALID_ATTR_VAL');
2883: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2884: QP_BULK_MSG.ADD(l_msg_rec);
2885: ELSIF l_error_code=10 THEN
2886: qp_bulk_loader_pub.write_log('Qualifier Invalid Flexfield Name');
2879: ELSIF l_error_code=9 THEN
2880: qp_bulk_loader_pub.write_log('Qualifier Value does not exist');
2881: p_qualifier_rec.process_status_flag(I):=NULL;
2882: FND_MESSAGE.SET_NAME('QP','QP_QLF_INVALID_ATTR_VAL');
2883: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2884: QP_BULK_MSG.ADD(l_msg_rec);
2885: ELSIF l_error_code=10 THEN
2886: qp_bulk_loader_pub.write_log('Qualifier Invalid Flexfield Name');
2887: p_qualifier_rec.process_status_flag(I):=NULL;
2884: QP_BULK_MSG.ADD(l_msg_rec);
2885: ELSIF l_error_code=10 THEN
2886: qp_bulk_loader_pub.write_log('Qualifier Invalid Flexfield Name');
2887: p_qualifier_rec.process_status_flag(I):=NULL;
2888: FND_MESSAGE.SET_NAME('QP','QP_QLF_INVALID_FLXFLD_NAME');
2889: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2890: QP_BULK_MSG.ADD(l_msg_rec);
2891: END IF;
2892: END IF;
2885: ELSIF l_error_code=10 THEN
2886: qp_bulk_loader_pub.write_log('Qualifier Invalid Flexfield Name');
2887: p_qualifier_rec.process_status_flag(I):=NULL;
2888: FND_MESSAGE.SET_NAME('QP','QP_QLF_INVALID_FLXFLD_NAME');
2889: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE CODE');
2890: QP_BULK_MSG.ADD(l_msg_rec);
2891: END IF;
2892: END IF;
2893: END IF;
2900: p_qualifier_rec.qualifier_attr_value_to(I) IS NULL THEN
2901:
2902: IF p_qualifier_rec.qualifier_attr_value_to_code(I) IS NULL THEN
2903: p_qualifier_rec.process_status_flag(I):=NULL;
2904: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
2905: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE VALUE TO');
2906: QP_BULK_MSG.ADD(l_msg_rec);
2907: ELSE
2908:
2901:
2902: IF p_qualifier_rec.qualifier_attr_value_to_code(I) IS NULL THEN
2903: p_qualifier_rec.process_status_flag(I):=NULL;
2904: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
2905: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE VALUE TO');
2906: QP_BULK_MSG.ADD(l_msg_rec);
2907: ELSE
2908:
2909: BEGIN
2928: END IF;
2929:
2930: IF p_qualifier_rec.qualifier_attr_value_to(I) IS NULL THEN
2931: p_qualifier_rec.process_status_flag(I):=NULL;
2932: FND_MESSAGE.SET_NAME('QP','QP_VALUE_TO_ID_ERROR');
2933: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','qualifier_attr_value_to');
2934: QP_BULK_MSG.add(l_msg_rec);
2935: END IF;
2936:
2929:
2930: IF p_qualifier_rec.qualifier_attr_value_to(I) IS NULL THEN
2931: p_qualifier_rec.process_status_flag(I):=NULL;
2932: FND_MESSAGE.SET_NAME('QP','QP_VALUE_TO_ID_ERROR');
2933: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','qualifier_attr_value_to');
2934: QP_BULK_MSG.add(l_msg_rec);
2935: END IF;
2936:
2937: EXCEPTION
2936:
2937: EXCEPTION
2938: WHEN NO_DATA_FOUND THEN
2939: p_qualifier_rec.process_status_flag(I):=NULL;
2940: FND_MESSAGE.SET_NAME('QP','QP_VALUE_TO_ID_ERROR');
2941: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','qualifier_attr_value_to');
2942: QP_BULK_MSG.ADD(l_msg_rec);
2943:
2944: END;
2937: EXCEPTION
2938: WHEN NO_DATA_FOUND THEN
2939: p_qualifier_rec.process_status_flag(I):=NULL;
2940: FND_MESSAGE.SET_NAME('QP','QP_VALUE_TO_ID_ERROR');
2941: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','qualifier_attr_value_to');
2942: QP_BULK_MSG.ADD(l_msg_rec);
2943:
2944: END;
2945: END IF;
2951: orig_sys_qualifier_ref.
2952: -------------------------------------------------------------*/
2953: IF p_qualifier_rec.orig_sys_qualifier_ref(I) IS NULL THEN
2954: p_qualifier_rec.process_status_flag(I):=NULL;
2955: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
2956: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','ORIG_SYS_QUALIFIER_REF');
2957: QP_BULK_MSG.ADD(l_msg_rec);
2958: END IF;
2959: l_exist:=null;
2952: -------------------------------------------------------------*/
2953: IF p_qualifier_rec.orig_sys_qualifier_ref(I) IS NULL THEN
2954: p_qualifier_rec.process_status_flag(I):=NULL;
2955: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
2956: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','ORIG_SYS_QUALIFIER_REF');
2957: QP_BULK_MSG.ADD(l_msg_rec);
2958: END IF;
2959: l_exist:=null;
2960: -- Check for uniqueness of orig_sys_qualifier_ref
2969: END;
2970:
2971: IF p_qualifier_rec.interface_action_code(I) = 'INSERT' AND l_exist = 1 THEN
2972: p_qualifier_rec.process_status_flag(I):=NULL;
2973: FND_MESSAGE.SET_NAME('QP', 'ORIG_SYS_QUAL_REF_NOT_UNIQUE');
2974: FND_MESSAGE.SET_TOKEN('REF_NO', p_qualifier_rec.orig_sys_qualifier_ref(I));
2975: QP_BULK_MSG.add(l_msg_rec);
2976: ELSIF p_qualifier_rec.interface_action_code(I) = 'UPDATE' AND l_exist = 0 THEN
2977: p_qualifier_rec.process_status_flag(I):=NULL;
2970:
2971: IF p_qualifier_rec.interface_action_code(I) = 'INSERT' AND l_exist = 1 THEN
2972: p_qualifier_rec.process_status_flag(I):=NULL;
2973: FND_MESSAGE.SET_NAME('QP', 'ORIG_SYS_QUAL_REF_NOT_UNIQUE');
2974: FND_MESSAGE.SET_TOKEN('REF_NO', p_qualifier_rec.orig_sys_qualifier_ref(I));
2975: QP_BULK_MSG.add(l_msg_rec);
2976: ELSIF p_qualifier_rec.interface_action_code(I) = 'UPDATE' AND l_exist = 0 THEN
2977: p_qualifier_rec.process_status_flag(I):=NULL;
2978: FND_MESSAGE.SET_NAME('QP', 'QUALIFIER_REC_DOES_NOT_EXIST');
2974: FND_MESSAGE.SET_TOKEN('REF_NO', p_qualifier_rec.orig_sys_qualifier_ref(I));
2975: QP_BULK_MSG.add(l_msg_rec);
2976: ELSIF p_qualifier_rec.interface_action_code(I) = 'UPDATE' AND l_exist = 0 THEN
2977: p_qualifier_rec.process_status_flag(I):=NULL;
2978: FND_MESSAGE.SET_NAME('QP', 'QUALIFIER_REC_DOES_NOT_EXIST');
2979: FND_MESSAGE.SET_TOKEN('REF_NO', p_qualifier_rec.orig_sys_qualifier_ref(I));
2980: QP_BULK_MSG.add(l_msg_rec);
2981: END IF;
2982: If p_qualifier_rec.interface_action_code(I)='INSERT' THEN
2975: QP_BULK_MSG.add(l_msg_rec);
2976: ELSIF p_qualifier_rec.interface_action_code(I) = 'UPDATE' AND l_exist = 0 THEN
2977: p_qualifier_rec.process_status_flag(I):=NULL;
2978: FND_MESSAGE.SET_NAME('QP', 'QUALIFIER_REC_DOES_NOT_EXIST');
2979: FND_MESSAGE.SET_TOKEN('REF_NO', p_qualifier_rec.orig_sys_qualifier_ref(I));
2980: QP_BULK_MSG.add(l_msg_rec);
2981: END IF;
2982: If p_qualifier_rec.interface_action_code(I)='INSERT' THEN
2983: l_exist:=null;
2990: and orig_sys_header_ref = p_qualifier_rec.orig_sys_header_ref(I);
2991:
2992: IF l_exist >1 THEN
2993: p_qualifier_rec.process_status_flag(I):=NULL;
2994: FND_MESSAGE.SET_NAME('QP', 'ORIG_SYS_QUAL_REF_NOT_UNIQUE');
2995: FND_MESSAGE.SET_TOKEN('REF_NO', p_qualifier_rec.orig_sys_qualifier_ref(I));
2996: QP_BULK_MSG.add(l_msg_rec);
2997: END IF;
2998: end if;
2991:
2992: IF l_exist >1 THEN
2993: p_qualifier_rec.process_status_flag(I):=NULL;
2994: FND_MESSAGE.SET_NAME('QP', 'ORIG_SYS_QUAL_REF_NOT_UNIQUE');
2995: FND_MESSAGE.SET_TOKEN('REF_NO', p_qualifier_rec.orig_sys_qualifier_ref(I));
2996: QP_BULK_MSG.add(l_msg_rec);
2997: END IF;
2998: end if;
2999:
3005: Exception
3006: When NO_DATA_FOUND then
3007: p_qualifier_rec.process_status_flag(I):=NULL;
3008: p_qualifier_rec.list_header_id(I) := -1;
3009: fnd_message.set_name('QP', 'QP_INVALID_HEADER_REF');
3010: FND_MESSAGE.SET_TOKEN('REF_NO',NULL);
3011: qp_bulk_msg.add(l_msg_rec);
3012: End;
3013:
3006: When NO_DATA_FOUND then
3007: p_qualifier_rec.process_status_flag(I):=NULL;
3008: p_qualifier_rec.list_header_id(I) := -1;
3009: fnd_message.set_name('QP', 'QP_INVALID_HEADER_REF');
3010: FND_MESSAGE.SET_TOKEN('REF_NO',NULL);
3011: qp_bulk_msg.add(l_msg_rec);
3012: End;
3013:
3014: --SECONDARY PRICELIST CHECK
3030: EXCEPTION
3031: WHEN NO_DATA_FOUND THEN
3032: qp_bulk_loader_pub.write_log( 'Secondary Price List Currency not compatible with primary price list currency code');
3033: P_QUALIFIER_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
3034: FND_MESSAGE.SET_NAME('QP', 'QP_SEC_PRL_CCD_INVALID');
3035: --FND_MESSAGE.SET_TOKEN('PRICELIST_NAME', p_qualifier_rec.qualifier_attr_value(I));
3036: QP_BULK_MSG.ADD(l_msg_rec);
3037: END;
3038: -- Bug 4926775 END RAVI
3031: WHEN NO_DATA_FOUND THEN
3032: qp_bulk_loader_pub.write_log( 'Secondary Price List Currency not compatible with primary price list currency code');
3033: P_QUALIFIER_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
3034: FND_MESSAGE.SET_NAME('QP', 'QP_SEC_PRL_CCD_INVALID');
3035: --FND_MESSAGE.SET_TOKEN('PRICELIST_NAME', p_qualifier_rec.qualifier_attr_value(I));
3036: QP_BULK_MSG.ADD(l_msg_rec);
3037: END;
3038: -- Bug 4926775 END RAVI
3039:
3047: AND LANGUAGE = userenv('LANG');
3048: EXCEPTION
3049: WHEN NO_DATA_FOUND THEN
3050: P_QUALIFIER_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
3051: FND_MESSAGE.SET_NAME('QP', 'SEC_PRL_ERROR');
3052: FND_MESSAGE.SET_TOKEN('PRICELIST_NAME', p_qualifier_rec.qualifier_attr_value_code(I));
3053: QP_BULK_MSG.ADD(l_msg_rec);
3054: END;
3055: END IF;
3048: EXCEPTION
3049: WHEN NO_DATA_FOUND THEN
3050: P_QUALIFIER_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
3051: FND_MESSAGE.SET_NAME('QP', 'SEC_PRL_ERROR');
3052: FND_MESSAGE.SET_TOKEN('PRICELIST_NAME', p_qualifier_rec.qualifier_attr_value_code(I));
3053: QP_BULK_MSG.ADD(l_msg_rec);
3054: END;
3055: END IF;
3056: IF p_qualifier_rec.qualifier_attr_value(I) IS NOT NULL THEN
3087: end;
3088: end if;
3089: if l_exist <> 0 then
3090: P_QUALIFIER_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
3091: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
3092: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',' Price List');
3093: QP_BULK_MSG.ADD(l_msg_rec);
3094: end if;
3095: qp_bulk_loader_pub.write_log( 'Secondary Price List security check');
3088: end if;
3089: if l_exist <> 0 then
3090: P_QUALIFIER_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
3091: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
3092: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',' Price List');
3093: QP_BULK_MSG.ADD(l_msg_rec);
3094: end if;
3095: qp_bulk_loader_pub.write_log( 'Secondary Price List security check');
3096: IF QP_security.check_function(p_function_name => QP_Security.G_FUNCTION_UPDATE,
3096: IF QP_security.check_function(p_function_name => QP_Security.G_FUNCTION_UPDATE,
3097: p_instance_type => QP_Security.G_PRICELIST_OBJECT,
3098: p_instance_pk1 => to_number(p_qualifier_rec.qualifier_attr_value(I))) <> 'T' THEN
3099: p_qualifier_rec.process_status_flag(I):=NULL;
3100: fnd_message.set_name('QP', 'QP_NO_PRIVILEGE');
3101: fnd_message.set_token('PRICING_OBJECT', 'Price List');
3102: qp_bulk_msg.add(l_msg_rec);
3103: END IF;
3104: END IF;
3097: p_instance_type => QP_Security.G_PRICELIST_OBJECT,
3098: p_instance_pk1 => to_number(p_qualifier_rec.qualifier_attr_value(I))) <> 'T' THEN
3099: p_qualifier_rec.process_status_flag(I):=NULL;
3100: fnd_message.set_name('QP', 'QP_NO_PRIVILEGE');
3101: fnd_message.set_token('PRICING_OBJECT', 'Price List');
3102: qp_bulk_msg.add(l_msg_rec);
3103: END IF;
3104: END IF;
3105: END IF;
3119: qp_bulk_loader_pub.write_log( 'l_exist='||l_exist);
3120:
3121: IF l_exist > 0 THEN
3122: P_QUALIFIER_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
3123: FND_MESSAGE.SET_NAME('QP','QP_1_SEC_PLST_FOR_BASIC');
3124: --Only one secondary pricelist allowed in Basic Pricing
3125: QP_BULK_MSG.ADD(l_msg_rec);
3126: END IF;
3127: l_exist:=0;
3134: AND (QUALIFIER_ATTR_VALUE = p_qualifier_rec.qualifier_attr_value(I)
3135: OR QUALIFIER_ATTR_VALUE_CODE = p_qualifier_rec.qualifier_attr_value_code(I));
3136: IF l_exist > 1 THEN
3137: P_QUALIFIER_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
3138: FND_MESSAGE.SET_NAME('QP','QP_1_SEC_PLST_FOR_BASIC');
3139: --Only one secondary pricelist allowed in Basic Pricing
3140: QP_BULK_MSG.ADD(l_msg_rec);
3141: END IF;
3142: END IF;
3155: AND f.pte_code = 'ORDFUL';
3156:
3157: IF l_seg_level = 'ORDER' THEN
3158: P_QUALIFIER_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
3159: FND_MESSAGE.SET_NAME('QP', 'QP_ORDER_LEVEL_QUAL_NOT_ALLOWED');
3160: QP_BULK_MSG.ADD(l_msg_rec);
3161: END IF;
3162:
3163: EXCEPTION
3214: IF l_sourcing_method = 'ATTRIBUTE MAPPING' THEN
3215:
3216: IF l_sourcing_enabled <> 'Y' THEN
3217:
3218: FND_MESSAGE.SET_NAME('QP','QP_ENABLE_SOURCING');
3219: FND_MESSAGE.SET_TOKEN('CONTEXT',
3220: p_Qualifier_rec.qualifier_context(I));
3221: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3222: p_Qualifier_rec.qualifier_attribute(I));
3215:
3216: IF l_sourcing_enabled <> 'Y' THEN
3217:
3218: FND_MESSAGE.SET_NAME('QP','QP_ENABLE_SOURCING');
3219: FND_MESSAGE.SET_TOKEN('CONTEXT',
3220: p_Qualifier_rec.qualifier_context(I));
3221: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3222: p_Qualifier_rec.qualifier_attribute(I));
3223: QP_BULK_MSG.ADD(l_msg_rec);
3217:
3218: FND_MESSAGE.SET_NAME('QP','QP_ENABLE_SOURCING');
3219: FND_MESSAGE.SET_TOKEN('CONTEXT',
3220: p_Qualifier_rec.qualifier_context(I));
3221: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3222: p_Qualifier_rec.qualifier_attribute(I));
3223: QP_BULK_MSG.ADD(l_msg_rec);
3224:
3225: END IF;
3229: IF NOT (
3230: p_qualifier_rec.qualifier_context(I)= 'MODLIST' AND
3231: p_qualifier_rec.qualifier_attribute(I) = 'QUALIFIER_ATTRIBUTE10')
3232: THEN
3233: FND_MESSAGE.SET_NAME('QP','QP_BUILD_SOURCING_RULES');
3234: FND_MESSAGE.SET_TOKEN('CONTEXT',
3235: p_Qualifier_rec.qualifier_context(I));
3236: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3237: p_Qualifier_rec.qualifier_attribute(I));
3230: p_qualifier_rec.qualifier_context(I)= 'MODLIST' AND
3231: p_qualifier_rec.qualifier_attribute(I) = 'QUALIFIER_ATTRIBUTE10')
3232: THEN
3233: FND_MESSAGE.SET_NAME('QP','QP_BUILD_SOURCING_RULES');
3234: FND_MESSAGE.SET_TOKEN('CONTEXT',
3235: p_Qualifier_rec.qualifier_context(I));
3236: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3237: p_Qualifier_rec.qualifier_attribute(I));
3238: QP_BULK_MSG.ADD(l_msg_rec);
3232: THEN
3233: FND_MESSAGE.SET_NAME('QP','QP_BUILD_SOURCING_RULES');
3234: FND_MESSAGE.SET_TOKEN('CONTEXT',
3235: p_Qualifier_rec.qualifier_context(I));
3236: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3237: p_Qualifier_rec.qualifier_attribute(I));
3238: QP_BULK_MSG.ADD(l_msg_rec);
3239: END IF;
3240:
3633: EXCEPTION
3634: WHEN NO_DATA_FOUND THEN
3635: p_pricing_attr_rec.list_line_id(I) := -1;
3636: p_pricing_attr_rec.process_status_flag(I):=NULL;
3637: fnd_message.set_name('QP', 'QP_INVALID_LINE_REF');
3638: FND_MESSAGE.SET_TOKEN('REF_NO', p_pricing_attr_rec.orig_sys_line_ref(I));
3639: qp_bulk_msg.add(l_msg_rec);
3640: END;
3641: qp_bulk_loader_pub.write_log('After entity list_line_id pricing attribute');
3634: WHEN NO_DATA_FOUND THEN
3635: p_pricing_attr_rec.list_line_id(I) := -1;
3636: p_pricing_attr_rec.process_status_flag(I):=NULL;
3637: fnd_message.set_name('QP', 'QP_INVALID_LINE_REF');
3638: FND_MESSAGE.SET_TOKEN('REF_NO', p_pricing_attr_rec.orig_sys_line_ref(I));
3639: qp_bulk_msg.add(l_msg_rec);
3640: END;
3641: qp_bulk_loader_pub.write_log('After entity list_line_id pricing attribute');
3642:
3682: End;
3683: END IF;
3684: if l_pa_count=0 then
3685: p_pricing_attr_rec.process_status_flag(I):=NULL;
3686: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
3687: fnd_message.set_token('ATTRIBUTE', 'PRODUCT_ATTRIBUTE_VALUE');
3688: qp_bulk_msg.add(l_msg_rec);
3689: end if;
3690: END IF;
3683: END IF;
3684: if l_pa_count=0 then
3685: p_pricing_attr_rec.process_status_flag(I):=NULL;
3686: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_ATTRIBUTE');
3687: fnd_message.set_token('ATTRIBUTE', 'PRODUCT_ATTRIBUTE_VALUE');
3688: qp_bulk_msg.add(l_msg_rec);
3689: end if;
3690: END IF;
3691: -- Bug# 5246745 RAVI END
3700: EXCEPTION
3701: WHEN NO_DATA_FOUND THEN
3702: p_pricing_attr_rec.list_header_id(I) := -1;
3703: p_pricing_attr_rec.process_status_flag(I):=NULL;
3704: fnd_message.set_name('QP', 'QP_INVALID_HEADER_REF');
3705: FND_MESSAGE.SET_TOKEN('REF_NO', p_pricing_attr_rec.orig_sys_header_ref(I));
3706: FND_MESSAGE.SET_TOKEN('LS_CODE', NULL);
3707: qp_bulk_msg.add(l_msg_rec);
3708: END;
3701: WHEN NO_DATA_FOUND THEN
3702: p_pricing_attr_rec.list_header_id(I) := -1;
3703: p_pricing_attr_rec.process_status_flag(I):=NULL;
3704: fnd_message.set_name('QP', 'QP_INVALID_HEADER_REF');
3705: FND_MESSAGE.SET_TOKEN('REF_NO', p_pricing_attr_rec.orig_sys_header_ref(I));
3706: FND_MESSAGE.SET_TOKEN('LS_CODE', NULL);
3707: qp_bulk_msg.add(l_msg_rec);
3708: END;
3709:
3702: p_pricing_attr_rec.list_header_id(I) := -1;
3703: p_pricing_attr_rec.process_status_flag(I):=NULL;
3704: fnd_message.set_name('QP', 'QP_INVALID_HEADER_REF');
3705: FND_MESSAGE.SET_TOKEN('REF_NO', p_pricing_attr_rec.orig_sys_header_ref(I));
3706: FND_MESSAGE.SET_TOKEN('LS_CODE', NULL);
3707: qp_bulk_msg.add(l_msg_rec);
3708: END;
3709:
3710: -- Excluder Flag
3735: END;
3736:
3737: IF p_pricing_attr_rec.interface_action_code(I) = 'INSERT' AND l_exist = 1 THEN
3738: p_pricing_attr_rec.process_status_flag(I):=NULL;
3739: fnd_message.set_name('QP', 'ORIG_SYS_PRC_ATTR_REF_NOT_UNIQ');
3740: FND_MESSAGE.SET_TOKEN('REF_NO', p_pricing_attr_rec.orig_sys_pricing_attr_ref(I));
3741: qp_bulk_msg.add(l_msg_rec);
3742: ELSIF p_pricing_attr_rec.interface_action_code(I) = 'UPDATE' AND l_exist = 0 THEN
3743: p_pricing_attr_rec.process_status_flag(I):=NULL;
3736:
3737: IF p_pricing_attr_rec.interface_action_code(I) = 'INSERT' AND l_exist = 1 THEN
3738: p_pricing_attr_rec.process_status_flag(I):=NULL;
3739: fnd_message.set_name('QP', 'ORIG_SYS_PRC_ATTR_REF_NOT_UNIQ');
3740: FND_MESSAGE.SET_TOKEN('REF_NO', p_pricing_attr_rec.orig_sys_pricing_attr_ref(I));
3741: qp_bulk_msg.add(l_msg_rec);
3742: ELSIF p_pricing_attr_rec.interface_action_code(I) = 'UPDATE' AND l_exist = 0 THEN
3743: p_pricing_attr_rec.process_status_flag(I):=NULL;
3744: fnd_message.set_name('QP', 'PRC_ATTR_REC_DOES_NOT_EXIST');
3740: FND_MESSAGE.SET_TOKEN('REF_NO', p_pricing_attr_rec.orig_sys_pricing_attr_ref(I));
3741: qp_bulk_msg.add(l_msg_rec);
3742: ELSIF p_pricing_attr_rec.interface_action_code(I) = 'UPDATE' AND l_exist = 0 THEN
3743: p_pricing_attr_rec.process_status_flag(I):=NULL;
3744: fnd_message.set_name('QP', 'PRC_ATTR_REC_DOES_NOT_EXIST');
3745: FND_MESSAGE.SET_TOKEN('REF_NO', p_pricing_attr_rec.orig_sys_pricing_attr_ref(I));
3746: qp_bulk_msg.add(l_msg_rec);
3747: END IF;
3748:
3741: qp_bulk_msg.add(l_msg_rec);
3742: ELSIF p_pricing_attr_rec.interface_action_code(I) = 'UPDATE' AND l_exist = 0 THEN
3743: p_pricing_attr_rec.process_status_flag(I):=NULL;
3744: fnd_message.set_name('QP', 'PRC_ATTR_REC_DOES_NOT_EXIST');
3745: FND_MESSAGE.SET_TOKEN('REF_NO', p_pricing_attr_rec.orig_sys_pricing_attr_ref(I));
3746: qp_bulk_msg.add(l_msg_rec);
3747: END IF;
3748:
3749: IF p_pricing_attr_rec.interface_action_code(I) = 'INSERT' THEN
3762: END;
3763:
3764: IF l_exist > 1 THEN
3765: p_pricing_attr_rec.process_status_flag(I):=NULL;
3766: fnd_message.set_name('QP', 'ORIG_SYS_PRC_ATTR_REF_NOT_UNIQ');
3767: FND_MESSAGE.SET_TOKEN('REF_NO', p_pricing_attr_rec.orig_sys_pricing_attr_ref(I));
3768: qp_bulk_msg.add(l_msg_rec);
3769: END IF;
3770: END IF;
3763:
3764: IF l_exist > 1 THEN
3765: p_pricing_attr_rec.process_status_flag(I):=NULL;
3766: fnd_message.set_name('QP', 'ORIG_SYS_PRC_ATTR_REF_NOT_UNIQ');
3767: FND_MESSAGE.SET_TOKEN('REF_NO', p_pricing_attr_rec.orig_sys_pricing_attr_ref(I));
3768: qp_bulk_msg.add(l_msg_rec);
3769: END IF;
3770: END IF;
3771:
3791: IF NOT l_fna_valid THEN
3792:
3793: P_PRICING_ATTR_REC.process_status_flag(I):=NULL;
3794:
3795: FND_MESSAGE.set_name('QP', 'QP_INVALID_CAT_FUNC_PTE');
3796: FND_MESSAGE.set_token('CATID', p_PRICING_ATTR_REC.product_attr_value(I));
3797: FND_MESSAGE.set_token('PTE', l_pte_code);
3798: FND_MESSAGE.set_token('SS', l_ss_code);
3799: QP_BULK_MSG.Add(L_MSG_REC);
3792:
3793: P_PRICING_ATTR_REC.process_status_flag(I):=NULL;
3794:
3795: FND_MESSAGE.set_name('QP', 'QP_INVALID_CAT_FUNC_PTE');
3796: FND_MESSAGE.set_token('CATID', p_PRICING_ATTR_REC.product_attr_value(I));
3797: FND_MESSAGE.set_token('PTE', l_pte_code);
3798: FND_MESSAGE.set_token('SS', l_ss_code);
3799: QP_BULK_MSG.Add(L_MSG_REC);
3800:
3793: P_PRICING_ATTR_REC.process_status_flag(I):=NULL;
3794:
3795: FND_MESSAGE.set_name('QP', 'QP_INVALID_CAT_FUNC_PTE');
3796: FND_MESSAGE.set_token('CATID', p_PRICING_ATTR_REC.product_attr_value(I));
3797: FND_MESSAGE.set_token('PTE', l_pte_code);
3798: FND_MESSAGE.set_token('SS', l_ss_code);
3799: QP_BULK_MSG.Add(L_MSG_REC);
3800:
3801: END IF;
3794:
3795: FND_MESSAGE.set_name('QP', 'QP_INVALID_CAT_FUNC_PTE');
3796: FND_MESSAGE.set_token('CATID', p_PRICING_ATTR_REC.product_attr_value(I));
3797: FND_MESSAGE.set_token('PTE', l_pte_code);
3798: FND_MESSAGE.set_token('SS', l_ss_code);
3799: QP_BULK_MSG.Add(L_MSG_REC);
3800:
3801: END IF;
3802:
3813: IF l_datatype IS NOT NULL THEN
3814: p_pricing_attr_rec.product_attribute_datatype(I):=l_datatype;
3815: ELSE
3816: p_pricing_attr_rec.process_status_flag(I):=NULL;
3817: fnd_message.set_name('QP', 'QP_ATTRIBUTE_REQUIRED');
3818: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Product Attribute Datatype');
3819: qp_bulk_msg.add(l_msg_rec);
3820: END IF;
3821:
3814: p_pricing_attr_rec.product_attribute_datatype(I):=l_datatype;
3815: ELSE
3816: p_pricing_attr_rec.process_status_flag(I):=NULL;
3817: fnd_message.set_name('QP', 'QP_ATTRIBUTE_REQUIRED');
3818: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Product Attribute Datatype');
3819: qp_bulk_msg.add(l_msg_rec);
3820: END IF;
3821:
3822: qp_bulk_loader_pub.write_log('After entity pricing attribute');
3824: -- product uom code
3825:
3826: IF P_PRICING_ATTR_REC.PRODUCT_UOM_CODE(I) IS NULL THEN
3827: P_PRICING_ATTR_REC.process_status_flag(I):=NULL;
3828: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
3829: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',QP_PRC_UTIL.Get_Attribute_Name('PRODUCT_UOM_CODE'));
3830: QP_BULK_MSG.ADD(L_MSG_REC);
3831: END IF;
3832:
3825:
3826: IF P_PRICING_ATTR_REC.PRODUCT_UOM_CODE(I) IS NULL THEN
3827: P_PRICING_ATTR_REC.process_status_flag(I):=NULL;
3828: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
3829: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',QP_PRC_UTIL.Get_Attribute_Name('PRODUCT_UOM_CODE'));
3830: QP_BULK_MSG.ADD(L_MSG_REC);
3831: END IF;
3832:
3833:
3869:
3870: qp_bulk_loader_pub.write_log('Count of records in Int table with pricing contect/attr/value null' || to_char(l_exist1));
3871: IF l_exist > 0 THEN
3872: p_pricing_attr_rec.process_status_flag(I):=NULL;
3873: FND_MESSAGE.SET_NAME('QP','QP_BULK_PRC_ATTR_ERROR');
3874: QP_BULK_MSG.ADD(l_msg_rec);
3875: END IF;
3876: IF l_exist1 > 0 THEN
3877: p_pricing_attr_rec.process_status_flag(I):=NULL;
3874: QP_BULK_MSG.ADD(l_msg_rec);
3875: END IF;
3876: IF l_exist1 > 0 THEN
3877: p_pricing_attr_rec.process_status_flag(I):=NULL;
3878: FND_MESSAGE.SET_NAME('QP','QP_BULK_INT_PRC_ATTR_ERROR');
3879: QP_BULK_MSG.ADD(l_msg_rec);
3880: END IF;
3881:
3882: END IF;
3912: l_exist1 := 0;
3913: END;
3914: IF l_exist > 0 OR l_exist1 > 0 THEN
3915: p_pricing_attr_rec.process_status_flag(I):=NULL;
3916: FND_MESSAGE.SET_NAME('QP','QP_1_PRIC_CONT_FOR_BASIC');
3917: --Only one pricing context allwed in Basic Pricing
3918: QP_BULK_MSG.ADD(l_msg_rec);
3919: END IF;
3920:
3935: and s.availability_in_basic = 'Y';
3936: EXCEPTION
3937: WHEN NO_DATA_FOUND THEN
3938: p_pricing_attr_rec.process_status_flag(I):=NULL;
3939: FND_MESSAGE.SET_NAME('QP','QP_PRIC_CONTXT_NA_BASIC');
3940: --Pricing Attribute Context not allowed in Basic Pricing
3941: QP_BULK_MSG.ADD(l_msg_rec);
3942: END;
3943:
3955: and s.availability_in_basic = 'Y';
3956: EXCEPTION
3957: WHEN NO_DATA_FOUND THEN
3958: p_pricing_attr_rec.process_status_flag(I):=NULL;
3959: FND_MESSAGE.SET_NAME('QP','QP_PROD_CONTXT_NA_BASIC');
3960: --Product Attribute Context not allowed in Basic Pricing
3961: QP_BULK_MSG.ADD(l_msg_rec);
3962: END;
3963: END IF;
3996: END;
3997:
3998: IF l_exist >0 OR l_exist1>0 THEN
3999: p_pricing_attr_rec.process_status_flag(I):=NULL;
4000: FND_MESSAGE.SET_NAME('QP', 'INVALID_PROD_CONTEXT_ATTR_PAIR');
4001: QP_BULK_MSG.ADD(l_msg_rec);
4002: END IF;
4003:
4004: -- check for pricing atributes
4012: OR p_Pricing_Attr_rec.comparison_operator_code(I) IS NULL)
4013: THEN
4014: p_pricing_attr_rec.process_status_flag(I):=NULL;
4015: IF p_Pricing_Attr_rec.pricing_attribute_context(I) IS NULL THEN
4016: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED' );
4017: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'PRICING_ATTRIBUTE_CONTEXT');
4018: QP_BULK_MSG.ADD(l_msg_rec);
4019: END IF;
4020: IF p_Pricing_Attr_rec.pricing_attribute(I) IS NULL THEN
4013: THEN
4014: p_pricing_attr_rec.process_status_flag(I):=NULL;
4015: IF p_Pricing_Attr_rec.pricing_attribute_context(I) IS NULL THEN
4016: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED' );
4017: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'PRICING_ATTRIBUTE_CONTEXT');
4018: QP_BULK_MSG.ADD(l_msg_rec);
4019: END IF;
4020: IF p_Pricing_Attr_rec.pricing_attribute(I) IS NULL THEN
4021: IF p_Pricing_Attr_rec.pricing_attr_code(I) IS NULL THEN
4018: QP_BULK_MSG.ADD(l_msg_rec);
4019: END IF;
4020: IF p_Pricing_Attr_rec.pricing_attribute(I) IS NULL THEN
4021: IF p_Pricing_Attr_rec.pricing_attr_code(I) IS NULL THEN
4022: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED' );
4023: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'PRICING_ATTRIBUTE');
4024: QP_BULK_MSG.ADD(l_msg_rec);
4025: ELSE
4026: FND_MESSAGE.SET_NAME('QP','QP_VALUE_TO_ID_ERROR' );
4019: END IF;
4020: IF p_Pricing_Attr_rec.pricing_attribute(I) IS NULL THEN
4021: IF p_Pricing_Attr_rec.pricing_attr_code(I) IS NULL THEN
4022: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED' );
4023: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'PRICING_ATTRIBUTE');
4024: QP_BULK_MSG.ADD(l_msg_rec);
4025: ELSE
4026: FND_MESSAGE.SET_NAME('QP','QP_VALUE_TO_ID_ERROR' );
4027: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'PRICING_ATTRIBUTE');
4022: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED' );
4023: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'PRICING_ATTRIBUTE');
4024: QP_BULK_MSG.ADD(l_msg_rec);
4025: ELSE
4026: FND_MESSAGE.SET_NAME('QP','QP_VALUE_TO_ID_ERROR' );
4027: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'PRICING_ATTRIBUTE');
4028: QP_BULK_MSG.ADD(l_msg_rec);
4029: END IF;
4030: END IF;
4023: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'PRICING_ATTRIBUTE');
4024: QP_BULK_MSG.ADD(l_msg_rec);
4025: ELSE
4026: FND_MESSAGE.SET_NAME('QP','QP_VALUE_TO_ID_ERROR' );
4027: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'PRICING_ATTRIBUTE');
4028: QP_BULK_MSG.ADD(l_msg_rec);
4029: END IF;
4030: END IF;
4031: IF p_Pricing_Attr_rec.comparison_operator_code(I) IS NULL THEN
4028: QP_BULK_MSG.ADD(l_msg_rec);
4029: END IF;
4030: END IF;
4031: IF p_Pricing_Attr_rec.comparison_operator_code(I) IS NULL THEN
4032: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED' );
4033: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'COMPARISON_OPERATOR_CODE');
4034: QP_BULK_MSG.ADD(l_msg_rec);
4035: END IF;
4036: ELSE
4029: END IF;
4030: END IF;
4031: IF p_Pricing_Attr_rec.comparison_operator_code(I) IS NULL THEN
4032: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED' );
4033: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'COMPARISON_OPERATOR_CODE');
4034: QP_BULK_MSG.ADD(l_msg_rec);
4035: END IF;
4036: ELSE
4037: QP_UTIL.validate_qp_flexfield(flexfield_name =>'QP_ATTR_DEFNS_PRICING'
4049:
4050: If (l_context_error = 'N' AND l_error_code = 7) -- invalid context
4051: Then
4052: p_pricing_attr_rec.process_status_flag(I):=NULL;
4053: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED' );
4054: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
4055: QP_PRC_UTIL.Get_Attribute_Name('PRICING_ATTRIBUTE_CONTEXT'));
4056:
4057: QP_BULK_MSG.Add(l_msg_rec);
4050: If (l_context_error = 'N' AND l_error_code = 7) -- invalid context
4051: Then
4052: p_pricing_attr_rec.process_status_flag(I):=NULL;
4053: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED' );
4054: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
4055: QP_PRC_UTIL.Get_Attribute_Name('PRICING_ATTRIBUTE_CONTEXT'));
4056:
4057: QP_BULK_MSG.Add(l_msg_rec);
4058: END IF;
4059:
4060: If l_attribute_error = 'N' AND l_error_code = 8 -- invalid Attribute
4061: Then
4062: p_pricing_attr_rec.process_status_flag(I):=NULL;
4063: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
4064: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',' Attribute');
4065: QP_BULK_MSG.Add(l_msg_rec);
4066: END IF;
4067:
4060: If l_attribute_error = 'N' AND l_error_code = 8 -- invalid Attribute
4061: Then
4062: p_pricing_attr_rec.process_status_flag(I):=NULL;
4063: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
4064: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',' Attribute');
4065: QP_BULK_MSG.Add(l_msg_rec);
4066: END IF;
4067:
4068: IF p_pricing_Attr_rec.comparison_operator_code(I) = '=' Then
4069:
4070: If l_value_error = 'N' AND l_error_code = 9 -- invalid value
4071: Then
4072: p_pricing_attr_rec.process_status_flag(I):=NULL;
4073: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
4074: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',' Value From ');
4075: QP_BULK_MSG.Add(l_msg_rec);
4076: End If;
4077: END IF;
4070: If l_value_error = 'N' AND l_error_code = 9 -- invalid value
4071: Then
4072: p_pricing_attr_rec.process_status_flag(I):=NULL;
4073: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
4074: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',' Value From ');
4075: QP_BULK_MSG.Add(l_msg_rec);
4076: End If;
4077: END IF;
4078:
4082: p_Pricing_Attr_rec.pricing_attribute(I) = 'PRICING_ATTRIBUTE12'
4083: --When Pricing Context is 'Volume' and Attribute is 'Item Amount'
4084: THEN
4085: p_pricing_attr_rec.process_status_flag(I):=NULL;
4086: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
4087: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Pricing Attribute');
4088: QP_BULK_MSG.Add(l_msg_rec);
4089: END IF;
4090:
4083: --When Pricing Context is 'Volume' and Attribute is 'Item Amount'
4084: THEN
4085: p_pricing_attr_rec.process_status_flag(I):=NULL;
4086: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
4087: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Pricing Attribute');
4088: QP_BULK_MSG.Add(l_msg_rec);
4089: END IF;
4090:
4091: --validation for canonical form
4092: l_error_code:=QP_UTIL.validate_num_date(p_Pricing_Attr_rec.pricing_attribute_datatype(I),
4093: p_Pricing_Attr_rec.pricing_attr_value_from(I));
4094: IF l_error_code <> 0 THEN
4095: p_pricing_attr_rec.process_status_flag(I):=NULL;
4096: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
4097: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Value From ');
4098: QP_BULK_MSG.Add(l_msg_rec);
4099: END IF;
4100:
4093: p_Pricing_Attr_rec.pricing_attr_value_from(I));
4094: IF l_error_code <> 0 THEN
4095: p_pricing_attr_rec.process_status_flag(I):=NULL;
4096: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
4097: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Value From ');
4098: QP_BULK_MSG.Add(l_msg_rec);
4099: END IF;
4100:
4101: -- Validation for Value_To
4106: (p_Pricing_Attr_rec.pricing_attr_value_to(I) IS NULL OR
4107: p_Pricing_Attr_rec.pricing_attr_value_from(I) IS NULL)
4108: THEN
4109: p_pricing_attr_rec.process_status_flag(I):=NULL;
4110: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED' );
4111: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
4112: QP_PRC_UTIL.Get_Attribute_Name('PRICING_ATTR_VALUE_TO')||'/'||
4113: QP_PRC_UTIL.Get_Attribute_Name('PRICING_ATTR_VALUE_FROM'));
4114: QP_BULK_MSG.Add(l_msg_rec);
4107: p_Pricing_Attr_rec.pricing_attr_value_from(I) IS NULL)
4108: THEN
4109: p_pricing_attr_rec.process_status_flag(I):=NULL;
4110: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED' );
4111: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
4112: QP_PRC_UTIL.Get_Attribute_Name('PRICING_ATTR_VALUE_TO')||'/'||
4113: QP_PRC_UTIL.Get_Attribute_Name('PRICING_ATTR_VALUE_FROM'));
4114: QP_BULK_MSG.Add(l_msg_rec);
4115: END IF;
4121: UPPER(p_Pricing_Attr_rec.comparison_operator_code(I)) <> 'BETWEEN' AND
4122: p_Pricing_Attr_rec.pricing_attr_value_from(I) IS NULL
4123: THEN
4124: p_pricing_attr_rec.process_status_flag(I):=NULL;
4125: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED' );
4126: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
4127: QP_PRC_UTIL.Get_Attribute_Name('PRICING_ATTR_VALUE_FROM'));
4128: QP_BULK_MSG.Add(l_msg_rec);
4129: END IF;
4122: p_Pricing_Attr_rec.pricing_attr_value_from(I) IS NULL
4123: THEN
4124: p_pricing_attr_rec.process_status_flag(I):=NULL;
4125: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED' );
4126: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
4127: QP_PRC_UTIL.Get_Attribute_Name('PRICING_ATTR_VALUE_FROM'));
4128: QP_BULK_MSG.Add(l_msg_rec);
4129: END IF;
4130:
4132: p_Pricing_Attr_rec.pricing_attr_value_to(I));
4133:
4134: IF l_error_code <> 0 THEN
4135: p_pricing_attr_rec.process_status_flag(I):=NULL;
4136: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
4137: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Value To ');
4138: QP_BULK_MSG.Add(l_msg_rec);
4139: END IF;
4140:
4133:
4134: IF l_error_code <> 0 THEN
4135: p_pricing_attr_rec.process_status_flag(I):=NULL;
4136: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
4137: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Value To ');
4138: QP_BULK_MSG.Add(l_msg_rec);
4139: END IF;
4140:
4141: END IF; -- Else
4146: or p_Pricing_Attr_rec.pricing_attribute(I) is not null ) then
4147:
4148: IF p_Pricing_Attr_rec.comparison_operator_code(I) is null then
4149: p_pricing_attr_rec.process_status_flag(I) :=NULL; --'E';
4150: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED' );
4151: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
4152: QP_PRC_UTIL.Get_Attribute_Name('COMPARISON_OPERATOR_CODE'));
4153: QP_BULK_MSG.Add(l_msg_rec);
4154: ElSE
4147:
4148: IF p_Pricing_Attr_rec.comparison_operator_code(I) is null then
4149: p_pricing_attr_rec.process_status_flag(I) :=NULL; --'E';
4150: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED' );
4151: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
4152: QP_PRC_UTIL.Get_Attribute_Name('COMPARISON_OPERATOR_CODE'));
4153: QP_BULK_MSG.Add(l_msg_rec);
4154: ElSE
4155: SELECT lookup_code
4160:
4161: If SQL%NOTFOUND
4162: Then
4163: p_pricing_attr_rec.process_status_flag(I) :=NULL; --'E';
4164: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED' );
4165: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
4166: QP_PRC_UTIL.Get_Attribute_Name('COMPARISON_OPERATOR_CODE'));
4167: QP_BULK_MSG.Add(l_msg_rec);
4168: END IF;
4161: If SQL%NOTFOUND
4162: Then
4163: p_pricing_attr_rec.process_status_flag(I) :=NULL; --'E';
4164: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED' );
4165: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
4166: QP_PRC_UTIL.Get_Attribute_Name('COMPARISON_OPERATOR_CODE'));
4167: QP_BULK_MSG.Add(l_msg_rec);
4168: END IF;
4169:
4188: null;
4189: end;
4190: if l_exist > 0 then
4191: p_pricing_attr_rec.process_status_flag(I) :=NULL; --'E';
4192: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
4193: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'PRICING ATTRIBUTE');
4194: QP_BULK_MSG.Add(l_msg_rec);
4195: end if;
4196:
4189: end;
4190: if l_exist > 0 then
4191: p_pricing_attr_rec.process_status_flag(I) :=NULL; --'E';
4192: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
4193: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'PRICING ATTRIBUTE');
4194: QP_BULK_MSG.Add(l_msg_rec);
4195: end if;
4196:
4197: END IF; /* context or atttribute is not null */
4214: AND r.rltd_modifier_grp_type = 'PRICE BREAK';
4215:
4216: IF p_pricing_attr_rec.pricing_attribute_context(I) IS NULL THEN
4217: p_pricing_attr_rec.process_status_flag(I) :=NULL; --'E';
4218: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
4219: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Pricing Attribute Context');
4220: QP_BULK_MSG.Add(l_msg_rec);
4221: ELSIF p_pricing_attr_rec.pricing_attribute_context(I)<>'VOLUME' THEN
4222: p_pricing_attr_rec.process_status_flag(I) :=NULL; --'E';
4215:
4216: IF p_pricing_attr_rec.pricing_attribute_context(I) IS NULL THEN
4217: p_pricing_attr_rec.process_status_flag(I) :=NULL; --'E';
4218: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
4219: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Pricing Attribute Context');
4220: QP_BULK_MSG.Add(l_msg_rec);
4221: ELSIF p_pricing_attr_rec.pricing_attribute_context(I)<>'VOLUME' THEN
4222: p_pricing_attr_rec.process_status_flag(I) :=NULL; --'E';
4223: FND_MESSAGE.SET_NAME('QP','PBH_CHILD_LINE_INVALID_CONTEXT');
4219: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Pricing Attribute Context');
4220: QP_BULK_MSG.Add(l_msg_rec);
4221: ELSIF p_pricing_attr_rec.pricing_attribute_context(I)<>'VOLUME' THEN
4222: p_pricing_attr_rec.process_status_flag(I) :=NULL; --'E';
4223: FND_MESSAGE.SET_NAME('QP','PBH_CHILD_LINE_INVALID_CONTEXT');
4224: QP_BULK_MSG.Add(l_msg_rec);
4225: END IF;
4226:
4227: EXCEPTION
4362: end loop;
4363: --check for dates overlapping for lines with primary uom flag checked --smbalara 9458481/10152629 END
4364: IF l_count > 0 THEN
4365: p_pricing_attr_rec.process_status_flag(I):=NULL;
4366: FND_MESSAGE.SET_NAME('QP','QP_UNIQUE_PRIMARY_UOM');
4367: QP_BULK_MSG.Add(l_msg_rec);
4368:
4369: -- set the corresponding line as errored
4370: UPDATE qp_interface_list_lines
4372: WHERE request_id = p_pricing_attr_rec.request_id(I)
4373: AND orig_sys_line_ref = p_pricing_attr_rec.orig_sys_line_ref(I)
4374: AND orig_sys_header_ref = p_pricing_attr_rec.orig_sys_header_ref(I);
4375:
4376: FND_MESSAGE.SET_NAME('QP','QP_UNIQUE_PRIMARY_UOM');
4377: l_msg_txt:= FND_MESSAGE.GET;
4378:
4379: INSERT INTO QP_INTERFACE_ERRORS
4380: (error_id,last_update_date, last_updated_by, creation_date,
4373: AND orig_sys_line_ref = p_pricing_attr_rec.orig_sys_line_ref(I)
4374: AND orig_sys_header_ref = p_pricing_attr_rec.orig_sys_header_ref(I);
4375:
4376: FND_MESSAGE.SET_NAME('QP','QP_UNIQUE_PRIMARY_UOM');
4377: l_msg_txt:= FND_MESSAGE.GET;
4378:
4379: INSERT INTO QP_INTERFACE_ERRORS
4380: (error_id,last_update_date, last_updated_by, creation_date,
4381: created_by, last_update_login, request_id, program_application_id,
4397: p_pricing_attr_rec.orig_sys_pricing_attr_ref(I)
4398: THEN
4399: p_pricing_attr_rec.process_status_flag(J):=NULL; --'E';
4400: l_msg_rec.orig_sys_pricing_attr_ref := p_pricing_attr_rec.orig_sys_pricing_attr_ref(J);
4401: FND_MESSAGE.SET_NAME('QP', 'QP_PARENT_FAILED');
4402: QP_BULK_MSG.ADD(l_msg_rec);
4403: END IF;
4404: END LOOP;
4405:
4428: END;
4429:
4430: IF l_count > 0 THEN
4431: p_pricing_attr_rec.process_status_flag(I):=NULL;
4432: FND_MESSAGE.SET_NAME('QP','QP_UNIQUE_PRIMARY_UOM');
4433: QP_BULK_MSG.Add(l_msg_rec);
4434:
4435: -- set the corresponding line as errored
4436: UPDATE qp_interface_list_lines
4438: WHERE request_id = p_pricing_attr_rec.request_id(I)
4439: AND orig_sys_line_ref = p_pricing_attr_rec.orig_sys_line_ref(I)
4440: AND orig_sys_header_ref = p_pricing_attr_rec.orig_sys_header_ref(I);
4441:
4442: FND_MESSAGE.SET_NAME('QP','QP_UNIQUE_PRIMARY_UOM');
4443: l_msg_txt:= FND_MESSAGE.GET;
4444:
4445: INSERT INTO QP_INTERFACE_ERRORS
4446: (error_id,last_update_date, last_updated_by, creation_date,
4439: AND orig_sys_line_ref = p_pricing_attr_rec.orig_sys_line_ref(I)
4440: AND orig_sys_header_ref = p_pricing_attr_rec.orig_sys_header_ref(I);
4441:
4442: FND_MESSAGE.SET_NAME('QP','QP_UNIQUE_PRIMARY_UOM');
4443: l_msg_txt:= FND_MESSAGE.GET;
4444:
4445: INSERT INTO QP_INTERFACE_ERRORS
4446: (error_id,last_update_date, last_updated_by, creation_date,
4447: created_by, last_update_login, request_id, program_application_id,
4463: p_pricing_attr_rec.orig_sys_pricing_attr_ref(I)
4464: THEN
4465: p_pricing_attr_rec.process_status_flag(J):=NULL; --'E';
4466: l_msg_rec.orig_sys_pricing_attr_ref := p_pricing_attr_rec.orig_sys_pricing_attr_ref(J);
4467: FND_MESSAGE.SET_NAME('QP', 'QP_PARENT_FAILED');
4468: QP_BULK_MSG.ADD(l_msg_rec);
4469: END IF;
4470: END LOOP;
4471: END IF; -- If duplicate
4552: --qp_bulk_loader_pub.write_log('multi_attr:'||l_count);
4553:
4554: IF l_count>1 THEN
4555: P_PRICING_ATTR_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
4556: FND_MESSAGE.SET_NAME('QP', 'QP_MULT_PRICE_BREAK_ATTRS');
4557: QP_BULK_MSG.ADD(l_msg_rec);
4558:
4559: UPDATE qp_interface_list_lines
4560: SET process_status_flag = NULL --'E'
4560: SET process_status_flag = NULL --'E'
4561: WHERE orig_sys_line_ref = p_pricing_attr_rec.orig_sys_line_ref(I)
4562: AND orig_sys_header_ref = p_pricing_attr_rec.orig_sys_header_ref(I);
4563:
4564: l_msg_txt:= FND_MESSAGE.GET;
4565:
4566: INSERT INTO QP_INTERFACE_ERRORS
4567: (error_id,last_update_date, last_updated_by, creation_date,
4568: created_by, last_update_login, request_id, program_application_id,
4611: l_pa_to_val_tmp:=to_number(p_pricing_attr_rec.pricing_attr_value_to(I));
4612: EXCEPTION
4613: WHEN OTHERS THEN
4614: P_PRICING_ATTR_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
4615: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_DATA_TYPE');
4616: QP_BULK_MSG.ADD(l_msg_rec);
4617: p_pricing_attr_rec.pricing_attr_value_to(I):=0;
4618: END;
4619:
4621: l_pa_from_val_tmp:=to_number(p_pricing_attr_rec.pricing_attr_value_from(I));
4622: EXCEPTION
4623: WHEN OTHERS THEN
4624: P_PRICING_ATTR_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
4625: FND_MESSAGE.SET_NAME('QP', 'QP_INVALID_DATA_TYPE');
4626: QP_BULK_MSG.ADD(l_msg_rec);
4627: p_pricing_attr_rec.pricing_attr_value_from(I):=0;
4628: END;
4629: -- Bug# 5440851 RAVI END
4686: qp_bulk_loader_pub.write_log('FROM value has a corresponding TO value or is zero.');
4687: ELSE
4688: qp_bulk_loader_pub.write_log('ERROR: No Same To_From Value for Price Break');
4689: P_PRICING_ATTR_REC.PROCESS_STATUS_FLAG(I):= NULL ; --'E';
4690: FND_MESSAGE.SET_NAME('QP', 'QP_PBK_CRSPNDNG_TO_FROM');
4691: QP_BULK_MSG.ADD(l_msg_rec);
4692:
4693: UPDATE qp_interface_list_lines
4694: SET process_status_flag = NULL --'E'
4694: SET process_status_flag = NULL --'E'
4695: WHERE orig_sys_line_ref = p_pricing_attr_rec.orig_sys_line_ref(I)
4696: AND orig_sys_header_ref = p_pricing_attr_rec.orig_sys_header_ref(I);
4697:
4698: FND_MESSAGE.SET_NAME('QP', 'QP_PBK_CRSPNDNG_TO_FROM');
4699: l_msg_txt:= FND_MESSAGE.GET;
4700:
4701: INSERT INTO QP_INTERFACE_ERRORS
4702: (error_id,last_update_date, last_updated_by, creation_date,
4695: WHERE orig_sys_line_ref = p_pricing_attr_rec.orig_sys_line_ref(I)
4696: AND orig_sys_header_ref = p_pricing_attr_rec.orig_sys_header_ref(I);
4697:
4698: FND_MESSAGE.SET_NAME('QP', 'QP_PBK_CRSPNDNG_TO_FROM');
4699: l_msg_txt:= FND_MESSAGE.GET;
4700:
4701: INSERT INTO QP_INTERFACE_ERRORS
4702: (error_id,last_update_date, last_updated_by, creation_date,
4703: created_by, last_update_login, request_id, program_application_id,
4713: END IF;
4714: ELSE
4715: qp_bulk_loader_pub.write_log('ERROR: No Same From_To Value for Price Break');
4716: P_PRICING_ATTR_REC.PROCESS_STATUS_FLAG(I):= NULL ; --'E';
4717: FND_MESSAGE.SET_NAME('QP', 'QP_PBK_CRSPNDNG_FROM_TO');
4718: QP_BULK_MSG.ADD(l_msg_rec);
4719:
4720: UPDATE qp_interface_list_lines
4721: SET process_status_flag = NULL --'E'
4721: SET process_status_flag = NULL --'E'
4722: WHERE orig_sys_line_ref = p_pricing_attr_rec.orig_sys_line_ref(I)
4723: AND orig_sys_header_ref = p_pricing_attr_rec.orig_sys_header_ref(I);
4724:
4725: FND_MESSAGE.SET_NAME('QP', 'QP_PBK_CRSPNDNG_FROM_TO');
4726: l_msg_txt:= FND_MESSAGE.GET;
4727:
4728: INSERT INTO QP_INTERFACE_ERRORS
4729: (error_id,last_update_date, last_updated_by, creation_date,
4722: WHERE orig_sys_line_ref = p_pricing_attr_rec.orig_sys_line_ref(I)
4723: AND orig_sys_header_ref = p_pricing_attr_rec.orig_sys_header_ref(I);
4724:
4725: FND_MESSAGE.SET_NAME('QP', 'QP_PBK_CRSPNDNG_FROM_TO');
4726: l_msg_txt:= FND_MESSAGE.GET;
4727:
4728: INSERT INTO QP_INTERFACE_ERRORS
4729: (error_id,last_update_date, last_updated_by, creation_date,
4730: created_by, last_update_login, request_id, program_application_id,
4749: NULL;
4750: ELSE
4751: qp_bulk_loader_pub.write_log('ERROR: No 0 From Value');
4752: P_PRICING_ATTR_REC.PROCESS_STATUS_FLAG(I):= NULL ; --'E';
4753: FND_MESSAGE.SET_NAME('QP', 'QP_PBK_ZERO_FROM');
4754: QP_BULK_MSG.ADD(l_msg_rec);
4755:
4756: UPDATE qp_interface_list_lines
4757: SET process_status_flag = NULL --'E'
4757: SET process_status_flag = NULL --'E'
4758: WHERE orig_sys_line_ref = p_pricing_attr_rec.orig_sys_line_ref(I)
4759: AND orig_sys_header_ref = p_pricing_attr_rec.orig_sys_header_ref(I);
4760:
4761: FND_MESSAGE.SET_NAME('QP', 'QP_PBK_ZERO_FROM');
4762: l_msg_txt:= FND_MESSAGE.GET;
4763:
4764: INSERT INTO QP_INTERFACE_ERRORS
4765: (error_id,last_update_date, last_updated_by, creation_date,
4758: WHERE orig_sys_line_ref = p_pricing_attr_rec.orig_sys_line_ref(I)
4759: AND orig_sys_header_ref = p_pricing_attr_rec.orig_sys_header_ref(I);
4760:
4761: FND_MESSAGE.SET_NAME('QP', 'QP_PBK_ZERO_FROM');
4762: l_msg_txt:= FND_MESSAGE.GET;
4763:
4764: INSERT INTO QP_INTERFACE_ERRORS
4765: (error_id,last_update_date, last_updated_by, creation_date,
4766: created_by, last_update_login, request_id, program_application_id,
4790:
4791: IF l_status = 'OVERLAP' OR l_status1 = 'OVERLAP' THEN
4792: qp_bulk_loader_pub.write_log('Overlapping Price Breaks');
4793: P_PRICING_ATTR_REC.PROCESS_STATUS_FLAG(I):= NULL ; --'E';
4794: FND_MESSAGE.SET_NAME('QP', 'QP_OVERLAP_PRICE_BREAK_RANGE');
4795: QP_BULK_MSG.ADD(l_msg_rec);
4796:
4797: UPDATE qp_interface_list_lines
4798: SET process_status_flag = NULL --'E'
4798: SET process_status_flag = NULL --'E'
4799: WHERE orig_sys_line_ref = p_pricing_attr_rec.orig_sys_line_ref(I)
4800: AND orig_sys_header_ref = p_pricing_attr_rec.orig_sys_header_ref(I);
4801:
4802: FND_MESSAGE.SET_NAME('QP', 'QP_OVERLAP_PRICE_BREAK_RANGE');
4803: l_msg_txt:= FND_MESSAGE.GET;
4804:
4805: INSERT INTO QP_INTERFACE_ERRORS
4806: (error_id,last_update_date, last_updated_by, creation_date,
4799: WHERE orig_sys_line_ref = p_pricing_attr_rec.orig_sys_line_ref(I)
4800: AND orig_sys_header_ref = p_pricing_attr_rec.orig_sys_header_ref(I);
4801:
4802: FND_MESSAGE.SET_NAME('QP', 'QP_OVERLAP_PRICE_BREAK_RANGE');
4803: l_msg_txt:= FND_MESSAGE.GET;
4804:
4805: INSERT INTO QP_INTERFACE_ERRORS
4806: (error_id,last_update_date, last_updated_by, creation_date,
4807: created_by, last_update_login, request_id, program_application_id,
4850:
4851: QP_BULK_MSG.ADD(l_msg_rec);
4852:
4853: -- Log Error Message
4854: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
4855: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
4856: 'Entity:Flexfield:Pricing_Attr_Desc_Flex');
4857: p_pricing_attr_rec.process_status_flag(I):=NULL;
4858:
4851: QP_BULK_MSG.ADD(l_msg_rec);
4852:
4853: -- Log Error Message
4854: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
4855: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
4856: 'Entity:Flexfield:Pricing_Attr_Desc_Flex');
4857: p_pricing_attr_rec.process_status_flag(I):=NULL;
4858:
4859: QP_BULK_MSG.ADD(l_msg_rec);
4958: OR l_old_pricing_attr_rec.product_attr_value <>
4959: p_pricing_attr_rec.product_attr_value(I) THEN
4960:
4961: P_PRICING_ATTR_REC.PROCESS_STATUS_FLAG(I):= NULL; --'E';
4962: FND_MESSAGE.SET_NAME('QP', 'NO_PRODUCT_ATTR_UPD');
4963: QP_BULK_MSG.ADD(l_msg_rec);
4964: END IF;
4965: END IF;
4966:
4987: IF l_sourcing_method = 'ATTRIBUTE MAPPING' THEN
4988:
4989: IF l_sourcing_enabled <> 'Y' THEN
4990:
4991: FND_MESSAGE.SET_NAME('QP','QP_ENABLE_SOURCING');
4992: FND_MESSAGE.SET_TOKEN('CONTEXT',
4993: p_Pricing_Attr_rec.product_attribute_context(I));
4994: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
4995: p_Pricing_Attr_rec.product_attribute(I));
4988:
4989: IF l_sourcing_enabled <> 'Y' THEN
4990:
4991: FND_MESSAGE.SET_NAME('QP','QP_ENABLE_SOURCING');
4992: FND_MESSAGE.SET_TOKEN('CONTEXT',
4993: p_Pricing_Attr_rec.product_attribute_context(I));
4994: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
4995: p_Pricing_Attr_rec.product_attribute(I));
4996: QP_BULK_MSG.ADD(l_msg_rec);
4990:
4991: FND_MESSAGE.SET_NAME('QP','QP_ENABLE_SOURCING');
4992: FND_MESSAGE.SET_TOKEN('CONTEXT',
4993: p_Pricing_Attr_rec.product_attribute_context(I));
4994: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
4995: p_Pricing_Attr_rec.product_attribute(I));
4996: QP_BULK_MSG.ADD(l_msg_rec);
4997: END IF;
4998:
4997: END IF;
4998:
4999: IF l_sourcing_status <> 'Y' THEN
5000:
5001: FND_MESSAGE.SET_NAME('QP','QP_BUILD_SOURCING_RULES');
5002: FND_MESSAGE.SET_TOKEN('CONTEXT',
5003: p_Pricing_Attr_rec.product_attribute_context(I));
5004: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
5005: p_Pricing_Attr_rec.product_attribute(I));
4998:
4999: IF l_sourcing_status <> 'Y' THEN
5000:
5001: FND_MESSAGE.SET_NAME('QP','QP_BUILD_SOURCING_RULES');
5002: FND_MESSAGE.SET_TOKEN('CONTEXT',
5003: p_Pricing_Attr_rec.product_attribute_context(I));
5004: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
5005: p_Pricing_Attr_rec.product_attribute(I));
5006: QP_BULK_MSG.ADD(l_msg_rec, 'W'); --bug no: 9652756- set type of this message to Warning
5000:
5001: FND_MESSAGE.SET_NAME('QP','QP_BUILD_SOURCING_RULES');
5002: FND_MESSAGE.SET_TOKEN('CONTEXT',
5003: p_Pricing_Attr_rec.product_attribute_context(I));
5004: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
5005: p_Pricing_Attr_rec.product_attribute(I));
5006: QP_BULK_MSG.ADD(l_msg_rec, 'W'); --bug no: 9652756- set type of this message to Warning
5007:
5008: END IF;
5032: IF l_sourcing_method = 'ATTRIBUTE MAPPING' THEN
5033:
5034: IF l_sourcing_enabled <> 'Y' THEN
5035:
5036: FND_MESSAGE.SET_NAME('QP','QP_ENABLE_SOURCING');
5037: FND_MESSAGE.SET_TOKEN('CONTEXT',
5038: p_Pricing_Attr_rec.pricing_attribute_context(I));
5039: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
5040: p_Pricing_Attr_rec.pricing_attribute(I));
5033:
5034: IF l_sourcing_enabled <> 'Y' THEN
5035:
5036: FND_MESSAGE.SET_NAME('QP','QP_ENABLE_SOURCING');
5037: FND_MESSAGE.SET_TOKEN('CONTEXT',
5038: p_Pricing_Attr_rec.pricing_attribute_context(I));
5039: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
5040: p_Pricing_Attr_rec.pricing_attribute(I));
5041: QP_BULK_MSG.ADD(l_msg_rec);
5035:
5036: FND_MESSAGE.SET_NAME('QP','QP_ENABLE_SOURCING');
5037: FND_MESSAGE.SET_TOKEN('CONTEXT',
5038: p_Pricing_Attr_rec.pricing_attribute_context(I));
5039: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
5040: p_Pricing_Attr_rec.pricing_attribute(I));
5041: QP_BULK_MSG.ADD(l_msg_rec);
5042: END IF;
5043:
5042: END IF;
5043:
5044: IF l_sourcing_status <> 'Y' THEN
5045:
5046: FND_MESSAGE.SET_NAME('QP','QP_BUILD_SOURCING_RULES');
5047: FND_MESSAGE.SET_TOKEN('CONTEXT',
5048: p_Pricing_Attr_rec.pricing_attribute_context(I));
5049: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
5050: p_Pricing_Attr_rec.pricing_attribute(I));
5043:
5044: IF l_sourcing_status <> 'Y' THEN
5045:
5046: FND_MESSAGE.SET_NAME('QP','QP_BUILD_SOURCING_RULES');
5047: FND_MESSAGE.SET_TOKEN('CONTEXT',
5048: p_Pricing_Attr_rec.pricing_attribute_context(I));
5049: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
5050: p_Pricing_Attr_rec.pricing_attribute(I));
5051: QP_BULK_MSG.ADD(l_msg_rec, 'W'); --bug no: 9652756- set type of this message - Warning
5045:
5046: FND_MESSAGE.SET_NAME('QP','QP_BUILD_SOURCING_RULES');
5047: FND_MESSAGE.SET_TOKEN('CONTEXT',
5048: p_Pricing_Attr_rec.pricing_attribute_context(I));
5049: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
5050: p_Pricing_Attr_rec.pricing_attribute(I));
5051: QP_BULK_MSG.ADD(l_msg_rec, 'W'); --bug no: 9652756- set type of this message - Warning
5052:
5053: END IF;
5091:
5092: qp_bulk_loader_pub.write_log('Entering Attribute Header validation');
5093: -- 1.Currency Code
5094:
5095: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5096: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','CURRENCY CODE');
5097: l_msg_txt := FND_MESSAGE.GET;
5098:
5099:
5092: qp_bulk_loader_pub.write_log('Entering Attribute Header validation');
5093: -- 1.Currency Code
5094:
5095: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5096: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','CURRENCY CODE');
5097: l_msg_txt := FND_MESSAGE.GET;
5098:
5099:
5100: INSERT INTO QP_INTERFACE_ERRORS
5093: -- 1.Currency Code
5094:
5095: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5096: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','CURRENCY CODE');
5097: l_msg_txt := FND_MESSAGE.GET;
5098:
5099:
5100: INSERT INTO QP_INTERFACE_ERRORS
5101: (error_id,last_update_date, last_updated_by, creation_date,
5121: );
5122:
5123: -- 2.Freight Terms
5124:
5125: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5126: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'FREIGHT TERMS');
5127: l_msg_txt := FND_MESSAGE.GET;
5128:
5129: --Bug# 5412029 START RAVI
5122:
5123: -- 2.Freight Terms
5124:
5125: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5126: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'FREIGHT TERMS');
5127: l_msg_txt := FND_MESSAGE.GET;
5128:
5129: --Bug# 5412029 START RAVI
5130: --Check if the frieght terms are valid
5123: -- 2.Freight Terms
5124:
5125: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5126: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'FREIGHT TERMS');
5127: l_msg_txt := FND_MESSAGE.GET;
5128:
5129: --Bug# 5412029 START RAVI
5130: --Check if the frieght terms are valid
5131: INSERT INTO QP_INTERFACE_ERRORS
5202: --Bug# 5412029 END RAVI
5203:
5204: -- 3. LIST TYPE CODE
5205:
5206: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5207: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','LIST TYPE CODE');
5208: l_msg_txt := FND_MESSAGE.GET;
5209:
5210: INSERT INTO QP_INTERFACE_ERRORS
5203:
5204: -- 3. LIST TYPE CODE
5205:
5206: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5207: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','LIST TYPE CODE');
5208: l_msg_txt := FND_MESSAGE.GET;
5209:
5210: INSERT INTO QP_INTERFACE_ERRORS
5211: (error_id,last_update_date, last_updated_by, creation_date,
5204: -- 3. LIST TYPE CODE
5205:
5206: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5207: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','LIST TYPE CODE');
5208: l_msg_txt := FND_MESSAGE.GET;
5209:
5210: INSERT INTO QP_INTERFACE_ERRORS
5211: (error_id,last_update_date, last_updated_by, creation_date,
5212: created_by, last_update_login, request_id, program_application_id,
5229: AND lookup_code = qpih.list_type_code);
5230:
5231: -- 4.Ship Method(Freight Carrier)
5232:
5233: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5234: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'FREIGHT CARRIER');
5235: l_msg_txt := FND_MESSAGE.GET;
5236:
5237: --Bug# 5412029 START RAVI
5230:
5231: -- 4.Ship Method(Freight Carrier)
5232:
5233: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5234: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'FREIGHT CARRIER');
5235: l_msg_txt := FND_MESSAGE.GET;
5236:
5237: --Bug# 5412029 START RAVI
5238: --Check if the ship method are valid
5231: -- 4.Ship Method(Freight Carrier)
5232:
5233: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5234: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'FREIGHT CARRIER');
5235: l_msg_txt := FND_MESSAGE.GET;
5236:
5237: --Bug# 5412029 START RAVI
5238: --Check if the ship method are valid
5239: INSERT INTO QP_INTERFACE_ERRORS
5312: AND nvl(end_date_active, sysdate) );
5313: --Bug# 5412029 END RAVI
5314:
5315: -- 5. Payment Terms
5316: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5317: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'PAYMENT TERMS');
5318: l_msg_txt := FND_MESSAGE.GET;
5319:
5320: --Bug# 5412029 START RAVI
5313: --Bug# 5412029 END RAVI
5314:
5315: -- 5. Payment Terms
5316: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5317: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'PAYMENT TERMS');
5318: l_msg_txt := FND_MESSAGE.GET;
5319:
5320: --Bug# 5412029 START RAVI
5321: --Check if the payment terms are valid
5314:
5315: -- 5. Payment Terms
5316: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5317: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'PAYMENT TERMS');
5318: l_msg_txt := FND_MESSAGE.GET;
5319:
5320: --Bug# 5412029 START RAVI
5321: --Check if the payment terms are valid
5322: INSERT INTO QP_INTERFACE_ERRORS
5399:
5400: --Bug# 5412029 END RAVI
5401: -- 6. Currency Header
5402:
5403: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5404: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'CURRENCY HEADER');
5405: l_msg_txt := FND_MESSAGE.GET;
5406:
5407: -- Bug 4938046,5412029 START RAVI
5400: --Bug# 5412029 END RAVI
5401: -- 6. Currency Header
5402:
5403: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5404: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'CURRENCY HEADER');
5405: l_msg_txt := FND_MESSAGE.GET;
5406:
5407: -- Bug 4938046,5412029 START RAVI
5408: /**
5401: -- 6. Currency Header
5402:
5403: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5404: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'CURRENCY HEADER');
5405: l_msg_txt := FND_MESSAGE.GET;
5406:
5407: -- Bug 4938046,5412029 START RAVI
5408: /**
5409: Currency Header and Header ID validation
5484: -- Bug 4938046,5412029 END RAVI
5485:
5486: -- 7. Name
5487:
5488: fnd_message.set_name('QP', 'QP_ATTRIBUTE_REQUIRED');
5489: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'NAME');
5490: l_msg_txt := FND_MESSAGE.GET;
5491:
5492: INSERT INTO QP_INTERFACE_ERRORS
5485:
5486: -- 7. Name
5487:
5488: fnd_message.set_name('QP', 'QP_ATTRIBUTE_REQUIRED');
5489: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'NAME');
5490: l_msg_txt := FND_MESSAGE.GET;
5491:
5492: INSERT INTO QP_INTERFACE_ERRORS
5493: (error_id,last_update_date, last_updated_by, creation_date,
5486: -- 7. Name
5487:
5488: fnd_message.set_name('QP', 'QP_ATTRIBUTE_REQUIRED');
5489: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'NAME');
5490: l_msg_txt := FND_MESSAGE.GET;
5491:
5492: INSERT INTO QP_INTERFACE_ERRORS
5493: (error_id,last_update_date, last_updated_by, creation_date,
5494: created_by, last_update_login, request_id, program_application_id,
5508: AND (name is null or name = '');
5509:
5510: -- 8. Name in other pricelists
5511:
5512: fnd_message.set_name('QP', 'SO_OTHER_NAME_ALREADY_IN_USE');
5513: l_msg_txt := FND_MESSAGE.GET;
5514:
5515: qp_bulk_loader_pub.write_log('Name check in TL table '||userenv('LANG')||' '||to_char(p_request_id));
5516:
5509:
5510: -- 8. Name in other pricelists
5511:
5512: fnd_message.set_name('QP', 'SO_OTHER_NAME_ALREADY_IN_USE');
5513: l_msg_txt := FND_MESSAGE.GET;
5514:
5515: qp_bulk_loader_pub.write_log('Name check in TL table '||userenv('LANG')||' '||to_char(p_request_id));
5516:
5517: INSERT INTO QP_INTERFACE_ERRORS
5536: qp_bulk_loader_pub.write_log('Count '||SQL%ROWCOUNT);
5537:
5538: -- 9. Name in other Interface header records
5539:
5540: fnd_message.set_name('QP', 'SO_OTHER_NAME_ALREADY_IN_USE');
5541: l_msg_txt := FND_MESSAGE.GET;
5542:
5543: INSERT INTO QP_INTERFACE_ERRORS
5544: (error_id,last_update_date, last_updated_by, creation_date,
5537:
5538: -- 9. Name in other Interface header records
5539:
5540: fnd_message.set_name('QP', 'SO_OTHER_NAME_ALREADY_IN_USE');
5541: l_msg_txt := FND_MESSAGE.GET;
5542:
5543: INSERT INTO QP_INTERFACE_ERRORS
5544: (error_id,last_update_date, last_updated_by, creation_date,
5545: created_by, last_update_login, request_id, program_application_id,
5564: qp_bulk_loader_pub.write_log('Count 9 '||SQL%ROWCOUNT);
5565:
5566: -- 10. Pricing Transaction Entity
5567:
5568: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5569: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Pricing Transaction Entity');
5570: l_msg_txt := FND_MESSAGE.GET;
5571:
5572: INSERT INTO QP_INTERFACE_ERRORS
5565:
5566: -- 10. Pricing Transaction Entity
5567:
5568: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5569: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Pricing Transaction Entity');
5570: l_msg_txt := FND_MESSAGE.GET;
5571:
5572: INSERT INTO QP_INTERFACE_ERRORS
5573: (error_id,last_update_date, last_updated_by, creation_date,
5566: -- 10. Pricing Transaction Entity
5567:
5568: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5569: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Pricing Transaction Entity');
5570: l_msg_txt := FND_MESSAGE.GET;
5571:
5572: INSERT INTO QP_INTERFACE_ERRORS
5573: (error_id,last_update_date, last_updated_by, creation_date,
5574: created_by, last_update_login, request_id, program_application_id,
5591: AND lookup_code = qpih.pte_code);
5592:
5593: -- 11. Source System Code
5594:
5595: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5596: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Source System Code');
5597: l_msg_txt := FND_MESSAGE.GET;
5598:
5599: INSERT INTO QP_INTERFACE_ERRORS
5592:
5593: -- 11. Source System Code
5594:
5595: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5596: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Source System Code');
5597: l_msg_txt := FND_MESSAGE.GET;
5598:
5599: INSERT INTO QP_INTERFACE_ERRORS
5600: (error_id,last_update_date, last_updated_by, creation_date,
5593: -- 11. Source System Code
5594:
5595: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5596: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Source System Code');
5597: l_msg_txt := FND_MESSAGE.GET;
5598:
5599: INSERT INTO QP_INTERFACE_ERRORS
5600: (error_id,last_update_date, last_updated_by, creation_date,
5601: created_by, last_update_login, request_id, program_application_id,
5639:
5640: --for bug 4731613 moved this validation to attribute_header procedure
5641: -- 12. Validate Orig_Org_Id
5642:
5643: FND_MESSAGE.SET_NAME('FND','FND_MO_ORG_INVALID');
5644: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Source System Code');
5645: l_msg_txt := FND_MESSAGE.GET;
5646:
5647: INSERT INTO QP_INTERFACE_ERRORS
5640: --for bug 4731613 moved this validation to attribute_header procedure
5641: -- 12. Validate Orig_Org_Id
5642:
5643: FND_MESSAGE.SET_NAME('FND','FND_MO_ORG_INVALID');
5644: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Source System Code');
5645: l_msg_txt := FND_MESSAGE.GET;
5646:
5647: INSERT INTO QP_INTERFACE_ERRORS
5648: (error_id,last_update_date, last_updated_by, creation_date,
5641: -- 12. Validate Orig_Org_Id
5642:
5643: FND_MESSAGE.SET_NAME('FND','FND_MO_ORG_INVALID');
5644: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Source System Code');
5645: l_msg_txt := FND_MESSAGE.GET;
5646:
5647: INSERT INTO QP_INTERFACE_ERRORS
5648: (error_id,last_update_date, last_updated_by, creation_date,
5649: created_by, last_update_login, request_id, program_application_id,
5664:
5665: --Bug#5208112 RAVI START
5666: -- 13. Validate Rounding Factor
5667:
5668: FND_MESSAGE.SET_NAME('QP','QP_ROUNDING_FACTOR_NO_UPDATE');
5669: l_msg_txt := FND_MESSAGE.GET;
5670:
5671: INSERT INTO QP_INTERFACE_ERRORS
5672: (error_id,last_update_date, last_updated_by, creation_date,
5665: --Bug#5208112 RAVI START
5666: -- 13. Validate Rounding Factor
5667:
5668: FND_MESSAGE.SET_NAME('QP','QP_ROUNDING_FACTOR_NO_UPDATE');
5669: l_msg_txt := FND_MESSAGE.GET;
5670:
5671: INSERT INTO QP_INTERFACE_ERRORS
5672: (error_id,last_update_date, last_updated_by, creation_date,
5673: created_by, last_update_login, request_id, program_application_id,
5694:
5695: -- 14. Only one record with a unique Orig_Sys_Hdr_ref must be updated in one request
5696: -- Commenting code for bug 6961376
5697:
5698: /*fnd_message.set_name('QP', 'QP_HDR_REF_MULTIPLE_UPDATE');
5699: l_msg_txt := FND_MESSAGE.GET;
5700:
5701: INSERT INTO QP_INTERFACE_ERRORS
5702: (error_id,last_update_date, last_updated_by, creation_date,
5695: -- 14. Only one record with a unique Orig_Sys_Hdr_ref must be updated in one request
5696: -- Commenting code for bug 6961376
5697:
5698: /*fnd_message.set_name('QP', 'QP_HDR_REF_MULTIPLE_UPDATE');
5699: l_msg_txt := FND_MESSAGE.GET;
5700:
5701: INSERT INTO QP_INTERFACE_ERRORS
5702: (error_id,last_update_date, last_updated_by, creation_date,
5703: created_by, last_update_login, request_id, program_application_id,
5745: qp_bulk_loader_pub.write_log('Entering Attribute qualifier validation');
5746: FND_PROFILE.GET('QP_PRICING_TRANSACTION_ENTITY',l_pte_code);
5747: --1. Comparison Operator
5748:
5749: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5750: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','COMPARISON OPERATOR');
5751: l_msg_txt := FND_MESSAGE.GET;
5752:
5753: INSERT INTO QP_INTERFACE_ERRORS
5746: FND_PROFILE.GET('QP_PRICING_TRANSACTION_ENTITY',l_pte_code);
5747: --1. Comparison Operator
5748:
5749: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5750: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','COMPARISON OPERATOR');
5751: l_msg_txt := FND_MESSAGE.GET;
5752:
5753: INSERT INTO QP_INTERFACE_ERRORS
5754: (error_id,last_update_date, last_updated_by, creation_date,
5747: --1. Comparison Operator
5748:
5749: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5750: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','COMPARISON OPERATOR');
5751: l_msg_txt := FND_MESSAGE.GET;
5752:
5753: INSERT INTO QP_INTERFACE_ERRORS
5754: (error_id,last_update_date, last_updated_by, creation_date,
5755: created_by, last_update_login, request_id, program_application_id,
5772: AND lookup_code = qpiq.comparison_operator_code);
5773:
5774: --2. Orig sys header ref
5775:
5776: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5777: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','ORIG SYS HEADER REF');
5778: l_msg_txt := FND_MESSAGE.GET;
5779:
5780: INSERT INTO QP_INTERFACE_ERRORS
5773:
5774: --2. Orig sys header ref
5775:
5776: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5777: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','ORIG SYS HEADER REF');
5778: l_msg_txt := FND_MESSAGE.GET;
5779:
5780: INSERT INTO QP_INTERFACE_ERRORS
5781: (error_id,last_update_date, last_updated_by, creation_date,
5774: --2. Orig sys header ref
5775:
5776: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5777: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','ORIG SYS HEADER REF');
5778: l_msg_txt := FND_MESSAGE.GET;
5779:
5780: INSERT INTO QP_INTERFACE_ERRORS
5781: (error_id,last_update_date, last_updated_by, creation_date,
5782: created_by, last_update_login, request_id, program_application_id,
5804: -- Pricelists are allowed.
5805:
5806: IF QP_BULK_LOADER_PUB.GET_QP_STATUS <> 'I' THEN
5807:
5808: FND_MESSAGE.SET_NAME('QP','QP_QUAL_NA_BASIC');
5809: --Qualifiers not allowed in Basic Pricing
5810: l_msg_txt := FND_MESSAGE.GET;
5811:
5812: INSERT INTO QP_INTERFACE_ERRORS
5806: IF QP_BULK_LOADER_PUB.GET_QP_STATUS <> 'I' THEN
5807:
5808: FND_MESSAGE.SET_NAME('QP','QP_QUAL_NA_BASIC');
5809: --Qualifiers not allowed in Basic Pricing
5810: l_msg_txt := FND_MESSAGE.GET;
5811:
5812: INSERT INTO QP_INTERFACE_ERRORS
5813: (error_id,last_update_date, last_updated_by, creation_date,
5814: created_by, last_update_login, request_id, program_application_id,
5829:
5830: END IF;
5831:
5832: --4. Qualifier Context
5833: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
5834: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'QUALIFIER CONTEXT');
5835:
5836: l_msg_txt := FND_MESSAGE.GET;
5837:
5830: END IF;
5831:
5832: --4. Qualifier Context
5833: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
5834: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'QUALIFIER CONTEXT');
5835:
5836: l_msg_txt := FND_MESSAGE.GET;
5837:
5838: INSERT INTO QP_INTERFACE_ERRORS
5832: --4. Qualifier Context
5833: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
5834: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'QUALIFIER CONTEXT');
5835:
5836: l_msg_txt := FND_MESSAGE.GET;
5837:
5838: INSERT INTO QP_INTERFACE_ERRORS
5839: (error_id,last_update_date, last_updated_by, creation_date,
5840: created_by, last_update_login, request_id, program_application_id,
5853: AND qpiq.qualifier_context IS NULL;
5854:
5855: --5. Qualifier Attribute
5856:
5857: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5858: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE');
5859: l_msg_txt := FND_MESSAGE.GET;
5860:
5861: --Bug# 5456164 START RAVI
5854:
5855: --5. Qualifier Attribute
5856:
5857: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5858: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE');
5859: l_msg_txt := FND_MESSAGE.GET;
5860:
5861: --Bug# 5456164 START RAVI
5862: --Validate qualifier attribute
5855: --5. Qualifier Attribute
5856:
5857: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
5858: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','QUALIFIER ATTRIBUTE');
5859: l_msg_txt := FND_MESSAGE.GET;
5860:
5861: --Bug# 5456164 START RAVI
5862: --Validate qualifier attribute
5863: INSERT INTO QP_INTERFACE_ERRORS
6005: qp_bulk_loader_pub.write_log('Entering Attribute line validation');
6006: FND_PROFILE.GET('QP_PRICING_TRANSACTION_ENTITY',l_pte_code);
6007:
6008: -- 1. LIST LINE TYPE CODE
6009: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
6010: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','LIST_LINE_TYPE_CODE');
6011: l_msg_txt := FND_MESSAGE.GET;
6012:
6013: INSERT INTO QP_INTERFACE_ERRORS
6006: FND_PROFILE.GET('QP_PRICING_TRANSACTION_ENTITY',l_pte_code);
6007:
6008: -- 1. LIST LINE TYPE CODE
6009: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
6010: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','LIST_LINE_TYPE_CODE');
6011: l_msg_txt := FND_MESSAGE.GET;
6012:
6013: INSERT INTO QP_INTERFACE_ERRORS
6014: (error_id,last_update_date, last_updated_by, creation_date,
6007:
6008: -- 1. LIST LINE TYPE CODE
6009: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
6010: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','LIST_LINE_TYPE_CODE');
6011: l_msg_txt := FND_MESSAGE.GET;
6012:
6013: INSERT INTO QP_INTERFACE_ERRORS
6014: (error_id,last_update_date, last_updated_by, creation_date,
6015: created_by, last_update_login, request_id, program_application_id,
6032: AND lookup_code= qpil.list_line_type_code
6033: AND qpil.list_line_type_code IN ('PLL', 'PBH') );
6034:
6035: -- 2. ARITHMETIC OPERATOR
6036: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
6037: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','ARITHMETIC_OPERATOR 5');
6038: l_msg_txt := FND_MESSAGE.GET;
6039:
6040: INSERT INTO QP_INTERFACE_ERRORS
6033: AND qpil.list_line_type_code IN ('PLL', 'PBH') );
6034:
6035: -- 2. ARITHMETIC OPERATOR
6036: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
6037: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','ARITHMETIC_OPERATOR 5');
6038: l_msg_txt := FND_MESSAGE.GET;
6039:
6040: INSERT INTO QP_INTERFACE_ERRORS
6041: (error_id,last_update_date, last_updated_by, creation_date,
6034:
6035: -- 2. ARITHMETIC OPERATOR
6036: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
6037: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','ARITHMETIC_OPERATOR 5');
6038: l_msg_txt := FND_MESSAGE.GET;
6039:
6040: INSERT INTO QP_INTERFACE_ERRORS
6041: (error_id,last_update_date, last_updated_by, creation_date,
6042: created_by, last_update_login, request_id, program_application_id,
6058: WHERE lookup_type= 'ARITHMETIC_OPERATOR'
6059: AND lookup_code= qpil.arithmetic_operator );
6060:
6061: --3. PRICE BREAK TYPE CODE
6062: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
6063: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','PRICE_BREAK_TYPE_CODE');
6064: l_msg_txt := FND_MESSAGE.GET;
6065:
6066: INSERT INTO QP_INTERFACE_ERRORS
6059: AND lookup_code= qpil.arithmetic_operator );
6060:
6061: --3. PRICE BREAK TYPE CODE
6062: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
6063: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','PRICE_BREAK_TYPE_CODE');
6064: l_msg_txt := FND_MESSAGE.GET;
6065:
6066: INSERT INTO QP_INTERFACE_ERRORS
6067: (error_id,last_update_date, last_updated_by, creation_date,
6060:
6061: --3. PRICE BREAK TYPE CODE
6062: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
6063: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','PRICE_BREAK_TYPE_CODE');
6064: l_msg_txt := FND_MESSAGE.GET;
6065:
6066: INSERT INTO QP_INTERFACE_ERRORS
6067: (error_id,last_update_date, last_updated_by, creation_date,
6068: created_by, last_update_login, request_id, program_application_id,
6084: WHERE lookup_type= 'PRICE_BREAK_TYPE_CODE'
6085: AND lookup_code= qpil.price_break_type_code);
6086:
6087: --4. UOM
6088: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
6089: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Product Uom Code');
6090: l_msg_txt := FND_MESSAGE.GET;
6091:
6092: -- Bug# 5412045
6085: AND lookup_code= qpil.price_break_type_code);
6086:
6087: --4. UOM
6088: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
6089: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Product Uom Code');
6090: l_msg_txt := FND_MESSAGE.GET;
6091:
6092: -- Bug# 5412045
6093: -- Validate UOM for a category line
6086:
6087: --4. UOM
6088: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
6089: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Product Uom Code');
6090: l_msg_txt := FND_MESSAGE.GET;
6091:
6092: -- Bug# 5412045
6093: -- Validate UOM for a category line
6094: INSERT INTO QP_INTERFACE_ERRORS
6216: 4.1) UNIQUE FORMULA CHECK
6217: Only one formula should be inserted or updated in a line. Either PriceBy or Generate Formula is to be used.
6218: If one is used the other should be set to null. If both are used then an error should be thrown.
6219: **/
6220: FND_MESSAGE.SET_NAME('QP','QP_STATIC_OR_DYNAMIC_FORMULA');
6221: l_msg_txt := FND_MESSAGE.GET;
6222:
6223: INSERT INTO QP_INTERFACE_ERRORS
6224: (error_id,last_update_date, last_updated_by, creation_date,
6217: Only one formula should be inserted or updated in a line. Either PriceBy or Generate Formula is to be used.
6218: If one is used the other should be set to null. If both are used then an error should be thrown.
6219: **/
6220: FND_MESSAGE.SET_NAME('QP','QP_STATIC_OR_DYNAMIC_FORMULA');
6221: l_msg_txt := FND_MESSAGE.GET;
6222:
6223: INSERT INTO QP_INTERFACE_ERRORS
6224: (error_id,last_update_date, last_updated_by, creation_date,
6225: created_by, last_update_login, request_id, program_application_id,
6245:
6246: -- Bug# 5236656 RAVI
6247: -- Change the message that needs to be thrown.
6248:
6249: FND_MESSAGE.SET_NAME('QP','QP_PRC_FOR_NAME_ID_INCMPTBLE');
6250: l_msg_txt := FND_MESSAGE.GET;
6251:
6252: INSERT INTO QP_INTERFACE_ERRORS
6253: (error_id,last_update_date, last_updated_by, creation_date,
6246: -- Bug# 5236656 RAVI
6247: -- Change the message that needs to be thrown.
6248:
6249: FND_MESSAGE.SET_NAME('QP','QP_PRC_FOR_NAME_ID_INCMPTBLE');
6250: l_msg_txt := FND_MESSAGE.GET;
6251:
6252: INSERT INTO QP_INTERFACE_ERRORS
6253: (error_id,last_update_date, last_updated_by, creation_date,
6254: created_by, last_update_login, request_id, program_application_id,
6319:
6320: -- Bug# 5236656 RAVI START
6321: -- Change the message that needs to be thrown.
6322:
6323: FND_MESSAGE.SET_NAME('QP','QP_GEN_FOR_NAME_ID_INCMPTBLE');
6324: l_msg_txt := FND_MESSAGE.GET;
6325:
6326: INSERT INTO QP_INTERFACE_ERRORS
6327: (error_id,last_update_date, last_updated_by, creation_date,
6320: -- Bug# 5236656 RAVI START
6321: -- Change the message that needs to be thrown.
6322:
6323: FND_MESSAGE.SET_NAME('QP','QP_GEN_FOR_NAME_ID_INCMPTBLE');
6324: l_msg_txt := FND_MESSAGE.GET;
6325:
6326: INSERT INTO QP_INTERFACE_ERRORS
6327: (error_id,last_update_date, last_updated_by, creation_date,
6328: created_by, last_update_login, request_id, program_application_id,
6350: IF SQL%ROWCOUNT >0 THEN
6351: qp_bulk_loader_pub.write_log('Generate formula ID and Name are incompatible');
6352: END IF;
6353:
6354: --FND_MESSAGE.SET_NAME('QP','QP_INVALID_FORMULA_FOR_PL');
6355: --l_msg_txt := FND_MESSAGE.GET;
6356: -- Bug# 5236656 RAVI END
6357:
6358: INSERT INTO QP_INTERFACE_ERRORS
6351: qp_bulk_loader_pub.write_log('Generate formula ID and Name are incompatible');
6352: END IF;
6353:
6354: --FND_MESSAGE.SET_NAME('QP','QP_INVALID_FORMULA_FOR_PL');
6355: --l_msg_txt := FND_MESSAGE.GET;
6356: -- Bug# 5236656 RAVI END
6357:
6358: INSERT INTO QP_INTERFACE_ERRORS
6359: (error_id,last_update_date, last_updated_by, creation_date,
6406: --6. PBH not allowed in Basic pricing
6407: -- Basic_Pricing_Condition
6408:
6409: IF QP_BULK_LOADER_PUB.GET_QP_STATUS <> 'I' THEN
6410: FND_MESSAGE.SET_NAME('QP','QP_PBH_NA_BASIC');
6411: --Price Break Header not allowed in Basic Pricing
6412: l_msg_txt := FND_MESSAGE.GET;
6413:
6414: INSERT INTO QP_INTERFACE_ERRORS
6408:
6409: IF QP_BULK_LOADER_PUB.GET_QP_STATUS <> 'I' THEN
6410: FND_MESSAGE.SET_NAME('QP','QP_PBH_NA_BASIC');
6411: --Price Break Header not allowed in Basic Pricing
6412: l_msg_txt := FND_MESSAGE.GET;
6413:
6414: INSERT INTO QP_INTERFACE_ERRORS
6415: (error_id,last_update_date, last_updated_by, creation_date,
6416: created_by, last_update_login, request_id, program_application_id,
6431:
6432: END IF;
6433:
6434: --7. Product Attribute
6435: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
6436: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Product Attribute ');
6437: l_msg_txt := FND_MESSAGE.GET;
6438:
6439: INSERT INTO QP_INTERFACE_ERRORS
6432: END IF;
6433:
6434: --7. Product Attribute
6435: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
6436: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Product Attribute ');
6437: l_msg_txt := FND_MESSAGE.GET;
6438:
6439: INSERT INTO QP_INTERFACE_ERRORS
6440: (error_id,last_update_date, last_updated_by, creation_date,
6433:
6434: --7. Product Attribute
6435: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
6436: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Product Attribute ');
6437: l_msg_txt := FND_MESSAGE.GET;
6438:
6439: INSERT INTO QP_INTERFACE_ERRORS
6440: (error_id,last_update_date, last_updated_by, creation_date,
6441: created_by, last_update_login, request_id, program_application_id,
6480:
6481: --Bug# 5456164 START RAVI
6482: --Validate product attribute
6483: --8. Product Attribute
6484: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
6485: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Product Attribute ');
6486: l_msg_txt := FND_MESSAGE.GET;
6487:
6488: INSERT INTO QP_INTERFACE_ERRORS
6481: --Bug# 5456164 START RAVI
6482: --Validate product attribute
6483: --8. Product Attribute
6484: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
6485: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Product Attribute ');
6486: l_msg_txt := FND_MESSAGE.GET;
6487:
6488: INSERT INTO QP_INTERFACE_ERRORS
6489: (error_id,last_update_date, last_updated_by, creation_date,
6482: --Validate product attribute
6483: --8. Product Attribute
6484: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
6485: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Product Attribute ');
6486: l_msg_txt := FND_MESSAGE.GET;
6487:
6488: INSERT INTO QP_INTERFACE_ERRORS
6489: (error_id,last_update_date, last_updated_by, creation_date,
6490: created_by, last_update_login, request_id, program_application_id,
6582: AND qpip.rowid = b.rowid);
6583:
6584: --Validate pricing attribute
6585: --9. Pricing Attribute
6586: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
6587: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Pricing Attribute ');
6588: l_msg_txt := FND_MESSAGE.GET;
6589:
6590: INSERT INTO QP_INTERFACE_ERRORS
6583:
6584: --Validate pricing attribute
6585: --9. Pricing Attribute
6586: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
6587: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Pricing Attribute ');
6588: l_msg_txt := FND_MESSAGE.GET;
6589:
6590: INSERT INTO QP_INTERFACE_ERRORS
6591: (error_id,last_update_date, last_updated_by, creation_date,
6584: --Validate pricing attribute
6585: --9. Pricing Attribute
6586: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
6587: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Pricing Attribute ');
6588: l_msg_txt := FND_MESSAGE.GET;
6589:
6590: INSERT INTO QP_INTERFACE_ERRORS
6591: (error_id,last_update_date, last_updated_by, creation_date,
6592: created_by, last_update_login, request_id, program_application_id,