eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PA_PROJ_TASK_STRUC_PUB dependencies on PA_PROJECT_STRUCTURE_UTILS

Line 1059: l_shared := PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(p_project_id);

1055: IF cur_pa_temp_import%NOTFOUND
1056: THEN
1057:
1058: l_versioned := PA_WORKPLAN_ATTR_UTILS.Check_Wp_Versioning_Enabled(p_project_id);
1059: l_shared := PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(p_project_id);
1060:
1061: IF p_task_id IS NOT NULL AND p_task_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
1062: THEN
1063: l_task_id := p_task_id;

Line 1208: PA_PROJECT_STRUCTURE_UTILS.Structure_Version_Name_Or_Id(

1204: p_structure_version_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
1205: THEN
1206: --Validate the incoming structure version id
1207:
1208: PA_PROJECT_STRUCTURE_UTILS.Structure_Version_Name_Or_Id(
1209: p_structure_id => null
1210: ,p_structure_version_name => null
1211: ,p_structure_version_id => p_structure_version_id
1212: ,p_check_id_flag => 'Y'

Line 1225: l_str_status_code := PA_PROJECT_STRUCTURE_UTILS.get_structrue_version_status

1221: raise api_error;
1222: END IF;
1223:
1224: --bug 2736392
1225: l_str_status_code := PA_PROJECT_STRUCTURE_UTILS.get_structrue_version_status
1226: ( p_project_id => p_project_id
1227: ,p_structure_version_id => p_structure_version_id );
1228: IF l_str_status_code IS NULL
1229: THEN

Line 1248: l_str_status_code := PA_PROJECT_STRUCTURE_UTILS.get_structrue_version_status

1244: /* New Code Begin for Bug 2736392 -- Commnted the above code*/
1245:
1246: IF p_structure_version_id IS NOT NULL AND p_structure_version_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
1247: THEN
1248: l_str_status_code := PA_PROJECT_STRUCTURE_UTILS.get_structrue_version_status
1249: ( p_project_id => p_project_id
1250: ,p_structure_version_id => p_structure_version_id );
1251: IF l_str_status_code IS NULL
1252: THEN

Line 1519: l_sharing_enabled := PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(p_project_id);

1515: --
1516: IF (nvl(g_project_id,-99) = p_project_id and g_sharing_enabled IS NOT NULL) THEN
1517: l_sharing_enabled := g_sharing_enabled;
1518: ELSE
1519: l_sharing_enabled := PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(p_project_id);
1520: g_project_id := p_project_id;
1521: g_sharing_enabled := l_sharing_enabled;
1522: END IF;
1523: --

Line 1534: IF ('Y' = PA_PROJECT_STRUCTURE_UTILS.get_struc_type_for_structure(l_structure_id, 'FINANCIAL') AND

1530: ELSE
1531: l_task_unpub_ver_status_code := 'PUBLISHED';
1532: END IF;
1533: ELSE --split
1534: IF ('Y' = PA_PROJECT_STRUCTURE_UTILS.get_struc_type_for_structure(l_structure_id, 'FINANCIAL') AND
1535: 'N' = PA_PROJECT_STRUCTURE_UTILS.get_struc_type_for_structure(l_structure_id, 'WORKPLAN')) THEN
1536: l_task_unpub_ver_status_code := 'PUBLISHED';
1537: ELSE --workplan only
1538: -- Bug 4067757 used l_versioned instead of calling Check_Wp_Versioning_Enabled multiple times

Line 1535: 'N' = PA_PROJECT_STRUCTURE_UTILS.get_struc_type_for_structure(l_structure_id, 'WORKPLAN')) THEN

1531: l_task_unpub_ver_status_code := 'PUBLISHED';
1532: END IF;
1533: ELSE --split
1534: IF ('Y' = PA_PROJECT_STRUCTURE_UTILS.get_struc_type_for_structure(l_structure_id, 'FINANCIAL') AND
1535: 'N' = PA_PROJECT_STRUCTURE_UTILS.get_struc_type_for_structure(l_structure_id, 'WORKPLAN')) THEN
1536: l_task_unpub_ver_status_code := 'PUBLISHED';
1537: ELSE --workplan only
1538: -- Bug 4067757 used l_versioned instead of calling Check_Wp_Versioning_Enabled multiple times
1539: /* IF ('Y' = PA_WORKPLAN_ATTR_UTILS.Check_Wp_Versioning_Enabled(p_project_id)) THEN */

Line 1638: l_published_ver_exists := PA_PROJECT_STRUCTURE_UTILS.CHECK_PUBLISHED_VER_EXISTS( p_project_id, l_structure_id );

1634: --END IF;
1635:
1636: IF p_structure_type = 'FINANCIAL'
1637: THEN
1638: l_published_ver_exists := PA_PROJECT_STRUCTURE_UTILS.CHECK_PUBLISHED_VER_EXISTS( p_project_id, l_structure_id );
1639: IF ( l_versioned = 'N' OR
1640: l_shared = 'N' OR
1641: ( l_versioned = 'Y' AND
1642: l_shared = 'Y' AND

Line 1670: IF (PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(p_project_id) = 'Y') AND

1666: into l_parent_struc_ver_id
1667: from pa_proj_element_versions
1668: where element_version_id = l_task_version_id;
1669:
1670: IF (PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(p_project_id) = 'Y') AND
1671: -- Bug 4067757 used l_versioned instead of calling Check_Wp_Versioning_Enabled multiple times
1672: /* (PA_WORKPLAN_ATTR_UTILS.Check_Wp_Versioning_Enabled(p_project_id) = 'N') AND */
1673: (l_versioned = 'N') AND
1674: (PA_PROJECT_STRUCTURE_UTILS.get_struc_type_for_structure(l_structure_id, 'WORKPLAN') = 'Y') THEN

Line 1674: (PA_PROJECT_STRUCTURE_UTILS.get_struc_type_for_structure(l_structure_id, 'WORKPLAN') = 'Y') THEN

1670: IF (PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(p_project_id) = 'Y') AND
1671: -- Bug 4067757 used l_versioned instead of calling Check_Wp_Versioning_Enabled multiple times
1672: /* (PA_WORKPLAN_ATTR_UTILS.Check_Wp_Versioning_Enabled(p_project_id) = 'N') AND */
1673: (l_versioned = 'N') AND
1674: (PA_PROJECT_STRUCTURE_UTILS.get_struc_type_for_structure(l_structure_id, 'WORKPLAN') = 'Y') THEN
1675: PA_STRUCT_TASK_ROLLUP_PUB.Task_Status_Rollup(
1676: p_structure_version_id => l_parent_struc_ver_id
1677: ,p_element_version_id => l_task_version_id
1678: ,x_return_status => l_return_status

Line 2708: PA_PROJECT_STRUCTURE_UTILS.Structure_Version_Name_Or_Id(

2704: IF p_structure_version_id IS NOT NULL AND
2705: p_structure_version_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
2706: THEN
2707: --Validate the incoming structure version id
2708: PA_PROJECT_STRUCTURE_UTILS.Structure_Version_Name_Or_Id(
2709: p_structure_id => null
2710: ,p_structure_version_name => null
2711: ,p_structure_version_id => p_structure_version_id
2712: ,p_check_id_flag => 'Y'

Line 2724: l_str_status_code := PA_PROJECT_STRUCTURE_UTILS.get_structrue_version_status

2720: ,p_msg_name => l_msg_data );
2721: raise api_error;
2722: END IF;
2723: --bug 2736392
2724: l_str_status_code := PA_PROJECT_STRUCTURE_UTILS.get_structrue_version_status
2725: ( p_project_id => p_project_id
2726: ,p_structure_version_id => p_structure_version_id );
2727: IF l_str_status_code IS NULL
2728: THEN

Line 2745: l_str_status_code := PA_PROJECT_STRUCTURE_UTILS.get_structrue_version_status

2741: /* New Code Begin for Bug 2736392 -- Commnted the above code*/
2742:
2743: IF p_structure_version_id IS NOT NULL AND p_structure_version_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
2744: THEN
2745: l_str_status_code := PA_PROJECT_STRUCTURE_UTILS.get_structrue_version_status
2746: ( p_project_id => p_project_id
2747: ,p_structure_version_id => p_structure_version_id );
2748: IF l_str_status_code IS NULL
2749: THEN

Line 2876: PA_PROJECT_STRUCTURE_UTILS.GET_PROCESS_STATUS_CODE(p_project_id => p_project_id

2872:
2873: /*
2874:
2875: l_process_code :=
2876: PA_PROJECT_STRUCTURE_UTILS.GET_PROCESS_STATUS_CODE(p_project_id => p_project_id
2877: ,p_structure_type => p_structure_type );
2878: IF nvl(l_process_code,'-1') = 'WUP' THEN
2879:
2880: l_request_id := PA_PROJECT_STRUCTURE_UTILS.GET_CONC_REQUEST_ID(p_project_id => p_project_id -- Bug 3091798

Line 2880: l_request_id := PA_PROJECT_STRUCTURE_UTILS.GET_CONC_REQUEST_ID(p_project_id => p_project_id -- Bug 3091798

2876: PA_PROJECT_STRUCTURE_UTILS.GET_PROCESS_STATUS_CODE(p_project_id => p_project_id
2877: ,p_structure_type => p_structure_type );
2878: IF nvl(l_process_code,'-1') = 'WUP' THEN
2879:
2880: l_request_id := PA_PROJECT_STRUCTURE_UTILS.GET_CONC_REQUEST_ID(p_project_id => p_project_id -- Bug 3091798
2881: ,p_structure_type => p_structure_type );
2882: PA_UTILS.ADD_MESSAGE
2883: (p_app_short_name => 'PA',
2884: -- p_msg_name => 'PA_PS_VD_UPDWBS_PRC_INPROC'); Bug 3091798

Line 2892: l_request_id := PA_PROJECT_STRUCTURE_UTILS.GET_CONC_REQUEST_ID(p_project_id => p_project_id --Bug 3091798

2888:
2889: raise api_error;
2890:
2891: ELSIF nvl(l_process_code,'-1') = 'WUE' THEN
2892: l_request_id := PA_PROJECT_STRUCTURE_UTILS.GET_CONC_REQUEST_ID(p_project_id => p_project_id --Bug 3091798
2893: ,p_structure_type => p_structure_type );
2894: PA_UTILS.ADD_MESSAGE
2895: (p_app_short_name => 'PA',
2896: -- p_msg_name => 'PA_PS_VD_UPD_WBS_PRC_ERR');

Line 2907: PA_PROJECT_STRUCTURE_UTILS.GET_PROCESS_STATUS_MSG(

2903: END IF;
2904:
2905: */
2906:
2907: PA_PROJECT_STRUCTURE_UTILS.GET_PROCESS_STATUS_MSG(
2908: p_project_id => p_project_id
2909: , p_structure_type => p_structure_type
2910: , p_structure_version_id => null
2911: , p_context => 'UPDATE_AMG'

Line 3520: AND parent_structure_version_id = PA_PROJECT_STRUCTURE_UTILS.GET_LATEST_FIN_STRUC_VER_ID( p_project_id ); -- bug 2765115

3516: SELECT element_version_id, record_version_number
3517: FROM pa_proj_element_versions ppev
3518: WHERE proj_element_id = p_task_id
3519: AND object_type = 'PA_TASKS'
3520: AND parent_structure_version_id = PA_PROJECT_STRUCTURE_UTILS.GET_LATEST_FIN_STRUC_VER_ID( p_project_id ); -- bug 2765115
3521:
3522: CURSOR cur_task_ver_id2 IS
3523: SELECT record_version_number
3524: FROM pa_proj_element_versions ppev

Line 3719: PA_PROJECT_STRUCTURE_UTILS.Check_Delete_Structure_Ver_Ok(

3715:
3716:
3717: END LOOP;
3718:
3719: PA_PROJECT_STRUCTURE_UTILS.Check_Delete_Structure_Ver_Ok(
3720: p_project_id => p_project_id
3721: ,p_structure_version_id => cur_str_ver_rec.element_version_id
3722: ,x_return_status => l_return_status
3723: ,x_error_message_code => l_error_message_code

Line 4118: IF PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Structure( cur_pa_proj_elems_rec.proj_element_id, 'WORKPLAN' ) = 'Y' AND

4114: end if;
4115: ELSE --delete the workplan structure including all its structure versions.
4116: FOR cur_pa_proj_elems_rec IN cur_pa_proj_elems LOOP
4117: --should obly be WORKPLAN structure
4118: IF PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Structure( cur_pa_proj_elems_rec.proj_element_id, 'WORKPLAN' ) = 'Y' AND
4119: PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Structure( cur_pa_proj_elems_rec.proj_element_id, 'FINANCIAL' ) = 'N'
4120: THEN
4121: FOR cur_pa_proj_elem_vers_rec IN cur_pa_proj_elem_vers( cur_pa_proj_elems_rec.proj_element_id ) LOOP
4122: PA_PROJECT_STRUCTURE_PUB1.Delete_Structure_Version(

Line 4119: PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Structure( cur_pa_proj_elems_rec.proj_element_id, 'FINANCIAL' ) = 'N'

4115: ELSE --delete the workplan structure including all its structure versions.
4116: FOR cur_pa_proj_elems_rec IN cur_pa_proj_elems LOOP
4117: --should obly be WORKPLAN structure
4118: IF PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Structure( cur_pa_proj_elems_rec.proj_element_id, 'WORKPLAN' ) = 'Y' AND
4119: PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Structure( cur_pa_proj_elems_rec.proj_element_id, 'FINANCIAL' ) = 'N'
4120: THEN
4121: FOR cur_pa_proj_elem_vers_rec IN cur_pa_proj_elem_vers( cur_pa_proj_elems_rec.proj_element_id ) LOOP
4122: PA_PROJECT_STRUCTURE_PUB1.Delete_Structure_Version(
4123: p_structure_version_id => cur_pa_proj_elem_vers_rec.element_version_id

Line 4149: IF PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Structure( cur_pa_proj_elems_rec.proj_element_id, 'FINANCIAL' ) = 'Y'

4145: END LOOP;
4146: END IF;
4147:
4148: --Now associate the WORKPLAN structure type with the COSTING structure.
4149: IF PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Structure( cur_pa_proj_elems_rec.proj_element_id, 'FINANCIAL' ) = 'Y'
4150: THEN
4151: OPEN cur_struc_type_id;
4152: FETCH cur_struc_type_id INTO l_structure_type_id;
4153: CLOSE cur_struc_type_id;

Line 4319: IF PA_PROJECT_STRUCTURE_UTILS.check_workplan_enabled( p_src_project_id )= 'Y' OR

4315: ELSE
4316:
4317: -- Bug 4146369 : Added following condition so that the copy_structures_bulk is not get called
4318: -- when both structures are disabled in source project.
4319: IF PA_PROJECT_STRUCTURE_UTILS.check_workplan_enabled( p_src_project_id )= 'Y' OR
4320: PA_PROJECT_STRUCTURE_UTILS.check_financial_enabled( p_src_project_id )= 'Y' THEN
4321: --copying only structrues --This is for AMG
4322: PA_PROJ_TASK_STRUC_PUB.copy_structures_bulk
4323: (

Line 4320: PA_PROJECT_STRUCTURE_UTILS.check_financial_enabled( p_src_project_id )= 'Y' THEN

4316:
4317: -- Bug 4146369 : Added following condition so that the copy_structures_bulk is not get called
4318: -- when both structures are disabled in source project.
4319: IF PA_PROJECT_STRUCTURE_UTILS.check_workplan_enabled( p_src_project_id )= 'Y' OR
4320: PA_PROJECT_STRUCTURE_UTILS.check_financial_enabled( p_src_project_id )= 'Y' THEN
4321: --copying only structrues --This is for AMG
4322: PA_PROJ_TASK_STRUC_PUB.copy_structures_bulk
4323: (
4324: p_src_project_id => p_src_project_id

Line 4755: PA_PROJECT_STRUCTURE_UTILS.Check_Structure_Type_Exists(

4751: THEN
4752: FND_MSG_PUB.initialize;
4753: END IF;
4754: --check if the project have any structures
4755: PA_PROJECT_STRUCTURE_UTILS.Check_Structure_Type_Exists(
4756: p_project_id,
4757: p_structure_type,
4758: l_return_status,
4759: l_error_message_code);

Line 5044: IF PA_PROJECT_STRUCTURE_UTILS.Check_Struc_Ver_Name_Unique(

5040: CLOSE c2;
5041:
5042: IF l_proj_element_id IS NOT NULL
5043: THEN
5044: IF PA_PROJECT_STRUCTURE_UTILS.Check_Struc_Ver_Name_Unique(
5045: p_structure_version_name => p_structure_version_name
5046: ,p_pev_structure_id => null
5047: ,p_project_id => p_project_id
5048: ,p_structure_id => l_proj_element_id

Line 5198: IF (PA_PROJECT_STRUCTURE_UTILS.Get_struc_Type_for_Structure(

5194: END IF;
5195: ELSE
5196: /*
5197: --check if this is workplan type structure only
5198: IF (PA_PROJECT_STRUCTURE_UTILS.Get_struc_Type_for_Structure(
5199: l_proj_element_id, 'FINANCIAL') = 'Y') THEN
5200: --cannot create because this structure contains financial information also
5201: PA_UTILS.ADD_MESSAGE(
5202: p_app_short_name => 'PA'

Line 5411: IF PA_PROJECT_STRUCTURE_UTILS.CHECK_SHARING_ENABLED( p_project_id ) = 'N'

5407: l_return_value VARCHAR2(1) := 'N';
5408:
5409: BEGIN
5410: --Call Huberts API to check whether a workplan structure is separate from financial
5411: IF PA_PROJECT_STRUCTURE_UTILS.CHECK_SHARING_ENABLED( p_project_id ) = 'N'
5412: THEN
5413: l_return_value := 'Y';
5414: END IF;
5415: RETURN ( NVL( l_return_value, 'N' ) );

Line 5753: l_return_value := PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Structure(

5749: BEGIN
5750: --Call Huberts API to check whether a workplan structure is separate from financial
5751:
5752: /* FOR cur_pa_proj_rec in cur_pa_proj LOOP
5753: l_return_value := PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Structure(
5754: cur_pa_proj_rec.proj_element_id, 'WORKPLAN' );
5755: IF NVL( l_return_value, 'N' ) = 'Y'
5756: THEN
5757: Exit;

Line 7968: l_workplan_enabled := PA_PROJECT_STRUCTURE_UTILS.check_workplan_enabled( p_src_project_id );

7964: RETURN;
7965: END IF;
7966:
7967: --Check whether WP structure is enabled for the source project
7968: l_workplan_enabled := PA_PROJECT_STRUCTURE_UTILS.check_workplan_enabled( p_src_project_id );
7969: --Check whether Financial structure is enabled for the source project
7970: l_fin_enabled := PA_PROJECT_STRUCTURE_UTILS.check_financial_enabled( p_src_project_id );
7971: IF NVL( l_workplan_enabled, 'N' ) = 'Y' THEN
7972: --Check whether the structures are shared or not in the source project

Line 7970: l_fin_enabled := PA_PROJECT_STRUCTURE_UTILS.check_financial_enabled( p_src_project_id );

7966:
7967: --Check whether WP structure is enabled for the source project
7968: l_workplan_enabled := PA_PROJECT_STRUCTURE_UTILS.check_workplan_enabled( p_src_project_id );
7969: --Check whether Financial structure is enabled for the source project
7970: l_fin_enabled := PA_PROJECT_STRUCTURE_UTILS.check_financial_enabled( p_src_project_id );
7971: IF NVL( l_workplan_enabled, 'N' ) = 'Y' THEN
7972: --Check whether the structures are shared or not in the source project
7973: l_shared := PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(p_src_project_id);
7974: --Retrieve whether versioning is enabled or not

Line 7973: l_shared := PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(p_src_project_id);

7969: --Check whether Financial structure is enabled for the source project
7970: l_fin_enabled := PA_PROJECT_STRUCTURE_UTILS.check_financial_enabled( p_src_project_id );
7971: IF NVL( l_workplan_enabled, 'N' ) = 'Y' THEN
7972: --Check whether the structures are shared or not in the source project
7973: l_shared := PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(p_src_project_id);
7974: --Retrieve whether versioning is enabled or not
7975: OPEN cur_get_wp_attr;
7976: FETCH cur_get_wp_attr INTO l_versioning_enabled;
7977: CLOSE cur_get_wp_attr;

Line 7981: l_dlv_enabled := PA_PROJECT_STRUCTURE_UTILS.check_Deliverable_enabled(p_src_project_id);

7977: CLOSE cur_get_wp_attr;
7978: END IF;
7979:
7980: --Check whether deliverables is enabled
7981: l_dlv_enabled := PA_PROJECT_STRUCTURE_UTILS.check_Deliverable_enabled(p_src_project_id);
7982:
7983: --If deliverables is enabled, retrieve the various deliverables flags
7984: IF 'Y' = l_dlv_enabled THEN
7985: OPEN cur_get_flag('WP_DELIVERABLES_FLAG');

Line 10243: AND ( PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(element_version_id, 'WORKPLAN') = 'Y')

10239: SELECT Element_Version_ID, attribute15 BULK COLLECT
10240: INTO dest_versions_tab, src_Versions_Tab
10241: FROM PA_Proj_Element_Versions
10242: WHERE Project_ID = p_dest_project_id
10243: AND ( PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(element_version_id, 'WORKPLAN') = 'Y')
10244: AND object_type = 'PA_STRUCTURES';
10245:
10246: OPEN cur_get_str_shr_code;
10247: FETCH cur_get_str_shr_code INTO l_dest_proj_struc_shr_code;

Line 10869: l_shared := PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(p_src_project_id);

10865:
10866: IF NVL( l_workplan_enabled, 'N' ) = 'Y'
10867: THEN
10868:
10869: l_shared := PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(p_src_project_id);
10870: --Get workplan attributes
10871: OPEN get_wp_attr;
10872: FETCH get_wp_attr into l_wp_attr_rec;
10873: CLOSE get_wp_attr;

Line 12280: IF PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version( l_struc_version_id, 'FINANCIAL' ) = 'Y'

12276:
12277: --bug 3138959
12278: --User adding tasks under WORKPLAN structure from AMG, financial plan should be copied over.
12279:
12280: IF PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version( l_struc_version_id, 'FINANCIAL' ) = 'Y'
12281: AND l_shared = 'N' AND l_workplan_enabled = 'Y' -- For Split structures
12282: AND pa_project_pub.G_structure_in_rec.structure_type = 'WORKPLAN'
12283: THEN
12284: --Copy financial tasks

Line 12875: AND ( PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(element_version_id, 'WORKPLAN') = 'Y')

12871: Select Element_Version_ID, attribute15 BULK COLLECT
12872: INTO dest_versions_tab, src_Versions_Tab
12873: From PA_Proj_Element_Versions
12874: Where Project_ID = p_dest_project_id
12875: AND ( PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(element_version_id, 'WORKPLAN') = 'Y')
12876: AND object_type = 'PA_STRUCTURES';
12877:
12878: -- Copies budget versions, resource assignments and budget lines as required for the workplan version.
12879: /*Smukka Bug No. 3474141 Date 03/01/2004 */

Line 13801: PA_PROJECT_STRUCTURE_UTILS.GET_PROCESS_STATUS_CODE(p_project_id => p_project_id

13797:
13798: /*
13799:
13800: l_process_code :=
13801: PA_PROJECT_STRUCTURE_UTILS.GET_PROCESS_STATUS_CODE(p_project_id => p_project_id
13802: ,p_structure_type => p_structure_type );
13803: IF nvl(l_process_code,'-1') = 'WUP' THEN
13804:
13805: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 13818: l_request_id := PA_PROJECT_STRUCTURE_UTILS.GET_CONC_REQUEST_ID(p_project_id => p_project_id -- Bug 3091798

13814: -- ,p_attribute2 => ''
13815: -- ,p_attribute3 => ''
13816: -- ,p_attribute4 => ''
13817: -- ,p_attribute5 => '');
13818: l_request_id := PA_PROJECT_STRUCTURE_UTILS.GET_CONC_REQUEST_ID(p_project_id => p_project_id -- Bug 3091798
13819: ,p_structure_type => p_structure_type );
13820:
13821: PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
13822: -- ,p_msg_name => 'PA_PS_VD_UPDWBS_PRC_INPROC');Bug 3091798.

Line 13834: l_request_id := PA_PROJECT_STRUCTURE_UTILS.GET_CONC_REQUEST_ID(p_project_id => p_project_id --Bug 3091798

13830: ELSIF nvl(l_process_code,'-1') = 'WUE' THEN
13831:
13832: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
13833: THEN
13834: l_request_id := PA_PROJECT_STRUCTURE_UTILS.GET_CONC_REQUEST_ID(p_project_id => p_project_id --Bug 3091798
13835: ,p_structure_type => p_structure_type );
13836:
13837: --Commented out as there is no message defined for amg corresponding to PA_PS_VD_UPD_WBS_PRC_ERR
13838: --pa_interface_utils_pub.map_new_amg_msg

Line 13860: PA_PROJECT_STRUCTURE_UTILS.GET_PROCESS_STATUS_MSG(

13856: END IF;
13857:
13858: */
13859:
13860: PA_PROJECT_STRUCTURE_UTILS.GET_PROCESS_STATUS_MSG(
13861: p_project_id => p_project_id
13862: , p_structure_type => p_structure_type
13863: , p_structure_version_id => null
13864: , p_context => 'UPDATE_AMG'

Line 13890: l_str_status_code := PA_PROJECT_STRUCTURE_UTILS.get_structrue_version_status(

13886:
13887: IF (p_structure_version_id IS NOT NULL)
13888: THEN
13889: --IUP:Check whether the structure version passed is in a valid status
13890: l_str_status_code := PA_PROJECT_STRUCTURE_UTILS.get_structrue_version_status(
13891: p_project_id => p_project_id
13892: ,p_structure_version_id => p_structure_version_id );
13893: IF l_str_status_code IS NULL
13894: THEN

Line 14187: l_shared := PA_PROJECT_STRUCTURE_UTILS.Check_Sharing_Enabled(p_project_id); -- Added for bug#3451073

14183: --Added by rtarway for BUG 4320731
14184: task_ver_id_passed_tbl.delete;
14185:
14186: IF nvl(p_tasks_in_tbl.last,0) > 0 THEN
14187: l_shared := PA_PROJECT_STRUCTURE_UTILS.Check_Sharing_Enabled(p_project_id); -- Added for bug#3451073
14188: FOR i in p_tasks_in_tbl.first..p_tasks_in_tbl.last LOOP
14189:
14190: -- Reset the locals at the beginning of the loop.
14191: l_parent_task_id := null;

Line 15701: l_Share_Code := PA_PROJECT_STRUCTURE_UTILS.get_Structure_sharing_code(p_project_id);

15697: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level4);
15698: END IF;
15699: --added for 4059962 by rtarway
15700: --Derive financial task flag
15701: l_Share_Code := PA_PROJECT_STRUCTURE_UTILS.get_Structure_sharing_code(p_project_id);
15702: IF l_shared = 'Y'
15703: THEN
15704: --If P_Structure_Type = 'WORKPLAN' Or l_Share_Code = 'SHARE_PARTIAL' then
15705: If l_Share_Code = 'SHARE_PARTIAL' then --Modified IF condition for 4059962 reopen, rtarway

Line 16758: l_update_wbs_flag := PA_PROJECT_STRUCTURE_UTILS.GET_UPDATE_WBS_FLAG(p_project_id => p_project_id

16754: PA_PROJECT_PUB.G_Published_version_exists = 'N')
16755: THEN
16756:
16757: -- Changed p_structure_version_id to l_structure_version_id Bug 3035902.
16758: l_update_wbs_flag := PA_PROJECT_STRUCTURE_UTILS.GET_UPDATE_WBS_FLAG(p_project_id => p_project_id
16759: ,p_structure_version_id => l_structure_version_id ) ;
16760: IF nvl(l_update_wbs_flag,'N') = 'Y' THEN
16761: IF p_process_mode = 'ONLINE' THEN
16762:

Line 17595: l_update_option := pa_project_structure_utils.get_process_wbs_updates_option(p_task_count => l_task_count,

17591: BEGIN
17592: open cur_task_count(p_project_id,p_structure_version_id);
17593: fetch cur_task_count into l_task_count;
17594: close cur_task_count;
17595: l_update_option := pa_project_structure_utils.get_process_wbs_updates_option(p_task_count => l_task_count,
17596: p_project_id => p_project_id ---bug 4370533
17597: );
17598:
17599: IF p_calling_context = 'PUBLISH' THEN

Line 17872: l_update_wbs_flag := pa_project_structure_utils.GET_UPDATE_WBS_FLAG(p_project_id => p_project_id,

17868: --hsiu: bug 3035902
17869: --commenting because financial planning has partial process and
17870: --the update flag should not be check here.
17871: /*
17872: l_update_wbs_flag := pa_project_structure_utils.GET_UPDATE_WBS_FLAG(p_project_id => p_project_id,
17873: p_structure_version_id => p_structure_version_id);
17874: IF l_update_wbs_flag = 'N' THEN
17875: -- No further processing is required for this structure version. Return.
17876: -- TWUT.

Line 17888: l_update_wbs_flag := pa_project_structure_utils.GET_UPDATE_WBS_FLAG(p_project_id => p_project_id,

17884:
17885: -- Bug 3053920. We need not launch the conc process if split structure, structure type is workplan,
17886: -- basis code is MANUAL or flag is N.
17887:
17888: l_update_wbs_flag := pa_project_structure_utils.GET_UPDATE_WBS_FLAG(p_project_id => p_project_id,
17889: p_structure_version_id => p_structure_version_id);
17890: l_task_weighting_basis := pa_progress_utils.get_task_weighting_basis(p_project_id => p_project_id);
17891:
17892:

Line 17993: PA_PROJECT_STRUCTURE_UTILS.SET_PROCESS_CODE_IN_PROC(

17989: ELSE
17990: l_calling_context := p_calling_context;
17991: END IF;
17992:
17993: PA_PROJECT_STRUCTURE_UTILS.SET_PROCESS_CODE_IN_PROC(
17994: p_project_id => p_project_id
17995: , p_structure_version_id => p_structure_version_id
17996: , p_calling_context => l_calling_context
17997: , p_conc_request_id => l_request_id

Line 18006: PA_PROJECT_STRUCTURE_UTILS.SET_PROCESS_CODE_IN_PROC(

18002:
18003: -- Mark the newly created published structure record also with the process code
18004: -- and request_id.
18005:
18006: PA_PROJECT_STRUCTURE_UTILS.SET_PROCESS_CODE_IN_PROC(
18007: p_project_id => p_project_id
18008: , p_structure_version_id => p_pub_struc_ver_id
18009: , p_calling_context => l_calling_context
18010: , p_conc_request_id => l_request_id

Line 18283: PA_PROJECT_STRUCTURE_UTILS.SET_PROCESS_CODE_ERR(

18279: ELSE
18280: l_calling_context := p_calling_context;
18281: END IF;
18282:
18283: PA_PROJECT_STRUCTURE_UTILS.SET_PROCESS_CODE_ERR(
18284: p_project_id => p_project_id
18285: , p_structure_version_id => p_structure_version_id
18286: , p_calling_context => l_calling_context
18287: , p_conc_request_id => l_request_id

Line 18295: PA_PROJECT_STRUCTURE_UTILS.SET_PROCESS_CODE_ERR(

18291:
18292: -- Mark the newly created published structure record also with the process code
18293: -- and request_id.
18294:
18295: PA_PROJECT_STRUCTURE_UTILS.SET_PROCESS_CODE_ERR(
18296: p_project_id => p_project_id
18297: , p_structure_version_id => p_pub_struc_ver_id
18298: , p_calling_context => l_calling_context
18299: , p_conc_request_id => l_request_id

Line 18368: PA_PROJECT_STRUCTURE_UTILS.SET_PROCESS_CODE_ERR(

18364: ELSE
18365: l_calling_context := p_calling_context;
18366: END IF;
18367:
18368: PA_PROJECT_STRUCTURE_UTILS.SET_PROCESS_CODE_ERR(
18369: p_project_id => p_project_id
18370: , p_structure_version_id => p_structure_version_id
18371: , p_calling_context => l_calling_context
18372: , p_conc_request_id => l_request_id

Line 18380: PA_PROJECT_STRUCTURE_UTILS.SET_PROCESS_CODE_ERR(

18376:
18377: -- Mark the newly created published structure record also with the process code
18378: -- and request_id.
18379:
18380: PA_PROJECT_STRUCTURE_UTILS.SET_PROCESS_CODE_ERR(
18381: p_project_id => p_project_id
18382: , p_structure_version_id => p_pub_struc_ver_id
18383: , p_calling_context => l_calling_context
18384: , p_conc_request_id => l_request_id

Line 18607: l_update_wbs_flag := pa_project_structure_utils.GET_UPDATE_WBS_FLAG(p_project_id => p_project_id,

18603: p_msg_name => 'PA_INV_PARAM_PASSED');
18604: RAISE Invalid_Arg_Exc_WP;
18605: END IF;
18606:
18607: l_update_wbs_flag := pa_project_structure_utils.GET_UPDATE_WBS_FLAG(p_project_id => p_project_id,
18608: p_structure_version_id => p_structure_version_id);
18609:
18610: IF l_debug_mode = 'Y' THEN
18611: pa_debug.write(G_PKG_NAME, 'l_update_wbs_flag = '|| l_update_wbs_flag, 3);

Line 18615: l_workplan_type := PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(p_structure_version_id, 'WORKPLAN');

18611: pa_debug.write(G_PKG_NAME, 'l_update_wbs_flag = '|| l_update_wbs_flag, 3);
18612: END IF;
18613:
18614: --bug 4409337 moved from below to make use of some of these variables for bugfix.
18615: l_workplan_type := PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(p_structure_version_id, 'WORKPLAN');
18616: l_financial_type := PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(p_structure_version_id, 'FINANCIAL');
18617: l_share_flag := PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(l_project_id);
18618:
18619:

Line 18616: l_financial_type := PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(p_structure_version_id, 'FINANCIAL');

18612: END IF;
18613:
18614: --bug 4409337 moved from below to make use of some of these variables for bugfix.
18615: l_workplan_type := PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(p_structure_version_id, 'WORKPLAN');
18616: l_financial_type := PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(p_structure_version_id, 'FINANCIAL');
18617: l_share_flag := PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(l_project_id);
18618:
18619:
18620: IF l_debug_mode = 'Y' THEN

Line 18617: l_share_flag := PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(l_project_id);

18613:
18614: --bug 4409337 moved from below to make use of some of these variables for bugfix.
18615: l_workplan_type := PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(p_structure_version_id, 'WORKPLAN');
18616: l_financial_type := PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(p_structure_version_id, 'FINANCIAL');
18617: l_share_flag := PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(l_project_id);
18618:
18619:
18620: IF l_debug_mode = 'Y' THEN
18621: pa_debug.write(G_PKG_NAME, 'l_workplan_type = '|| l_workplan_type, 3);

Line 19239: --l_workplan_type := PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(p_structure_version_id, 'WORKPLAN');

19235: END IF;
19236: END;
19237:
19238: --moved these calls in the beginning.
19239: --l_workplan_type := PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(p_structure_version_id, 'WORKPLAN');
19240: --l_financial_type := PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(p_structure_version_id, 'FINANCIAL');
19241:
19242: IF (l_financial_type = 'Y') THEN
19243:

Line 19240: --l_financial_type := PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(p_structure_version_id, 'FINANCIAL');

19236: END;
19237:
19238: --moved these calls in the beginning.
19239: --l_workplan_type := PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(p_structure_version_id, 'WORKPLAN');
19240: --l_financial_type := PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(p_structure_version_id, 'FINANCIAL');
19241:
19242: IF (l_financial_type = 'Y') THEN
19243:
19244: SELECT start_date, completion_date

Line 19373: --IF PA_PROJECT_STRUCTURE_UTILS.Check_Subproject_Exists(l_project_id,p_structure_version_id, 'WORKPLAN') = 'Y' THEN

19369: --a process(PUB) currently in process and therefore edit_task_ok api will return 'N' to
19370: --adjust_asgnmt api.
19371:
19372: PA_TASK_ASSIGNMENT_UTILS.g_apply_progress_flag := 'Y'; --although th
19373: --IF PA_PROJECT_STRUCTURE_UTILS.Check_Subproject_Exists(l_project_id,p_structure_version_id, 'WORKPLAN') = 'Y' THEN
19374: IF PA_RELATIONSHIP_UTILS.Check_link_exists( p_project_id => p_project_id
19375: ,p_link_type => 'WORKPLAN' ) = 'Y'
19376: THEN
19377:

Line 19404: IF PA_PROJECT_STRUCTURE_UTILS.Check_Subproject_Exists(l_project_id,l_pub_ver_id, 'WORKPLAN') = 'Y'

19400: /*IF PA_RELATIONSHIP_UTILS.Check_parent_project_exists(
19401: p_project_id => p_project_id
19402: ,p_structure_ver_id => l_pub_ver_id
19403: ,p_link_type => 'WORKPLAN' ) = 'Y'
19404: IF PA_PROJECT_STRUCTURE_UTILS.Check_Subproject_Exists(l_project_id,l_pub_ver_id, 'WORKPLAN') = 'Y'
19405: THEN
19406: IF l_debug_mode = 'Y' THEN
19407: pa_debug.write(G_PKG_NAME, 'Before calling PA_STRUCT_TASK_ROLLUP_PUB.Program_Schedule_dates_rollup for published structure verison in PUBLISH mode', 3);
19408: END IF;

Line 19621: --l_share_flag := PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(l_project_id);

19617: END IF; -- p_pub_prog_flag = 'Y' THEN
19618:
19619: --bug 4019845
19620: --moved this call in the beginning
19621: --l_share_flag := PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(l_project_id);
19622: --The follwoing api is called to push progress data to PJI for the new
19623: --structure version.
19624:
19625: --bug 3822112

Line 19725: ,p_baselined_str_ver_id => PA_PROJECT_STRUCTURE_UTILS.Get_Baseline_Struct_Ver(l_Project_ID)

19721: p_init_msg_list => FND_API.G_FALSE
19722: ,p_commit => FND_API.G_FALSE
19723: ,p_project_id => l_Project_ID
19724: ,p_structure_version_id => l_pub_ver_id
19725: ,p_baselined_str_ver_id => PA_PROJECT_STRUCTURE_UTILS.Get_Baseline_Struct_Ver(l_Project_ID)
19726: ,p_structure_type => 'WORKPLAN'
19727: ,p_program_rollup_flag => 'Y' -- 4392189
19728: ,p_calling_context => 'SUMMARIZE' -- 4392189
19729: ,p_as_of_date => l_as_of_date -- 4392189

Line 21154: l_shared := PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(p_dest_project_id);

21150:
21151: x_msg_count := 0;
21152: x_return_status := FND_API.G_RET_STS_SUCCESS;
21153: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
21154: l_shared := PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(p_dest_project_id);
21155:
21156: /* The following is the simple solution for this.
21157: Update the Process_WBS_flag only for WORKPLAN enabled structures
21158: if task weighting basis is DURATION.