40: WHERE formula_id = (SELECT formula_id FROM gmd_recipes_b
41: WHERE recipe_id = precipe_id)
42: AND line_type = 1);
43:
44: fnd_message.set_name('GMD', 'GMD_DELETE_RECIPE_FM_DEP');
45: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
46: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
47:
48: ELSIF(update_item = 'ROUTING') THEN
41: WHERE recipe_id = precipe_id)
42: AND line_type = 1);
43:
44: fnd_message.set_name('GMD', 'GMD_DELETE_RECIPE_FM_DEP');
45: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
46: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
47:
48: ELSIF(update_item = 'ROUTING') THEN
49: DELETE FROM gmd_recipe_routing_steps
54:
55: DELETE FROM gmd_recipe_orgn_resources
56: WHERE recipe_id = precipe_id;
57:
58: fnd_message.set_name('GMD', 'GMD_DELETE_RECIPE_RT_DEP');
59: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
60: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
61: END IF;
62:
55: DELETE FROM gmd_recipe_orgn_resources
56: WHERE recipe_id = precipe_id;
57:
58: fnd_message.set_name('GMD', 'GMD_DELETE_RECIPE_RT_DEP');
59: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
60: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
61: END IF;
62:
63: DELETE FROM gmd_recipe_step_materials
62:
63: DELETE FROM gmd_recipe_step_materials
64: WHERE recipe_id = precipe_id;
65:
66: fnd_message.set_name('GMD', 'GMD_DELETE_STEP_MAT_ASSOC');
67: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
68: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
69:
70: EXCEPTION
63: DELETE FROM gmd_recipe_step_materials
64: WHERE recipe_id = precipe_id;
65:
66: fnd_message.set_name('GMD', 'GMD_DELETE_STEP_MAT_ASSOC');
67: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
68: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
69:
70: EXCEPTION
71: WHEN OTHERS THEN
522: -- Making new line entry and prompting users about MSNR request
523: -- Bug# 5008299 Kapil M
524: -- Moved the code for log file so that it is shown for every replace
525: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
526: FND_MESSAGE.SET_NAME('GMD','GMD_MSNR_REPLACE_MESG');
527: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
528: FND_MESSAGE.SET_TOKEN('NAME',get_object_rec.object_name);
529: FND_MESSAGE.SET_TOKEN('VERSION',get_object_rec.object_vers);
530: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
523: -- Bug# 5008299 Kapil M
524: -- Moved the code for log file so that it is shown for every replace
525: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
526: FND_MESSAGE.SET_NAME('GMD','GMD_MSNR_REPLACE_MESG');
527: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
528: FND_MESSAGE.SET_TOKEN('NAME',get_object_rec.object_name);
529: FND_MESSAGE.SET_TOKEN('VERSION',get_object_rec.object_vers);
530: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
531: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
524: -- Moved the code for log file so that it is shown for every replace
525: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
526: FND_MESSAGE.SET_NAME('GMD','GMD_MSNR_REPLACE_MESG');
527: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
528: FND_MESSAGE.SET_TOKEN('NAME',get_object_rec.object_name);
529: FND_MESSAGE.SET_TOKEN('VERSION',get_object_rec.object_vers);
530: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
531: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
532: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
525: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
526: FND_MESSAGE.SET_NAME('GMD','GMD_MSNR_REPLACE_MESG');
527: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
528: FND_MESSAGE.SET_TOKEN('NAME',get_object_rec.object_name);
529: FND_MESSAGE.SET_TOKEN('VERSION',get_object_rec.object_vers);
530: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
531: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
532: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
533:
526: FND_MESSAGE.SET_NAME('GMD','GMD_MSNR_REPLACE_MESG');
527: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
528: FND_MESSAGE.SET_TOKEN('NAME',get_object_rec.object_name);
529: FND_MESSAGE.SET_TOKEN('VERSION',get_object_rec.object_vers);
530: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
531: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
532: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
533:
534: -- NPD Conv.
527: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
528: FND_MESSAGE.SET_TOKEN('NAME',get_object_rec.object_name);
529: FND_MESSAGE.SET_TOKEN('VERSION',get_object_rec.object_vers);
530: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
531: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
532: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
533:
534: -- NPD Conv.
535: -- Check if the Entity Owning organization is available for the responsibility
597: (get_object_rec.object_type,
598: get_object_rec.object_id,
599: l_dependent_val);
600: IF l_dependent_val THEN
601: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
602: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
603: END IF;
604: END IF;
605:
643: ||l_action_flag);
644: END IF;
645:
646: IF (l_action_flag = 'N') THEN
647: FND_MESSAGE.SET_NAME('GMD', 'GMD_REPLACE_NOT_ALLOWED');
648: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
649: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
650: FND_MESSAGE.SET_TOKEN('STATUS',get_status_meaning(l_status_type) );
651: FND_MSG_PUB.ADD;
644: END IF;
645:
646: IF (l_action_flag = 'N') THEN
647: FND_MESSAGE.SET_NAME('GMD', 'GMD_REPLACE_NOT_ALLOWED');
648: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
649: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
650: FND_MESSAGE.SET_TOKEN('STATUS',get_status_meaning(l_status_type) );
651: FND_MSG_PUB.ADD;
652: RAISE NO_UPDATE_EXCEPTION;
645:
646: IF (l_action_flag = 'N') THEN
647: FND_MESSAGE.SET_NAME('GMD', 'GMD_REPLACE_NOT_ALLOWED');
648: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
649: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
650: FND_MESSAGE.SET_TOKEN('STATUS',get_status_meaning(l_status_type) );
651: FND_MSG_PUB.ADD;
652: RAISE NO_UPDATE_EXCEPTION;
653: END IF;
646: IF (l_action_flag = 'N') THEN
647: FND_MESSAGE.SET_NAME('GMD', 'GMD_REPLACE_NOT_ALLOWED');
648: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
649: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
650: FND_MESSAGE.SET_TOKEN('STATUS',get_status_meaning(l_status_type) );
651: FND_MSG_PUB.ADD;
652: RAISE NO_UPDATE_EXCEPTION;
653: END IF;
654:
667: OPEN Cur_check_item(get_object_rec.object_id, get_object_rec.new_name);
668: FETCH Cur_check_item INTO l_itm_exists;
669: CLOSE Cur_check_item;
670: IF l_itm_exists <> 1 THEN
671: FND_MESSAGE.SET_NAME('gmd', 'GMD_FORMULA_ITMORG_NOT_FOUND');
672: FND_MESSAGE.SET_TOKEN('ITEM',get_item_no(get_object_rec.new_name));
673: FND_MESSAGE.SET_TOKEN('ORGN',get_orgn_code(l_orgn_id));
674: FND_MSG_PUB.ADD;
675: RAISE NO_UPDATE_EXCEPTION;
668: FETCH Cur_check_item INTO l_itm_exists;
669: CLOSE Cur_check_item;
670: IF l_itm_exists <> 1 THEN
671: FND_MESSAGE.SET_NAME('gmd', 'GMD_FORMULA_ITMORG_NOT_FOUND');
672: FND_MESSAGE.SET_TOKEN('ITEM',get_item_no(get_object_rec.new_name));
673: FND_MESSAGE.SET_TOKEN('ORGN',get_orgn_code(l_orgn_id));
674: FND_MSG_PUB.ADD;
675: RAISE NO_UPDATE_EXCEPTION;
676: END IF;
669: CLOSE Cur_check_item;
670: IF l_itm_exists <> 1 THEN
671: FND_MESSAGE.SET_NAME('gmd', 'GMD_FORMULA_ITMORG_NOT_FOUND');
672: FND_MESSAGE.SET_TOKEN('ITEM',get_item_no(get_object_rec.new_name));
673: FND_MESSAGE.SET_TOKEN('ORGN',get_orgn_code(l_orgn_id));
674: FND_MSG_PUB.ADD;
675: RAISE NO_UPDATE_EXCEPTION;
676: END IF;
677:
687: FETCH cur_item_ver_access INTO l_rev_access;
688: CLOSE cur_item_ver_access;
689: IF l_rev_access <> 1 THEN
690: -- Bug# 5198213 New message shown for items with revision
691: FND_MESSAGE.SET_NAME('GMD', 'GMD_FORMULA_ITMREV_NOT_FOUND');
692: FND_MESSAGE.SET_TOKEN('ITEM',get_item_no(get_object_rec.new_name));
693: FND_MESSAGE.set_token('REV',get_object_rec.new_version );
694: FND_MESSAGE.SET_TOKEN('ORGN',get_orgn_code(l_orgn_id));
695: FND_MSG_PUB.ADD;
688: CLOSE cur_item_ver_access;
689: IF l_rev_access <> 1 THEN
690: -- Bug# 5198213 New message shown for items with revision
691: FND_MESSAGE.SET_NAME('GMD', 'GMD_FORMULA_ITMREV_NOT_FOUND');
692: FND_MESSAGE.SET_TOKEN('ITEM',get_item_no(get_object_rec.new_name));
693: FND_MESSAGE.set_token('REV',get_object_rec.new_version );
694: FND_MESSAGE.SET_TOKEN('ORGN',get_orgn_code(l_orgn_id));
695: FND_MSG_PUB.ADD;
696: RAISE NO_UPDATE_EXCEPTION;
689: IF l_rev_access <> 1 THEN
690: -- Bug# 5198213 New message shown for items with revision
691: FND_MESSAGE.SET_NAME('GMD', 'GMD_FORMULA_ITMREV_NOT_FOUND');
692: FND_MESSAGE.SET_TOKEN('ITEM',get_item_no(get_object_rec.new_name));
693: FND_MESSAGE.set_token('REV',get_object_rec.new_version );
694: FND_MESSAGE.SET_TOKEN('ORGN',get_orgn_code(l_orgn_id));
695: FND_MSG_PUB.ADD;
696: RAISE NO_UPDATE_EXCEPTION;
697: END IF;
690: -- Bug# 5198213 New message shown for items with revision
691: FND_MESSAGE.SET_NAME('GMD', 'GMD_FORMULA_ITMREV_NOT_FOUND');
692: FND_MESSAGE.SET_TOKEN('ITEM',get_item_no(get_object_rec.new_name));
693: FND_MESSAGE.set_token('REV',get_object_rec.new_version );
694: FND_MESSAGE.SET_TOKEN('ORGN',get_orgn_code(l_orgn_id));
695: FND_MSG_PUB.ADD;
696: RAISE NO_UPDATE_EXCEPTION;
697: END IF;
698: END IF;
704: OPEN Cur_experimental_items(get_object_rec.object_id, get_object_rec.new_name);
705: FETCH Cur_experimental_items INTO l_expr_items_found;
706: CLOSE Cur_experimental_items;
707: IF l_expr_items_found > 0 THEN
708: FND_MESSAGE.SET_NAME('GMD', 'GMD_EXPR_ITEMS_FOUND');
709: FND_MSG_PUB.ADD;
710: RAISE NO_UPDATE_EXCEPTION;
711: END IF;
712: END IF;
759: FROM fm_form_mst_b
760: WHERE formula_id = l_formula_id;
761: -- Setup message to indicate that a new version
762: -- has been created
763: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_NEW_OBJECT_VERSION');
764: FND_MESSAGE.SET_TOKEN('VERSION',l_object_version);
765: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
766: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
767:
760: WHERE formula_id = l_formula_id;
761: -- Setup message to indicate that a new version
762: -- has been created
763: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_NEW_OBJECT_VERSION');
764: FND_MESSAGE.SET_TOKEN('VERSION',l_object_version);
765: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
766: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
767:
768: IF (get_object_rec.replace_type = 'INGREDIENT') THEN
761: -- Setup message to indicate that a new version
762: -- has been created
763: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_NEW_OBJECT_VERSION');
764: FND_MESSAGE.SET_TOKEN('VERSION',l_object_version);
765: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
766: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
767:
768: IF (get_object_rec.replace_type = 'INGREDIENT') THEN
769: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','LM_INGREDIENT',true);
762: -- has been created
763: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_NEW_OBJECT_VERSION');
764: FND_MESSAGE.SET_TOKEN('VERSION',l_object_version);
765: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
766: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
767:
768: IF (get_object_rec.replace_type = 'INGREDIENT') THEN
769: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','LM_INGREDIENT',true);
770: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
765: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
766: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
767:
768: IF (get_object_rec.replace_type = 'INGREDIENT') THEN
769: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','LM_INGREDIENT',true);
770: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
771: get_item_no(get_object_rec.new_name) );
772: ELSIF (get_object_rec.replace_type = 'OWNER_ID') THEN
773: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OWNER',true);
766: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
767:
768: IF (get_object_rec.replace_type = 'INGREDIENT') THEN
769: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','LM_INGREDIENT',true);
770: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
771: get_item_no(get_object_rec.new_name) );
772: ELSIF (get_object_rec.replace_type = 'OWNER_ID') THEN
773: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OWNER',true);
774: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
769: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','LM_INGREDIENT',true);
770: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
771: get_item_no(get_object_rec.new_name) );
772: ELSIF (get_object_rec.replace_type = 'OWNER_ID') THEN
773: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OWNER',true);
774: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
775: get_owner_name(get_object_rec.new_name) );
776: ELSE
777: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
770: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
771: get_item_no(get_object_rec.new_name) );
772: ELSIF (get_object_rec.replace_type = 'OWNER_ID') THEN
773: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OWNER',true);
774: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
775: get_owner_name(get_object_rec.new_name) );
776: ELSE
777: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
778: FND_MESSAGE.SET_TOKEN('NEW_ITEM',get_object_rec.new_name);
773: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OWNER',true);
774: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
775: get_owner_name(get_object_rec.new_name) );
776: ELSE
777: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
778: FND_MESSAGE.SET_TOKEN('NEW_ITEM',get_object_rec.new_name);
779: END IF;
780:
781: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
774: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
775: get_owner_name(get_object_rec.new_name) );
776: ELSE
777: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
778: FND_MESSAGE.SET_TOKEN('NEW_ITEM',get_object_rec.new_name);
779: END IF;
780:
781: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
782: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
777: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
778: FND_MESSAGE.SET_TOKEN('NEW_ITEM',get_object_rec.new_name);
779: END IF;
780:
781: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
782: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
783: END IF;
784:
785: ELSIF (l_action_flag IN ('U')) THEN
830: AND inventory_item_id = get_object_rec.old_name
831: AND NVL(revision, -1) = NVL(get_object_rec.old_version, -1);
832: -- Raise and exception is replace was not performed
833: IF (SQL%NOTFOUND) THEN
834: FND_MESSAGE.SET_NAME('GMD', 'GMD_FORM_UPD_NO_ACCESS');
835: FND_MSG_PUB.ADD;
836: RAISE NO_UPDATE_EXCEPTION;
837: END IF;
838: -- Item substitution realted fix, Bug 4479101
919: ||l_action_flag);
920: END IF;
921:
922: IF (l_action_flag = 'N') THEN
923: FND_MESSAGE.SET_NAME('GMD', 'GMD_REPLACE_NOT_ALLOWED');
924: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
925: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
926: FND_MESSAGE.SET_TOKEN('STATUS',get_status_meaning(l_status_type) );
927: FND_MSG_PUB.ADD;
920: END IF;
921:
922: IF (l_action_flag = 'N') THEN
923: FND_MESSAGE.SET_NAME('GMD', 'GMD_REPLACE_NOT_ALLOWED');
924: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
925: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
926: FND_MESSAGE.SET_TOKEN('STATUS',get_status_meaning(l_status_type) );
927: FND_MSG_PUB.ADD;
928: RAISE NO_UPDATE_EXCEPTION;
921:
922: IF (l_action_flag = 'N') THEN
923: FND_MESSAGE.SET_NAME('GMD', 'GMD_REPLACE_NOT_ALLOWED');
924: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
925: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
926: FND_MESSAGE.SET_TOKEN('STATUS',get_status_meaning(l_status_type) );
927: FND_MSG_PUB.ADD;
928: RAISE NO_UPDATE_EXCEPTION;
929: END IF;
922: IF (l_action_flag = 'N') THEN
923: FND_MESSAGE.SET_NAME('GMD', 'GMD_REPLACE_NOT_ALLOWED');
924: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
925: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
926: FND_MESSAGE.SET_TOKEN('STATUS',get_status_meaning(l_status_type) );
927: FND_MSG_PUB.ADD;
928: RAISE NO_UPDATE_EXCEPTION;
929: END IF;
930:
1023: WHERE recipe_id = l_recipe_id;
1024:
1025: -- Setup message to indicate that a new version
1026: -- has been created
1027: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_NEW_OBJECT_VERSION');
1028: FND_MESSAGE.SET_TOKEN('VERSION',l_object_version);
1029: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1030: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1031:
1024:
1025: -- Setup message to indicate that a new version
1026: -- has been created
1027: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_NEW_OBJECT_VERSION');
1028: FND_MESSAGE.SET_TOKEN('VERSION',l_object_version);
1029: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1030: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1031:
1032: IF (get_object_rec.replace_type = 'FORMULA_ID' ) THEN
1025: -- Setup message to indicate that a new version
1026: -- has been created
1027: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_NEW_OBJECT_VERSION');
1028: FND_MESSAGE.SET_TOKEN('VERSION',l_object_version);
1029: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1030: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1031:
1032: IF (get_object_rec.replace_type = 'FORMULA_ID' ) THEN
1033: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_FORMULA',true);
1026: -- has been created
1027: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_NEW_OBJECT_VERSION');
1028: FND_MESSAGE.SET_TOKEN('VERSION',l_object_version);
1029: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1030: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1031:
1032: IF (get_object_rec.replace_type = 'FORMULA_ID' ) THEN
1033: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_FORMULA',true);
1034: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
1029: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1030: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1031:
1032: IF (get_object_rec.replace_type = 'FORMULA_ID' ) THEN
1033: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_FORMULA',true);
1034: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
1035: GMD_API_GRP.get_object_name_version
1036: ('FORMULA'
1037: ,get_object_rec.new_name)
1030: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1031:
1032: IF (get_object_rec.replace_type = 'FORMULA_ID' ) THEN
1033: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_FORMULA',true);
1034: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
1035: GMD_API_GRP.get_object_name_version
1036: ('FORMULA'
1037: ,get_object_rec.new_name)
1038: );
1036: ('FORMULA'
1037: ,get_object_rec.new_name)
1038: );
1039: ELSIF (get_object_rec.replace_type = 'ROUTING_ID' ) THEN
1040: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_ROUTING',true);
1041: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
1042: GMD_API_GRP.get_object_name_version
1043: ('ROUTING'
1044: ,get_object_rec.new_name)
1037: ,get_object_rec.new_name)
1038: );
1039: ELSIF (get_object_rec.replace_type = 'ROUTING_ID' ) THEN
1040: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_ROUTING',true);
1041: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
1042: GMD_API_GRP.get_object_name_version
1043: ('ROUTING'
1044: ,get_object_rec.new_name)
1045: );
1043: ('ROUTING'
1044: ,get_object_rec.new_name)
1045: );
1046: ELSIF (get_object_rec.replace_type = 'OWNER_ID') THEN
1047: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OWNER',true);
1048: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
1049: get_owner_name(get_object_rec.new_name) );
1050: ELSIF (get_object_rec.replace_type = 'RECIPE_TYPE') THEN
1051: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_RECIPE_TYPE',true);
1044: ,get_object_rec.new_name)
1045: );
1046: ELSIF (get_object_rec.replace_type = 'OWNER_ID') THEN
1047: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OWNER',true);
1048: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
1049: get_owner_name(get_object_rec.new_name) );
1050: ELSIF (get_object_rec.replace_type = 'RECIPE_TYPE') THEN
1051: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_RECIPE_TYPE',true);
1052: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
1047: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OWNER',true);
1048: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
1049: get_owner_name(get_object_rec.new_name) );
1050: ELSIF (get_object_rec.replace_type = 'RECIPE_TYPE') THEN
1051: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_RECIPE_TYPE',true);
1052: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
1053: get_recipe_type(get_object_rec.new_name) );
1054: -- Bug# 5234792 To get the recipe type value.
1055: ELSE
1048: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
1049: get_owner_name(get_object_rec.new_name) );
1050: ELSIF (get_object_rec.replace_type = 'RECIPE_TYPE') THEN
1051: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_RECIPE_TYPE',true);
1052: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
1053: get_recipe_type(get_object_rec.new_name) );
1054: -- Bug# 5234792 To get the recipe type value.
1055: ELSE
1056: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1052: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
1053: get_recipe_type(get_object_rec.new_name) );
1054: -- Bug# 5234792 To get the recipe type value.
1055: ELSE
1056: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1057: FND_MESSAGE.SET_TOKEN('NEW_ITEM',get_object_rec.new_name);
1058: END IF;
1059:
1060:
1053: get_recipe_type(get_object_rec.new_name) );
1054: -- Bug# 5234792 To get the recipe type value.
1055: ELSE
1056: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1057: FND_MESSAGE.SET_TOKEN('NEW_ITEM',get_object_rec.new_name);
1058: END IF;
1059:
1060:
1061: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1057: FND_MESSAGE.SET_TOKEN('NEW_ITEM',get_object_rec.new_name);
1058: END IF;
1059:
1060:
1061: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1062: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
1063: END IF;
1064:
1065: ELSIF (l_action_flag IN ('U')) THEN
1085: last_update_login = p_last_update_login
1086: WHERE recipe_id = get_object_rec.object_id;
1087:
1088: IF (sql%notfound) THEN
1089: FND_MESSAGE.SET_NAME('GMD', 'GMD_RCP_UPD_NO_ACCESS');
1090: FND_MSG_PUB.ADD;
1091: RAISE NO_UPDATE_EXCEPTION;
1092: END IF;
1093: -- Delete all recipe dependencies if either formula or
1153: ||' : For Routing Action flag = '||l_action_flag);
1154: END IF;
1155:
1156: IF (l_action_flag = 'N') THEN
1157: FND_MESSAGE.SET_NAME('GMD', 'GMD_REPLACE_NOT_ALLOWED');
1158: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1159: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1160: FND_MESSAGE.SET_TOKEN('STATUS',get_status_meaning(l_status_type) );
1161: FND_MSG_PUB.ADD;
1154: END IF;
1155:
1156: IF (l_action_flag = 'N') THEN
1157: FND_MESSAGE.SET_NAME('GMD', 'GMD_REPLACE_NOT_ALLOWED');
1158: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1159: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1160: FND_MESSAGE.SET_TOKEN('STATUS',get_status_meaning(l_status_type) );
1161: FND_MSG_PUB.ADD;
1162: RAISE NO_UPDATE_EXCEPTION;
1155:
1156: IF (l_action_flag = 'N') THEN
1157: FND_MESSAGE.SET_NAME('GMD', 'GMD_REPLACE_NOT_ALLOWED');
1158: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1159: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1160: FND_MESSAGE.SET_TOKEN('STATUS',get_status_meaning(l_status_type) );
1161: FND_MSG_PUB.ADD;
1162: RAISE NO_UPDATE_EXCEPTION;
1163: END IF;
1156: IF (l_action_flag = 'N') THEN
1157: FND_MESSAGE.SET_NAME('GMD', 'GMD_REPLACE_NOT_ALLOWED');
1158: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1159: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1160: FND_MESSAGE.SET_TOKEN('STATUS',get_status_meaning(l_status_type) );
1161: FND_MSG_PUB.ADD;
1162: RAISE NO_UPDATE_EXCEPTION;
1163: END IF;
1164:
1211: WHERE routing_id = l_routing_id;
1212:
1213: -- Setup message to indicate that a new version
1214: -- has been created
1215: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_NEW_OBJECT_VERSION');
1216: FND_MESSAGE.SET_TOKEN('VERSION',l_object_version);
1217: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1218: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1219:
1212:
1213: -- Setup message to indicate that a new version
1214: -- has been created
1215: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_NEW_OBJECT_VERSION');
1216: FND_MESSAGE.SET_TOKEN('VERSION',l_object_version);
1217: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1218: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1219:
1220: IF (get_object_rec.replace_type = 'OPRN_ID') THEN
1213: -- Setup message to indicate that a new version
1214: -- has been created
1215: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_NEW_OBJECT_VERSION');
1216: FND_MESSAGE.SET_TOKEN('VERSION',l_object_version);
1217: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1218: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1219:
1220: IF (get_object_rec.replace_type = 'OPRN_ID') THEN
1221: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OPERATION',true);
1214: -- has been created
1215: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_NEW_OBJECT_VERSION');
1216: FND_MESSAGE.SET_TOKEN('VERSION',l_object_version);
1217: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1218: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1219:
1220: IF (get_object_rec.replace_type = 'OPRN_ID') THEN
1221: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OPERATION',true);
1222: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
1217: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1218: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1219:
1220: IF (get_object_rec.replace_type = 'OPRN_ID') THEN
1221: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OPERATION',true);
1222: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
1223: GMD_API_GRP.get_object_name_version
1224: ('OPERATION'
1225: ,get_object_rec.new_name)
1218: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1219:
1220: IF (get_object_rec.replace_type = 'OPRN_ID') THEN
1221: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OPERATION',true);
1222: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
1223: GMD_API_GRP.get_object_name_version
1224: ('OPERATION'
1225: ,get_object_rec.new_name)
1226: );
1224: ('OPERATION'
1225: ,get_object_rec.new_name)
1226: );
1227: ELSIF (get_object_rec.replace_type = 'OWNER_ID') THEN
1228: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OWNER',true);
1229: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
1230: get_owner_name(get_object_rec.new_name) );
1231: ELSE
1232: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1225: ,get_object_rec.new_name)
1226: );
1227: ELSIF (get_object_rec.replace_type = 'OWNER_ID') THEN
1228: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OWNER',true);
1229: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
1230: get_owner_name(get_object_rec.new_name) );
1231: ELSE
1232: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1233: FND_MESSAGE.SET_TOKEN('NEW_ITEM',get_object_rec.new_name);
1228: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OWNER',true);
1229: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
1230: get_owner_name(get_object_rec.new_name) );
1231: ELSE
1232: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1233: FND_MESSAGE.SET_TOKEN('NEW_ITEM',get_object_rec.new_name);
1234: END IF;
1235:
1236: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1229: FND_MESSAGE.SET_TOKEN('NEW_ITEM',
1230: get_owner_name(get_object_rec.new_name) );
1231: ELSE
1232: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1233: FND_MESSAGE.SET_TOKEN('NEW_ITEM',get_object_rec.new_name);
1234: END IF;
1235:
1236: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1237: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
1232: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1233: FND_MESSAGE.SET_TOKEN('NEW_ITEM',get_object_rec.new_name);
1234: END IF;
1235:
1236: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1237: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
1238: END IF;
1239:
1240: ELSIF (l_action_flag IN ('U')) THEN
1353: ||l_action_flag);
1354: END IF;
1355:
1356: IF (l_action_flag = 'N') THEN
1357: FND_MESSAGE.SET_NAME('GMD', 'GMD_REPLACE_NOT_ALLOWED');
1358: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1359: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1360: FND_MESSAGE.SET_TOKEN('STATUS',get_status_meaning(l_status_type) );
1361: FND_MSG_PUB.ADD;
1354: END IF;
1355:
1356: IF (l_action_flag = 'N') THEN
1357: FND_MESSAGE.SET_NAME('GMD', 'GMD_REPLACE_NOT_ALLOWED');
1358: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1359: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1360: FND_MESSAGE.SET_TOKEN('STATUS',get_status_meaning(l_status_type) );
1361: FND_MSG_PUB.ADD;
1362: RAISE NO_UPDATE_EXCEPTION;
1355:
1356: IF (l_action_flag = 'N') THEN
1357: FND_MESSAGE.SET_NAME('GMD', 'GMD_REPLACE_NOT_ALLOWED');
1358: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1359: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1360: FND_MESSAGE.SET_TOKEN('STATUS',get_status_meaning(l_status_type) );
1361: FND_MSG_PUB.ADD;
1362: RAISE NO_UPDATE_EXCEPTION;
1363: END IF;
1356: IF (l_action_flag = 'N') THEN
1357: FND_MESSAGE.SET_NAME('GMD', 'GMD_REPLACE_NOT_ALLOWED');
1358: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1359: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1360: FND_MESSAGE.SET_TOKEN('STATUS',get_status_meaning(l_status_type) );
1361: FND_MSG_PUB.ADD;
1362: RAISE NO_UPDATE_EXCEPTION;
1363: END IF;
1364:
1420: WHERE oprn_id = l_oprn_id;
1421:
1422: -- Setup message to indicate that a new version
1423: -- has been created
1424: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_NEW_OBJECT_VERSION');
1425: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1426: FND_MESSAGE.SET_TOKEN('VERSION',l_object_version);
1427: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1428: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1421:
1422: -- Setup message to indicate that a new version
1423: -- has been created
1424: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_NEW_OBJECT_VERSION');
1425: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1426: FND_MESSAGE.SET_TOKEN('VERSION',l_object_version);
1427: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1428: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1429: FND_MESSAGE.SET_TOKEN('NEW_ITEM',get_object_rec.new_name);
1422: -- Setup message to indicate that a new version
1423: -- has been created
1424: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_NEW_OBJECT_VERSION');
1425: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1426: FND_MESSAGE.SET_TOKEN('VERSION',l_object_version);
1427: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1428: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1429: FND_MESSAGE.SET_TOKEN('NEW_ITEM',get_object_rec.new_name);
1430: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1423: -- has been created
1424: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_NEW_OBJECT_VERSION');
1425: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1426: FND_MESSAGE.SET_TOKEN('VERSION',l_object_version);
1427: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1428: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1429: FND_MESSAGE.SET_TOKEN('NEW_ITEM',get_object_rec.new_name);
1430: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1431: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
1424: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_NEW_OBJECT_VERSION');
1425: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1426: FND_MESSAGE.SET_TOKEN('VERSION',l_object_version);
1427: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1428: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1429: FND_MESSAGE.SET_TOKEN('NEW_ITEM',get_object_rec.new_name);
1430: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1431: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
1432: END IF;
1425: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1426: FND_MESSAGE.SET_TOKEN('VERSION',l_object_version);
1427: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1428: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1429: FND_MESSAGE.SET_TOKEN('NEW_ITEM',get_object_rec.new_name);
1430: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1431: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
1432: END IF;
1433:
1426: FND_MESSAGE.SET_TOKEN('VERSION',l_object_version);
1427: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1428: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1429: FND_MESSAGE.SET_TOKEN('NEW_ITEM',get_object_rec.new_name);
1430: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1431: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
1432: END IF;
1433:
1434: ELSIF (l_action_flag IN ('U')) THEN
1585: IF (l_return_status <> 'S') THEN
1586: RAISE No_Update_Exception;
1587: END IF;
1588: ELSIF (l_action_flag = 'N') THEN
1589: FND_MESSAGE.SET_NAME('GMD', 'GMD_REPLACE_NOT_ALLOWED');
1590: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1591: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1592: FND_MESSAGE.SET_TOKEN('STATUS',get_status_meaning(l_status_type) );
1593: FND_MSG_PUB.ADD;
1586: RAISE No_Update_Exception;
1587: END IF;
1588: ELSIF (l_action_flag = 'N') THEN
1589: FND_MESSAGE.SET_NAME('GMD', 'GMD_REPLACE_NOT_ALLOWED');
1590: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1591: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1592: FND_MESSAGE.SET_TOKEN('STATUS',get_status_meaning(l_status_type) );
1593: FND_MSG_PUB.ADD;
1594: RAISE NO_UPDATE_EXCEPTION;
1587: END IF;
1588: ELSIF (l_action_flag = 'N') THEN
1589: FND_MESSAGE.SET_NAME('GMD', 'GMD_REPLACE_NOT_ALLOWED');
1590: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1591: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1592: FND_MESSAGE.SET_TOKEN('STATUS',get_status_meaning(l_status_type) );
1593: FND_MSG_PUB.ADD;
1594: RAISE NO_UPDATE_EXCEPTION;
1595: END IF; -- for action flags for VRs
1588: ELSIF (l_action_flag = 'N') THEN
1589: FND_MESSAGE.SET_NAME('GMD', 'GMD_REPLACE_NOT_ALLOWED');
1590: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1591: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1592: FND_MESSAGE.SET_TOKEN('STATUS',get_status_meaning(l_status_type) );
1593: FND_MSG_PUB.ADD;
1594: RAISE NO_UPDATE_EXCEPTION;
1595: END IF; -- for action flags for VRs
1596: END IF; -- After working thro' every object type condition
1599: -- Provide a log entry after any entity instance is successfully replaced
1600: -- Bug# 5234792 Kapil M
1601: -- Log for Update of existing version only
1602: IF ((l_return_status = 'S')AND (l_action_flag = 'U')) THEN
1603: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_UPDATE_OBJECT');
1604: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1605:
1606: IF (get_object_rec.replace_type = 'INGREDIENT') THEN
1607: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','LM_INGREDIENT',true);
1600: -- Bug# 5234792 Kapil M
1601: -- Log for Update of existing version only
1602: IF ((l_return_status = 'S')AND (l_action_flag = 'U')) THEN
1603: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_UPDATE_OBJECT');
1604: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1605:
1606: IF (get_object_rec.replace_type = 'INGREDIENT') THEN
1607: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','LM_INGREDIENT',true);
1608: IF get_object_rec.new_version IS NULL THEN
1603: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_UPDATE_OBJECT');
1604: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1605:
1606: IF (get_object_rec.replace_type = 'INGREDIENT') THEN
1607: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','LM_INGREDIENT',true);
1608: IF get_object_rec.new_version IS NULL THEN
1609: l_item_txt := get_item_no(get_object_rec.new_name);
1610: ELSE
1611: l_item_txt := get_item_no(get_object_rec.new_name) ||' , '|| fnd_message.GET_STRING('INV', 'REVISION') || ' : '||get_object_rec.new_version;
1607: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','LM_INGREDIENT',true);
1608: IF get_object_rec.new_version IS NULL THEN
1609: l_item_txt := get_item_no(get_object_rec.new_name);
1610: ELSE
1611: l_item_txt := get_item_no(get_object_rec.new_name) ||' , '|| fnd_message.GET_STRING('INV', 'REVISION') || ' : '||get_object_rec.new_version;
1612: END IF;
1613: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE', l_item_txt );
1614: ELSIF (get_object_rec.replace_type = 'STATUS') THEN
1615: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_STATUS',true);
1609: l_item_txt := get_item_no(get_object_rec.new_name);
1610: ELSE
1611: l_item_txt := get_item_no(get_object_rec.new_name) ||' , '|| fnd_message.GET_STRING('INV', 'REVISION') || ' : '||get_object_rec.new_version;
1612: END IF;
1613: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE', l_item_txt );
1614: ELSIF (get_object_rec.replace_type = 'STATUS') THEN
1615: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_STATUS',true);
1616: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1617: get_status_meaning(
1611: l_item_txt := get_item_no(get_object_rec.new_name) ||' , '|| fnd_message.GET_STRING('INV', 'REVISION') || ' : '||get_object_rec.new_version;
1612: END IF;
1613: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE', l_item_txt );
1614: ELSIF (get_object_rec.replace_type = 'STATUS') THEN
1615: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_STATUS',true);
1616: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1617: get_status_meaning(
1618: GMD_API_GRP.get_object_status_type
1619: (get_object_rec.object_type
1612: END IF;
1613: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE', l_item_txt );
1614: ELSIF (get_object_rec.replace_type = 'STATUS') THEN
1615: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_STATUS',true);
1616: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1617: get_status_meaning(
1618: GMD_API_GRP.get_object_status_type
1619: (get_object_rec.object_type
1620: , get_object_rec.object_id)
1619: (get_object_rec.object_type
1620: , get_object_rec.object_id)
1621: ) );
1622: ELSIF (get_object_rec.replace_type = 'ROUTING_ID') THEN
1623: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_ROUTING',true);
1624: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1625: GMD_API_GRP.get_object_name_version
1626: ('ROUTING',get_object_rec.new_name)
1627: );
1620: , get_object_rec.object_id)
1621: ) );
1622: ELSIF (get_object_rec.replace_type = 'ROUTING_ID') THEN
1623: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_ROUTING',true);
1624: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1625: GMD_API_GRP.get_object_name_version
1626: ('ROUTING',get_object_rec.new_name)
1627: );
1628: ELSIF (get_object_rec.replace_type = 'OPRN_ID') THEN
1625: GMD_API_GRP.get_object_name_version
1626: ('ROUTING',get_object_rec.new_name)
1627: );
1628: ELSIF (get_object_rec.replace_type = 'OPRN_ID') THEN
1629: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OPERATION',true);
1630: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1631: GMD_API_GRP.get_object_name_version
1632: ('OPERATION',get_object_rec.new_name)
1633: );
1626: ('ROUTING',get_object_rec.new_name)
1627: );
1628: ELSIF (get_object_rec.replace_type = 'OPRN_ID') THEN
1629: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OPERATION',true);
1630: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1631: GMD_API_GRP.get_object_name_version
1632: ('OPERATION',get_object_rec.new_name)
1633: );
1634: ELSIF (get_object_rec.replace_type = 'FORMULA_ID') THEN
1631: GMD_API_GRP.get_object_name_version
1632: ('OPERATION',get_object_rec.new_name)
1633: );
1634: ELSIF (get_object_rec.replace_type = 'FORMULA_ID') THEN
1635: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_FORMULA',true);
1636: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1637: GMD_API_GRP.get_object_name_version
1638: ('FORMULA',get_object_rec.new_name)
1639: );
1632: ('OPERATION',get_object_rec.new_name)
1633: );
1634: ELSIF (get_object_rec.replace_type = 'FORMULA_ID') THEN
1635: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_FORMULA',true);
1636: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1637: GMD_API_GRP.get_object_name_version
1638: ('FORMULA',get_object_rec.new_name)
1639: );
1640: ELSIF (get_object_rec.replace_type = 'OWNER_ID') THEN
1637: GMD_API_GRP.get_object_name_version
1638: ('FORMULA',get_object_rec.new_name)
1639: );
1640: ELSIF (get_object_rec.replace_type = 'OWNER_ID') THEN
1641: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OWNER',true);
1642: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1643: get_owner_name(get_object_rec.new_name) );
1644: ELSIF (get_object_rec.replace_type = 'RECIPE_USE') THEN
1645: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1638: ('FORMULA',get_object_rec.new_name)
1639: );
1640: ELSIF (get_object_rec.replace_type = 'OWNER_ID') THEN
1641: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OWNER',true);
1642: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1643: get_owner_name(get_object_rec.new_name) );
1644: ELSIF (get_object_rec.replace_type = 'RECIPE_USE') THEN
1645: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1646: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1641: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OWNER',true);
1642: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1643: get_owner_name(get_object_rec.new_name) );
1644: ELSIF (get_object_rec.replace_type = 'RECIPE_USE') THEN
1645: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1646: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1647: get_recipe_use(get_object_rec.new_name) );
1648: -- Bug# 5234792 Kapil M
1649: -- To get the recipe type value
1642: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1643: get_owner_name(get_object_rec.new_name) );
1644: ELSIF (get_object_rec.replace_type = 'RECIPE_USE') THEN
1645: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1646: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1647: get_recipe_use(get_object_rec.new_name) );
1648: -- Bug# 5234792 Kapil M
1649: -- To get the recipe type value
1650: ELSIF (get_object_rec.replace_type = 'RECIPE_TYPE') THEN
1647: get_recipe_use(get_object_rec.new_name) );
1648: -- Bug# 5234792 Kapil M
1649: -- To get the recipe type value
1650: ELSIF (get_object_rec.replace_type = 'RECIPE_TYPE') THEN
1651: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1652: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1653: get_recipe_type(get_object_rec.new_name) );
1654: ELSIF ((get_object_rec.replace_type like '%START_DATE%') OR
1655: (get_object_rec.replace_type like '%END_DATE%') ) THEN
1648: -- Bug# 5234792 Kapil M
1649: -- To get the recipe type value
1650: ELSIF (get_object_rec.replace_type = 'RECIPE_TYPE') THEN
1651: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1652: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1653: get_recipe_type(get_object_rec.new_name) );
1654: ELSIF ((get_object_rec.replace_type like '%START_DATE%') OR
1655: (get_object_rec.replace_type like '%END_DATE%') ) THEN
1656: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1652: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1653: get_recipe_type(get_object_rec.new_name) );
1654: ELSIF ((get_object_rec.replace_type like '%START_DATE%') OR
1655: (get_object_rec.replace_type like '%END_DATE%') ) THEN
1656: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1657: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1658: FND_DATE.canonical_to_date(get_object_rec.new_name) );
1659: -- 5532058 If replace_type is 'OWNER_ORGN_CODE', display orgn code
1660: ELSIF (get_object_rec.replace_type = 'OWNER_ORGN_CODE') THEN
1653: get_recipe_type(get_object_rec.new_name) );
1654: ELSIF ((get_object_rec.replace_type like '%START_DATE%') OR
1655: (get_object_rec.replace_type like '%END_DATE%') ) THEN
1656: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1657: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1658: FND_DATE.canonical_to_date(get_object_rec.new_name) );
1659: -- 5532058 If replace_type is 'OWNER_ORGN_CODE', display orgn code
1660: ELSIF (get_object_rec.replace_type = 'OWNER_ORGN_CODE') THEN
1661: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1657: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1658: FND_DATE.canonical_to_date(get_object_rec.new_name) );
1659: -- 5532058 If replace_type is 'OWNER_ORGN_CODE', display orgn code
1660: ELSIF (get_object_rec.replace_type = 'OWNER_ORGN_CODE') THEN
1661: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1662: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1663: get_orgn_code(get_object_rec.new_name) );
1664:
1665: ELSE
1658: FND_DATE.canonical_to_date(get_object_rec.new_name) );
1659: -- 5532058 If replace_type is 'OWNER_ORGN_CODE', display orgn code
1660: ELSIF (get_object_rec.replace_type = 'OWNER_ORGN_CODE') THEN
1661: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1662: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1663: get_orgn_code(get_object_rec.new_name) );
1664:
1665: ELSE
1666: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1662: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1663: get_orgn_code(get_object_rec.new_name) );
1664:
1665: ELSE
1666: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1667: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',get_object_rec.new_name);
1668: END IF;
1669:
1670: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',pObject_type);
1663: get_orgn_code(get_object_rec.new_name) );
1664:
1665: ELSE
1666: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1667: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',get_object_rec.new_name);
1668: END IF;
1669:
1670: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',pObject_type);
1671: FND_MESSAGE.SET_TOKEN('OBJECT_VERS',get_object_rec.object_vers);
1666: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1667: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',get_object_rec.new_name);
1668: END IF;
1669:
1670: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',pObject_type);
1671: FND_MESSAGE.SET_TOKEN('OBJECT_VERS',get_object_rec.object_vers);
1672: -- to be removed
1673: -- fnd_msg_pub.add;
1674: END IF;
1667: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',get_object_rec.new_name);
1668: END IF;
1669:
1670: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',pObject_type);
1671: FND_MESSAGE.SET_TOKEN('OBJECT_VERS',get_object_rec.object_vers);
1672: -- to be removed
1673: -- fnd_msg_pub.add;
1674: END IF;
1675:
1672: -- to be removed
1673: -- fnd_msg_pub.add;
1674: END IF;
1675:
1676: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1677: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
1678:
1679: -- Set the row counter
1680: l_rowcount := l_rowcount + 1;
1699: gmd_debug.put_line(g_pkg_name||'.'||l_api_name
1700: ||' : In the No_update_exception section '
1701: ||' Error text is '||l_error_text);
1702: END IF;
1703: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_UPDATE_OBJECT_FAILED');
1704:
1705: IF (get_object_rec.replace_type = 'INGREDIENT') THEN
1706: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','LM_INGREDIENT',true);
1707: IF get_object_rec.new_version IS NULL THEN
1702: END IF;
1703: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_UPDATE_OBJECT_FAILED');
1704:
1705: IF (get_object_rec.replace_type = 'INGREDIENT') THEN
1706: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','LM_INGREDIENT',true);
1707: IF get_object_rec.new_version IS NULL THEN
1708: l_item_txt := get_item_no(get_object_rec.new_name);
1709: ELSE
1710: l_item_txt := get_item_no(get_object_rec.new_name) ||' , '|| fnd_message.GET_STRING('INV', 'REVISION') || ' : '||get_object_rec.new_version;
1706: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','LM_INGREDIENT',true);
1707: IF get_object_rec.new_version IS NULL THEN
1708: l_item_txt := get_item_no(get_object_rec.new_name);
1709: ELSE
1710: l_item_txt := get_item_no(get_object_rec.new_name) ||' , '|| fnd_message.GET_STRING('INV', 'REVISION') || ' : '||get_object_rec.new_version;
1711: END IF;
1712: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE', l_item_txt );
1713: ELSIF (get_object_rec.replace_type = 'STATUS') THEN
1714: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_STATUS',true);
1708: l_item_txt := get_item_no(get_object_rec.new_name);
1709: ELSE
1710: l_item_txt := get_item_no(get_object_rec.new_name) ||' , '|| fnd_message.GET_STRING('INV', 'REVISION') || ' : '||get_object_rec.new_version;
1711: END IF;
1712: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE', l_item_txt );
1713: ELSIF (get_object_rec.replace_type = 'STATUS') THEN
1714: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_STATUS',true);
1715: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1716: get_status_meaning(get_object_rec.new_name) );
1710: l_item_txt := get_item_no(get_object_rec.new_name) ||' , '|| fnd_message.GET_STRING('INV', 'REVISION') || ' : '||get_object_rec.new_version;
1711: END IF;
1712: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE', l_item_txt );
1713: ELSIF (get_object_rec.replace_type = 'STATUS') THEN
1714: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_STATUS',true);
1715: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1716: get_status_meaning(get_object_rec.new_name) );
1717: ELSIF (get_object_rec.replace_type = 'ROUTING_ID') THEN
1718: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_ROUTING',true);
1711: END IF;
1712: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE', l_item_txt );
1713: ELSIF (get_object_rec.replace_type = 'STATUS') THEN
1714: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_STATUS',true);
1715: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1716: get_status_meaning(get_object_rec.new_name) );
1717: ELSIF (get_object_rec.replace_type = 'ROUTING_ID') THEN
1718: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_ROUTING',true);
1719: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1714: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_STATUS',true);
1715: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1716: get_status_meaning(get_object_rec.new_name) );
1717: ELSIF (get_object_rec.replace_type = 'ROUTING_ID') THEN
1718: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_ROUTING',true);
1719: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1720: GMD_API_GRP.get_object_name_version
1721: ('ROUTING'
1722: ,get_object_rec.new_name)
1715: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1716: get_status_meaning(get_object_rec.new_name) );
1717: ELSIF (get_object_rec.replace_type = 'ROUTING_ID') THEN
1718: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_ROUTING',true);
1719: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1720: GMD_API_GRP.get_object_name_version
1721: ('ROUTING'
1722: ,get_object_rec.new_name)
1723: );
1721: ('ROUTING'
1722: ,get_object_rec.new_name)
1723: );
1724: ELSIF (get_object_rec.replace_type = 'OPRN_ID') THEN
1725: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OPERATION',true);
1726: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1727: GMD_API_GRP.get_object_name_version
1728: ('OPERATION'
1729: ,get_object_rec.new_name)
1722: ,get_object_rec.new_name)
1723: );
1724: ELSIF (get_object_rec.replace_type = 'OPRN_ID') THEN
1725: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OPERATION',true);
1726: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1727: GMD_API_GRP.get_object_name_version
1728: ('OPERATION'
1729: ,get_object_rec.new_name)
1730: );
1728: ('OPERATION'
1729: ,get_object_rec.new_name)
1730: );
1731: ELSIF (get_object_rec.replace_type = 'FORMULA_ID') THEN
1732: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_FORMULA',true);
1733: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1734: GMD_API_GRP.get_object_name_version
1735: ('FORMULA'
1736: ,get_object_rec.new_name)
1729: ,get_object_rec.new_name)
1730: );
1731: ELSIF (get_object_rec.replace_type = 'FORMULA_ID') THEN
1732: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_FORMULA',true);
1733: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1734: GMD_API_GRP.get_object_name_version
1735: ('FORMULA'
1736: ,get_object_rec.new_name)
1737: );
1735: ('FORMULA'
1736: ,get_object_rec.new_name)
1737: );
1738: ELSIF (get_object_rec.replace_type = 'OWNER_ID') THEN
1739: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OWNER',true);
1740: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1741: get_owner_name(get_object_rec.new_name) );
1742: ELSIF (get_object_rec.replace_type = 'RECIPE_USE') THEN
1743: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1736: ,get_object_rec.new_name)
1737: );
1738: ELSIF (get_object_rec.replace_type = 'OWNER_ID') THEN
1739: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OWNER',true);
1740: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1741: get_owner_name(get_object_rec.new_name) );
1742: ELSIF (get_object_rec.replace_type = 'RECIPE_USE') THEN
1743: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1744: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1739: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OWNER',true);
1740: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1741: get_owner_name(get_object_rec.new_name) );
1742: ELSIF (get_object_rec.replace_type = 'RECIPE_USE') THEN
1743: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1744: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1745: get_recipe_use(get_object_rec.new_name) );
1746: ELSIF ((get_object_rec.replace_type like '%START_DATE%') OR
1747: (get_object_rec.replace_type like '%END_DATE%') ) THEN
1740: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1741: get_owner_name(get_object_rec.new_name) );
1742: ELSIF (get_object_rec.replace_type = 'RECIPE_USE') THEN
1743: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1744: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1745: get_recipe_use(get_object_rec.new_name) );
1746: ELSIF ((get_object_rec.replace_type like '%START_DATE%') OR
1747: (get_object_rec.replace_type like '%END_DATE%') ) THEN
1748: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1744: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1745: get_recipe_use(get_object_rec.new_name) );
1746: ELSIF ((get_object_rec.replace_type like '%START_DATE%') OR
1747: (get_object_rec.replace_type like '%END_DATE%') ) THEN
1748: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1749: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1750: FND_DATE.canonical_to_date(get_object_rec.new_name) );
1751: ELSIF (get_object_rec.replace_type IN ('ORGN_CODE', 'OWNER_ORGN_CODE')) THEN
1752: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1745: get_recipe_use(get_object_rec.new_name) );
1746: ELSIF ((get_object_rec.replace_type like '%START_DATE%') OR
1747: (get_object_rec.replace_type like '%END_DATE%') ) THEN
1748: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1749: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1750: FND_DATE.canonical_to_date(get_object_rec.new_name) );
1751: ELSIF (get_object_rec.replace_type IN ('ORGN_CODE', 'OWNER_ORGN_CODE')) THEN
1752: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1753: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1748: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1749: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1750: FND_DATE.canonical_to_date(get_object_rec.new_name) );
1751: ELSIF (get_object_rec.replace_type IN ('ORGN_CODE', 'OWNER_ORGN_CODE')) THEN
1752: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1753: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1754: get_orgn_code(get_object_rec.new_name) );
1755:
1756: ELSE
1749: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1750: FND_DATE.canonical_to_date(get_object_rec.new_name) );
1751: ELSIF (get_object_rec.replace_type IN ('ORGN_CODE', 'OWNER_ORGN_CODE')) THEN
1752: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1753: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1754: get_orgn_code(get_object_rec.new_name) );
1755:
1756: ELSE
1757: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1753: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1754: get_orgn_code(get_object_rec.new_name) );
1755:
1756: ELSE
1757: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1758: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',get_object_rec.new_name);
1759: END IF;
1760:
1761: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1754: get_orgn_code(get_object_rec.new_name) );
1755:
1756: ELSE
1757: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1758: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',get_object_rec.new_name);
1759: END IF;
1760:
1761: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1762: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1757: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1758: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',get_object_rec.new_name);
1759: END IF;
1760:
1761: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1762: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1763: FND_MESSAGE.SET_TOKEN('OBJECT_VERS',get_object_rec.object_vers);
1764: FND_MESSAGE.SET_TOKEN('ERRMSG',l_error_text);
1765: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1758: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',get_object_rec.new_name);
1759: END IF;
1760:
1761: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1762: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1763: FND_MESSAGE.SET_TOKEN('OBJECT_VERS',get_object_rec.object_vers);
1764: FND_MESSAGE.SET_TOKEN('ERRMSG',l_error_text);
1765: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1766: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
1759: END IF;
1760:
1761: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1762: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1763: FND_MESSAGE.SET_TOKEN('OBJECT_VERS',get_object_rec.object_vers);
1764: FND_MESSAGE.SET_TOKEN('ERRMSG',l_error_text);
1765: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1766: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
1767: WHEN OTHERS THEN
1760:
1761: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1762: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1763: FND_MESSAGE.SET_TOKEN('OBJECT_VERS',get_object_rec.object_vers);
1764: FND_MESSAGE.SET_TOKEN('ERRMSG',l_error_text);
1765: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1766: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
1767: WHEN OTHERS THEN
1768:
1761: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1762: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1763: FND_MESSAGE.SET_TOKEN('OBJECT_VERS',get_object_rec.object_vers);
1764: FND_MESSAGE.SET_TOKEN('ERRMSG',l_error_text);
1765: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1766: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
1767: WHEN OTHERS THEN
1768:
1769: ret_code := 2;
1770: err_buf := NULL;
1771: l_retval := fnd_concurrent.set_completion_status('WARNING',sqlerrm);
1772:
1773: fnd_msg_pub.add_exc_msg (G_PKG_NAME, l_api_name);
1774: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_UPDATE_OBJECT_FAILED');
1775:
1776: IF (get_object_rec.replace_type = 'INGREDIENT') THEN
1777: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','LM_INGREDIENT',true);
1778: IF get_object_rec.new_version IS NULL THEN
1773: fnd_msg_pub.add_exc_msg (G_PKG_NAME, l_api_name);
1774: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_UPDATE_OBJECT_FAILED');
1775:
1776: IF (get_object_rec.replace_type = 'INGREDIENT') THEN
1777: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','LM_INGREDIENT',true);
1778: IF get_object_rec.new_version IS NULL THEN
1779: l_item_txt := get_item_no(get_object_rec.new_name);
1780: ELSE
1781: l_item_txt := get_item_no(get_object_rec.new_name) ||' , '|| fnd_message.GET_STRING('INV', 'REVISION') || ' : '||get_object_rec.new_version;
1777: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','LM_INGREDIENT',true);
1778: IF get_object_rec.new_version IS NULL THEN
1779: l_item_txt := get_item_no(get_object_rec.new_name);
1780: ELSE
1781: l_item_txt := get_item_no(get_object_rec.new_name) ||' , '|| fnd_message.GET_STRING('INV', 'REVISION') || ' : '||get_object_rec.new_version;
1782: END IF;
1783: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE', l_item_txt );
1784: ELSIF (get_object_rec.replace_type = 'STATUS') THEN
1785: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_STATUS',true);
1779: l_item_txt := get_item_no(get_object_rec.new_name);
1780: ELSE
1781: l_item_txt := get_item_no(get_object_rec.new_name) ||' , '|| fnd_message.GET_STRING('INV', 'REVISION') || ' : '||get_object_rec.new_version;
1782: END IF;
1783: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE', l_item_txt );
1784: ELSIF (get_object_rec.replace_type = 'STATUS') THEN
1785: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_STATUS',true);
1786: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1787: get_status_meaning(get_object_rec.new_name) );
1781: l_item_txt := get_item_no(get_object_rec.new_name) ||' , '|| fnd_message.GET_STRING('INV', 'REVISION') || ' : '||get_object_rec.new_version;
1782: END IF;
1783: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE', l_item_txt );
1784: ELSIF (get_object_rec.replace_type = 'STATUS') THEN
1785: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_STATUS',true);
1786: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1787: get_status_meaning(get_object_rec.new_name) );
1788: ELSIF (get_object_rec.replace_type = 'ROUTING_ID') THEN
1789: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_ROUTING',true);
1782: END IF;
1783: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE', l_item_txt );
1784: ELSIF (get_object_rec.replace_type = 'STATUS') THEN
1785: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_STATUS',true);
1786: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1787: get_status_meaning(get_object_rec.new_name) );
1788: ELSIF (get_object_rec.replace_type = 'ROUTING_ID') THEN
1789: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_ROUTING',true);
1790: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1785: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_STATUS',true);
1786: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1787: get_status_meaning(get_object_rec.new_name) );
1788: ELSIF (get_object_rec.replace_type = 'ROUTING_ID') THEN
1789: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_ROUTING',true);
1790: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1791: GMD_API_GRP.get_object_name_version
1792: ('ROUTING'
1793: ,get_object_rec.new_name)
1786: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1787: get_status_meaning(get_object_rec.new_name) );
1788: ELSIF (get_object_rec.replace_type = 'ROUTING_ID') THEN
1789: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_ROUTING',true);
1790: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1791: GMD_API_GRP.get_object_name_version
1792: ('ROUTING'
1793: ,get_object_rec.new_name)
1794: );
1792: ('ROUTING'
1793: ,get_object_rec.new_name)
1794: );
1795: ELSIF (get_object_rec.replace_type = 'OPRN_ID') THEN
1796: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OPERATION',true);
1797: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1798: GMD_API_GRP.get_object_name_version
1799: ('OPERATION'
1800: ,get_object_rec.new_name)
1793: ,get_object_rec.new_name)
1794: );
1795: ELSIF (get_object_rec.replace_type = 'OPRN_ID') THEN
1796: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OPERATION',true);
1797: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1798: GMD_API_GRP.get_object_name_version
1799: ('OPERATION'
1800: ,get_object_rec.new_name)
1801: );
1799: ('OPERATION'
1800: ,get_object_rec.new_name)
1801: );
1802: ELSIF (get_object_rec.replace_type = 'FORMULA_ID') THEN
1803: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_FORMULA',true);
1804: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1805: GMD_API_GRP.get_object_name_version
1806: ('FORMULA'
1807: ,get_object_rec.new_name)
1800: ,get_object_rec.new_name)
1801: );
1802: ELSIF (get_object_rec.replace_type = 'FORMULA_ID') THEN
1803: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_FORMULA',true);
1804: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1805: GMD_API_GRP.get_object_name_version
1806: ('FORMULA'
1807: ,get_object_rec.new_name)
1808: );
1806: ('FORMULA'
1807: ,get_object_rec.new_name)
1808: );
1809: ELSIF (get_object_rec.replace_type = 'OWNER_ID') THEN
1810: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OWNER',true);
1811: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1812: get_owner_name(get_object_rec.new_name) );
1813: ELSIF (get_object_rec.replace_type = 'RECIPE_USE') THEN
1814: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1807: ,get_object_rec.new_name)
1808: );
1809: ELSIF (get_object_rec.replace_type = 'OWNER_ID') THEN
1810: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OWNER',true);
1811: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1812: get_owner_name(get_object_rec.new_name) );
1813: ELSIF (get_object_rec.replace_type = 'RECIPE_USE') THEN
1814: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1815: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1810: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE','GMD_OWNER',true);
1811: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1812: get_owner_name(get_object_rec.new_name) );
1813: ELSIF (get_object_rec.replace_type = 'RECIPE_USE') THEN
1814: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1815: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1816: get_recipe_use(get_object_rec.new_name) );
1817: ELSIF ((get_object_rec.replace_type like '%START_DATE%') OR
1818: (get_object_rec.replace_type like '%END_DATE%') ) THEN
1811: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1812: get_owner_name(get_object_rec.new_name) );
1813: ELSIF (get_object_rec.replace_type = 'RECIPE_USE') THEN
1814: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1815: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1816: get_recipe_use(get_object_rec.new_name) );
1817: ELSIF ((get_object_rec.replace_type like '%START_DATE%') OR
1818: (get_object_rec.replace_type like '%END_DATE%') ) THEN
1819: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1815: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1816: get_recipe_use(get_object_rec.new_name) );
1817: ELSIF ((get_object_rec.replace_type like '%START_DATE%') OR
1818: (get_object_rec.replace_type like '%END_DATE%') ) THEN
1819: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1820: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1821: FND_DATE.canonical_to_date(get_object_rec.new_name) );
1822: ELSIF (get_object_rec.replace_type IN ('ORGN_CODE', 'OWNER_ORGN_CODE')) THEN
1823: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1816: get_recipe_use(get_object_rec.new_name) );
1817: ELSIF ((get_object_rec.replace_type like '%START_DATE%') OR
1818: (get_object_rec.replace_type like '%END_DATE%') ) THEN
1819: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1820: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1821: FND_DATE.canonical_to_date(get_object_rec.new_name) );
1822: ELSIF (get_object_rec.replace_type IN ('ORGN_CODE', 'OWNER_ORGN_CODE')) THEN
1823: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1824: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1819: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1820: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1821: FND_DATE.canonical_to_date(get_object_rec.new_name) );
1822: ELSIF (get_object_rec.replace_type IN ('ORGN_CODE', 'OWNER_ORGN_CODE')) THEN
1823: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1824: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1825: get_orgn_code(get_object_rec.new_name) );
1826: ELSE
1827: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1820: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1821: FND_DATE.canonical_to_date(get_object_rec.new_name) );
1822: ELSIF (get_object_rec.replace_type IN ('ORGN_CODE', 'OWNER_ORGN_CODE')) THEN
1823: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1824: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1825: get_orgn_code(get_object_rec.new_name) );
1826: ELSE
1827: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1828: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',get_object_rec.new_name);
1823: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1824: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1825: get_orgn_code(get_object_rec.new_name) );
1826: ELSE
1827: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1828: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',get_object_rec.new_name);
1829: END IF;
1830:
1831: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1824: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1825: get_orgn_code(get_object_rec.new_name) );
1826: ELSE
1827: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1828: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',get_object_rec.new_name);
1829: END IF;
1830:
1831: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1832: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1827: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',get_object_rec.replace_type);
1828: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',get_object_rec.new_name);
1829: END IF;
1830:
1831: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1832: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1833: FND_MESSAGE.SET_TOKEN('OBJECT_VERS',get_object_rec.object_vers);
1834: FND_MESSAGE.SET_TOKEN('ERRMSG',SQLERRM);
1835: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1828: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',get_object_rec.new_name);
1829: END IF;
1830:
1831: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1832: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1833: FND_MESSAGE.SET_TOKEN('OBJECT_VERS',get_object_rec.object_vers);
1834: FND_MESSAGE.SET_TOKEN('ERRMSG',SQLERRM);
1835: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1836: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
1829: END IF;
1830:
1831: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1832: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1833: FND_MESSAGE.SET_TOKEN('OBJECT_VERS',get_object_rec.object_vers);
1834: FND_MESSAGE.SET_TOKEN('ERRMSG',SQLERRM);
1835: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1836: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
1837: END; -- End created to handle exception for each record
1830:
1831: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1832: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1833: FND_MESSAGE.SET_TOKEN('OBJECT_VERS',get_object_rec.object_vers);
1834: FND_MESSAGE.SET_TOKEN('ERRMSG',SQLERRM);
1835: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1836: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
1837: END; -- End created to handle exception for each record
1838:
1831: FND_MESSAGE.SET_TOKEN('OBJECT_NAME',get_object_rec.object_name);
1832: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',get_object_rec.object_type);
1833: FND_MESSAGE.SET_TOKEN('OBJECT_VERS',get_object_rec.object_vers);
1834: FND_MESSAGE.SET_TOKEN('ERRMSG',SQLERRM);
1835: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1836: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
1837: END; -- End created to handle exception for each record
1838:
1839:
1849: END IF;
1850:
1851: -- There were no row selected for replace raise an error
1852: IF (l_rowcount = 0) THEN
1853: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_NO_ROW_FOUND');
1854: Raise No_Replace_Exception;
1855: END IF;
1856:
1857: IF (l_debug = 'Y') THEN
1877: gmd_debug.put_line(g_pkg_name||'.'||l_api_name
1878: ||' : In the No_replace_exception section '
1879: ||' Error text is '||l_error_text);
1880: END IF;
1881: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1882: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
1883: -- outer excepption handles all error that occur prior to or after
1884: -- Mass updates (or within LOOP above)
1885:
1889: err_buf := NULL;
1890: l_retval := fnd_concurrent.set_completion_status('WARNING',sqlerrm);
1891:
1892: fnd_msg_pub.add_exc_msg (G_PKG_NAME, l_api_name);
1893: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_UPDATE_OBJECT_FAILED');
1894: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1895: IF (pReplace_type = 'INGREDIENT') THEN
1896: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE', get_item_no(pNew_name) );
1897: ELSIF (preplace_type = 'STATUS') THEN
1890: l_retval := fnd_concurrent.set_completion_status('WARNING',sqlerrm);
1891:
1892: fnd_msg_pub.add_exc_msg (G_PKG_NAME, l_api_name);
1893: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_UPDATE_OBJECT_FAILED');
1894: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1895: IF (pReplace_type = 'INGREDIENT') THEN
1896: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE', get_item_no(pNew_name) );
1897: ELSIF (preplace_type = 'STATUS') THEN
1898: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',get_status_meaning(pnew_name) );
1892: fnd_msg_pub.add_exc_msg (G_PKG_NAME, l_api_name);
1893: FND_MESSAGE.SET_NAME('GMD','GMD_CONC_UPDATE_OBJECT_FAILED');
1894: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1895: IF (pReplace_type = 'INGREDIENT') THEN
1896: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE', get_item_no(pNew_name) );
1897: ELSIF (preplace_type = 'STATUS') THEN
1898: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',get_status_meaning(pnew_name) );
1899: ELSIF (pReplace_type IN ('ORGN_CODE', 'OWNER_ORGN_CODE')) THEN
1900: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1894: FND_MESSAGE.SET_TOKEN('REPLACE_TYPE',pReplace_type);
1895: IF (pReplace_type = 'INGREDIENT') THEN
1896: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE', get_item_no(pNew_name) );
1897: ELSIF (preplace_type = 'STATUS') THEN
1898: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',get_status_meaning(pnew_name) );
1899: ELSIF (pReplace_type IN ('ORGN_CODE', 'OWNER_ORGN_CODE')) THEN
1900: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1901: get_orgn_code(pnew_name) );
1902: ELSE
1896: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE', get_item_no(pNew_name) );
1897: ELSIF (preplace_type = 'STATUS') THEN
1898: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',get_status_meaning(pnew_name) );
1899: ELSIF (pReplace_type IN ('ORGN_CODE', 'OWNER_ORGN_CODE')) THEN
1900: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1901: get_orgn_code(pnew_name) );
1902: ELSE
1903: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',pnew_name);
1904: END IF;
1899: ELSIF (pReplace_type IN ('ORGN_CODE', 'OWNER_ORGN_CODE')) THEN
1900: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',
1901: get_orgn_code(pnew_name) );
1902: ELSE
1903: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',pnew_name);
1904: END IF;
1905: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',pObject_type);
1906: FND_MESSAGE.SET_TOKEN('ERRMSG',SQLERRM);
1907: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1901: get_orgn_code(pnew_name) );
1902: ELSE
1903: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',pnew_name);
1904: END IF;
1905: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',pObject_type);
1906: FND_MESSAGE.SET_TOKEN('ERRMSG',SQLERRM);
1907: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1908: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
1909:
1902: ELSE
1903: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',pnew_name);
1904: END IF;
1905: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',pObject_type);
1906: FND_MESSAGE.SET_TOKEN('ERRMSG',SQLERRM);
1907: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1908: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
1909:
1910: END Mass_Replace_Operation;
1903: FND_MESSAGE.SET_TOKEN('REPLACE_VALUE',pnew_name);
1904: END IF;
1905: FND_MESSAGE.SET_TOKEN('OBJECT_TYPE',pObject_type);
1906: FND_MESSAGE.SET_TOKEN('ERRMSG',SQLERRM);
1907: FND_FILE.PUT(FND_FILE.LOG,FND_MESSAGE.GET);
1908: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
1909:
1910: END Mass_Replace_Operation;
1911:
2045: ,'FORMULA_CLASS') THEN
2046: fnd_dsql.add_text( ' And '||l_replace_type||' IS NULL )');
2047: ELSE
2048: -- pOld_Name cannot be null
2049: FND_MESSAGE.SET_NAME('GMD','GMD_NO_ASSIGN_VALUE_EXCEPTION');
2050: FND_MSG_PUB.ADD;
2051: RAISE VALIDATION_FAILED_EXCEPTION;
2052: END IF;
2053: ELSE