[Home] [Help]
92: l_status_type NUMBER ;
93: l_we_entity_type NUMBER ;
94:
95:
96: v_resource_code BOM_RESOURCES.RESOURCE_CODE%TYPE;
97:
98: --added the cursor in the declare section instead of putting inline cursors
99: CURSOR c_res_in_bom_cur IS --rhshriva
100: Select resource_id,resource_code
97:
98: --added the cursor in the declare section instead of putting inline cursors
99: CURSOR c_res_in_bom_cur IS --rhshriva
100: Select resource_id,resource_code
101: from bom_resources
102: where organization_id =p_organization_id;
103:
104: CURSOR c_res_cur IS --rhshriva
105: select br.resource_id,br.resource_code,br.resource_type
105: select br.resource_id,br.resource_code,br.resource_type
106: from
107: cst_activities ca,
108: bom_department_resources bdr,
109: bom_resources br
110: where br.organization_id = p_organization_id
111: and bdr.department_id = (select department_id
112: from wip_operations
113: where organization_id = p_organization_id
123: select wor.resource_seq_num,
124: br.resource_code,
125: br.resource_id
126: from cst_activities ca,
127: bom_resources br,
128: wip_operation_resources wor
129: where wor.repetitive_schedule_id is null
130: and br.organization_id = wor.organization_id
131: and wor.resource_id = br.resource_id
143: where muom.uom_code = muc.uom_code
144: and muc.inventory_item_id = 0
145: and nvl(muc.disable_date,sysdate+1) >sysdate
146: and muc.uom_class in (select muc2.uom_class
147: from mtl_uom_conversions muc2,bom_resources br
148: where muc2.inventory_item_id = 0
149: and muc2.uom_code = br.unit_of_measure
150: and br.resource_id = l_temp_res_id1);
151:
250: resource_exists := 1;
251:
252: l_stmt_num := 70;
253:
254: -- Check whether the resource code entered is valid and matches with a resource in BOM_RESOURCES
255: open c_res_cur ;
256:
257: l_stmt_num := 75;
258:
308:
309: -- Check the resource code - resource sequence combination, in order to verify any illegal entry throgh the JSP
310:
311: if (p_resource_code is not null) then
312: select resource_id into l_resource_id from bom_resources where resource_code = p_resource_code and organization_id = p_organization_id ;
313: end if;
314:
315: if(l_resource_id <> 0 and l_resource_seq_num is null) then
316:
851: l_standard_rate_flag
852: from
853: cst_activities ca,
854: bom_department_resources bdr,
855: bom_resources br
856: where br.organization_id = l_organization_id
857: and bdr.department_id = (select department_id
858: from wip_operations
859: where organization_id = l_organization_id