553: message_temp VARCHAR2(2000);
554: BEGIN
555: --For Bug 4654211 :Operating unit Parameter added
556: pa_interface_utils_pub.set_global_info(p_api_version_number => 1.0,
557: p_responsibility_id => FND_GLOBAL.resp_id,
558: p_user_id => FND_GLOBAL.user_id,
559: p_resp_appl_id => FND_GLOBAL.resp_appl_id,
560: p_operating_unit_id => PA_MOAC_UTILS.get_current_org_id,
561: p_msg_count => x_msg_count,
554: BEGIN
555: --For Bug 4654211 :Operating unit Parameter added
556: pa_interface_utils_pub.set_global_info(p_api_version_number => 1.0,
557: p_responsibility_id => FND_GLOBAL.resp_id,
558: p_user_id => FND_GLOBAL.user_id,
559: p_resp_appl_id => FND_GLOBAL.resp_appl_id,
560: p_operating_unit_id => PA_MOAC_UTILS.get_current_org_id,
561: p_msg_count => x_msg_count,
562: p_msg_data => x_msg_data,
555: --For Bug 4654211 :Operating unit Parameter added
556: pa_interface_utils_pub.set_global_info(p_api_version_number => 1.0,
557: p_responsibility_id => FND_GLOBAL.resp_id,
558: p_user_id => FND_GLOBAL.user_id,
559: p_resp_appl_id => FND_GLOBAL.resp_appl_id,
560: p_operating_unit_id => PA_MOAC_UTILS.get_current_org_id,
561: p_msg_count => x_msg_count,
562: p_msg_data => x_msg_data,
563: p_return_status => x_return_status);
907: -- Bug 2386041
908:
909: -- Bug 3770971..need to set the profile values for "PA: Cross Project User - Update" and
910: -- "PA: Cross Project User - View". These values are lost after calling set_global_info
911: -- which calls fnd_global.apps_initialize.
912:
913: /* bug 8214030 changes start*/
914: l_user_profile_value1 := fnd_profile.value_specific(
915: NAME => 'PA_SUPER_PROJECT',
912:
913: /* bug 8214030 changes start*/
914: l_user_profile_value1 := fnd_profile.value_specific(
915: NAME => 'PA_SUPER_PROJECT',
916: USER_ID => fnd_global.user_id,
917: RESPONSIBILITY_ID => fnd_global.resp_id,
918: APPLICATION_ID => fnd_global.resp_appl_id);
919:
920: if ((l_user_profile_value1 = 'N') OR (l_user_profile_value1 is null)) then
913: /* bug 8214030 changes start*/
914: l_user_profile_value1 := fnd_profile.value_specific(
915: NAME => 'PA_SUPER_PROJECT',
916: USER_ID => fnd_global.user_id,
917: RESPONSIBILITY_ID => fnd_global.resp_id,
918: APPLICATION_ID => fnd_global.resp_appl_id);
919:
920: if ((l_user_profile_value1 = 'N') OR (l_user_profile_value1 is null)) then
921:
914: l_user_profile_value1 := fnd_profile.value_specific(
915: NAME => 'PA_SUPER_PROJECT',
916: USER_ID => fnd_global.user_id,
917: RESPONSIBILITY_ID => fnd_global.resp_id,
918: APPLICATION_ID => fnd_global.resp_appl_id);
919:
920: if ((l_user_profile_value1 = 'N') OR (l_user_profile_value1 is null)) then
921:
922: BEGIN
926: fnd_profile_option_values v
927: WHERE p.profile_option_name = 'PA_SUPER_PROJECT'
928: AND v.profile_option_id = p.profile_option_id
929: AND v.level_id = 10004
930: AND v.level_value = fnd_global.user_id;
931: EXCEPTION
932: WHEN no_data_found THEN
933: l_user_profile_value1 := null;
934: WHEN others THEN
933: l_user_profile_value1 := null;
934: WHEN others THEN
935: l_user_profile_value1 := null;
936: END;
937: l_set_profile_success1 := fnd_profile.save('PA_SUPER_PROJECT', 'Y', 'USER', fnd_global.user_id);
938: end if;
939:
940: l_user_profile_value2 := fnd_profile.value_specific(
941: NAME => 'PA_SUPER_PROJECT_VIEW',
938: end if;
939:
940: l_user_profile_value2 := fnd_profile.value_specific(
941: NAME => 'PA_SUPER_PROJECT_VIEW',
942: USER_ID => fnd_global.user_id,
943: RESPONSIBILITY_ID => fnd_global.resp_id,
944: APPLICATION_ID => fnd_global.resp_appl_id);
945:
946: if ((l_user_profile_value2 = 'N') OR (l_user_profile_value2 is null)) then
939:
940: l_user_profile_value2 := fnd_profile.value_specific(
941: NAME => 'PA_SUPER_PROJECT_VIEW',
942: USER_ID => fnd_global.user_id,
943: RESPONSIBILITY_ID => fnd_global.resp_id,
944: APPLICATION_ID => fnd_global.resp_appl_id);
945:
946: if ((l_user_profile_value2 = 'N') OR (l_user_profile_value2 is null)) then
947: BEGIN
940: l_user_profile_value2 := fnd_profile.value_specific(
941: NAME => 'PA_SUPER_PROJECT_VIEW',
942: USER_ID => fnd_global.user_id,
943: RESPONSIBILITY_ID => fnd_global.resp_id,
944: APPLICATION_ID => fnd_global.resp_appl_id);
945:
946: if ((l_user_profile_value2 = 'N') OR (l_user_profile_value2 is null)) then
947: BEGIN
948: SELECT profile_option_value
951: fnd_profile_option_values v
952: WHERE p.profile_option_name = 'PA_SUPER_PROJECT_VIEW'
953: AND v.profile_option_id = p.profile_option_id
954: AND v.level_id = 10004
955: AND v.level_value = fnd_global.user_id;
956: EXCEPTION
957: WHEN no_data_found THEN
958: l_user_profile_value2 := null;
959: WHEN others THEN
958: l_user_profile_value2 := null;
959: WHEN others THEN
960: l_user_profile_value2 := null;
961: END;
962: l_set_profile_success2 := fnd_profile.save('PA_SUPER_PROJECT_VIEW', 'Y', 'USER', fnd_global.user_id);
963: end if;
964:
965: /* bug 8214030 changes end*/
966: -- Bug 3770971 end. Values will be set back in gms_budget_pub after summarize_budgets is done.
1372: END IF;
1373:
1374: /* bug 8214030: resetting the profile values back */
1375: if (l_set_profile_success1 = TRUE) then
1376: l_set_profile_success1 := fnd_profile.save('PA_SUPER_PROJECT', l_user_profile_value1, 'USER', fnd_global.user_id);
1377: end if;
1378: if (l_set_profile_success2 = TRUE) then
1379: l_set_profile_success2 := fnd_profile.save('PA_SUPER_PROJECT_VIEW', l_user_profile_value2, 'USER', fnd_global.user_id);
1380: end if;
1375: if (l_set_profile_success1 = TRUE) then
1376: l_set_profile_success1 := fnd_profile.save('PA_SUPER_PROJECT', l_user_profile_value1, 'USER', fnd_global.user_id);
1377: end if;
1378: if (l_set_profile_success2 = TRUE) then
1379: l_set_profile_success2 := fnd_profile.save('PA_SUPER_PROJECT_VIEW', l_user_profile_value2, 'USER', fnd_global.user_id);
1380: end if;
1381:
1382: EXCEPTION
1383: WHEN FND_API.G_EXC_ERROR THEN
1388: gms_error_pkg.gms_debug('GMS_SUMMARIZE_BUDGETS.SUMMARIZE_BASELINED_VERSIONS - x_return_status ----- : '|| x_return_status,'C');
1389: ERRBUF := x_err_stage;
1390: /* bug 8214030: resetting the profile values back */
1391: if (l_set_profile_success1 = TRUE) then
1392: l_set_profile_success1 := fnd_profile.save('PA_SUPER_PROJECT', l_user_profile_value1, 'USER', fnd_global.user_id);
1393: end if;
1394: if (l_set_profile_success2 = TRUE) then
1395: l_set_profile_success2 := fnd_profile.save('PA_SUPER_PROJECT_VIEW', l_user_profile_value2, 'USER', fnd_global.user_id);
1396: end if;
1391: if (l_set_profile_success1 = TRUE) then
1392: l_set_profile_success1 := fnd_profile.save('PA_SUPER_PROJECT', l_user_profile_value1, 'USER', fnd_global.user_id);
1393: end if;
1394: if (l_set_profile_success2 = TRUE) then
1395: l_set_profile_success2 := fnd_profile.save('PA_SUPER_PROJECT_VIEW', l_user_profile_value2, 'USER', fnd_global.user_id);
1396: end if;
1397: when OTHERS THEN
1398: IF L_DEBUG = 'Y' THEN
1399: gms_error_pkg.gms_debug('GMS_SUMMARIZE_BUDGETS.SUMMARIZE_BASELINED_VERSION - In when Others exception','C');
1401: RETCODE := 'U';
1402: ERRBUF := (SQLERRM||' '||SQLCODE);
1403: /* bug 8214030: resetting the profile values back */
1404: if (l_set_profile_success1 = TRUE) then
1405: l_set_profile_success1 := fnd_profile.save('PA_SUPER_PROJECT', l_user_profile_value1, 'USER', fnd_global.user_id);
1406: end if;
1407: if (l_set_profile_success2 = TRUE) then
1408: l_set_profile_success2 := fnd_profile.save('PA_SUPER_PROJECT_VIEW', l_user_profile_value2, 'USER', fnd_global.user_id);
1409: end if;
1404: if (l_set_profile_success1 = TRUE) then
1405: l_set_profile_success1 := fnd_profile.save('PA_SUPER_PROJECT', l_user_profile_value1, 'USER', fnd_global.user_id);
1406: end if;
1407: if (l_set_profile_success2 = TRUE) then
1408: l_set_profile_success2 := fnd_profile.save('PA_SUPER_PROJECT_VIEW', l_user_profile_value2, 'USER', fnd_global.user_id);
1409: end if;
1410: END summarize_baselined_versions;
1411:
1412: END GMS_SUMMARIZE_BUDGETS;