Select Inventory_Product_Code_API.Get_Description(IP.PART_PRODUCT_CODE) Product_Code,
       RO.Part_No,
       INVENTORY_PART_API.Get_Description(RO.contract, RO.PART_NO) Description,
       RO.Contract Site,
       RO.Alternative_No Alt,
       RO.BOM_Type,
       RO.WORK_CENTER_NO Work_Center,
       RO.MACHINE_NO Machine,
       ROT.tool_id Tool,
       RO.EFFICIENCY_FACTOR Efficiency,
       RO.RUN_TIME_CODE,
       RO.MACH_RUN_FACTOR Run_Factor,
       RO.CREW_SIZE,
       to_char(RO.PHASE_IN_DATE, 'yyyy-mm-dd') Phase_In,
       to_Char(RO.PHASE_OUT_DATE, 'yyyy-mm-dd') Phase_Out,
       IP.C_RESIN_TYPE Resin_Type,
       IP.C_RESIN_WEIGHT Resin_Weight

  From Routing_Operation_Tool ROT,
       MANUF_TOOL             MT,
       ROUTING_OPERATION      RO,
       Inventory_Part_cfv     IP

 Where MT.Tool_Type = 'MOLD'
   and ROT.Tool_id = MT.Tool_ID
   and ROT.contract = MT.contract
   and ROT.Contract = RO.Contract
   and ROT.Part_No = RO.Part_No
   and ROT.BOM_Type = RO.BOM_Type
   and ROT.Alternative_No = RO.Alternative_No
   and ROT.Operation_No = RO.Operation_No
   and ROT.Routing_Revision = RO.Routing_Revision
   and IP.CONTRACT LIKE '%&CONTRACT%'
   and RO.Operation_No = '10'
   and RO.Contract = IP.Contract
   and RO.Part_No = IP.Part_No
   and IP.PART_STATUS = 'A'
   and (RO.PHASE_OUT_DATE is null or
       to_Char(RO.PHASE_OUT_DATE, 'yyyy-mm-dd') >=
       to_char(Sysdate, 'yyyy-mm-dd'))

 Order by Inventory_Product_Code_API.Get_Description(IP.PART_PRODUCT_CODE),
          ROT.tool_id,
          RO.Part_No