[Home] [Help]
1: package body CTO_WORKBENCH_UTIL_PK as
2: /* $Header: CTOWBUTB.pls 120.15.12020000.2 2012/07/05 09:41:41 ntungare ship $ */
3: /********************************************************************************************************
4: | Copyright (c) 1993 Oracle Corporation Belmont, California, USA |
5: | All rights reserved, |
217:
218: --
219: -- Get source document id
220: --
221: l_source_document_type_id := CTO_WORKBENCH_UTIL_PK.get_source_document_id ( pLineId => l_demand_line_id );
222:
223:
224: select nvl(sum(reservation_quantity),0)
225: into v_wip_quantity
702: and supply_source_TYpe_id = 13
703: group by primary_uom_code;
704:
705: If l_prim_rsv_qty <> 0 then
706: select CTO_WORKBENCH_UTIL_PK.convert_uom(l_prim_uom_code,
707: oel.order_quantity_uom,
708: nvl(l_prim_rsv_qty,0),
709: oel.inventory_item_id)
710: into l_rsv_qty
781: Select max(exp_comp_date) into l_date
782: from
783: (SELECT wdj.scheduled_completion_date exp_comp_date
784: FROM mtl_reservations mr, wip_discrete_jobs wdj
785: WHERE mr.demand_source_type_id = decode(CTO_WORKBENCH_UTIL_PK.get_source_document_id(l_config_line_id), 10,8,2)
786: AND mr.demand_source_line_id = l_config_line_id
787: AND mr.supply_source_type_id = 5
788: AND wdj.wip_entity_id = mr.supply_source_header_id
789: AND wdj.organization_id = mr.organization_id
904: and supply_source_TYpe_id = 27
905: group by primary_uom_code;
906:
907: If l_prim_rsv_qty <> 0 then
908: select CTO_WORKBENCH_UTIL_PK.convert_uom(l_prim_uom_code,
909: oel.order_quantity_uom,
910: nvl(l_prim_rsv_qty,0),
911: oel.inventory_item_id)
912: into l_rsv_qty
1060:
1061: END IF; /* if service number is not null */
1062: return l_concat_value;
1063: End Get_order_line_number;
1064: End CTO_WORKBENCH_UTIL_PK;