[Home] [Help]
1: package body CTO_WORKBENCH_UTIL_PK as
2: /* $Header: CTOWBUTB.pls 120.11.12010000.2 2008/08/20 15:42:46 ntungare ship $ */
3: /********************************************************************************************************
4: | Copyright (c) 1993 Oracle Corporation Belmont, California, USA |
5: | All rights reserved, |
214:
215: --
216: -- Get source document id
217: --
218: l_source_document_type_id := CTO_WORKBENCH_UTIL_PK.get_source_document_id ( pLineId => l_demand_line_id );
219:
220:
221: select nvl(sum(reservation_quantity),0)
222: into v_wip_quantity
633: and supply_source_TYpe_id = 13
634: group by primary_uom_code;
635:
636: If l_prim_rsv_qty <> 0 then
637: select CTO_WORKBENCH_UTIL_PK.convert_uom(l_prim_uom_code,
638: oel.order_quantity_uom,
639: nvl(l_prim_rsv_qty,0),
640: oel.inventory_item_id)
641: into l_rsv_qty
691: Select max(exp_comp_date) into l_date
692: from
693: (SELECT wdj.scheduled_completion_date exp_comp_date
694: FROM mtl_reservations mr, wip_discrete_jobs wdj
695: WHERE mr.demand_source_type_id = decode(CTO_WORKBENCH_UTIL_PK.get_source_document_id(l_config_line_id), 10,8,2)
696: AND mr.demand_source_line_id = l_config_line_id
697: AND mr.supply_source_type_id = 5
698: AND wdj.wip_entity_id = mr.supply_source_header_id
699: AND wdj.organization_id = mr.organization_id
814: and supply_source_TYpe_id = 27
815: group by primary_uom_code;
816:
817: If l_prim_rsv_qty <> 0 then
818: select CTO_WORKBENCH_UTIL_PK.convert_uom(l_prim_uom_code,
819: oel.order_quantity_uom,
820: nvl(l_prim_rsv_qty,0),
821: oel.inventory_item_id)
822: into l_rsv_qty
959:
960: END IF; /* if service number is not null */
961: return l_concat_value;
962: End Get_order_line_number;
963: End CTO_WORKBENCH_UTIL_PK;