[Home] [Help]
535: l_check_for_given_grade VARCHAR2(1) := 'N';
536: l_check_for_null_grade VARCHAR2(1) := 'N';
537: l_check_for_default_grade VARCHAR2(1) := 'N';
538: l_recipe_no GMD_RECIPES_B.recipe_no%TYPE;
539: l_formula_no FM_FORM_MST_B.formula_no%TYPE;
540: l_routing_no GMD_ROUTINGS_B.routing_no%TYPE;
541: l_oprn_no GMD_OPERATIONS_B.oprn_no%TYPE;
542: l_recipe_version GMD_RECIPES_B.recipe_version%TYPE;
543: l_formula_vers FM_FORM_MST_B.formula_vers%TYPE;
539: l_formula_no FM_FORM_MST_B.formula_no%TYPE;
540: l_routing_no GMD_ROUTINGS_B.routing_no%TYPE;
541: l_oprn_no GMD_OPERATIONS_B.oprn_no%TYPE;
542: l_recipe_version GMD_RECIPES_B.recipe_version%TYPE;
543: l_formula_vers FM_FORM_MST_B.formula_vers%TYPE;
544: l_routing_vers GMD_ROUTINGS_B.routing_vers%TYPE;
545: l_oprn_vers GMD_OPERATIONS_B.oprn_vers%TYPE;
546: l_step_no NUMBER(10);
547:
670:
671: IF p_wip_spec_rec.formula_id IS NOT NULL AND p_wip_spec_rec.formula_no IS NULL AND p_wip_spec_rec.formula_vers IS NULL THEN
672: BEGIN
673: SELECT formula_no,formula_vers INTO l_formula_no,l_formula_vers
674: FROM fm_form_mst_b
675: WHERE formula_id = p_wip_spec_rec.formula_id;
676:
677: EXCEPTION
678: WHEN OTHERS THEN