DBA Data[Home] [Help]

APPS.AHL_UC_TREE_PVT dependencies on AHL_UTIL_UC_PKG

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

700: FOR l_non_leaf_node IN get_non_leaf_nodes(l_root_instance_id) LOOP
701:
702: --dbms_output.put_line('rel_id='||l_non_leaf_node.relationship_id||' uc_instance='||l_root_instance_id);
703: IF (l_non_leaf_node.relationship_id IS NOT NULL AND
704: NOT ahl_util_uc_pkg.extra_node(l_non_leaf_node.instance_id, l_root_instance_id)) THEN
705:
706: --If the UC instance happens to be the top node of a sub UC, then when getting the
707: --MC descendants, the sub UC top node's relationship_id(got from uc headers table)
708: --instead of the relationship_id(got from position_reference in csi_ii_relationships)

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

711: FETCH check_sub_uc INTO l_uc_header_id, l_mc_header_id, l_relationship_id;
712:
713: IF check_sub_uc%NOTFOUND THEN --not a sub UC's top node
714: l_relationship_id := l_non_leaf_node.relationship_id;
715: ahl_util_uc_pkg.get_parent_uc_header(l_non_leaf_node.instance_id, l_uc_header_id, l_dummy_num);
716:
717: IF l_uc_header_id IS NULL THEN
718: l_uc_header_id := p_uc_header_id;
719: END IF;

Line 1323: 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

1319: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1320: ELSE
1321:
1322: -- ACL :: Changes for R12
1323: 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
1324: FND_MESSAGE.set_name( 'AHL','AHL_UC_INVALID_Q_ACTION' );
1325: FND_MSG_PUB.add;
1326: CLOSE check_uc_header;
1327: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1330: ahl_util_uc_pkg.get_root_uc_attr(p_uc_header_id,

1326: CLOSE check_uc_header;
1327: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1328: END IF;
1329:
1330: ahl_util_uc_pkg.get_root_uc_attr(p_uc_header_id,
1331: l_root_uc_header_id,
1332: l_root_instance_id,
1333: l_root_uc_status_code,
1334: l_root_active_uc_status_code,

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

1380: END IF;
1381:
1382: --The following lines are used to update the position_reference column in csi_ii_relationships
1383: --First, get transaction_type_id .
1384: AHL_UTIL_UC_PKG.getcsi_transaction_id('UC_UPDATE',l_transaction_type_id, l_return_value);
1385: IF NOT l_return_value THEN
1386: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1387: END IF;
1388:

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

1390: --and position_reference
1391: IF p_uc_header_id = l_root_uc_header_id THEN
1392: --Standalone UC or UC installed in a CSI instance, only need to check whether
1393: --item match for the top node
1394: l_item_match := AHL_UTIL_UC_PKG.item_match(l_mc_top_rel_id,
1395: l_uc_header_attr.inventory_item_id,
1396: l_uc_header_attr.inventory_org_id,
1397: l_uc_header_attr.inventory_revision,
1398: l_uc_header_attr.quantity,

Line 1414: ahl_util_uc_pkg.get_parent_uc_header(l_uc_header_attr.instance_id,

1410: NULL;
1411: END IF;
1412: ELSIF (p_uc_header_id <> l_root_uc_header_id) THEN
1413: --Sub unit installed on another unit, either extra node or non extra node
1414: ahl_util_uc_pkg.get_parent_uc_header(l_uc_header_attr.instance_id,
1415: l_parent_uc_header_id,
1416: l_parent_instance_id);
1417: --Get its parent_instance_id in order to check whether it is an extra node within
1418: --the context of its parent UC

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

1415: l_parent_uc_header_id,
1416: l_parent_instance_id);
1417: --Get its parent_instance_id in order to check whether it is an extra node within
1418: --the context of its parent UC
1419: IF NOT ahl_util_uc_pkg.extra_node(l_uc_header_attr.instance_id, l_parent_instance_id) THEN
1420: --Non extra sub unit within the context of its parent unit
1421: --Get its position_reference
1422: OPEN get_position_reference(l_parent_instance_id, l_uc_header_attr.instance_id);
1423: FETCH get_position_reference INTO l_position_info;

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

1441: END IF;
1442: END LOOP;
1443: IF NOT l_boolean_var THEN
1444: --Again check whether item match
1445: l_item_match := AHL_UTIL_UC_PKG.item_match(l_mc_top_rel_id,
1446: l_uc_header_attr.inventory_item_id,
1447: l_uc_header_attr.inventory_org_id,
1448: l_uc_header_attr.inventory_revision,
1449: l_uc_header_attr.quantity,

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

1488: NULL;
1489: END IF;
1490: ELSE
1491: --Extra node and check whether item match
1492: l_item_match := AHL_UTIL_UC_PKG.item_match(l_mc_top_rel_id,
1493: l_uc_header_attr.inventory_item_id,
1494: l_uc_header_attr.inventory_org_id,
1495: l_uc_header_attr.inventory_revision,
1496: l_uc_header_attr.quantity,

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

1534: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1535: END IF;
1536:
1537: --Copy the change to UC history table
1538: ahl_util_uc_pkg.copy_uc_header_to_history(p_uc_header_id, l_return_status);
1539: --IF history copy failed, then don't raise exception, just add the messageto the message stack
1540: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1541: FND_MESSAGE.set_name('AHL', 'AHL_UC_HISTORY_COPY_FAILED');
1542: FND_MSG_PUB.add;

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

1605: EXIT OUTER;
1606: END IF;
1607: END LOOP;
1608: ELSE
1609: l_matched := AHL_UTIL_UC_PKG.item_match(l_mc_children_tbl(i).relationship_id,
1610: l_get_csi_child.inventory_item_id,
1611: l_get_csi_child.inventory_org_id,
1612: l_get_csi_child.inventory_revision,
1613: l_get_csi_child.quantity,

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

1712: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1713: END IF;
1714:
1715: --Copy the change to UC history table
1716: ahl_util_uc_pkg.copy_uc_header_to_history(l_root_uc_header_id, l_return_status);
1717: --IF history copy failed, then don't raise exception, just add the messageto the message stack
1718: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1719: FND_MESSAGE.set_name('AHL', 'AHL_UC_HISTORY_COPY_FAILED');
1720: FND_MSG_PUB.add;

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

1735: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1736: END IF;
1737:
1738: --Copy the change to UC history table
1739: ahl_util_uc_pkg.copy_uc_header_to_history(l_root_uc_header_id, l_return_status);
1740: --IF history copy failed, then don't raise exception, just add the messageto the message stack
1741: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1742: FND_MESSAGE.set_name('AHL', 'AHL_UC_HISTORY_COPY_FAILED');
1743: FND_MSG_PUB.add;

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

1759: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1760: END IF;
1761:
1762: --Copy the change to UC history table
1763: ahl_util_uc_pkg.copy_uc_header_to_history(l_root_uc_header_id, l_return_status);
1764: --IF history copy failed, then don't raise exception, just add the messageto the message stack
1765: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1766: FND_MESSAGE.set_name('AHL', 'AHL_UC_HISTORY_COPY_FAILED');
1767: FND_MSG_PUB.add;

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

2058: END IF;
2059:
2060: --For UC branch top node, only need to ensure item matches, no need to check position key
2061: --and position_reference
2062: l_item_match := AHL_UTIL_UC_PKG.item_match(p_relationship_id,
2063: l_check_uc_instance.inventory_item_id,
2064: l_check_uc_instance.inventory_org_id,
2065: l_check_uc_instance.inventory_revision,
2066: l_check_uc_instance.quantity,

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

2137: EXIT OUTER;
2138: END IF;
2139: END LOOP;
2140: ELSE
2141: l_matched := AHL_UTIL_UC_PKG.item_match(l_mc_children_tbl(i).relationship_id,
2142: l_get_csi_child.inventory_item_id,
2143: l_get_csi_child.inventory_org_id,
2144: l_get_csi_child.inventory_revision,
2145: l_get_csi_child.quantity,

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

2175: END IF; --whether the MC chilren node has already been matched
2176: END LOOP; --of all the MC children
2177: --The following lines are used to update the position_reference column in csi_ii_relationships
2178: --First, get transaction_type_id .
2179: AHL_UTIL_UC_PKG.getcsi_transaction_id('UC_UPDATE',l_transaction_type_id, l_return_value);
2180: IF NOT l_return_value THEN
2181: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2182: END IF;
2183: --Set the CSI transaction record

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

2354: 'At the start of the procedure, p_instance_id = ' || p_instance_id || ', p_relationship_id = ' || p_relationship_id);
2355: END IF;
2356:
2357: -- Get the transaction_type_id for use later by the CSI_II_RELATIONSHIPS_PUB.update_relationship API
2358: AHL_UTIL_UC_PKG.getcsi_transaction_id('UC_UPDATE', l_transaction_type_id, l_return_value);
2359: IF NOT l_return_value THEN
2360: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2361: END IF;
2362: l_csi_transaction_rec.transaction_type_id := l_transaction_type_id;

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

2514: '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);
2515: END IF;
2516:
2517: -- Get the transaction_type_id for use later by the CSI_II_RELATIONSHIPS_PUB.update_relationship API
2518: AHL_UTIL_UC_PKG.getcsi_transaction_id('UC_UPDATE', l_transaction_type_id, l_return_value);
2519: IF NOT l_return_value THEN
2520: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2521: END IF;
2522: l_csi_transaction_rec.transaction_type_id := l_transaction_type_id;

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

2537: CLOSE get_instance_dtls_csr;
2538: j := p_x_relations_tbl.FIRST;
2539: WHILE (j IS NOT NULL) LOOP
2540: -- See if instance i matches position j
2541: l_item_match := AHL_UTIL_UC_PKG.item_match(p_x_relations_tbl(j),
2542: l_instance_dtls.inventory_item_id,
2543: l_instance_dtls.inv_master_organization_id,
2544: l_instance_dtls.inventory_revision,
2545: l_instance_dtls.quantity,