583:
584: -- Making new line entry and prompting users about MSNR request
585: fnd_file.new_line (fnd_file.LOG, 1);
586: --FND_FILE.NEW_LINE(FND_FILE.OUTPUT,1);
587: fnd_message.set_name ('GMD', 'GMD_SPVL_REPLACE_MESG');
588: fnd_message.set_token ('OBJECT_TYPE', get_object_rec.object_type);
589: fnd_message.set_token ('NAME', get_object_rec.object_name);
590: fnd_message.set_token ('VERSION', get_object_rec.object_vers);
591: fnd_message.set_token ('REPLACE_TYPE', get_object_rec.replace_type);
584: -- Making new line entry and prompting users about MSNR request
585: fnd_file.new_line (fnd_file.LOG, 1);
586: --FND_FILE.NEW_LINE(FND_FILE.OUTPUT,1);
587: fnd_message.set_name ('GMD', 'GMD_SPVL_REPLACE_MESG');
588: fnd_message.set_token ('OBJECT_TYPE', get_object_rec.object_type);
589: fnd_message.set_token ('NAME', get_object_rec.object_name);
590: fnd_message.set_token ('VERSION', get_object_rec.object_vers);
591: fnd_message.set_token ('REPLACE_TYPE', get_object_rec.replace_type);
592: fnd_file.put (fnd_file.LOG, fnd_message.get);
585: fnd_file.new_line (fnd_file.LOG, 1);
586: --FND_FILE.NEW_LINE(FND_FILE.OUTPUT,1);
587: fnd_message.set_name ('GMD', 'GMD_SPVL_REPLACE_MESG');
588: fnd_message.set_token ('OBJECT_TYPE', get_object_rec.object_type);
589: fnd_message.set_token ('NAME', get_object_rec.object_name);
590: fnd_message.set_token ('VERSION', get_object_rec.object_vers);
591: fnd_message.set_token ('REPLACE_TYPE', get_object_rec.replace_type);
592: fnd_file.put (fnd_file.LOG, fnd_message.get);
593: fnd_file.new_line (fnd_file.LOG, 1);
586: --FND_FILE.NEW_LINE(FND_FILE.OUTPUT,1);
587: fnd_message.set_name ('GMD', 'GMD_SPVL_REPLACE_MESG');
588: fnd_message.set_token ('OBJECT_TYPE', get_object_rec.object_type);
589: fnd_message.set_token ('NAME', get_object_rec.object_name);
590: fnd_message.set_token ('VERSION', get_object_rec.object_vers);
591: fnd_message.set_token ('REPLACE_TYPE', get_object_rec.replace_type);
592: fnd_file.put (fnd_file.LOG, fnd_message.get);
593: fnd_file.new_line (fnd_file.LOG, 1);
594: --FND_FILE.PUT(FND_FILE.OUTPUT,FND_MESSAGE.GET);
587: fnd_message.set_name ('GMD', 'GMD_SPVL_REPLACE_MESG');
588: fnd_message.set_token ('OBJECT_TYPE', get_object_rec.object_type);
589: fnd_message.set_token ('NAME', get_object_rec.object_name);
590: fnd_message.set_token ('VERSION', get_object_rec.object_vers);
591: fnd_message.set_token ('REPLACE_TYPE', get_object_rec.replace_type);
592: fnd_file.put (fnd_file.LOG, fnd_message.get);
593: fnd_file.new_line (fnd_file.LOG, 1);
594: --FND_FILE.PUT(FND_FILE.OUTPUT,FND_MESSAGE.GET);
595: --FND_FILE.NEW_LINE(FND_FILE.OUTPUT);
588: fnd_message.set_token ('OBJECT_TYPE', get_object_rec.object_type);
589: fnd_message.set_token ('NAME', get_object_rec.object_name);
590: fnd_message.set_token ('VERSION', get_object_rec.object_vers);
591: fnd_message.set_token ('REPLACE_TYPE', get_object_rec.replace_type);
592: fnd_file.put (fnd_file.LOG, fnd_message.get);
593: fnd_file.new_line (fnd_file.LOG, 1);
594: --FND_FILE.PUT(FND_FILE.OUTPUT,FND_MESSAGE.GET);
595: --FND_FILE.NEW_LINE(FND_FILE.OUTPUT);
596:
590: fnd_message.set_token ('VERSION', get_object_rec.object_vers);
591: fnd_message.set_token ('REPLACE_TYPE', get_object_rec.replace_type);
592: fnd_file.put (fnd_file.LOG, fnd_message.get);
593: fnd_file.new_line (fnd_file.LOG, 1);
594: --FND_FILE.PUT(FND_FILE.OUTPUT,FND_MESSAGE.GET);
595: --FND_FILE.NEW_LINE(FND_FILE.OUTPUT);
596:
597: IF pobject_type = 'SPECIFICATION' THEN
598: /* REPLACE TYPE could be on of the following
770: FETCH cur_check_item_org into item_org_rec;
771: CLOSE cur_check_item_org;
772:
773: IF item_org_rec.organization_id IS NULL THEN
774: --FND_MESSAGE.SET_NAME('gmd', 'GMD_ITEM_ORG_NOT_FOUND');
775: --FND_MESSAGE.SET_TOKEN('ITEM',get_item_no(get_object_rec.new_name));
776: --FND_MESSAGE.SET_TOKEN('ORGN',get_orgn_code(l_orgn_id));
777: --FND_MSG_PUB.ADD;
778: default_log ( ' Item is not assigned to the organization ');
771: CLOSE cur_check_item_org;
772:
773: IF item_org_rec.organization_id IS NULL THEN
774: --FND_MESSAGE.SET_NAME('gmd', 'GMD_ITEM_ORG_NOT_FOUND');
775: --FND_MESSAGE.SET_TOKEN('ITEM',get_item_no(get_object_rec.new_name));
776: --FND_MESSAGE.SET_TOKEN('ORGN',get_orgn_code(l_orgn_id));
777: --FND_MSG_PUB.ADD;
778: default_log ( ' Item is not assigned to the organization ');
779: RAISE NO_UPDATE_EXCEPTION;
772:
773: IF item_org_rec.organization_id IS NULL THEN
774: --FND_MESSAGE.SET_NAME('gmd', 'GMD_ITEM_ORG_NOT_FOUND');
775: --FND_MESSAGE.SET_TOKEN('ITEM',get_item_no(get_object_rec.new_name));
776: --FND_MESSAGE.SET_TOKEN('ORGN',get_orgn_code(l_orgn_id));
777: --FND_MSG_PUB.ADD;
778: default_log ( ' Item is not assigned to the organization ');
779: RAISE NO_UPDATE_EXCEPTION;
780: END IF;
1546: END IF;
1547:
1548: -- There were no row selected for replace raise an error
1549: IF (l_rowcount = 0) THEN
1550: fnd_message.set_name ('GMD', 'GMD_CONC_NO_ROW_FOUND');
1551: RAISE NO_REPLACE_EXCEPTION;
1552: END IF;
1553:
1554: DEBUG ( g_pkg_name
1578: || ' Error text is '
1579: || l_error_text);
1580: END IF;
1581:
1582: fnd_file.put (fnd_file.LOG, fnd_message.get);
1583: fnd_file.new_line (fnd_file.LOG, 1);
1584: -- outer excepption handles all error that occur prior to or after
1585: -- Mass updates (or within LOOP above)
1586: WHEN OTHERS THEN
1587: --ret_code := 2;
1588: --err_buf := NULL;
1589: l_retval := fnd_concurrent.set_completion_status ('WARNING', SQLERRM);
1590: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1591: fnd_message.set_name ('GMD', 'GMD_CONC_UPDATE_OBJECT_FAILED');
1592: fnd_message.set_token ('REPLACE_TYPE', preplace_type);
1593:
1594: IF (preplace_type = 'INGREDIENT') THEN
1595: fnd_message.set_token ('REPLACE_VALUE', pnew_name);
1588: --err_buf := NULL;
1589: l_retval := fnd_concurrent.set_completion_status ('WARNING', SQLERRM);
1590: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1591: fnd_message.set_name ('GMD', 'GMD_CONC_UPDATE_OBJECT_FAILED');
1592: fnd_message.set_token ('REPLACE_TYPE', preplace_type);
1593:
1594: IF (preplace_type = 'INGREDIENT') THEN
1595: fnd_message.set_token ('REPLACE_VALUE', pnew_name);
1596: ELSE
1591: fnd_message.set_name ('GMD', 'GMD_CONC_UPDATE_OBJECT_FAILED');
1592: fnd_message.set_token ('REPLACE_TYPE', preplace_type);
1593:
1594: IF (preplace_type = 'INGREDIENT') THEN
1595: fnd_message.set_token ('REPLACE_VALUE', pnew_name);
1596: ELSE
1597: fnd_message.set_token ('REPLACE_VALUE', pnew_name);
1598: END IF;
1599:
1593:
1594: IF (preplace_type = 'INGREDIENT') THEN
1595: fnd_message.set_token ('REPLACE_VALUE', pnew_name);
1596: ELSE
1597: fnd_message.set_token ('REPLACE_VALUE', pnew_name);
1598: END IF;
1599:
1600: fnd_message.set_token ('OBJECT_TYPE', pobject_type);
1601: fnd_message.set_token ('ERRMSG', SQLERRM);
1596: ELSE
1597: fnd_message.set_token ('REPLACE_VALUE', pnew_name);
1598: END IF;
1599:
1600: fnd_message.set_token ('OBJECT_TYPE', pobject_type);
1601: fnd_message.set_token ('ERRMSG', SQLERRM);
1602: fnd_file.put (fnd_file.LOG, fnd_message.get);
1603: fnd_file.new_line (fnd_file.LOG, 1);
1604: END mass_replace_oper_spec_val;
1597: fnd_message.set_token ('REPLACE_VALUE', pnew_name);
1598: END IF;
1599:
1600: fnd_message.set_token ('OBJECT_TYPE', pobject_type);
1601: fnd_message.set_token ('ERRMSG', SQLERRM);
1602: fnd_file.put (fnd_file.LOG, fnd_message.get);
1603: fnd_file.new_line (fnd_file.LOG, 1);
1604: END mass_replace_oper_spec_val;
1605:
1598: END IF;
1599:
1600: fnd_message.set_token ('OBJECT_TYPE', pobject_type);
1601: fnd_message.set_token ('ERRMSG', SQLERRM);
1602: fnd_file.put (fnd_file.LOG, fnd_message.get);
1603: fnd_file.new_line (fnd_file.LOG, 1);
1604: END mass_replace_oper_spec_val;
1605:
1606: /* PROCEDURE default_spectest_from_test