210: AND vr.recipe_validity_rule_id = vVR_id;
211:
212: -- Recipe being changed to ON-HOLD - check for less than ON-HOLD and FROZEN
213: Cursor check_val_rules_800(vEntity_id NUMBER) IS
214: SELECT 1 from sys.dual
215: WHERE EXISTS (
216: SELECT recipe_validity_rule_id
217: FROM gmd_status s, gmd_recipe_validity_rules v
218: WHERE recipe_id = vEntity_id
221: OR s.status_type = '900') );
222:
223: -- Recipe being FROZEN - check for less than ON-HOLD (as on-hold stays on-hold )
224: Cursor check_val_rules_900(vEntity_id NUMBER) IS
225: SELECT 1 from sys.dual
226: WHERE EXISTS (
227: SELECT recipe_validity_rule_id
228: FROM gmd_status s, gmd_recipe_validity_rules v
229: WHERE recipe_id = vEntity_id
231: AND to_number(s.status_type) < to_number('800') );
232:
233: -- Recipe being OBSOLETED - thus check for less than obsolete
234: Cursor check_val_rules_1000(vEntity_id NUMBER) IS
235: SELECT 1 from sys.dual
236: WHERE EXISTS (
237: SELECT recipe_validity_rule_id
238: FROM gmd_status s, gmd_recipe_validity_rules v
239: WHERE recipe_id = vEntity_id
626: 'RECIPE','GMD_RECIPE_BTCH_DEP',
627: 'OPERATION','GMD_OPERATION_INUSE',
628: 'ROUTING','GMD_ROUTING_INUSE',
629: 'VALIDITY','GMD_VR_BTCH_DEP') INTO l_mesg_text
630: FROM sys.dual;
631:
632: IF l_entity_name IN ('FORMULA','OPERATION','ROUTING') THEN
633: FND_MESSAGE.SET_NAME('GMD',l_mesg_text);
634: FND_MSG_PUB.ADD;
656: 'RECIPE',3,
657: 'OPERATION',2,
658: 'ROUTING',4,
659: 'VALIDITY',5) INTO l_entity_value
660: FROM sys.dual;
661:
662: IF NOT ( GMD_STATUS_CODE.CHECK_DEPENDENT_STATUS
663: (l_entity_value,
664: l_entity_id,
939: 'RECIPE','GMD_RECIPES_B',
940: 'OPERATION','GMD_OPERATIONS_B',
941: 'ROUTING','GMD_ROUTINGS_B',
942: 'VALIDITY','GMD_RECIPE_VALIDITY_RULES') INTO l_table_name
943: FROM sys.dual;
944: gmd_api_grp.log_message('GMD_RECORD_LOCKED',
945: 'TABLE_NAME',l_table_name,
946: 'KEY',NVL(p_entity_id, l_entity_id)
947: );