[Home] [Help]
1777: --
1778: -- bug 6617686
1779: -- The MRP API uses a ASSIGNMENT_ID = p_Assignment_Id OR
1780: -- ASSIGNMENT_SET_ID = p_Assignment_Set_Id that leads to
1781: -- a full table scan on MRP_SR_ASSIGNMENTS and consequent
1782: -- performance issues. Since CTO does not pass ASSIGNMENT_SET_ID
1783: -- into the procedure, it is performance effective to directly
1784: -- query the MRP table
1785: -- ntungare
1859: , lAssignmentRec.SECONDARY_INVENTORY
1860: , lAssignmentRec.SHIP_TO_SITE_ID
1861: , lAssignmentRec.SOURCING_RULE_ID
1862: , lAssignmentRec.SOURCING_RULE_TYPE
1863: FROM MRP_SR_ASSIGNMENTS
1864: WHERE ASSIGNMENT_ID = lAssignmentId;
1865:
1866: IF PG_DEBUG <> 0 THEN
1867: oe_debug_pub.add('populate_plan_level: ' || 'after query row',2);
1894: -- bug 6617686
1895: IF pConfigId IS NOT NULL THEN
1896: select 1
1897: into lAssignmentExists
1898: from mrp_sr_assignments
1899: where assignment_set_id = lAssignmentRec.assignment_set_id
1900: and assignment_type = lAssignmentRec.assignment_type
1901: and nvl(organization_id,-1) = nvl(lAssignmentRec.organization_id,-1)
1902: and nvl(customer_id,-1) = nvl(lAssignmentRec.customer_id,-1)
1906: and nvl(category_id,-1) = nvl(lAssignmentRec.category_id,-1);
1907: ELSE
1908: select 1
1909: into lAssignmentExists
1910: from mrp_sr_assignments
1911: where assignment_set_id = lAssignmentRec.assignment_set_id
1912: and assignment_type = lAssignmentRec.assignment_type
1913: and nvl(organization_id,-1) = nvl(lAssignmentRec.organization_id,-1)
1914: and nvl(customer_id,-1) = nvl(lAssignmentRec.customer_id,-1)
1939:
1940: --
1941: -- get assignment id for config item
1942: --
1943: SELECT mrp_sr_assignments_s.nextval
1944: INTO lConfigAssignmentId
1945: FROM DUAL;
1946:
1947: --