DBA Data[Home] [Help]

APPS.AHL_UC_TREE_PVT dependencies on AHL_UTIL_UC_PKG

Line 738: NOT ahl_util_uc_pkg.extra_node(l_non_leaf_node.instance_id, l_root_instance_id)) THEN

734: FOR l_non_leaf_node IN get_non_leaf_nodes(l_root_instance_id) LOOP
735:
736: --dbms_output.put_line('rel_id='||l_non_leaf_node.relationship_id||' uc_instance='||l_root_instance_id);
737: IF (l_non_leaf_node.relationship_id IS NOT NULL AND
738: NOT ahl_util_uc_pkg.extra_node(l_non_leaf_node.instance_id, l_root_instance_id)) THEN
739:
740: --If the UC instance happens to be the top node of a sub UC, then when getting the
741: --MC descendants, the sub UC top node's relationship_id(got from uc headers table)
742: --instead of the relationship_id(got from position_reference in csi_ii_relationships)

Line 749: ahl_util_uc_pkg.get_parent_uc_header(l_non_leaf_node.instance_id, l_uc_header_id, l_dummy_num);

745: FETCH check_sub_uc INTO l_uc_header_id, l_mc_header_id, l_relationship_id;
746:
747: IF check_sub_uc%NOTFOUND THEN --not a sub UC's top node
748: l_relationship_id := l_non_leaf_node.relationship_id;
749: ahl_util_uc_pkg.get_parent_uc_header(l_non_leaf_node.instance_id, l_uc_header_id, l_dummy_num);
750:
751: IF l_uc_header_id IS NULL THEN
752: l_uc_header_id := p_uc_header_id;
753: END IF;

Line 1386: IF (ahl_util_uc_pkg.IS_UNIT_QUARANTINED(p_unit_header_id => p_uc_header_id , p_instance_id => null) = FND_API.G_TRUE) THEN

1382: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1383: ELSE
1384:
1385: -- ACL :: Changes for R12
1386: IF (ahl_util_uc_pkg.IS_UNIT_QUARANTINED(p_unit_header_id => p_uc_header_id , p_instance_id => null) = FND_API.G_TRUE) THEN
1387: FND_MESSAGE.set_name( 'AHL','AHL_UC_INVALID_Q_ACTION' );
1388: FND_MSG_PUB.add;
1389: CLOSE check_uc_header;
1390: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1393: ahl_util_uc_pkg.get_root_uc_attr(p_uc_header_id,

1389: CLOSE check_uc_header;
1390: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1391: END IF;
1392:
1393: ahl_util_uc_pkg.get_root_uc_attr(p_uc_header_id,
1394: l_root_uc_header_id,
1395: l_root_instance_id,
1396: l_root_uc_status_code,
1397: l_root_active_uc_status_code,

Line 1447: AHL_UTIL_UC_PKG.getcsi_transaction_id('UC_UPDATE',l_transaction_type_id, l_return_value);

1443: END IF;
1444:
1445: --The following lines are used to update the position_reference column in csi_ii_relationships
1446: --First, get transaction_type_id .
1447: AHL_UTIL_UC_PKG.getcsi_transaction_id('UC_UPDATE',l_transaction_type_id, l_return_value);
1448: IF NOT l_return_value THEN
1449: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1450: END IF;
1451:

Line 1457: l_item_match := AHL_UTIL_UC_PKG.item_match(l_mc_top_rel_id,

1453: --and position_reference
1454: IF p_uc_header_id = l_root_uc_header_id THEN
1455: --Standalone UC or UC installed in a CSI instance, only need to check whether
1456: --item match for the top node
1457: l_item_match := AHL_UTIL_UC_PKG.item_match(l_mc_top_rel_id,
1458: l_uc_header_attr.inventory_item_id,
1459: l_uc_header_attr.inventory_org_id,
1460: l_uc_header_attr.inventory_revision,
1461: l_uc_header_attr.quantity,

Line 1477: ahl_util_uc_pkg.get_parent_uc_header(l_uc_header_attr.instance_id,

1473: NULL;
1474: END IF;
1475: ELSIF (p_uc_header_id <> l_root_uc_header_id) THEN
1476: --Sub unit installed on another unit, either extra node or non extra node
1477: ahl_util_uc_pkg.get_parent_uc_header(l_uc_header_attr.instance_id,
1478: l_parent_uc_header_id,
1479: l_parent_instance_id);
1480: --Get its parent_instance_id in order to check whether it is an extra node within
1481: --the context of its parent UC

Line 1482: IF NOT ahl_util_uc_pkg.extra_node(l_uc_header_attr.instance_id, l_parent_instance_id) THEN

1478: l_parent_uc_header_id,
1479: l_parent_instance_id);
1480: --Get its parent_instance_id in order to check whether it is an extra node within
1481: --the context of its parent UC
1482: IF NOT ahl_util_uc_pkg.extra_node(l_uc_header_attr.instance_id, l_parent_instance_id) THEN
1483: --Non extra sub unit within the context of its parent unit
1484: --Get its position_reference
1485: OPEN get_position_reference(l_parent_instance_id, l_uc_header_attr.instance_id);
1486: FETCH get_position_reference INTO l_position_info;

Line 1508: l_item_match := AHL_UTIL_UC_PKG.item_match(l_mc_top_rel_id,

1504: END IF;
1505: END LOOP;
1506: IF NOT l_boolean_var THEN
1507: --Again check whether item match
1508: l_item_match := AHL_UTIL_UC_PKG.item_match(l_mc_top_rel_id,
1509: l_uc_header_attr.inventory_item_id,
1510: l_uc_header_attr.inventory_org_id,
1511: l_uc_header_attr.inventory_revision,
1512: l_uc_header_attr.quantity,

Line 1555: l_item_match := AHL_UTIL_UC_PKG.item_match(l_mc_top_rel_id,

1551: NULL;
1552: END IF;
1553: ELSE
1554: --Extra node and check whether item match
1555: l_item_match := AHL_UTIL_UC_PKG.item_match(l_mc_top_rel_id,
1556: l_uc_header_attr.inventory_item_id,
1557: l_uc_header_attr.inventory_org_id,
1558: l_uc_header_attr.inventory_revision,
1559: l_uc_header_attr.quantity,

Line 1601: ahl_util_uc_pkg.copy_uc_header_to_history(p_uc_header_id, l_return_status);

1597: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1598: END IF;
1599:
1600: --Copy the change to UC history table
1601: ahl_util_uc_pkg.copy_uc_header_to_history(p_uc_header_id, l_return_status);
1602: --IF history copy failed, then don't raise exception, just add the messageto the message stack
1603: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1604: FND_MESSAGE.set_name('AHL', 'AHL_UC_HISTORY_COPY_FAILED');
1605: FND_MSG_PUB.add;

Line 1672: l_matched := AHL_UTIL_UC_PKG.item_match(l_mc_children_tbl(i).relationship_id,

1668: EXIT OUTER;
1669: END IF;
1670: END LOOP;
1671: ELSE
1672: l_matched := AHL_UTIL_UC_PKG.item_match(l_mc_children_tbl(i).relationship_id,
1673: l_get_csi_child.inventory_item_id,
1674: l_get_csi_child.inventory_org_id,
1675: l_get_csi_child.inventory_revision,
1676: l_get_csi_child.quantity,

Line 1779: ahl_util_uc_pkg.copy_uc_header_to_history(l_root_uc_header_id, l_return_status);

1775: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1776: END IF;
1777:
1778: --Copy the change to UC history table
1779: ahl_util_uc_pkg.copy_uc_header_to_history(l_root_uc_header_id, l_return_status);
1780: --IF history copy failed, then don't raise exception, just add the messageto the message stack
1781: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1782: FND_MESSAGE.set_name('AHL', 'AHL_UC_HISTORY_COPY_FAILED');
1783: FND_MSG_PUB.add;

Line 1802: ahl_util_uc_pkg.copy_uc_header_to_history(l_root_uc_header_id, l_return_status);

1798: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1799: END IF;
1800:
1801: --Copy the change to UC history table
1802: ahl_util_uc_pkg.copy_uc_header_to_history(l_root_uc_header_id, l_return_status);
1803: --IF history copy failed, then don't raise exception, just add the messageto the message stack
1804: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1805: FND_MESSAGE.set_name('AHL', 'AHL_UC_HISTORY_COPY_FAILED');
1806: FND_MSG_PUB.add;

Line 1826: ahl_util_uc_pkg.copy_uc_header_to_history(l_root_uc_header_id, l_return_status);

1822: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1823: END IF;
1824:
1825: --Copy the change to UC history table
1826: ahl_util_uc_pkg.copy_uc_header_to_history(l_root_uc_header_id, l_return_status);
1827: --IF history copy failed, then don't raise exception, just add the messageto the message stack
1828: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1829: FND_MESSAGE.set_name('AHL', 'AHL_UC_HISTORY_COPY_FAILED');
1830: FND_MSG_PUB.add;

Line 2125: l_item_match := AHL_UTIL_UC_PKG.item_match(p_relationship_id,

2121: END IF;
2122:
2123: --For UC branch top node, only need to ensure item matches, no need to check position key
2124: --and position_reference
2125: l_item_match := AHL_UTIL_UC_PKG.item_match(p_relationship_id,
2126: l_check_uc_instance.inventory_item_id,
2127: l_check_uc_instance.inventory_org_id,
2128: l_check_uc_instance.inventory_revision,
2129: l_check_uc_instance.quantity,

Line 2204: l_matched := AHL_UTIL_UC_PKG.item_match(l_mc_children_tbl(i).relationship_id,

2200: EXIT OUTER;
2201: END IF;
2202: END LOOP;
2203: ELSE
2204: l_matched := AHL_UTIL_UC_PKG.item_match(l_mc_children_tbl(i).relationship_id,
2205: l_get_csi_child.inventory_item_id,
2206: l_get_csi_child.inventory_org_id,
2207: l_get_csi_child.inventory_revision,
2208: l_get_csi_child.quantity,

Line 2242: AHL_UTIL_UC_PKG.getcsi_transaction_id('UC_UPDATE',l_transaction_type_id, l_return_value);

2238: END IF; --whether the MC chilren node has already been matched
2239: END LOOP; --of all the MC children
2240: --The following lines are used to update the position_reference column in csi_ii_relationships
2241: --First, get transaction_type_id .
2242: AHL_UTIL_UC_PKG.getcsi_transaction_id('UC_UPDATE',l_transaction_type_id, l_return_value);
2243: IF NOT l_return_value THEN
2244: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2245: END IF;
2246: --Set the CSI transaction record

Line 2421: AHL_UTIL_UC_PKG.getcsi_transaction_id('UC_UPDATE', l_transaction_type_id, l_return_value);

2417: 'At the start of the procedure, p_instance_id = ' || p_instance_id || ', p_relationship_id = ' || p_relationship_id);
2418: END IF;
2419:
2420: -- Get the transaction_type_id for use later by the CSI_II_RELATIONSHIPS_PUB.update_relationship API
2421: AHL_UTIL_UC_PKG.getcsi_transaction_id('UC_UPDATE', l_transaction_type_id, l_return_value);
2422: IF NOT l_return_value THEN
2423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2424: END IF;
2425: l_csi_transaction_rec.transaction_type_id := l_transaction_type_id;

Line 2581: AHL_UTIL_UC_PKG.getcsi_transaction_id('UC_UPDATE', l_transaction_type_id, l_return_value);

2577: 'At the start of the procedure, p_x_extra_instances_tbl.count = ' || p_x_extra_instances_tbl.count || ',p_x_relations_tbl.count = ' ||p_x_relations_tbl.count);
2578: END IF;
2579:
2580: -- Get the transaction_type_id for use later by the CSI_II_RELATIONSHIPS_PUB.update_relationship API
2581: AHL_UTIL_UC_PKG.getcsi_transaction_id('UC_UPDATE', l_transaction_type_id, l_return_value);
2582: IF NOT l_return_value THEN
2583: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2584: END IF;
2585: l_csi_transaction_rec.transaction_type_id := l_transaction_type_id;

Line 2604: l_item_match := AHL_UTIL_UC_PKG.item_match(p_x_relations_tbl(j),

2600: CLOSE get_instance_dtls_csr;
2601: j := p_x_relations_tbl.FIRST;
2602: WHILE (j IS NOT NULL) LOOP
2603: -- See if instance i matches position j
2604: l_item_match := AHL_UTIL_UC_PKG.item_match(p_x_relations_tbl(j),
2605: l_instance_dtls.inventory_item_id,
2606: l_instance_dtls.inv_master_organization_id,
2607: l_instance_dtls.inventory_revision,
2608: l_instance_dtls.quantity,