117: * Parameters OUT: Error Text which will be populated in case of an
118: * unexpected error.
119: * Returns : True if the Wip_supply_Type exist else False
120: * Purpose : Verify that the value of Wip_Supply_Type is valid,
121: * by looking in the Table MFG_LOOKUPS with a Lookup
122: * Type of 'WIP_SUPPLY'
123: *********************************************************************/
124: FUNCTION Wip_Supply_Type ( p_wip_supply_type IN NUMBER
125: , x_err_text IN OUT NOCOPY VARCHAR2 )
135: END IF;
136:
137: SELECT 'VALID'
138: INTO l_dummy
139: FROM mfg_lookups
140: WHERE lookup_code = p_wip_supply_type
141: AND lookup_type = 'WIP_SUPPLY' ;
142:
143: RETURN TRUE;