[Home] [Help]
1: PACKAGE BODY CSP_SUPERSESSIONS_PVT AS
2: /* $Header: cspgsupb.pls 120.2 2006/12/05 18:49:37 jjalla noship $ */
3: -- Start of Comments
4: -- Package name : CSP_SUPERSESSIONS_PVT
5: -- Purpose :
1: PACKAGE BODY CSP_SUPERSESSIONS_PVT AS
2: /* $Header: cspgsupb.pls 120.2 2006/12/05 18:49:37 jjalla noship $ */
3: -- Start of Comments
4: -- Package name : CSP_SUPERSESSIONS_PVT
5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments
263: --dbms_output.put_line('scrap-- '|| l_scrap);
264: END LOOP;
265: CLOSE is_item_scrap;
266: IF l_scrap = 'N' THEN
267: CSP_SUPERSESSIONS_PVT.parse_supply_chain(p_org_id => p_planned_org_id
268: ,p_sub_inventory => p_planned_subinv_code
269: ,p_inventory_item_id => l_inventory_item_Id
270: ,p_bilateral => FALSE
271: ,p_rop => l_rop
352: --- OPEN bilateral_relation_item(l_inventory_item_id , l_master_org_id,l_inventory_item_id);
353: LOOP
354: FETCH l_cur INTO l_bilateral_item;
355: EXIT WHEN l_cur % NOTFOUND;
356: CSP_SUPERSESSIONS_PVT.parse_supply_chain(p_org_id => p_planned_org_id
357: ,p_sub_inventory => NULL
358: ,p_inventory_item_id => l_bilateral_item
359: ,p_bilateral => TRUE
360: ,p_supply_level => NULL
1185: END LOOP;
1186: END check_for_supersede_item;
1187: PROCEDURE get_supersede_bilateral_items(p_inventory_item_id IN NUMBER
1188: ,p_organization_id IN NUMBER
1189: ,x_supersede_items OUT NOCOPY CSP_SUPERSESSIONS_PVT.number_arr)
1190: IS
1191: l_temp_replaced_item NUMBER;
1192: l_replacing_item NUMBER;
1193: l_master_org NUMBER;
1535: END IF;
1536: END LOOP;
1537: END LOOP;
1538: END check_for_duplicate_parts;
1539: END CSP_SUPERSESSIONS_PVT;