1743: IS
1744: l_display_text VARCHAR2(2000);
1745: BEGIN
1746: IF (p_baseline_flag = 'Y') THEN
1747: fnd_message.set_name('PA', 'PA_PS_STRUC_INFO_POP_B');
1748: ELSE
1749: fnd_message.set_name('PA', 'PA_PS_STRUC_INFO_POP_NB');
1750: END IF;
1751: FND_MESSAGE.Set_token('STRUC_VER_NAME', p_structure_version_name);
1745: BEGIN
1746: IF (p_baseline_flag = 'Y') THEN
1747: fnd_message.set_name('PA', 'PA_PS_STRUC_INFO_POP_B');
1748: ELSE
1749: fnd_message.set_name('PA', 'PA_PS_STRUC_INFO_POP_NB');
1750: END IF;
1751: FND_MESSAGE.Set_token('STRUC_VER_NAME', p_structure_version_name);
1752: FND_MESSAGE.Set_token('STRUC_VER_NUM', p_structure_version_number);
1753: FND_MESSAGE.Set_token('STATUS', p_status);
1747: fnd_message.set_name('PA', 'PA_PS_STRUC_INFO_POP_B');
1748: ELSE
1749: fnd_message.set_name('PA', 'PA_PS_STRUC_INFO_POP_NB');
1750: END IF;
1751: FND_MESSAGE.Set_token('STRUC_VER_NAME', p_structure_version_name);
1752: FND_MESSAGE.Set_token('STRUC_VER_NUM', p_structure_version_number);
1753: FND_MESSAGE.Set_token('STATUS', p_status);
1754: l_display_text := fnd_message.get;
1755: return l_display_text;
1748: ELSE
1749: fnd_message.set_name('PA', 'PA_PS_STRUC_INFO_POP_NB');
1750: END IF;
1751: FND_MESSAGE.Set_token('STRUC_VER_NAME', p_structure_version_name);
1752: FND_MESSAGE.Set_token('STRUC_VER_NUM', p_structure_version_number);
1753: FND_MESSAGE.Set_token('STATUS', p_status);
1754: l_display_text := fnd_message.get;
1755: return l_display_text;
1756: END Get_Struc_Ver_Display_Text;
1749: fnd_message.set_name('PA', 'PA_PS_STRUC_INFO_POP_NB');
1750: END IF;
1751: FND_MESSAGE.Set_token('STRUC_VER_NAME', p_structure_version_name);
1752: FND_MESSAGE.Set_token('STRUC_VER_NUM', p_structure_version_number);
1753: FND_MESSAGE.Set_token('STATUS', p_status);
1754: l_display_text := fnd_message.get;
1755: return l_display_text;
1756: END Get_Struc_Ver_Display_Text;
1757:
1750: END IF;
1751: FND_MESSAGE.Set_token('STRUC_VER_NAME', p_structure_version_name);
1752: FND_MESSAGE.Set_token('STRUC_VER_NUM', p_structure_version_number);
1753: FND_MESSAGE.Set_token('STATUS', p_status);
1754: l_display_text := fnd_message.get;
1755: return l_display_text;
1756: END Get_Struc_Ver_Display_Text;
1757:
1758:
2879: --summary task can have progress transactions
2880: -- IF (l_workplan = 'Y') THEN
2881: --check for progress
2882: -- IF pa_project_structure_utils.check_task_progress_exist(l_proj_element_id) = 'Y' THEN
2883: -- l_message_text := FND_MESSAGE.GET_STRING('PA','PA_PS_TASK_HAS_PROG');
2884: -- OPEN get_task_name_num(l_proj_element_id);
2885: -- FETCH get_task_name_num into l_task_name, l_task_number;
2886: -- CLOSE get_task_name_num;
2887: -- PA_UTILS.ADD_MESSAGE('PA', 'PA_PS_TASK_NAME_NUM_ERR',
2908: x_err_stage => l_err_stage,
2909: x_err_stack => l_err_stack);
2910:
2911: IF (l_err_code <> 0) THEN
2912: l_message_text := FND_MESSAGE.GET_STRING('PA',l_err_stage);
2913: OPEN get_task_name_num(l_proj_element_id);
2914: FETCH get_task_name_num into l_task_name, l_task_number;
2915: CLOSE get_task_name_num;
2916: PA_UTILS.ADD_MESSAGE('PA', 'PA_PS_TASK_NAME_NUM_ERR',
5025: FETCH curr_lat_pub_ver_cur into l_current_flag,l_LATEST_EFF_PUBLISHED_FLAG,l_version_name,l_version_number;
5026: CLOSE curr_lat_pub_ver_cur;
5027:
5028: IF l_current_flag = 'Y' THEN
5029: FND_MESSAGE.set_name('PA','PA_PS_DEL_CURR_BASE_VER');
5030: -- Commenting out the following as the messages are changed in the FD.
5031: -- Now as per the latest FD the above message doesnt need any tokens.
5032: -- FND_MESSAGE.set_token('VER_NAME',l_version_name);
5033: -- FND_MESSAGE.set_token('VER_NUMBER',l_version_number);
5028: IF l_current_flag = 'Y' THEN
5029: FND_MESSAGE.set_name('PA','PA_PS_DEL_CURR_BASE_VER');
5030: -- Commenting out the following as the messages are changed in the FD.
5031: -- Now as per the latest FD the above message doesnt need any tokens.
5032: -- FND_MESSAGE.set_token('VER_NAME',l_version_name);
5033: -- FND_MESSAGE.set_token('VER_NUMBER',l_version_number);
5034: FND_MSG_PUB.add;
5035:
5036: return 'N';
5029: FND_MESSAGE.set_name('PA','PA_PS_DEL_CURR_BASE_VER');
5030: -- Commenting out the following as the messages are changed in the FD.
5031: -- Now as per the latest FD the above message doesnt need any tokens.
5032: -- FND_MESSAGE.set_token('VER_NAME',l_version_name);
5033: -- FND_MESSAGE.set_token('VER_NUMBER',l_version_number);
5034: FND_MSG_PUB.add;
5035:
5036: return 'N';
5037: END IF;
5036: return 'N';
5037: END IF;
5038:
5039: IF l_LATEST_EFF_PUBLISHED_FLAG = 'Y' THEN
5040: FND_MESSAGE.set_name('PA','PA_PS_DEL_LATEST_PUB_VER');
5041: -- Commenting out the following as the messages are changed in the FD.
5042: -- Now as per the latest FD the above message doesnt need any tokens.
5043: -- FND_MESSAGE.set_token('VER_NAME',l_version_name);
5044: -- FND_MESSAGE.set_token('VER_NUMBER',l_version_number);
5039: IF l_LATEST_EFF_PUBLISHED_FLAG = 'Y' THEN
5040: FND_MESSAGE.set_name('PA','PA_PS_DEL_LATEST_PUB_VER');
5041: -- Commenting out the following as the messages are changed in the FD.
5042: -- Now as per the latest FD the above message doesnt need any tokens.
5043: -- FND_MESSAGE.set_token('VER_NAME',l_version_name);
5044: -- FND_MESSAGE.set_token('VER_NUMBER',l_version_number);
5045: FND_MSG_PUB.add;
5046:
5047: return 'N';
5040: FND_MESSAGE.set_name('PA','PA_PS_DEL_LATEST_PUB_VER');
5041: -- Commenting out the following as the messages are changed in the FD.
5042: -- Now as per the latest FD the above message doesnt need any tokens.
5043: -- FND_MESSAGE.set_token('VER_NAME',l_version_name);
5044: -- FND_MESSAGE.set_token('VER_NUMBER',l_version_number);
5045: FND_MSG_PUB.add;
5046:
5047: return 'N';
5048: END IF;
5049:
5050: OPEN link_exists_cur;
5051: FETCH link_exists_cur into l_object_relationship_id;
5052: IF link_exists_cur%FOUND THEN
5053: FND_MESSAGE.set_name('PA','PA_PS_DEL_PART_OF_PROG');
5054: -- Commenting out the following as the messages are changed in the FD.
5055: -- Now as per the latest FD the above message doesnt need any tokens.
5056: -- FND_MESSAGE.set_token('VER_NAME',l_version_name);
5057: -- FND_MESSAGE.set_token('VER_NUMBER',l_version_number);
5052: IF link_exists_cur%FOUND THEN
5053: FND_MESSAGE.set_name('PA','PA_PS_DEL_PART_OF_PROG');
5054: -- Commenting out the following as the messages are changed in the FD.
5055: -- Now as per the latest FD the above message doesnt need any tokens.
5056: -- FND_MESSAGE.set_token('VER_NAME',l_version_name);
5057: -- FND_MESSAGE.set_token('VER_NUMBER',l_version_number);
5058: FND_MSG_PUB.add;
5059: CLOSE link_exists_cur;
5060: return 'N';
5053: FND_MESSAGE.set_name('PA','PA_PS_DEL_PART_OF_PROG');
5054: -- Commenting out the following as the messages are changed in the FD.
5055: -- Now as per the latest FD the above message doesnt need any tokens.
5056: -- FND_MESSAGE.set_token('VER_NAME',l_version_name);
5057: -- FND_MESSAGE.set_token('VER_NUMBER',l_version_number);
5058: FND_MSG_PUB.add;
5059: CLOSE link_exists_cur;
5060: return 'N';
5061: END IF;