1 PACKAGE BODY FLM_KANBAN_WORKBENCH_UTIL AS
2 /* $Header: FLMWBUTB.pls 115.0 99/09/07 14:42:45 porting ship $ */
3
4 FUNCTION Get_Category_Id( p_plan_id IN NUMBER,
5 p_organization_id IN NUMBER,
6 p_component_item_id IN NUMBER )
7 RETURN NUMBER IS
8 l_category_id NUMBER:= NULL;
9 BEGIN
10 SELECT DISTINCT(component_category_id)
11 INTO l_category_id
12 FROM MRP_LOW_LEVEL_CODES
13 WHERE plan_id = p_plan_id
14 AND organization_id = p_organization_id
15 AND component_item_id = p_component_item_id;
16 return l_category_id;
17 END Get_Category_Id;
18 END FLM_KANBAN_WORKBENCH_UTIL;