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_PROJECT_STRUCTURE_UTILS dependencies on PA_PROJECT_STRUCTURE_UTILS

Line 1: package body PA_PROJECT_STRUCTURE_UTILS as

1: package body PA_PROJECT_STRUCTURE_UTILS as
2: /*$Header: PAXSTCUB.pls 120.23.12020000.2 2013/04/10 18:57:21 skkoppul ship $*/
3:
4: -- API name : Check_Delete_Structure_Ver_Ok
5: -- Type : Utils API

Line 112: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',

108:
109: -- 4537865 RESET OUT PARAMS
110: x_error_message_code := SQLERRM ;
111:
112: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',
113: p_procedure_name => 'Check_Delete_Structure_Ver_Ok');
114: RAISE;
115: END Check_Delete_Structure_Ver_Ok;
116:

Line 320: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',

316: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
317: -- 4537865 RESET OUT PARAMS
318: x_error_message_code := SQLERRM ;
319:
320: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',
321: p_procedure_name => 'Check_Structure_Type_Exists');
322: RAISE;
323: END Check_Structure_Type_Exists;
324:

Line 498: IF ('O' = PA_PROJECT_STRUCTURE_UTILS.IS_STRUC_VER_LOCKED_BY_USER(

494: OPEN get_other_unpub_ver;
495: LOOP
496: FETCH get_other_unpub_ver into l_struc_ver_id;
497: EXIT WHEN get_other_unpub_ver%NOTFOUND;
498: IF ('O' = PA_PROJECT_STRUCTURE_UTILS.IS_STRUC_VER_LOCKED_BY_USER(
499: FND_GLOBAL.USER_ID, l_struc_ver_id)) THEN
500: CLOSE get_other_unpub_ver;
501: return 'N';
502: END IF;

Line 511: IF ('N' = PA_PROJECT_STRUCTURE_UTILS.Check_Struc_Ver_Published(l_project_id,l_struc_ver_id)) THEN

507: OPEN get_linked_element_parent;
508: LOOP
509: FETCH get_linked_element_parent into l_project_id, l_struc_ver_id;
510: EXIT WHEN get_linked_element_parent%NOTFOUND;
511: IF ('N' = PA_PROJECT_STRUCTURE_UTILS.Check_Struc_Ver_Published(l_project_id,l_struc_ver_id)) THEN
512: CLOSE get_linked_element_parent;
513: return 'N';
514: END IF;
515: END LOOP;

Line 695: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',

691: -- 4537865 RESET OUT PARAMS
692: x_structure_version_name := NULL ;
693: x_error_message_code := SQLERRM ;
694:
695: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',
696: p_procedure_name => 'Get_New_Struc_Ver_Name');
697: RAISE;
698: END;
699:

Line 1389: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',

1385: p_min_sch_start_date := NULL ;
1386: p_rollup_last_update_date := NULL ;
1387: p_max_sch_finish_date := NULL ;
1388:
1389: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',
1390: p_procedure_name => 'Get_Rollup_Dates',
1391: p_error_text => SUBSTRB(SQLERRM,1,240)
1392: );
1393: RAISE ;

Line 1453: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',

1449: EXCEPTION
1450: WHEN OTHERS THEN
1451: p_structure_version_id := NULL;
1452:
1453: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',
1454: p_procedure_name => 'Get_Workplan_Version',
1455: p_error_text => SUBSTRB(SQLERRM,1,240)
1456: );
1457: RAISE ;

Line 1518: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',

1514: EXCEPTION
1515: WHEN OTHERS THEN
1516: p_structure_version_id := NULL;
1517:
1518: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',
1519: p_procedure_name => 'Get_Financial_Version',
1520: p_error_text => SUBSTRB(SQLERRM,1,240)
1521: );
1522: RAISE ;

Line 1649: IF PA_PROJECT_STRUCTURE_UTILS.check_task_progress_exist(l_proj_element_id) = 'Y' THEN

1645: ,p_structure_type => 'WORKPLAN'
1646: ) = 'Y'
1647: THEN
1648: --call selvas API
1649: IF PA_PROJECT_STRUCTURE_UTILS.check_task_progress_exist(l_proj_element_id) = 'Y' THEN
1650: -- CLOSE get_missing_tasks;
1651: -- CLOSE get_latest_pub_ver;
1652: -- return 'N';
1653: --Add error message to stack

Line 1716: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',

1712: --4537865
1713: x_msg_count := 1;
1714: x_msg_data := SQLERRM ;
1715:
1716: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',
1717: p_procedure_name => 'check_miss_transaction_tasks',
1718: p_error_text => x_msg_data); -- 4537865
1719: RAISE;
1720: END check_miss_transaction_tasks;

Line 1939: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',

1935: WHEN OTHERS THEN
1936: x_err_msg_code := SQLCODE;
1937: x_return_status := 'N'; -- Based on Usage of this API
1938:
1939: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',
1940: p_procedure_name => 'check_enable_wp_ok',
1941: p_error_text => SUBSTRB(SQLERRM,1,240)
1942: );
1943: RAISE ;

Line 2034: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',

2030: WHEN OTHERS THEN
2031: x_err_msg_code := SQLCODE;
2032: x_return_status := 'N'; -- Based on Usage of this API
2033:
2034: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',
2035: p_procedure_name => 'check_disable_wp_ok',
2036: p_error_text => SUBSTRB(SQLERRM,1,240)
2037: );
2038: RAISE ;

Line 2116: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',

2112: WHEN OTHERS THEN
2113: x_err_msg_code := SQLCODE;
2114: x_return_status := 'N'; -- Based on Usage of this API
2115:
2116: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',
2117: p_procedure_name => 'check_sharing_on_ok',
2118: p_error_text => SUBSTRB(SQLERRM,1,240)
2119: );
2120: RAISE ;

Line 2176: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',

2172: WHEN OTHERS THEN
2173: x_err_msg_code := SQLCODE;
2174: x_return_status := 'N'; -- Based on Usage of this API
2175:
2176: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',
2177: p_procedure_name => 'check_sharing_off_ok',
2178: p_error_text => SUBSTRB(SQLERRM,1,240)
2179: );
2180: RAISE ;

Line 2341: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',

2337: WHEN OTHERS THEN
2338: x_err_msg_code := SQLCODE;
2339: x_return_status := 'N'; -- Based on Usage of this API
2340:
2341: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',
2342: p_procedure_name => 'check_versioning_on_ok',
2343: p_error_text => SUBSTRB(SQLERRM,1,240)
2344: );
2345: RAISE ;

Line 2392: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',

2388: WHEN OTHERS THEN
2389: x_err_msg_code := SQLCODE;
2390: x_return_status := 'N'; -- Based on Usage of this API
2391:
2392: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',
2393: p_procedure_name => 'check_versioning_off_ok',
2394: p_error_text => SUBSTRB(SQLERRM,1,240)
2395: );
2396: RAISE ;

Line 2519: l_published := PA_PROJECT_STRUCTURE_UTILS.Check_Struc_Ver_Published(

2515: IS
2516: l_published VARCHAR2(1);
2517: l_versioned VARCHAR2(1);
2518: BEGIN
2519: l_published := PA_PROJECT_STRUCTURE_UTILS.Check_Struc_Ver_Published(
2520: p_project_id,
2521: p_structure_version_id);
2522: l_versioned := PA_WORKPLAN_ATTR_UTILS.CHECK_WP_VERSIONING_ENABLED(
2523: p_project_id);

Line 2555: l_published := PA_PROJECT_STRUCTURE_UTILS.Check_Struc_Ver_Published(

2551: l_published VARCHAR2(1);
2552: l_versioned VARCHAR2(1);
2553: l_shared VARCHAR2(1);
2554: BEGIN
2555: l_published := PA_PROJECT_STRUCTURE_UTILS.Check_Struc_Ver_Published(
2556: p_project_id,
2557: p_structure_version_id);
2558: l_versioned := PA_WORKPLAN_ATTR_UTILS.CHECK_WP_VERSIONING_ENABLED(
2559: p_project_id);

Line 2561: l_shared := PA_PROJECT_STRUCTURE_UTILS.Check_Sharing_Enabled(

2557: p_structure_version_id);
2558: l_versioned := PA_WORKPLAN_ATTR_UTILS.CHECK_WP_VERSIONING_ENABLED(
2559: p_project_id);
2560:
2561: l_shared := PA_PROJECT_STRUCTURE_UTILS.Check_Sharing_Enabled(
2562: p_project_id);
2563:
2564: IF (l_shared = 'Y' AND l_published = 'N' AND l_versioned = 'Y') THEN
2565: return 'N';

Line 2794: IF ('N' = pa_project_structure_utils.check_published_ver_exists(l_project_id, l_structure_id)) THEN

2790: OPEN c1;
2791: FETCH c1 into l_project_id, l_structure_id;
2792: CLOSE c1;
2793:
2794: IF ('N' = pa_project_structure_utils.check_published_ver_exists(l_project_id, l_structure_id)) THEN
2795: OPEN c2;
2796: FETCH c2 into l_count;
2797: CLOSE c2;
2798:

Line 2882: -- IF pa_project_structure_utils.check_task_progress_exist(l_proj_element_id) = 'Y' THEN

2878: --removed for bug 2740802
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;

Line 2950: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',

2946: WHEN OTHERS THEN
2947: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2948: x_msg_count := 1; -- 4537865
2949: x_msg_data := SQLERRM ; -- 4537865
2950: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',
2951: p_procedure_name => 'Check_txn_on_summary_tasks',
2952: p_error_text => x_msg_data); -- 4537865
2953: RAISE;
2954: END Check_txn_on_summary_tasks;

Line 3060: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',

3056: WHEN OTHERS THEN
3057: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3058: x_msg_count := 1; -- 4537865
3059: x_msg_data := SQLERRM ; -- 4537865
3060: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',
3061: p_procedure_name => 'Check_tasks_statuses_valid',
3062: p_error_text => x_msg_data ); -- 4537865
3063: RAISE;
3064: END check_tasks_statuses_valid;

Line 3173: IF (PA_PROJECT_STRUCTURE_UTILS.Check_Sharing_Enabled(l_project_id) = 'Y')

3169: return 'Y';
3170: END IF;
3171:
3172: --check if shared or split
3173: IF (PA_PROJECT_STRUCTURE_UTILS.Check_Sharing_Enabled(l_project_id) = 'Y')
3174: THEN
3175: --shared; check structure version status
3176: IF (PA_WORKPLAN_ATTR_UTILS.CHECK_WP_VERSIONING_ENABLED(l_project_id) = 'Y')
3177: THEN

Line 3468: IF (PA_PROJECT_STRUCTURE_UTILS.Check_Workplan_enabled(p_project_id) = 'N') THEN

3464: CLOSE getFinOnlyStrucVer;
3465: return l_struc_ver_id;
3466: ELSE
3467: --this is a project; check if workplan is enabled
3468: IF (PA_PROJECT_STRUCTURE_UTILS.Check_Workplan_enabled(p_project_id) = 'N') THEN
3469: --workplan is not enabled; financial structure only
3470: OPEN getFinOnlyStrucVer(p_project_id);
3471: FETCH getFinOnlyStrucVer into l_struc_ver_id;
3472: CLOSE getFinOnlyStrucVer;

Line 3476: IF (PA_PROJECT_STRUCTURE_UTILS.Check_Sharing_Enabled(p_project_id) = 'Y') THEN

3472: CLOSE getFinOnlyStrucVer;
3473: return l_struc_ver_id;
3474: ELSE
3475: --Workplan enabled; check if it is shared of split
3476: IF (PA_PROJECT_STRUCTURE_UTILS.Check_Sharing_Enabled(p_project_id) = 'Y') THEN
3477: --this is a shared project; check if versioning is enabled
3478: IF (PA_WORKPLAN_ATTR_UTILS.CHECK_WP_VERSIONING_ENABLED(p_project_id) = 'Y') THEN
3479: --get latest published, if published exist
3480: l_struc_ver_id := PA_PROJECT_STRUCTURE_UTILS.GET_LATEST_FIN_STRUC_VER_ID(p_project_id);

Line 3480: l_struc_ver_id := PA_PROJECT_STRUCTURE_UTILS.GET_LATEST_FIN_STRUC_VER_ID(p_project_id);

3476: IF (PA_PROJECT_STRUCTURE_UTILS.Check_Sharing_Enabled(p_project_id) = 'Y') THEN
3477: --this is a shared project; check if versioning is enabled
3478: IF (PA_WORKPLAN_ATTR_UTILS.CHECK_WP_VERSIONING_ENABLED(p_project_id) = 'Y') THEN
3479: --get latest published, if published exist
3480: l_struc_ver_id := PA_PROJECT_STRUCTURE_UTILS.GET_LATEST_FIN_STRUC_VER_ID(p_project_id);
3481: IF l_struc_ver_id IS NULL THEN
3482: --get working version, which is the only version
3483: OPEN getFinOnlyStrucVer(p_project_id);
3484: FETCH getFinOnlyStrucVer into l_struc_ver_id;

Line 3547: l_module_name CONSTANT VARCHAR2(30) := 'PA_PROJECT_STRUCTURE_UTILS';

3543: and pst.structure_type_id = st.structure_type_id
3544: and st.structure_type = c_structure_type;
3545:
3546: INVALID_ARG_EXC_WP EXCEPTION;
3547: l_module_name CONSTANT VARCHAR2(30) := 'PA_PROJECT_STRUCTURE_UTILS';
3548: l_msg_count NUMBER := 0;
3549: l_data VARCHAR2(2000);
3550: l_msg_data VARCHAR2(2000);
3551: l_msg_index_out NUMBER;

Line 3663: ( p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS'

3659: CLOSE cur_request_details;
3660: END IF;
3661:
3662: FND_MSG_PUB.add_exc_msg
3663: ( p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS'
3664: ,p_procedure_name => 'GET_CONC_REQUEST_DETAILS'
3665: ,p_error_text => x_msg_data);
3666:
3667: IF l_debug_mode = 'Y' THEN

Line 4482: ( p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS'

4478: x_structure_version_id := NULL ;
4479: x_conc_request_id := NULL ;
4480:
4481: Fnd_Msg_Pub.add_exc_msg
4482: ( p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS'
4483: , p_procedure_name => 'GET_PROCESS_STATUS_MSG'
4484: , p_error_text => SUBSTRB(SQLERRM,1,240));
4485:
4486: RAISE ;

Line 4678: PA_PROJECT_STRUCTURE_UTILS.GET_PROCESS_STATUS_MSG

4674: close cur_proc_upd_flag;
4675:
4676: if (l_process_code is not null) then
4677:
4678: PA_PROJECT_STRUCTURE_UTILS.GET_PROCESS_STATUS_MSG
4679: (p_project_id => p_project_id
4680: , p_structure_type => NULL
4681: , p_structure_version_id => p_structure_version_id
4682: , p_context => p_context

Line 4753: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',

4749: x_message_name := NULL ;
4750: x_message_type := NULL ;
4751: x_structure_version_id := NULL ;
4752: x_conc_request_id := NULL ;
4753: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',
4754: p_procedure_name => 'get_structure_msg',
4755: p_error_text => SUBSTRB(SQLERRM,1,240));
4756: RAISE;
4757: end get_structure_msg;

Line 4775: l_module_name CONSTANT VARCHAR2(61) := 'PA_PROJECT_STRUCTURE_UTILS.LOCK_UNLOCK_WP_STR_AUTONOMOUS';

4771: is
4772:
4773: PRAGMA AUTONOMOUS_TRANSACTION;
4774:
4775: l_module_name CONSTANT VARCHAR2(61) := 'PA_PROJECT_STRUCTURE_UTILS.LOCK_UNLOCK_WP_STR_AUTONOMOUS';
4776: l_msg_count NUMBER := 0;
4777: l_msg_data VARCHAR2(2000);
4778: l_debug_mode VARCHAR2(1);
4779: l_wp_str VARCHAR2(30);

Line 4804: l_wp_str := PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(p_structure_version_id, 'WORKPLAN');

4800: pa_debug.write(l_module_name,'p_structure_version_id = '||p_structure_version_id,3);
4801: pa_debug.write(l_module_name,'p_lock_status_code = '||p_lock_status_code,3);
4802: end if;
4803:
4804: l_wp_str := PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(p_structure_version_id, 'WORKPLAN');
4805:
4806: if l_debug_mode = 'Y' THEN
4807: pa_debug.write(l_module_name,'l_wp_str = '||l_wp_str,3);
4808: end if;

Line 4856: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',

4852:
4853: when others then
4854: /* rollback to lock_unlock_wp_str; bug#6414944*/
4855: rollback; /*Bug# 6414944*/
4856: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',
4857: p_procedure_name => 'lock_unlock_wp_str_autonomous',
4858: p_error_text => SUBSTRB(SQLERRM,1,240));
4859:
4860: end lock_unlock_wp_str_autonomous;

Line 4872: l_module_name CONSTANT VARCHAR2(61) := 'PA_PROJECT_STRUCTURE_UTILS.LOCK_UNLOCK_WP_STR';

4868: ,x_msg_count OUT NOCOPY NUMBER
4869: ,x_msg_data OUT NOCOPY VARCHAR2)
4870: is
4871:
4872: l_module_name CONSTANT VARCHAR2(61) := 'PA_PROJECT_STRUCTURE_UTILS.LOCK_UNLOCK_WP_STR';
4873: l_msg_count NUMBER := 0;
4874: l_msg_data VARCHAR2(2000);
4875: l_debug_mode VARCHAR2(1);
4876: l_wp_str VARCHAR2(30);

Line 4901: l_wp_str := PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(p_structure_version_id, 'WORKPLAN');

4897: pa_debug.write(l_module_name,'p_structure_version_id = '||p_structure_version_id,3);
4898: pa_debug.write(l_module_name,'p_lock_status_code = '||p_lock_status_code,3);
4899: end if;
4900:
4901: l_wp_str := PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(p_structure_version_id, 'WORKPLAN');
4902:
4903: if l_debug_mode = 'Y' THEN
4904: pa_debug.write(l_module_name,'l_wp_str = '||l_wp_str,3);
4905: end if;

Line 4952: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',

4948: rollback to lock_unlock_wp_str2;
4949:
4950: when others then
4951: rollback to lock_unlock_wp_str2;
4952: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',
4953: p_procedure_name => 'lock_unlock_wp_str',
4954: p_error_text => SUBSTRB(SQLERRM,1,240));
4955:
4956: end lock_unlock_wp_str;

Line 5431: p_pkg_name => 'pa_project_structure_utils'

5427: x_msg_count := 1;
5428: x_msg_data := SUBSTRB(SQLERRM, 1, 240);
5429: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5430: FND_MSG_PUB.add_exc_msg (
5431: p_pkg_name => 'pa_project_structure_utils'
5432: ,p_procedure_name => 'check_exp_item_dates');
5433: END IF;
5434:
5435: END check_exp_item_dates;

Line 5467: end PA_PROJECT_STRUCTURE_UTILS;

5463: EXCEPTION
5464: WHEN OTHERS THEN
5465: RETURN l_resource_class_flag;
5466: END get_resource_class_flag;
5467: end PA_PROJECT_STRUCTURE_UTILS;