[Home] [Help]
127: x_error_msg := l_error_tbl(1).Error_Msg_Name;
128: END IF;
129:
130: EXCEPTION
131: WHEN FND_API.G_EXC_ERROR THEN
132: x_return_status := FND_API.G_RET_STS_ERROR ;
133: IF (l_error_tbl.EXISTS(1)) THEN
134: x_error_msg := l_error_tbl(1).Error_Msg_Name;
135: END IF;
128: END IF;
129:
130: EXCEPTION
131: WHEN FND_API.G_EXC_ERROR THEN
132: x_return_status := FND_API.G_RET_STS_ERROR ;
133: IF (l_error_tbl.EXISTS(1)) THEN
134: x_error_msg := l_error_tbl(1).Error_Msg_Name;
135: END IF;
136: WHEN OTHERS THEN
133: IF (l_error_tbl.EXISTS(1)) THEN
134: x_error_msg := l_error_tbl(1).Error_Msg_Name;
135: END IF;
136: WHEN OTHERS THEN
137: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
138: IF (l_error_tbl.EXISTS(1)) THEN
139: x_error_msg := l_error_tbl(1).Error_Msg_Name;
140: END IF;
141:
252: x_error_msg := l_error_tbl(1).Error_Msg_Name;
253: END IF;
254:
255: EXCEPTION
256: WHEN FND_API.G_EXC_ERROR THEN
257: x_return_status := FND_API.G_RET_STS_ERROR ;
258: IF (l_error_tbl.EXISTS(1)) THEN
259: x_error_msg := l_error_tbl(1).Error_Msg_Name;
260: END IF;
253: END IF;
254:
255: EXCEPTION
256: WHEN FND_API.G_EXC_ERROR THEN
257: x_return_status := FND_API.G_RET_STS_ERROR ;
258: IF (l_error_tbl.EXISTS(1)) THEN
259: x_error_msg := l_error_tbl(1).Error_Msg_Name;
260: END IF;
261: WHEN OTHERS THEN
258: IF (l_error_tbl.EXISTS(1)) THEN
259: x_error_msg := l_error_tbl(1).Error_Msg_Name;
260: END IF;
261: WHEN OTHERS THEN
262: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
263: IF (l_error_tbl.EXISTS(1)) THEN
264: x_error_msg := l_error_tbl(1).Error_Msg_Name;
265: END IF;
266: END UPDATE_BIS_BUCKET_WRAPPER;
265: END IF;
266: END UPDATE_BIS_BUCKET_WRAPPER;
267:
268: PROCEDURE UPDATE_CUST_BUCKET (
269: p_commit IN VARCHAR2 := FND_API.G_FALSE
270: , p_id IN BIS_BUCKET_CUSTOMIZATIONS.id%TYPE
271: , p_bucket_id IN BIS_BUCKET_CUSTOMIZATIONS.bucket_id%TYPE
272: , p_user_id IN BIS_BUCKET_CUSTOMIZATIONS.user_id%TYPE
273: , p_responsibility_id IN BIS_BUCKET_CUSTOMIZATIONS.responsibility_id%TYPE
317: BEGIN
318:
319: SAVEPOINT SP_UPDATE_BUCKET_CUST;
320:
321: x_return_status := FND_API.G_RET_STS_SUCCESS;
322: FND_MSG_PUB.initialize;
323:
324: UPDATE bis_bucket_customizations SET
325: bucket_id = p_bucket_id,
379: , p_deleted_ranges => p_deleted_ranges
380: , p_new_ranges => p_new_ranges
381: );
382:
383: IF (p_commit = FND_API.G_TRUE) THEN
384: COMMIT;
385: END IF;
386:
387: EXCEPTION
384: COMMIT;
385: END IF;
386:
387: EXCEPTION
388: WHEN FND_API.G_EXC_ERROR THEN
389: IF (x_msg_data IS NULL) THEN
390: FND_MSG_PUB.Count_And_Get
391: ( p_encoded => FND_API.G_FALSE
392: , p_count => x_msg_count
387: EXCEPTION
388: WHEN FND_API.G_EXC_ERROR THEN
389: IF (x_msg_data IS NULL) THEN
390: FND_MSG_PUB.Count_And_Get
391: ( p_encoded => FND_API.G_FALSE
392: , p_count => x_msg_count
393: , p_data => x_msg_data
394: );
395: END IF;
393: , p_data => x_msg_data
394: );
395: END IF;
396: ROLLBACK TO SP_UPDATE_BUCKET_CUST;
397: x_return_status := FND_API.G_RET_STS_ERROR;
398: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
399: IF (x_msg_data IS NULL) THEN
400: FND_MSG_PUB.Count_And_Get
401: ( p_encoded => FND_API.G_FALSE
394: );
395: END IF;
396: ROLLBACK TO SP_UPDATE_BUCKET_CUST;
397: x_return_status := FND_API.G_RET_STS_ERROR;
398: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
399: IF (x_msg_data IS NULL) THEN
400: FND_MSG_PUB.Count_And_Get
401: ( p_encoded => FND_API.G_FALSE
402: , p_count => x_msg_count
397: x_return_status := FND_API.G_RET_STS_ERROR;
398: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
399: IF (x_msg_data IS NULL) THEN
400: FND_MSG_PUB.Count_And_Get
401: ( p_encoded => FND_API.G_FALSE
402: , p_count => x_msg_count
403: , p_data => x_msg_data
404: );
405: END IF;
403: , p_data => x_msg_data
404: );
405: END IF;
406: ROLLBACK TO SP_UPDATE_BUCKET_CUST;
407: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
408: WHEN NO_DATA_FOUND THEN
409: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
410: IF (x_msg_data IS NOT NULL) THEN
411: x_msg_data := x_msg_data||' -> BIS_BUCKET_PVT.UPDATE_CUST_BUCKET ';
405: END IF;
406: ROLLBACK TO SP_UPDATE_BUCKET_CUST;
407: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
408: WHEN NO_DATA_FOUND THEN
409: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
410: IF (x_msg_data IS NOT NULL) THEN
411: x_msg_data := x_msg_data||' -> BIS_BUCKET_PVT.UPDATE_CUST_BUCKET ';
412: ELSE
413: x_msg_data := SQLERRM||' at BIS_BUCKET_PVT.UPDATE_CUST_BUCKET ';
413: x_msg_data := SQLERRM||' at BIS_BUCKET_PVT.UPDATE_CUST_BUCKET ';
414: END IF;
415: ROLLBACK TO SP_UPDATE_BUCKET_CUST;
416: WHEN OTHERS THEN
417: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
418: IF (x_msg_data IS NOT NULL) THEN
419: x_msg_data := x_msg_data||' -> BIS_BUCKET_PVT.UPDATE_CUST_BUCKET ';
420: ELSE
421: x_msg_data := SQLERRM||' at BIS_BUCKET_PVT.UPDATE_CUST_BUCKET ';
832: x_error_msg := l_error_tbl(1).Error_Msg_Name;
833: END IF;
834:
835: EXCEPTION
836: WHEN FND_API.G_EXC_ERROR THEN
837: x_return_status := FND_API.G_RET_STS_ERROR ;
838: IF (l_error_tbl.EXISTS(1)) THEN
839: x_error_msg := l_error_tbl(1).Error_Msg_Name;
840: END IF;
833: END IF;
834:
835: EXCEPTION
836: WHEN FND_API.G_EXC_ERROR THEN
837: x_return_status := FND_API.G_RET_STS_ERROR ;
838: IF (l_error_tbl.EXISTS(1)) THEN
839: x_error_msg := l_error_tbl(1).Error_Msg_Name;
840: END IF;
841: WHEN OTHERS THEN
838: IF (l_error_tbl.EXISTS(1)) THEN
839: x_error_msg := l_error_tbl(1).Error_Msg_Name;
840: END IF;
841: WHEN OTHERS THEN
842: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
843: IF (l_error_tbl.EXISTS(1)) THEN
844: x_error_msg := l_error_tbl(1).Error_Msg_Name;
845: END IF;
846:
871: x_error_msg := l_error_tbl(1).Error_Msg_Name;
872: END IF;
873:
874: EXCEPTION
875: WHEN FND_API.G_EXC_ERROR THEN
876: x_return_status := FND_API.G_RET_STS_ERROR ;
877: IF (l_error_tbl.EXISTS(1)) THEN
878: x_error_msg := l_error_tbl(1).Error_Msg_Name;
879: END IF;
872: END IF;
873:
874: EXCEPTION
875: WHEN FND_API.G_EXC_ERROR THEN
876: x_return_status := FND_API.G_RET_STS_ERROR ;
877: IF (l_error_tbl.EXISTS(1)) THEN
878: x_error_msg := l_error_tbl(1).Error_Msg_Name;
879: END IF;
880: WHEN OTHERS THEN
877: IF (l_error_tbl.EXISTS(1)) THEN
878: x_error_msg := l_error_tbl(1).Error_Msg_Name;
879: END IF;
880: WHEN OTHERS THEN
881: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
882: IF (l_error_tbl.EXISTS(1)) THEN
883: x_error_msg := l_error_tbl(1).Error_Msg_Name;
884: END IF;
885:
934: ,p_error_type => BIS_UTILITIES_PUB.G_ERROR
935: ,p_error_table => l_error_tbl
936: ,x_error_table => x_error_tbl
937: );
938: RAISE FND_API.G_EXC_ERROR;
939: END IF;
940:
941: SELECT bis_bucket_s.nextval INTO l_bucket_id FROM dual;
942:
1178: where T.ID = l_id
1179: and T.LANGUAGE = L.LANGUAGE_CODE);
1180:
1181: COMMIT;
1182: x_return_status := FND_API.G_RET_STS_SUCCESS;
1183:
1184: EXCEPTION
1185: WHEN FND_API.G_EXC_ERROR THEN
1186: x_return_status := FND_API.G_RET_STS_ERROR ;
1181: COMMIT;
1182: x_return_status := FND_API.G_RET_STS_SUCCESS;
1183:
1184: EXCEPTION
1185: WHEN FND_API.G_EXC_ERROR THEN
1186: x_return_status := FND_API.G_RET_STS_ERROR ;
1187: ROLLBACK TO SAVEPOINT SP_CREATE_BUCKET; -- can flow here when CREATE_BIS_BUCKET_TYPE() throws error
1188: RAISE FND_API.G_EXC_ERROR;
1189:
1182: x_return_status := FND_API.G_RET_STS_SUCCESS;
1183:
1184: EXCEPTION
1185: WHEN FND_API.G_EXC_ERROR THEN
1186: x_return_status := FND_API.G_RET_STS_ERROR ;
1187: ROLLBACK TO SAVEPOINT SP_CREATE_BUCKET; -- can flow here when CREATE_BIS_BUCKET_TYPE() throws error
1188: RAISE FND_API.G_EXC_ERROR;
1189:
1190: WHEN others THEN
1184: EXCEPTION
1185: WHEN FND_API.G_EXC_ERROR THEN
1186: x_return_status := FND_API.G_RET_STS_ERROR ;
1187: ROLLBACK TO SAVEPOINT SP_CREATE_BUCKET; -- can flow here when CREATE_BIS_BUCKET_TYPE() throws error
1188: RAISE FND_API.G_EXC_ERROR;
1189:
1190: WHEN others THEN
1191: ROLLBACK TO SAVEPOINT SP_CREATE_BUCKET;
1192: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1188: RAISE FND_API.G_EXC_ERROR;
1189:
1190: WHEN others THEN
1191: ROLLBACK TO SAVEPOINT SP_CREATE_BUCKET;
1192: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1193:
1194: l_error_tbl := x_error_tbl;
1195: BIS_UTILITIES_PVT.Add_Error_Message (
1196: p_error_msg_id => SQLCODE
1198: ,p_error_proc_name => G_PKG_NAME||'.CREATE_BIS_BUCKET'
1199: ,p_error_table => l_error_tbl
1200: ,x_error_table => x_error_tbl
1201: );
1202: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1203:
1204: END CREATE_BIS_BUCKET;
1205:
1206:
1239: l_short_name := p_bis_bucket_rec.short_name;
1240:
1241: l_ret_name := BIS_UTILITIES_PUB.Value_Missing(p_bis_bucket_rec.short_name);
1242: l_ret_id := BIS_UTILITIES_PUB.Value_Missing(p_bis_bucket_rec.bucket_id);
1243: IF (l_ret_name = FND_API.G_FALSE) THEN
1244: SELECT bucket_id, short_name INTO l_bucket_id, l_short_name
1245: FROM BIS_BUCKET
1246: WHERE SHORT_NAME = p_bis_bucket_rec.short_name;
1247: ELSIF (l_ret_id = FND_API.G_FALSE) THEN
1243: IF (l_ret_name = FND_API.G_FALSE) THEN
1244: SELECT bucket_id, short_name INTO l_bucket_id, l_short_name
1245: FROM BIS_BUCKET
1246: WHERE SHORT_NAME = p_bis_bucket_rec.short_name;
1247: ELSIF (l_ret_id = FND_API.G_FALSE) THEN
1248: SELECT bucket_id, short_name INTO l_bucket_id, l_short_name
1249: FROM BIS_BUCKET
1250: WHERE BUCKET_ID = p_bis_bucket_rec.bucket_id;
1251: ELSE
1257: ,p_error_type => BIS_UTILITIES_PUB.G_ERROR
1258: ,p_error_table => l_error_tbl
1259: ,x_error_table => x_error_tbl
1260: );
1261: RAISE FND_API.G_EXC_ERROR;
1262: END IF;
1263:
1264: BIS_BUCKET_PVT.Validate_Bucket (
1265: p_bis_bucket_rec => p_bis_bucket_rec
1413:
1414: END IF;
1415:
1416: COMMIT;
1417: x_return_status := FND_API.G_RET_STS_SUCCESS;
1418:
1419: EXCEPTION
1420: WHEN NO_DATA_FOUND THEN
1421: ROLLBACK TO SAVEPOINT SP_UPDATE_BUCKET;
1427: ,p_error_type => BIS_UTILITIES_PUB.G_ERROR
1428: ,p_error_table => l_error_tbl
1429: ,x_error_table => x_error_tbl
1430: );
1431: x_return_status := FND_API.G_RET_STS_ERROR ;
1432: RAISE FND_API.G_EXC_ERROR;
1433: WHEN FND_API.G_EXC_ERROR THEN
1434: ROLLBACK TO SAVEPOINT SP_UPDATE_BUCKET;
1435: x_return_status := FND_API.G_RET_STS_ERROR ;
1428: ,p_error_table => l_error_tbl
1429: ,x_error_table => x_error_tbl
1430: );
1431: x_return_status := FND_API.G_RET_STS_ERROR ;
1432: RAISE FND_API.G_EXC_ERROR;
1433: WHEN FND_API.G_EXC_ERROR THEN
1434: ROLLBACK TO SAVEPOINT SP_UPDATE_BUCKET;
1435: x_return_status := FND_API.G_RET_STS_ERROR ;
1436: RAISE FND_API.G_EXC_ERROR;
1429: ,x_error_table => x_error_tbl
1430: );
1431: x_return_status := FND_API.G_RET_STS_ERROR ;
1432: RAISE FND_API.G_EXC_ERROR;
1433: WHEN FND_API.G_EXC_ERROR THEN
1434: ROLLBACK TO SAVEPOINT SP_UPDATE_BUCKET;
1435: x_return_status := FND_API.G_RET_STS_ERROR ;
1436: RAISE FND_API.G_EXC_ERROR;
1437: WHEN others THEN
1431: x_return_status := FND_API.G_RET_STS_ERROR ;
1432: RAISE FND_API.G_EXC_ERROR;
1433: WHEN FND_API.G_EXC_ERROR THEN
1434: ROLLBACK TO SAVEPOINT SP_UPDATE_BUCKET;
1435: x_return_status := FND_API.G_RET_STS_ERROR ;
1436: RAISE FND_API.G_EXC_ERROR;
1437: WHEN others THEN
1438: ROLLBACK TO SAVEPOINT SP_UPDATE_BUCKET;
1439: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1432: RAISE FND_API.G_EXC_ERROR;
1433: WHEN FND_API.G_EXC_ERROR THEN
1434: ROLLBACK TO SAVEPOINT SP_UPDATE_BUCKET;
1435: x_return_status := FND_API.G_RET_STS_ERROR ;
1436: RAISE FND_API.G_EXC_ERROR;
1437: WHEN others THEN
1438: ROLLBACK TO SAVEPOINT SP_UPDATE_BUCKET;
1439: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1440: l_error_tbl := x_error_tbl;
1435: x_return_status := FND_API.G_RET_STS_ERROR ;
1436: RAISE FND_API.G_EXC_ERROR;
1437: WHEN others THEN
1438: ROLLBACK TO SAVEPOINT SP_UPDATE_BUCKET;
1439: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1440: l_error_tbl := x_error_tbl;
1441: BIS_UTILITIES_PVT.Add_Error_Message (
1442: p_error_msg_id => SQLCODE
1443: ,p_error_description => SQLERRM
1444: ,p_error_proc_name => G_PKG_NAME||'.UPDATE_BIS_BUCKET'
1445: ,p_error_table => l_error_tbl
1446: ,x_error_table => x_error_tbl
1447: );
1448: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1449:
1450: END UPDATE_BIS_BUCKET;
1451:
1452:
1473:
1474: l_ret_name := BIS_UTILITIES_PUB.Value_Missing(p_short_name);
1475: l_ret_id := BIS_UTILITIES_PUB.Value_Missing(p_bucket_id);
1476:
1477: IF (l_ret_name = FND_API.G_FALSE) THEN
1478: SELECT bucket_id INTO l_bucket_id FROM BIS_BUCKET
1479: WHERE SHORT_NAME = p_short_name;
1480:
1481: DELETE from BIS_BUCKET_CUSTOMIZATIONS_TL
1492:
1493: DELETE from BIS_BUCKET
1494: WHERE short_name = p_short_name;
1495:
1496: ELSIF (l_ret_id = FND_API.G_FALSE) THEN
1497: SELECT count(BUCKET_ID) INTO l_dcount FROM BIS_BUCKET
1498: WHERE BUCKET_ID = p_bucket_id;
1499:
1500: IF (l_dcount = 0) THEN
1506: ,p_error_type => BIS_UTILITIES_PUB.G_ERROR
1507: ,p_error_table => l_error_tbl
1508: ,x_error_table => x_error_tbl
1509: );
1510: RAISE FND_API.G_EXC_ERROR;
1511: ELSE
1512: DELETE from BIS_BUCKET_CUSTOMIZATIONS_TL
1513: WHERE id in (
1514: SELECT id
1534: ,p_error_type => BIS_UTILITIES_PUB.G_ERROR
1535: ,p_error_table => l_error_tbl
1536: ,x_error_table => x_error_tbl
1537: );
1538: RAISE FND_API.G_EXC_ERROR;
1539: END IF;
1540:
1541: COMMIT;
1542: x_return_status := FND_API.G_RET_STS_SUCCESS;
1538: RAISE FND_API.G_EXC_ERROR;
1539: END IF;
1540:
1541: COMMIT;
1542: x_return_status := FND_API.G_RET_STS_SUCCESS;
1543:
1544: EXCEPTION
1545: WHEN NO_DATA_FOUND THEN
1546: x_return_status := FND_API.G_RET_STS_ERROR ;
1542: x_return_status := FND_API.G_RET_STS_SUCCESS;
1543:
1544: EXCEPTION
1545: WHEN NO_DATA_FOUND THEN
1546: x_return_status := FND_API.G_RET_STS_ERROR ;
1547: l_error_tbl := x_error_tbl ;
1548: BIS_UTILITIES_PVT.Add_Error_Message (
1549: p_error_msg_name => 'BIS_INVALID_SHORT_NAME'
1550: ,p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
1552: ,p_error_type => BIS_UTILITIES_PUB.G_ERROR
1553: ,p_error_table => l_error_tbl
1554: ,x_error_table => x_error_tbl
1555: );
1556: RAISE FND_API.G_EXC_ERROR;
1557: WHEN FND_API.G_EXC_ERROR THEN
1558: x_return_status := FND_API.G_RET_STS_ERROR ;
1559: RAISE FND_API.G_EXC_ERROR;
1560:
1553: ,p_error_table => l_error_tbl
1554: ,x_error_table => x_error_tbl
1555: );
1556: RAISE FND_API.G_EXC_ERROR;
1557: WHEN FND_API.G_EXC_ERROR THEN
1558: x_return_status := FND_API.G_RET_STS_ERROR ;
1559: RAISE FND_API.G_EXC_ERROR;
1560:
1561: WHEN others THEN
1554: ,x_error_table => x_error_tbl
1555: );
1556: RAISE FND_API.G_EXC_ERROR;
1557: WHEN FND_API.G_EXC_ERROR THEN
1558: x_return_status := FND_API.G_RET_STS_ERROR ;
1559: RAISE FND_API.G_EXC_ERROR;
1560:
1561: WHEN others THEN
1562: ROLLBACK;
1555: );
1556: RAISE FND_API.G_EXC_ERROR;
1557: WHEN FND_API.G_EXC_ERROR THEN
1558: x_return_status := FND_API.G_RET_STS_ERROR ;
1559: RAISE FND_API.G_EXC_ERROR;
1560:
1561: WHEN others THEN
1562: ROLLBACK;
1563: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1559: RAISE FND_API.G_EXC_ERROR;
1560:
1561: WHEN others THEN
1562: ROLLBACK;
1563: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1564:
1565: l_error_tbl := x_error_tbl;
1566: BIS_UTILITIES_PVT.Add_Error_Message (
1567: p_error_msg_id => SQLCODE
1569: ,p_error_proc_name => G_PKG_NAME||'.DELETE_BIS_BUCKET'
1570: ,p_error_table => l_error_tbl
1571: ,x_error_table => x_error_tbl
1572: );
1573: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1574:
1575: END DELETE_BIS_BUCKET;
1576:
1577:
1645:
1646: SELECT count(SHORT_NAME) INTO l_dcount FROM BIS_BUCKET
1647: WHERE SHORT_NAME = p_short_name;
1648:
1649: IF ((l_ret_name = FND_API.G_TRUE) OR (l_dcount = 0)) THEN
1650: l_error_tbl := x_error_tbl ;
1651: BIS_UTILITIES_PVT.Add_Error_Message (
1652: p_error_msg_name => 'BIS_INVALID_SHORT_NAME'
1653: ,p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
1655: ,p_error_type => BIS_UTILITIES_PUB.G_ERROR
1656: ,p_error_table => l_error_tbl
1657: ,x_error_table => x_error_tbl
1658: );
1659: RAISE FND_API.G_EXC_ERROR;
1660: END IF;
1661:
1662: -- Fix for bug #3339143
1663:
1708:
1709: IF (c_bucket_cust%ISOPEN) THEN
1710: CLOSE c_bucket_cust;
1711: END IF;
1712: x_return_status := FND_API.G_RET_STS_SUCCESS;
1713:
1714: EXCEPTION
1715: WHEN FND_API.G_EXC_ERROR THEN
1716: IF (c_bucket_cust%ISOPEN) THEN
1711: END IF;
1712: x_return_status := FND_API.G_RET_STS_SUCCESS;
1713:
1714: EXCEPTION
1715: WHEN FND_API.G_EXC_ERROR THEN
1716: IF (c_bucket_cust%ISOPEN) THEN
1717: CLOSE c_bucket_cust;
1718: END IF;
1719: x_return_status := FND_API.G_RET_STS_ERROR ;
1715: WHEN FND_API.G_EXC_ERROR THEN
1716: IF (c_bucket_cust%ISOPEN) THEN
1717: CLOSE c_bucket_cust;
1718: END IF;
1719: x_return_status := FND_API.G_RET_STS_ERROR ;
1720: RAISE FND_API.G_EXC_ERROR;
1721: WHEN others THEN
1722: IF (c_bucket_cust%ISOPEN) THEN
1723: CLOSE c_bucket_cust;
1716: IF (c_bucket_cust%ISOPEN) THEN
1717: CLOSE c_bucket_cust;
1718: END IF;
1719: x_return_status := FND_API.G_RET_STS_ERROR ;
1720: RAISE FND_API.G_EXC_ERROR;
1721: WHEN others THEN
1722: IF (c_bucket_cust%ISOPEN) THEN
1723: CLOSE c_bucket_cust;
1724: END IF;
1721: WHEN others THEN
1722: IF (c_bucket_cust%ISOPEN) THEN
1723: CLOSE c_bucket_cust;
1724: END IF;
1725: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1726:
1727: l_error_tbl := x_error_tbl;
1728: BIS_UTILITIES_PVT.Add_Error_Message (
1729: p_error_msg_id => SQLCODE
1760: ,x_return_status => l_return_status
1761: ,x_error_tbl => l_error_tbl
1762: );
1763:
1764: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1765: x_error_tbl := l_error_tbl;
1766: RAISE FND_API.G_EXC_ERROR;
1767: END IF;
1768:
1762: );
1763:
1764: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1765: x_error_tbl := l_error_tbl;
1766: RAISE FND_API.G_EXC_ERROR;
1767: END IF;
1768:
1769: l_bis_bucket_rec.bucket_id := l_bis_bucket_rec_orig.bucket_id;
1770:
1819: WHERE bucket_id = l_bis_bucket_rec.bucket_id)
1820: AND userenv('LANG') IN (LANGUAGE, SOURCE_LANG);
1821:
1822: COMMIT;
1823: x_return_status := FND_API.G_RET_STS_SUCCESS;
1824:
1825: EXCEPTION
1826: WHEN FND_API.G_EXC_ERROR THEN
1827: x_return_status := FND_API.G_RET_STS_ERROR ;
1822: COMMIT;
1823: x_return_status := FND_API.G_RET_STS_SUCCESS;
1824:
1825: EXCEPTION
1826: WHEN FND_API.G_EXC_ERROR THEN
1827: x_return_status := FND_API.G_RET_STS_ERROR ;
1828:
1829: WHEN OTHERS THEN
1830: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1823: x_return_status := FND_API.G_RET_STS_SUCCESS;
1824:
1825: EXCEPTION
1826: WHEN FND_API.G_EXC_ERROR THEN
1827: x_return_status := FND_API.G_RET_STS_ERROR ;
1828:
1829: WHEN OTHERS THEN
1830: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1831:
1826: WHEN FND_API.G_EXC_ERROR THEN
1827: x_return_status := FND_API.G_RET_STS_ERROR ;
1828:
1829: WHEN OTHERS THEN
1830: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1831:
1832: l_error_tbl := x_error_tbl;
1833: BIS_UTILITIES_PVT.Add_Error_Message(
1834: p_error_msg_id => SQLCODE
1851: l_hash_value binary_integer;
1852:
1853: BEGIN
1854:
1855: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range1_name)= FND_API.G_TRUE) THEN
1856: l_hash_value :=Dbms_Utility.Get_Hash_Value (
1857: name => p_bis_bucket_rec.range1_name
1858: ,base => 2
1859: ,hash_size => 1048576
1861:
1862: l_range_name(l_hash_value) := p_bis_bucket_rec.range1_name;
1863: END IF;
1864:
1865: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range2_name)= FND_API.G_TRUE) THEN
1866: l_hash_value:=Dbms_Utility.Get_Hash_Value (
1867: name => p_bis_bucket_rec.range2_name
1868: ,base => 2
1869: ,hash_size => 1048576
1869: ,hash_size => 1048576
1870: );
1871:
1872: IF (l_range_name.exists(l_hash_value)) THEN
1873: RAISE FND_API.G_EXC_ERROR;
1874: ELSE
1875: l_range_name(l_hash_value) := p_bis_bucket_rec.range2_name;
1876: END IF;
1877: END IF;
1875: l_range_name(l_hash_value) := p_bis_bucket_rec.range2_name;
1876: END IF;
1877: END IF;
1878:
1879: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range3_name)= FND_API.G_TRUE) THEN
1880: l_hash_value:=Dbms_Utility.Get_Hash_Value (
1881: name => p_bis_bucket_rec.range3_name
1882: ,base => 2
1883: ,hash_size => 1048576
1883: ,hash_size => 1048576
1884: );
1885:
1886: IF (l_range_name.exists(l_hash_value)) THEN
1887: RAISE FND_API.G_EXC_ERROR;
1888: ELSE
1889: l_range_name(l_hash_value) := p_bis_bucket_rec.range3_name;
1890: END IF;
1891: END IF;
1890: END IF;
1891: END IF;
1892:
1893:
1894: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range4_name)= FND_API.G_TRUE) THEN
1895: l_hash_value:=Dbms_Utility.Get_Hash_Value (
1896: name => p_bis_bucket_rec.range4_name
1897: ,base => 2
1898: ,hash_size => 1048576
1898: ,hash_size => 1048576
1899: );
1900:
1901: IF (l_range_name.exists(l_hash_value)) THEN
1902: RAISE FND_API.G_EXC_ERROR;
1903: ELSE
1904: l_range_name(l_hash_value) := p_bis_bucket_rec.range4_name;
1905: END IF;
1906: END IF;
1905: END IF;
1906: END IF;
1907:
1908:
1909: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range5_name)= FND_API.G_TRUE) THEN
1910: l_hash_value:=Dbms_Utility.Get_Hash_Value (
1911: name => p_bis_bucket_rec.range5_name
1912: ,base => 2
1913: ,hash_size => 1048576
1913: ,hash_size => 1048576
1914: );
1915:
1916: IF (l_range_name.exists(l_hash_value)) THEN
1917: RAISE FND_API.G_EXC_ERROR;
1918: ELSE
1919: l_range_name(l_hash_value) := p_bis_bucket_rec.range5_name;
1920: END IF;
1921: END IF;
1920: END IF;
1921: END IF;
1922:
1923:
1924: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range6_name)= FND_API.G_TRUE) THEN
1925: l_hash_value:=Dbms_Utility.Get_Hash_Value (
1926: name => p_bis_bucket_rec.range6_name
1927: ,base => 2
1928: ,hash_size => 1048576
1928: ,hash_size => 1048576
1929: );
1930:
1931: IF (l_range_name.exists(l_hash_value)) THEN
1932: RAISE FND_API.G_EXC_ERROR;
1933: ELSE
1934: l_range_name(l_hash_value) := p_bis_bucket_rec.range6_name;
1935: END IF;
1936: END IF;
1935: END IF;
1936: END IF;
1937:
1938:
1939: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range7_name)= FND_API.G_TRUE) THEN
1940: l_hash_value:=Dbms_Utility.Get_Hash_Value (
1941: name => p_bis_bucket_rec.range7_name
1942: ,base => 2
1943: ,hash_size => 1048576
1943: ,hash_size => 1048576
1944: );
1945:
1946: IF (l_range_name.exists(l_hash_value)) THEN
1947: RAISE FND_API.G_EXC_ERROR;
1948: ELSE
1949: l_range_name(l_hash_value) := p_bis_bucket_rec.range7_name;
1950: END IF;
1951: END IF;
1950: END IF;
1951: END IF;
1952:
1953:
1954: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range8_name)= FND_API.G_TRUE) THEN
1955: l_hash_value:=Dbms_Utility.Get_Hash_Value (
1956: name => p_bis_bucket_rec.range8_name
1957: ,base => 2
1958: ,hash_size => 1048576
1958: ,hash_size => 1048576
1959: );
1960:
1961: IF (l_range_name.exists(l_hash_value)) THEN
1962: RAISE FND_API.G_EXC_ERROR;
1963: ELSE
1964: l_range_name(l_hash_value) := p_bis_bucket_rec.range8_name;
1965: END IF;
1966: END IF;
1965: END IF;
1966: END IF;
1967:
1968:
1969: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range9_name)= FND_API.G_TRUE) THEN
1970: l_hash_value:=Dbms_Utility.Get_Hash_Value (
1971: name => p_bis_bucket_rec.range9_name
1972: ,base => 2
1973: ,hash_size => 1048576
1973: ,hash_size => 1048576
1974: );
1975:
1976: IF (l_range_name.exists(l_hash_value)) THEN
1977: RAISE FND_API.G_EXC_ERROR;
1978: ELSE
1979: l_range_name(l_hash_value) := p_bis_bucket_rec.range9_name;
1980: END IF;
1981: END IF;
1980: END IF;
1981: END IF;
1982:
1983:
1984: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range10_name)= FND_API.G_TRUE) THEN
1985: l_hash_value:=Dbms_Utility.Get_Hash_Value (
1986: name => p_bis_bucket_rec.range10_name
1987: ,base => 2
1988: ,hash_size => 1048576
1988: ,hash_size => 1048576
1989: );
1990:
1991: IF (l_range_name.exists(l_hash_value)) THEN
1992: RAISE FND_API.G_EXC_ERROR;
1993: ELSE
1994: l_range_name(l_hash_value) := p_bis_bucket_rec.range10_name;
1995: END IF;
1996: END IF;
1998:
1999: RETURN TRUE;
2000:
2001: EXCEPTION
2002: WHEN FND_API.G_EXC_ERROR THEN
2003: RETURN FALSE;
2004:
2005: WHEN others THEN
2006: RETURN FALSE;
2021: IF((p_bis_bucket_rec.overlapping ='T') OR (p_bis_bucket_rec.discontinuous='T')) THEN
2022: RETURN TRUE;
2023: END IF;
2024:
2025: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range1_low)= FND_API.G_TRUE) THEN
2026: l_hash_value :=DBMS_UTILITY.GET_HASH_VALUE (
2027: name => p_bis_bucket_rec.range1_low
2028: ,base => 2
2029: ,hash_size => 1048576
2029: ,hash_size => 1048576
2030: );
2031:
2032: IF (l_range_low.exists(l_hash_value)) THEN
2033: RAISE FND_API.G_EXC_ERROR;
2034: ELSE
2035: l_range_low(l_hash_value) := p_bis_bucket_rec.range1_low;
2036: END IF;
2037: END IF;
2035: l_range_low(l_hash_value) := p_bis_bucket_rec.range1_low;
2036: END IF;
2037: END IF;
2038:
2039: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range2_low)= FND_API.G_TRUE) THEN
2040: l_hash_value :=DBMS_UTILITY.GET_HASH_VALUE (
2041: name => p_bis_bucket_rec.range2_low
2042: ,base => 2
2043: ,hash_size => 1048576
2043: ,hash_size => 1048576
2044: );
2045:
2046: IF (l_range_low.exists(l_hash_value)) THEN
2047: RAISE FND_API.G_EXC_ERROR;
2048: ELSE
2049: l_range_low(l_hash_value) := p_bis_bucket_rec.range2_low;
2050: END IF;
2051: END IF;
2049: l_range_low(l_hash_value) := p_bis_bucket_rec.range2_low;
2050: END IF;
2051: END IF;
2052:
2053: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range3_low)= FND_API.G_TRUE) THEN
2054: l_hash_value :=DBMS_UTILITY.GET_HASH_VALUE (
2055: name => p_bis_bucket_rec.range3_low
2056: ,base => 2
2057: ,hash_size => 1048576
2057: ,hash_size => 1048576
2058: );
2059:
2060: IF (l_range_low.exists(l_hash_value)) THEN
2061: RAISE FND_API.G_EXC_ERROR;
2062: ELSE
2063: l_range_low(l_hash_value) := p_bis_bucket_rec.range3_low;
2064: END IF;
2065: END IF;
2063: l_range_low(l_hash_value) := p_bis_bucket_rec.range3_low;
2064: END IF;
2065: END IF;
2066:
2067: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range4_low)= FND_API.G_TRUE) THEN
2068: l_hash_value :=DBMS_UTILITY.GET_HASH_VALUE (
2069: name => p_bis_bucket_rec.range4_low
2070: ,base => 2
2071: ,hash_size => 1048576
2071: ,hash_size => 1048576
2072: );
2073:
2074: IF (l_range_low.exists(l_hash_value)) THEN
2075: RAISE FND_API.G_EXC_ERROR;
2076: ELSE
2077: l_range_low(l_hash_value) := p_bis_bucket_rec.range4_low;
2078: END IF;
2079: END IF;
2077: l_range_low(l_hash_value) := p_bis_bucket_rec.range4_low;
2078: END IF;
2079: END IF;
2080:
2081: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range5_low)= FND_API.G_TRUE) THEN
2082: l_hash_value :=DBMS_UTILITY.GET_HASH_VALUE (
2083: name => p_bis_bucket_rec.range5_low
2084: ,base => 2
2085: ,hash_size => 1048576
2085: ,hash_size => 1048576
2086: );
2087:
2088: IF (l_range_low.exists(l_hash_value)) THEN
2089: RAISE FND_API.G_EXC_ERROR;
2090: ELSE
2091: l_range_low(l_hash_value) := p_bis_bucket_rec.range5_low;
2092: END IF;
2093: END IF;
2091: l_range_low(l_hash_value) := p_bis_bucket_rec.range5_low;
2092: END IF;
2093: END IF;
2094:
2095: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range6_low)= FND_API.G_TRUE) THEN
2096: l_hash_value :=DBMS_UTILITY.GET_HASH_VALUE (
2097: name => p_bis_bucket_rec.range6_low
2098: ,base => 2
2099: ,hash_size => 1048576
2099: ,hash_size => 1048576
2100: );
2101:
2102: IF (l_range_low.exists(l_hash_value)) THEN
2103: RAISE FND_API.G_EXC_ERROR;
2104: ELSE
2105: l_range_low(l_hash_value) := p_bis_bucket_rec.range6_low;
2106: END IF;
2107: END IF;
2105: l_range_low(l_hash_value) := p_bis_bucket_rec.range6_low;
2106: END IF;
2107: END IF;
2108:
2109: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range7_low)= FND_API.G_TRUE) THEN
2110: l_hash_value :=DBMS_UTILITY.GET_HASH_VALUE (
2111: name => p_bis_bucket_rec.range7_low
2112: ,base => 2
2113: ,hash_size => 1048576
2113: ,hash_size => 1048576
2114: );
2115:
2116: IF (l_range_low.exists(l_hash_value)) THEN
2117: RAISE FND_API.G_EXC_ERROR;
2118: ELSE
2119: l_range_low(l_hash_value) := p_bis_bucket_rec.range7_low;
2120: END IF;
2121: END IF;
2119: l_range_low(l_hash_value) := p_bis_bucket_rec.range7_low;
2120: END IF;
2121: END IF;
2122:
2123: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range8_low)= FND_API.G_TRUE) THEN
2124: l_hash_value :=DBMS_UTILITY.GET_HASH_VALUE (
2125: name => p_bis_bucket_rec.range8_low
2126: ,base => 2
2127: ,hash_size => 1048576
2127: ,hash_size => 1048576
2128: );
2129:
2130: IF (l_range_low.exists(l_hash_value)) THEN
2131: RAISE FND_API.G_EXC_ERROR;
2132: ELSE
2133: l_range_low(l_hash_value) := p_bis_bucket_rec.range8_low;
2134: END IF;
2135: END IF;
2133: l_range_low(l_hash_value) := p_bis_bucket_rec.range8_low;
2134: END IF;
2135: END IF;
2136:
2137: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range9_low)= FND_API.G_TRUE) THEN
2138: l_hash_value :=DBMS_UTILITY.GET_HASH_VALUE (
2139: name => p_bis_bucket_rec.range9_low
2140: ,base => 2
2141: ,hash_size => 1048576
2141: ,hash_size => 1048576
2142: );
2143:
2144: IF (l_range_low.exists(l_hash_value)) THEN
2145: RAISE FND_API.G_EXC_ERROR;
2146: ELSE
2147: l_range_low(l_hash_value) := p_bis_bucket_rec.range9_low;
2148: END IF;
2149: END IF;
2147: l_range_low(l_hash_value) := p_bis_bucket_rec.range9_low;
2148: END IF;
2149: END IF;
2150:
2151: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range10_low)= FND_API.G_TRUE) THEN
2152: l_hash_value :=DBMS_UTILITY.GET_HASH_VALUE (
2153: name => p_bis_bucket_rec.range10_low
2154: ,base => 2
2155: ,hash_size => 1048576
2155: ,hash_size => 1048576
2156: );
2157:
2158: IF (l_range_low.exists(l_hash_value)) THEN
2159: RAISE FND_API.G_EXC_ERROR;
2160: ELSE
2161: l_range_low(l_hash_value) := p_bis_bucket_rec.range10_low;
2162: END IF;
2163: END IF;
2164:
2165: RETURN TRUE;
2166:
2167: EXCEPTION
2168: WHEN FND_API.G_EXC_ERROR THEN
2169: RETURN FALSE;
2170:
2171: WHEN others THEN
2172: RETURN FALSE;
2185: BEGIN
2186: IF((p_bis_bucket_rec.overlapping ='T') OR (p_bis_bucket_rec.discontinuous='T')) THEN
2187: RETURN TRUE;
2188: END IF;
2189: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range1_high)= FND_API.G_TRUE) THEN
2190: l_hash_value :=DBMS_UTILITY.GET_HASH_VALUE (
2191: name => p_bis_bucket_rec.range1_high
2192: ,base => 2
2193: ,hash_size => 1048576
2193: ,hash_size => 1048576
2194: );
2195:
2196: IF (l_range_high.exists(l_hash_value)) THEN
2197: RAISE FND_API.G_EXC_ERROR;
2198: ELSE
2199: l_range_high(l_hash_value) := p_bis_bucket_rec.range1_high;
2200: END IF;
2201: END IF;
2199: l_range_high(l_hash_value) := p_bis_bucket_rec.range1_high;
2200: END IF;
2201: END IF;
2202:
2203: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range2_high)= FND_API.G_TRUE) THEN
2204: l_hash_value :=DBMS_UTILITY.GET_HASH_VALUE (
2205: name => p_bis_bucket_rec.range2_high
2206: ,base => 2
2207: ,hash_size => 1048576
2207: ,hash_size => 1048576
2208: );
2209:
2210: IF (l_range_high.exists(l_hash_value)) THEN
2211: RAISE FND_API.G_EXC_ERROR;
2212: ELSE
2213: l_range_high(l_hash_value) := p_bis_bucket_rec.range2_high;
2214: END IF;
2215: END IF;
2213: l_range_high(l_hash_value) := p_bis_bucket_rec.range2_high;
2214: END IF;
2215: END IF;
2216:
2217: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range3_high)= FND_API.G_TRUE) THEN
2218: l_hash_value :=DBMS_UTILITY.GET_HASH_VALUE (
2219: name => p_bis_bucket_rec.range3_high
2220: ,base => 2
2221: ,hash_size => 1048576
2221: ,hash_size => 1048576
2222: );
2223:
2224: IF (l_range_high.exists(l_hash_value)) THEN
2225: RAISE FND_API.G_EXC_ERROR;
2226: ELSE
2227: l_range_high(l_hash_value) := p_bis_bucket_rec.range3_high;
2228: END IF;
2229: END IF;
2227: l_range_high(l_hash_value) := p_bis_bucket_rec.range3_high;
2228: END IF;
2229: END IF;
2230:
2231: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range4_high)= FND_API.G_TRUE) THEN
2232: l_hash_value :=DBMS_UTILITY.GET_HASH_VALUE (
2233: name => p_bis_bucket_rec.range4_high
2234: ,base => 2
2235: ,hash_size => 1048576
2235: ,hash_size => 1048576
2236: );
2237:
2238: IF (l_range_high.exists(l_hash_value)) THEN
2239: RAISE FND_API.G_EXC_ERROR;
2240: ELSE
2241: l_range_high(l_hash_value) := p_bis_bucket_rec.range4_high;
2242: END IF;
2243: END IF;
2241: l_range_high(l_hash_value) := p_bis_bucket_rec.range4_high;
2242: END IF;
2243: END IF;
2244:
2245: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range5_high)= FND_API.G_TRUE) THEN
2246: l_hash_value :=DBMS_UTILITY.GET_HASH_VALUE (
2247: name => p_bis_bucket_rec.range5_high
2248: ,base => 2
2249: ,hash_size => 1048576
2249: ,hash_size => 1048576
2250: );
2251:
2252: IF (l_range_high.exists(l_hash_value)) THEN
2253: RAISE FND_API.G_EXC_ERROR;
2254: ELSE
2255: l_range_high(l_hash_value) := p_bis_bucket_rec.range5_high;
2256: END IF;
2257: END IF;
2255: l_range_high(l_hash_value) := p_bis_bucket_rec.range5_high;
2256: END IF;
2257: END IF;
2258:
2259: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range6_high)= FND_API.G_TRUE) THEN
2260: l_hash_value :=DBMS_UTILITY.GET_HASH_VALUE (
2261: name => p_bis_bucket_rec.range6_high
2262: ,base => 2
2263: ,hash_size => 1048576
2263: ,hash_size => 1048576
2264: );
2265:
2266: IF (l_range_high.exists(l_hash_value)) THEN
2267: RAISE FND_API.G_EXC_ERROR;
2268: ELSE
2269: l_range_high(l_hash_value) := p_bis_bucket_rec.range6_high;
2270: END IF;
2271: END IF;
2269: l_range_high(l_hash_value) := p_bis_bucket_rec.range6_high;
2270: END IF;
2271: END IF;
2272:
2273: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range7_high)= FND_API.G_TRUE) THEN
2274: l_hash_value :=DBMS_UTILITY.GET_HASH_VALUE (
2275: name => p_bis_bucket_rec.range7_high
2276: ,base => 2
2277: ,hash_size => 1048576
2277: ,hash_size => 1048576
2278: );
2279:
2280: IF (l_range_high.exists(l_hash_value)) THEN
2281: RAISE FND_API.G_EXC_ERROR;
2282: ELSE
2283: l_range_high(l_hash_value) := p_bis_bucket_rec.range7_high;
2284: END IF;
2285: END IF;
2283: l_range_high(l_hash_value) := p_bis_bucket_rec.range7_high;
2284: END IF;
2285: END IF;
2286:
2287: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range8_high)= FND_API.G_TRUE) THEN
2288: l_hash_value :=DBMS_UTILITY.GET_HASH_VALUE (
2289: name => p_bis_bucket_rec.range8_high
2290: ,base => 2
2291: ,hash_size => 1048576
2291: ,hash_size => 1048576
2292: );
2293:
2294: IF (l_range_high.exists(l_hash_value)) THEN
2295: RAISE FND_API.G_EXC_ERROR;
2296: ELSE
2297: l_range_high(l_hash_value) := p_bis_bucket_rec.range8_high;
2298: END IF;
2299: END IF;
2297: l_range_high(l_hash_value) := p_bis_bucket_rec.range8_high;
2298: END IF;
2299: END IF;
2300:
2301: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range9_high)= FND_API.G_TRUE) THEN
2302: l_hash_value :=DBMS_UTILITY.GET_HASH_VALUE (
2303: name => p_bis_bucket_rec.range9_high
2304: ,base => 2
2305: ,hash_size => 1048576
2305: ,hash_size => 1048576
2306: );
2307:
2308: IF (l_range_high.exists(l_hash_value)) THEN
2309: RAISE FND_API.G_EXC_ERROR;
2310: ELSE
2311: l_range_high(l_hash_value) := p_bis_bucket_rec.range9_high;
2312: END IF;
2313: END IF;
2311: l_range_high(l_hash_value) := p_bis_bucket_rec.range9_high;
2312: END IF;
2313: END IF;
2314:
2315: IF (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range10_high)= FND_API.G_TRUE) THEN
2316: l_hash_value :=DBMS_UTILITY.GET_HASH_VALUE (
2317: name => p_bis_bucket_rec.range10_high
2318: ,base => 2
2319: ,hash_size => 1048576
2319: ,hash_size => 1048576
2320: );
2321:
2322: IF (l_range_high.exists(l_hash_value)) THEN
2323: RAISE FND_API.G_EXC_ERROR;
2324: ELSE
2325: l_range_high(l_hash_value) := p_bis_bucket_rec.range10_high;
2326: END IF;
2327: END IF;
2328:
2329: RETURN TRUE;
2330:
2331: EXCEPTION
2332: WHEN FND_API.G_EXC_ERROR THEN
2333: RETURN FALSE;
2334:
2335: WHEN others THEN
2336: RETURN FALSE;
2390: l_bucket_ranges_tbl BIS_BUCKET_PVT.BIS_BUCKET_RANGES_TBL;
2391:
2392: BEGIN
2393:
2394: x_return_status := FND_API.G_RET_STS_SUCCESS;
2395: FND_MSG_PUB.Initialize;
2396:
2397: l_bis_bucket_rec := p_bis_bucket_rec;
2398:
2405: ,p_error_type => BIS_UTILITIES_PUB.G_ERROR
2406: ,p_error_table => l_error_tbl
2407: ,x_error_table => x_error_tbl
2408: );
2409: RAISE FND_API.G_EXC_ERROR;
2410: END IF;
2411:
2412: BIS_BUCKET_PVT.Validate_Bucket_Common (
2413: p_bis_bucket_rec => l_bis_bucket_rec
2415: ,x_error_Tbl => x_error_tbl
2416: );
2417:
2418: EXCEPTION
2419: WHEN FND_API.G_EXC_ERROR THEN
2420: x_return_status := FND_API.G_RET_STS_ERROR ;
2421: --dbms_output.put_line( 'x_return_status (Not wrapper) is ' || x_return_status);
2422: RAISE FND_API.G_EXC_ERROR;
2423: WHEN OTHERS THEN
2416: );
2417:
2418: EXCEPTION
2419: WHEN FND_API.G_EXC_ERROR THEN
2420: x_return_status := FND_API.G_RET_STS_ERROR ;
2421: --dbms_output.put_line( 'x_return_status (Not wrapper) is ' || x_return_status);
2422: RAISE FND_API.G_EXC_ERROR;
2423: WHEN OTHERS THEN
2424: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2418: EXCEPTION
2419: WHEN FND_API.G_EXC_ERROR THEN
2420: x_return_status := FND_API.G_RET_STS_ERROR ;
2421: --dbms_output.put_line( 'x_return_status (Not wrapper) is ' || x_return_status);
2422: RAISE FND_API.G_EXC_ERROR;
2423: WHEN OTHERS THEN
2424: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2425: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2426: END Validate_Bucket;
2420: x_return_status := FND_API.G_RET_STS_ERROR ;
2421: --dbms_output.put_line( 'x_return_status (Not wrapper) is ' || x_return_status);
2422: RAISE FND_API.G_EXC_ERROR;
2423: WHEN OTHERS THEN
2424: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2425: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2426: END Validate_Bucket;
2427: --=============================================================================
2428:
2421: --dbms_output.put_line( 'x_return_status (Not wrapper) is ' || x_return_status);
2422: RAISE FND_API.G_EXC_ERROR;
2423: WHEN OTHERS THEN
2424: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2425: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2426: END Validate_Bucket;
2427: --=============================================================================
2428:
2429: FUNCTION GET_REPORT_LISTS(
2529: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
2530:
2531: BEGIN
2532:
2533: x_return_status := FND_API.G_RET_STS_SUCCESS;
2534:
2535: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range1_name)= FND_API.G_TRUE)
2536: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range1_low)= FND_API.G_TRUE)
2537: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range1_high)= FND_API.G_TRUE)) THEN
2531: BEGIN
2532:
2533: x_return_status := FND_API.G_RET_STS_SUCCESS;
2534:
2535: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range1_name)= FND_API.G_TRUE)
2536: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range1_low)= FND_API.G_TRUE)
2537: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range1_high)= FND_API.G_TRUE)) THEN
2538: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range1_low;
2539: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range1_high;
2532:
2533: x_return_status := FND_API.G_RET_STS_SUCCESS;
2534:
2535: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range1_name)= FND_API.G_TRUE)
2536: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range1_low)= FND_API.G_TRUE)
2537: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range1_high)= FND_API.G_TRUE)) THEN
2538: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range1_low;
2539: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range1_high;
2540: l_valid_bucket_count := l_valid_bucket_count + 1;
2533: x_return_status := FND_API.G_RET_STS_SUCCESS;
2534:
2535: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range1_name)= FND_API.G_TRUE)
2536: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range1_low)= FND_API.G_TRUE)
2537: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range1_high)= FND_API.G_TRUE)) THEN
2538: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range1_low;
2539: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range1_high;
2540: l_valid_bucket_count := l_valid_bucket_count + 1;
2541: END IF;
2539: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range1_high;
2540: l_valid_bucket_count := l_valid_bucket_count + 1;
2541: END IF;
2542:
2543: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range2_name)= FND_API.G_TRUE)
2544: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range2_low)= FND_API.G_TRUE)
2545: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range2_high)= FND_API.G_TRUE)) THEN
2546: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range2_low;
2547: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range2_high;
2540: l_valid_bucket_count := l_valid_bucket_count + 1;
2541: END IF;
2542:
2543: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range2_name)= FND_API.G_TRUE)
2544: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range2_low)= FND_API.G_TRUE)
2545: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range2_high)= FND_API.G_TRUE)) THEN
2546: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range2_low;
2547: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range2_high;
2548: l_valid_bucket_count := l_valid_bucket_count + 1;
2541: END IF;
2542:
2543: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range2_name)= FND_API.G_TRUE)
2544: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range2_low)= FND_API.G_TRUE)
2545: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range2_high)= FND_API.G_TRUE)) THEN
2546: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range2_low;
2547: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range2_high;
2548: l_valid_bucket_count := l_valid_bucket_count + 1;
2549: END IF;
2547: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range2_high;
2548: l_valid_bucket_count := l_valid_bucket_count + 1;
2549: END IF;
2550:
2551: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range3_name)= FND_API.G_TRUE)
2552: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range3_low)= FND_API.G_TRUE)
2553: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range3_high)= FND_API.G_TRUE)) THEN
2554: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range3_low;
2555: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range3_high;
2548: l_valid_bucket_count := l_valid_bucket_count + 1;
2549: END IF;
2550:
2551: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range3_name)= FND_API.G_TRUE)
2552: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range3_low)= FND_API.G_TRUE)
2553: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range3_high)= FND_API.G_TRUE)) THEN
2554: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range3_low;
2555: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range3_high;
2556: l_valid_bucket_count := l_valid_bucket_count + 1;
2549: END IF;
2550:
2551: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range3_name)= FND_API.G_TRUE)
2552: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range3_low)= FND_API.G_TRUE)
2553: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range3_high)= FND_API.G_TRUE)) THEN
2554: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range3_low;
2555: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range3_high;
2556: l_valid_bucket_count := l_valid_bucket_count + 1;
2557: END IF;
2555: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range3_high;
2556: l_valid_bucket_count := l_valid_bucket_count + 1;
2557: END IF;
2558:
2559: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range4_name)= FND_API.G_TRUE)
2560: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range4_low)= FND_API.G_TRUE)
2561: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range4_high)= FND_API.G_TRUE)) THEN
2562: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range4_low;
2563: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range4_high;
2556: l_valid_bucket_count := l_valid_bucket_count + 1;
2557: END IF;
2558:
2559: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range4_name)= FND_API.G_TRUE)
2560: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range4_low)= FND_API.G_TRUE)
2561: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range4_high)= FND_API.G_TRUE)) THEN
2562: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range4_low;
2563: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range4_high;
2564: l_valid_bucket_count := l_valid_bucket_count + 1;
2557: END IF;
2558:
2559: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range4_name)= FND_API.G_TRUE)
2560: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range4_low)= FND_API.G_TRUE)
2561: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range4_high)= FND_API.G_TRUE)) THEN
2562: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range4_low;
2563: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range4_high;
2564: l_valid_bucket_count := l_valid_bucket_count + 1;
2565: END IF;
2563: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range4_high;
2564: l_valid_bucket_count := l_valid_bucket_count + 1;
2565: END IF;
2566:
2567: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range5_name)= FND_API.G_TRUE)
2568: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range5_low)= FND_API.G_TRUE)
2569: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range5_high)= FND_API.G_TRUE)) THEN
2570: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range5_low;
2571: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range5_high;
2564: l_valid_bucket_count := l_valid_bucket_count + 1;
2565: END IF;
2566:
2567: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range5_name)= FND_API.G_TRUE)
2568: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range5_low)= FND_API.G_TRUE)
2569: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range5_high)= FND_API.G_TRUE)) THEN
2570: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range5_low;
2571: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range5_high;
2572: l_valid_bucket_count := l_valid_bucket_count + 1;
2565: END IF;
2566:
2567: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range5_name)= FND_API.G_TRUE)
2568: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range5_low)= FND_API.G_TRUE)
2569: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range5_high)= FND_API.G_TRUE)) THEN
2570: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range5_low;
2571: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range5_high;
2572: l_valid_bucket_count := l_valid_bucket_count + 1;
2573: END IF;
2571: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range5_high;
2572: l_valid_bucket_count := l_valid_bucket_count + 1;
2573: END IF;
2574:
2575: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range6_name)= FND_API.G_TRUE)
2576: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range6_low)= FND_API.G_TRUE)
2577: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range6_high)= FND_API.G_TRUE)) THEN
2578: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range6_low;
2579: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range6_high;
2572: l_valid_bucket_count := l_valid_bucket_count + 1;
2573: END IF;
2574:
2575: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range6_name)= FND_API.G_TRUE)
2576: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range6_low)= FND_API.G_TRUE)
2577: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range6_high)= FND_API.G_TRUE)) THEN
2578: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range6_low;
2579: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range6_high;
2580: l_valid_bucket_count := l_valid_bucket_count + 1;
2573: END IF;
2574:
2575: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range6_name)= FND_API.G_TRUE)
2576: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range6_low)= FND_API.G_TRUE)
2577: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range6_high)= FND_API.G_TRUE)) THEN
2578: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range6_low;
2579: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range6_high;
2580: l_valid_bucket_count := l_valid_bucket_count + 1;
2581: END IF;
2579: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range6_high;
2580: l_valid_bucket_count := l_valid_bucket_count + 1;
2581: END IF;
2582:
2583: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range7_name)= FND_API.G_TRUE)
2584: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range7_low)= FND_API.G_TRUE)
2585: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range7_high)= FND_API.G_TRUE)) THEN
2586: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range7_low;
2587: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range7_high;
2580: l_valid_bucket_count := l_valid_bucket_count + 1;
2581: END IF;
2582:
2583: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range7_name)= FND_API.G_TRUE)
2584: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range7_low)= FND_API.G_TRUE)
2585: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range7_high)= FND_API.G_TRUE)) THEN
2586: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range7_low;
2587: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range7_high;
2588: l_valid_bucket_count := l_valid_bucket_count + 1;
2581: END IF;
2582:
2583: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range7_name)= FND_API.G_TRUE)
2584: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range7_low)= FND_API.G_TRUE)
2585: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range7_high)= FND_API.G_TRUE)) THEN
2586: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range7_low;
2587: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range7_high;
2588: l_valid_bucket_count := l_valid_bucket_count + 1;
2589: END IF;
2587: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range7_high;
2588: l_valid_bucket_count := l_valid_bucket_count + 1;
2589: END IF;
2590:
2591: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range8_name)= FND_API.G_TRUE)
2592: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range8_low)= FND_API.G_TRUE)
2593: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range8_high)= FND_API.G_TRUE)) THEN
2594: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range8_low;
2595: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range8_high;
2588: l_valid_bucket_count := l_valid_bucket_count + 1;
2589: END IF;
2590:
2591: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range8_name)= FND_API.G_TRUE)
2592: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range8_low)= FND_API.G_TRUE)
2593: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range8_high)= FND_API.G_TRUE)) THEN
2594: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range8_low;
2595: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range8_high;
2596: l_valid_bucket_count := l_valid_bucket_count + 1;
2589: END IF;
2590:
2591: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range8_name)= FND_API.G_TRUE)
2592: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range8_low)= FND_API.G_TRUE)
2593: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range8_high)= FND_API.G_TRUE)) THEN
2594: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range8_low;
2595: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range8_high;
2596: l_valid_bucket_count := l_valid_bucket_count + 1;
2597: END IF;
2595: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range8_high;
2596: l_valid_bucket_count := l_valid_bucket_count + 1;
2597: END IF;
2598:
2599: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range9_name)= FND_API.G_TRUE)
2600: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range9_low)= FND_API.G_TRUE)
2601: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range9_high)= FND_API.G_TRUE)) THEN
2602: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range9_low;
2603: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range9_high;
2596: l_valid_bucket_count := l_valid_bucket_count + 1;
2597: END IF;
2598:
2599: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range9_name)= FND_API.G_TRUE)
2600: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range9_low)= FND_API.G_TRUE)
2601: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range9_high)= FND_API.G_TRUE)) THEN
2602: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range9_low;
2603: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range9_high;
2604: l_valid_bucket_count := l_valid_bucket_count + 1;
2597: END IF;
2598:
2599: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range9_name)= FND_API.G_TRUE)
2600: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range9_low)= FND_API.G_TRUE)
2601: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range9_high)= FND_API.G_TRUE)) THEN
2602: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range9_low;
2603: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range9_high;
2604: l_valid_bucket_count := l_valid_bucket_count + 1;
2605: END IF;
2603: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range9_high;
2604: l_valid_bucket_count := l_valid_bucket_count + 1;
2605: END IF;
2606:
2607: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range10_name)= FND_API.G_TRUE)
2608: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range10_low)= FND_API.G_TRUE)
2609: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range10_high)= FND_API.G_TRUE)) THEN
2610: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range10_low;
2611: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range10_high;
2604: l_valid_bucket_count := l_valid_bucket_count + 1;
2605: END IF;
2606:
2607: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range10_name)= FND_API.G_TRUE)
2608: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range10_low)= FND_API.G_TRUE)
2609: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range10_high)= FND_API.G_TRUE)) THEN
2610: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range10_low;
2611: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range10_high;
2612: END IF;
2605: END IF;
2606:
2607: IF ((BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range10_name)= FND_API.G_TRUE)
2608: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range10_low)= FND_API.G_TRUE)
2609: OR (BIS_UTILITIES_PUB.Value_Not_Missing(p_bis_bucket_rec.range10_high)= FND_API.G_TRUE)) THEN
2610: x_bucket_ranges_tbl(l_valid_bucket_count).range_low := p_bis_bucket_rec.range10_low;
2611: x_bucket_ranges_tbl(l_valid_bucket_count).range_high := p_bis_bucket_rec.range10_high;
2612: END IF;
2613:
2613:
2614:
2615: EXCEPTION
2616: WHEN OTHERS THEN
2617: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2618: BIS_UTILITIES_PVT.Add_Error_Message (
2619: p_error_msg_id => SQLCODE
2620: ,p_error_description => SQLERRM
2621: ,p_error_proc_name => G_PKG_NAME||'.Populate_Loc_Bucket_Range_Tbl'
2621: ,p_error_proc_name => G_PKG_NAME||'.Populate_Loc_Bucket_Range_Tbl'
2622: ,p_error_table => l_error_tbl
2623: ,x_error_table => x_error_tbl
2624: );
2625: RAISE FND_API.G_EXC_ERROR;
2626: END Populate_Loc_Bucket_Range_Tbl;
2627:
2628: --=============================================================================
2629: --API for validating the overlapping feature of the bucket
2643: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
2644:
2645: BEGIN
2646:
2647: x_return_status := FND_API.G_RET_STS_SUCCESS;
2648: l_bucket_count := p_bucket_ranges_tbl.COUNT();
2649:
2650: IF (p_overlapping = 'F') THEN
2651: FOR buckets IN 1 .. l_bucket_count - 1 LOOP
2652: --dbms_output.put_line( 'bucket number(overlapping) is ' || buckets);
2653: --dbms_output.put_line( 'bucket.range_low is ' || p_bucket_ranges_tbl(buckets).RANGE_LOW);
2654: --dbms_output.put_line( 'bucket-1.range_high is ' || p_bucket_ranges_tbl(buckets-1).RANGE_HIGH);
2655: IF (p_bucket_ranges_tbl(buckets).RANGE_LOW IS NULL) THEN
2656: RAISE FND_API.G_EXC_ERROR;
2657: ELSIF (p_bucket_ranges_tbl(buckets - 1).RANGE_HIGH IS NULL) THEN
2658: RAISE FND_API.G_EXC_ERROR;
2659: --ELSIF ((p_bucket_ranges_tbl(buckets).RANGE_LOW IS NOT NULL) AND (p_bucket_ranges_tbl(buckets - 1).RANGE_HIGH IS NOT NULL)) THEN
2660: ELSIF (p_bucket_ranges_tbl(buckets).RANGE_LOW < p_bucket_ranges_tbl(buckets - 1).RANGE_HIGH) THEN
2654: --dbms_output.put_line( 'bucket-1.range_high is ' || p_bucket_ranges_tbl(buckets-1).RANGE_HIGH);
2655: IF (p_bucket_ranges_tbl(buckets).RANGE_LOW IS NULL) THEN
2656: RAISE FND_API.G_EXC_ERROR;
2657: ELSIF (p_bucket_ranges_tbl(buckets - 1).RANGE_HIGH IS NULL) THEN
2658: RAISE FND_API.G_EXC_ERROR;
2659: --ELSIF ((p_bucket_ranges_tbl(buckets).RANGE_LOW IS NOT NULL) AND (p_bucket_ranges_tbl(buckets - 1).RANGE_HIGH IS NOT NULL)) THEN
2660: ELSIF (p_bucket_ranges_tbl(buckets).RANGE_LOW < p_bucket_ranges_tbl(buckets - 1).RANGE_HIGH) THEN
2661: RAISE FND_API.G_EXC_ERROR;
2662: END IF;
2657: ELSIF (p_bucket_ranges_tbl(buckets - 1).RANGE_HIGH IS NULL) THEN
2658: RAISE FND_API.G_EXC_ERROR;
2659: --ELSIF ((p_bucket_ranges_tbl(buckets).RANGE_LOW IS NOT NULL) AND (p_bucket_ranges_tbl(buckets - 1).RANGE_HIGH IS NOT NULL)) THEN
2660: ELSIF (p_bucket_ranges_tbl(buckets).RANGE_LOW < p_bucket_ranges_tbl(buckets - 1).RANGE_HIGH) THEN
2661: RAISE FND_API.G_EXC_ERROR;
2662: END IF;
2663: END LOOP;
2664: END IF;
2665:
2664: END IF;
2665:
2666:
2667: EXCEPTION
2668: WHEN FND_API.G_EXC_ERROR THEN -- overlapping occurs
2669: x_return_status := FND_API.G_RET_STS_ERROR;
2670: BIS_UTILITIES_PVT.Add_Error_Message (
2671: p_error_msg_name => 'BIS_BUCKET_SET_OVERLAPPING'
2672: ,p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
2665:
2666:
2667: EXCEPTION
2668: WHEN FND_API.G_EXC_ERROR THEN -- overlapping occurs
2669: x_return_status := FND_API.G_RET_STS_ERROR;
2670: BIS_UTILITIES_PVT.Add_Error_Message (
2671: p_error_msg_name => 'BIS_BUCKET_SET_OVERLAPPING'
2672: ,p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
2673: ,p_error_proc_name => G_PKG_NAME||'.Validate_Bucket_Overlapping'
2674: ,p_error_type => BIS_UTILITIES_PUB.G_ERROR
2675: ,p_error_table => l_error_tbl
2676: ,x_error_table => x_error_tbl
2677: );
2678: RAISE FND_API.G_EXC_ERROR;
2679: WHEN OTHERS THEN
2680: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2681: BIS_UTILITIES_PVT.Add_Error_Message (
2682: p_error_msg_id => SQLCODE
2676: ,x_error_table => x_error_tbl
2677: );
2678: RAISE FND_API.G_EXC_ERROR;
2679: WHEN OTHERS THEN
2680: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2681: BIS_UTILITIES_PVT.Add_Error_Message (
2682: p_error_msg_id => SQLCODE
2683: ,p_error_description => SQLERRM
2684: ,p_error_proc_name => G_PKG_NAME||'.Validate_Bucket_Overlapping'
2684: ,p_error_proc_name => G_PKG_NAME||'.Validate_Bucket_Overlapping'
2685: ,p_error_table => l_error_tbl
2686: ,x_error_table => x_error_tbl
2687: );
2688: RAISE FND_API.G_EXC_ERROR;
2689: END Validate_Bucket_Overlapping;
2690:
2691:
2692: --=============================================================================
2707: l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
2708:
2709: BEGIN
2710:
2711: x_return_status := FND_API.G_RET_STS_SUCCESS;
2712: l_bucket_count := p_bucket_ranges_tbl.COUNT();
2713:
2714: IF (p_discontinuous = 'F') THEN
2715: FOR buckets IN 1 .. l_bucket_count - 1 LOOP
2716: --dbms_output.put_line( 'bucket number(discontinuous) is ' || buckets);
2717: --dbms_output.put_line( 'bucket.range_low is ' || p_bucket_ranges_tbl(buckets).RANGE_LOW);
2718: --dbms_output.put_line( 'bucket-1.range_high is ' || p_bucket_ranges_tbl(buckets-1).RANGE_HIGH);
2719: IF (p_bucket_ranges_tbl(buckets).RANGE_LOW IS NULL) THEN
2720: RAISE FND_API.G_EXC_ERROR;
2721: ELSIF (p_bucket_ranges_tbl(buckets - 1).RANGE_HIGH IS NULL) THEN
2722: RAISE FND_API.G_EXC_ERROR;
2723: ELSIF (p_bucket_ranges_tbl(buckets).RANGE_LOW <> p_bucket_ranges_tbl(buckets-1).RANGE_HIGH) THEN
2724: RAISE FND_API.G_EXC_ERROR;
2718: --dbms_output.put_line( 'bucket-1.range_high is ' || p_bucket_ranges_tbl(buckets-1).RANGE_HIGH);
2719: IF (p_bucket_ranges_tbl(buckets).RANGE_LOW IS NULL) THEN
2720: RAISE FND_API.G_EXC_ERROR;
2721: ELSIF (p_bucket_ranges_tbl(buckets - 1).RANGE_HIGH IS NULL) THEN
2722: RAISE FND_API.G_EXC_ERROR;
2723: ELSIF (p_bucket_ranges_tbl(buckets).RANGE_LOW <> p_bucket_ranges_tbl(buckets-1).RANGE_HIGH) THEN
2724: RAISE FND_API.G_EXC_ERROR;
2725: END IF;
2726: END LOOP;
2720: RAISE FND_API.G_EXC_ERROR;
2721: ELSIF (p_bucket_ranges_tbl(buckets - 1).RANGE_HIGH IS NULL) THEN
2722: RAISE FND_API.G_EXC_ERROR;
2723: ELSIF (p_bucket_ranges_tbl(buckets).RANGE_LOW <> p_bucket_ranges_tbl(buckets-1).RANGE_HIGH) THEN
2724: RAISE FND_API.G_EXC_ERROR;
2725: END IF;
2726: END LOOP;
2727: END IF;
2728:
2726: END LOOP;
2727: END IF;
2728:
2729: EXCEPTION
2730: WHEN FND_API.G_EXC_ERROR THEN -- discontinuous occurs
2731: x_return_status := FND_API.G_RET_STS_ERROR;
2732: BIS_UTILITIES_PVT.Add_Error_Message (
2733: p_error_msg_name => 'BIS_BUCKET_SET_DISCONTINUOUS'
2734: ,p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
2727: END IF;
2728:
2729: EXCEPTION
2730: WHEN FND_API.G_EXC_ERROR THEN -- discontinuous occurs
2731: x_return_status := FND_API.G_RET_STS_ERROR;
2732: BIS_UTILITIES_PVT.Add_Error_Message (
2733: p_error_msg_name => 'BIS_BUCKET_SET_DISCONTINUOUS'
2734: ,p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
2735: ,p_error_proc_name => G_PKG_NAME||'.Validate_Bucket_Discontinuous'
2736: ,p_error_type => BIS_UTILITIES_PUB.G_ERROR
2737: ,p_error_table => l_error_tbl
2738: ,x_error_table => x_error_tbl
2739: );
2740: RAISE FND_API.G_EXC_ERROR;
2741: WHEN OTHERS THEN
2742: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2743: BIS_UTILITIES_PVT.Add_Error_Message (
2744: p_error_msg_id => SQLCODE
2738: ,x_error_table => x_error_tbl
2739: );
2740: RAISE FND_API.G_EXC_ERROR;
2741: WHEN OTHERS THEN
2742: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2743: BIS_UTILITIES_PVT.Add_Error_Message (
2744: p_error_msg_id => SQLCODE
2745: ,p_error_description => SQLERRM
2746: ,p_error_proc_name => G_PKG_NAME||'.Validate_Bucket_Discontinuous'
2746: ,p_error_proc_name => G_PKG_NAME||'.Validate_Bucket_Discontinuous'
2747: ,p_error_table => l_error_tbl
2748: ,x_error_table => x_error_tbl
2749: );
2750: RAISE FND_API.G_EXC_ERROR;
2751: END Validate_Bucket_Discontinuous;
2752:
2753: --=============================================================================
2754: --API for validating that the FROM is always less than or equal to TO
2766: l_error_message VARCHAR2(50);
2767:
2768: BEGIN
2769:
2770: x_return_status := FND_API.G_RET_STS_SUCCESS;
2771: l_bucket_count := p_bucket_ranges_tbl.COUNT();
2772:
2773: FOR buckets IN 0 .. l_bucket_count - 1 LOOP
2774: IF ((p_bucket_ranges_tbl(buckets).RANGE_LOW IS NULL) AND (p_bucket_ranges_tbl(buckets).RANGE_HIGH) IS NULL) THEN
2772:
2773: FOR buckets IN 0 .. l_bucket_count - 1 LOOP
2774: IF ((p_bucket_ranges_tbl(buckets).RANGE_LOW IS NULL) AND (p_bucket_ranges_tbl(buckets).RANGE_HIGH) IS NULL) THEN
2775: l_error_message := 'BIS_BUCKET_NULL';
2776: RAISE FND_API.G_EXC_ERROR;
2777: ELSIF (p_bucket_ranges_tbl(buckets).RANGE_LOW > p_bucket_ranges_tbl(buckets).RANGE_HIGH) THEN
2778: l_error_message := 'BIS_BUCKET_FROM_TO';
2779: RAISE FND_API.G_EXC_ERROR;
2780: END IF;
2775: l_error_message := 'BIS_BUCKET_NULL';
2776: RAISE FND_API.G_EXC_ERROR;
2777: ELSIF (p_bucket_ranges_tbl(buckets).RANGE_LOW > p_bucket_ranges_tbl(buckets).RANGE_HIGH) THEN
2778: l_error_message := 'BIS_BUCKET_FROM_TO';
2779: RAISE FND_API.G_EXC_ERROR;
2780: END IF;
2781: END LOOP;
2782:
2783: EXCEPTION
2780: END IF;
2781: END LOOP;
2782:
2783: EXCEPTION
2784: WHEN FND_API.G_EXC_ERROR THEN -- FROM > TO
2785: x_return_status := FND_API.G_RET_STS_ERROR;
2786: BIS_UTILITIES_PVT.Add_Error_Message (
2787: p_error_msg_name => l_error_message
2788: ,p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
2781: END LOOP;
2782:
2783: EXCEPTION
2784: WHEN FND_API.G_EXC_ERROR THEN -- FROM > TO
2785: x_return_status := FND_API.G_RET_STS_ERROR;
2786: BIS_UTILITIES_PVT.Add_Error_Message (
2787: p_error_msg_name => l_error_message
2788: ,p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
2789: ,p_error_proc_name => G_PKG_NAME||'.Validate_From_To'
2790: ,p_error_type => BIS_UTILITIES_PUB.G_ERROR
2791: ,p_error_table => l_error_tbl
2792: ,x_error_table => x_error_tbl
2793: );
2794: RAISE FND_API.G_EXC_ERROR;
2795: WHEN OTHERS THEN
2796: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2797: BIS_UTILITIES_PVT.Add_Error_Message (
2798: p_error_msg_id => SQLCODE
2792: ,x_error_table => x_error_tbl
2793: );
2794: RAISE FND_API.G_EXC_ERROR;
2795: WHEN OTHERS THEN
2796: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2797: BIS_UTILITIES_PVT.Add_Error_Message (
2798: p_error_msg_id => SQLCODE
2799: ,p_error_description => SQLERRM
2800: ,p_error_proc_name => G_PKG_NAME||'.Validate_From_To'
2800: ,p_error_proc_name => G_PKG_NAME||'.Validate_From_To'
2801: ,p_error_table => l_error_tbl
2802: ,x_error_table => x_error_tbl
2803: );
2804: RAISE FND_API.G_EXC_ERROR;
2805: END Validate_From_To;
2806:
2807: --=============================================================================
2808: --This is the java wrapper for bucket customization UI.
2911: x_error_msg := l_error_tbl(1).Error_Msg_Name;
2912: END IF;
2913:
2914: EXCEPTION
2915: WHEN FND_API.G_EXC_ERROR THEN
2916: x_return_status := FND_API.G_RET_STS_ERROR ;
2917: IF (l_error_tbl.EXISTS(1)) THEN
2918: x_error_msg := l_error_tbl(1).Error_Msg_Name;
2919: END IF;
2912: END IF;
2913:
2914: EXCEPTION
2915: WHEN FND_API.G_EXC_ERROR THEN
2916: x_return_status := FND_API.G_RET_STS_ERROR ;
2917: IF (l_error_tbl.EXISTS(1)) THEN
2918: x_error_msg := l_error_tbl(1).Error_Msg_Name;
2919: END IF;
2920: WHEN OTHERS THEN
2917: IF (l_error_tbl.EXISTS(1)) THEN
2918: x_error_msg := l_error_tbl(1).Error_Msg_Name;
2919: END IF;
2920: WHEN OTHERS THEN
2921: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2922: IF (l_error_tbl.EXISTS(1)) THEN
2923: x_error_msg := l_error_tbl(1).Error_Msg_Name;
2924: END IF;
2925: END VALIDATE_BUCKET_WRAPPER;
2962: l_bucket_ranges_tbl BIS_BUCKET_PVT.BIS_BUCKET_RANGES_TBL;
2963:
2964: BEGIN
2965:
2966: x_return_status := FND_API.G_RET_STS_SUCCESS;
2967: FND_MSG_PUB.Initialize;
2968:
2969: l_bis_bucket_rec := p_bis_bucket_rec;
2970:
2977: ,p_error_type => BIS_UTILITIES_PUB.G_ERROR
2978: ,p_error_table => l_error_tbl
2979: ,x_error_table => x_error_tbl
2980: );
2981: RAISE FND_API.G_EXC_ERROR;
2982: END IF;
2983:
2984: IF NOT ( CHECK_RANGE_NAME(p_bis_bucket_rec => l_bis_bucket_rec) ) THEN
2985: l_error_tbl := x_error_tbl;
2990: ,p_error_type => BIS_UTILITIES_PUB.G_ERROR
2991: ,p_error_table => l_error_tbl
2992: ,x_error_table => x_error_tbl
2993: );
2994: RAISE FND_API.G_EXC_ERROR;
2995: END IF;
2996:
2997: IF NOT ( CHECK_RANGE_VAL_HIGH(p_bis_bucket_rec => l_bis_bucket_rec) ) THEN
2998: l_error_tbl := x_error_tbl;
3003: ,p_error_type => BIS_UTILITIES_PUB.G_ERROR
3004: ,p_error_table => l_error_tbl
3005: ,x_error_table => x_error_tbl
3006: );
3007: RAISE FND_API.G_EXC_ERROR;
3008: END IF;
3009:
3010: IF NOT ( CHECK_RANGE_VAL_LOW(p_bis_bucket_rec => l_bis_bucket_rec) ) THEN
3011: l_error_tbl := x_error_tbl;
3016: ,p_error_type => BIS_UTILITIES_PUB.G_ERROR
3017: ,p_error_table => l_error_tbl
3018: ,x_error_table => x_error_tbl
3019: );
3020: RAISE FND_API.G_EXC_ERROR;
3021: END IF;
3022:
3023: Populate_Loc_Bucket_Range_Tbl (
3024: p_bis_bucket_rec => l_bis_bucket_rec
3055:
3056: --dbms_output.put_line( 'x_return_status(Disc) is ' || x_return_status);
3057:
3058: EXCEPTION
3059: WHEN FND_API.G_EXC_ERROR THEN
3060: x_return_status := FND_API.G_RET_STS_ERROR ;
3061: --dbms_output.put_line( 'x_return_status (Not wrapper) is ' || x_return_status);
3062: RAISE FND_API.G_EXC_ERROR;
3063: WHEN OTHERS THEN
3056: --dbms_output.put_line( 'x_return_status(Disc) is ' || x_return_status);
3057:
3058: EXCEPTION
3059: WHEN FND_API.G_EXC_ERROR THEN
3060: x_return_status := FND_API.G_RET_STS_ERROR ;
3061: --dbms_output.put_line( 'x_return_status (Not wrapper) is ' || x_return_status);
3062: RAISE FND_API.G_EXC_ERROR;
3063: WHEN OTHERS THEN
3064: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3058: EXCEPTION
3059: WHEN FND_API.G_EXC_ERROR THEN
3060: x_return_status := FND_API.G_RET_STS_ERROR ;
3061: --dbms_output.put_line( 'x_return_status (Not wrapper) is ' || x_return_status);
3062: RAISE FND_API.G_EXC_ERROR;
3063: WHEN OTHERS THEN
3064: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3065: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3066: END Validate_Bucket_Common;
3060: x_return_status := FND_API.G_RET_STS_ERROR ;
3061: --dbms_output.put_line( 'x_return_status (Not wrapper) is ' || x_return_status);
3062: RAISE FND_API.G_EXC_ERROR;
3063: WHEN OTHERS THEN
3064: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3065: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3066: END Validate_Bucket_Common;
3067: --=============================================================================
3068:
3061: --dbms_output.put_line( 'x_return_status (Not wrapper) is ' || x_return_status);
3062: RAISE FND_API.G_EXC_ERROR;
3063: WHEN OTHERS THEN
3064: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3065: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3066: END Validate_Bucket_Common;
3067: --=============================================================================
3068:
3069: