DBA Data[Home] [Help]

APPS.PA_PROJECT_STRUCTURE_PVT1 dependencies on PA_PROJECT_STRUCTURE_PVT1

Line 1: package body PA_PROJECT_STRUCTURE_PVT1 as

1: package body PA_PROJECT_STRUCTURE_PVT1 as
2: /*$Header: PAXSTCVB.pls 120.23.12010000.3 2008/10/07 11:27:32 amehrotr ship $*/
3:
4: -- API name : Create_Structure
5: -- Type : Private Procedure

Line 160: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.CREATE_STRUCTURE BEGIN');

156: l_deliverable_license VARCHAR2(1) := 'N';
157:
158: BEGIN
159: IF (p_debug_mode = 'Y') THEN
160: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.CREATE_STRUCTURE BEGIN');
161: END IF;
162:
163: IF (p_commit = FND_API.G_TRUE) THEN
164: savepoint CREATE_STRUC_PRIVATE;

Line 537: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.CREATE_STRUCTURE end');

533:
534: x_return_status := FND_API.G_RET_STS_SUCCESS;
535:
536: IF (p_debug_mode = 'Y') THEN
537: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.CREATE_STRUCTURE end');
538: END IF;
539:
540: EXCEPTION
541: WHEN FND_API.G_EXC_ERROR THEN

Line 554: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

550: END IF;
551: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
552: x_msg_count := FND_MSG_PUB.count_msg;
553: --put message
554: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
555: p_procedure_name => 'Create_Structure',
556: p_error_text => SUBSTRB(SQLERRM,1,240));
557: RAISE;
558: END CREATE_STRUCTURE;

Line 673: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.CREATE_STRUCTURE_VERSION begin');

669: FROM sys.dual;
670:
671: BEGIN
672: IF (p_debug_mode = 'Y') THEN
673: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.CREATE_STRUCTURE_VERSION begin');
674: END IF;
675:
676: IF (p_commit = FND_API.G_TRUE) THEN
677: savepoint CREATE_STRUC_VER_PVT;

Line 826: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

822: ,x_Msg_data => x_msg_data
823: );
824: EXCEPTION
825: WHEN OTHERS THEN
826: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
827: p_procedure_name => 'CREATE_STRUCTURE_VERSION',
828: p_error_text => SUBSTRB('PA_FP_PLANNING_TRANSACTION_PUB.add_planning_transactions:'||SQLERRM,1,240));
829: RAISE FND_API.G_EXC_ERROR;
830: END;

Line 840: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.CREATE_STRUCTURE_VERSION end');

836:
837: x_return_status := FND_API.G_RET_STS_SUCCESS;
838:
839: IF (p_debug_mode = 'Y') THEN
840: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.CREATE_STRUCTURE_VERSION end');
841: END IF;
842:
843: EXCEPTION
844: WHEN FND_API.G_EXC_ERROR THEN

Line 861: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

857: if p_commit = FND_API.G_TRUE THEN
858: rollback to CREATE_STRUC_VER_PVT;
859: end if;
860: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
861: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
862: p_procedure_name => 'CREATE_STRUCTURE_VERSION',
863: p_error_text => SUBSTRB(SQLERRM,1,240));
864: RAISE;
865: END CREATE_STRUCTURE_VERSION;

Line 999: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.CREATE_STRUCTURE_VERSION_ATTR begin');

995: l_current_working_ver_flag VARCHAR2(1); --FPM bug 3301192
996:
997: BEGIN
998: IF (p_debug_mode = 'Y') THEN
999: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.CREATE_STRUCTURE_VERSION_ATTR begin');
1000: END IF;
1001:
1002: IF (p_commit = FND_API.G_TRUE) THEN
1003: savepoint CREATE_STRUC_VER_ATTR_PVT;

Line 1080: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION(

1076:
1077:
1078: --Call baseline_structure_version API if workplan
1079: IF (PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(p_structure_version_id, 'WORKPLAN') = 'Y') THEN
1080: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION(
1081: p_commit => FND_API.G_FALSE,
1082: p_structure_version_id => p_structure_version_id,
1083: x_return_status => l_return_status,
1084: x_msg_count => l_msg_count,

Line 1164: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION(

1160:
1161:
1162: --Call baseline_structure_version API if workplan
1163: IF (PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(p_structure_version_id, 'WORKPLAN') = 'Y') THEN
1164: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION(
1165: p_commit => FND_API.G_FALSE,
1166: p_structure_version_id => p_structure_version_id,
1167: x_return_status => l_return_status,
1168: x_msg_count => l_msg_count,

Line 1315: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.CREATE_STRUCTURE_VERSION_ATTR end');

1311:
1312: x_return_status := FND_API.G_RET_STS_SUCCESS;
1313:
1314: IF (p_debug_mode = 'Y') THEN
1315: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.CREATE_STRUCTURE_VERSION_ATTR end');
1316: END IF;
1317:
1318: EXCEPTION
1319: WHEN FND_API.G_EXC_ERROR THEN

Line 1335: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

1331: if p_commit = FND_API.G_TRUE THEN
1332: rollback to CREATE_STRUC_VER_ATTR_PVT;
1333: end if;
1334: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1335: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
1336: p_procedure_name => 'CREATE_STRUCTURE_VERSION_ATTR',
1337: p_error_text => SUBSTRB(SQLERRM,1,240));
1338: RAISE;
1339: END CREATE_STRUCTURE_VERSION_ATTR;

Line 1478: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_STRUCTURE begin');

1474: from pa_proj_elements
1475: where proj_element_id = p_structure_id;
1476: BEGIN
1477: IF (p_debug_mode = 'Y') THEN
1478: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_STRUCTURE begin');
1479: END IF;
1480:
1481: IF (p_commit = FND_API.G_TRUE) then
1482: savepoint update_structure_pvt;

Line 1664: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_STRUCTURE end');

1660:
1661: x_return_status := FND_API.G_RET_STS_SUCCESS;
1662:
1663: IF (p_debug_mode = 'Y') THEN
1664: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_STRUCTURE end');
1665: END IF;
1666:
1667: EXCEPTION
1668: when FND_API.G_EXC_ERROR then

Line 1678: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

1674: if p_commit = FND_API.G_TRUE then
1675: rollback to update_structure_pvt;
1676: end if;
1677: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1678: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
1679: p_procedure_name => 'UPDATE_STRUCTURE',
1680: p_error_text => SUBSTRB(SQLERRM,1,240));
1681: RAISE;
1682: END update_structure;

Line 1852: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_STRUCTURE_VERSION_ATTR begin');

1848:
1849: BEGIN
1850: l_msg_count_int := FND_MSG_PUB.count_msg; /*Bug#6414944*/
1851: IF (p_debug_mode = 'Y') THEN
1852: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_STRUCTURE_VERSION_ATTR begin');
1853: END IF;
1854:
1855: IF (p_commit = FND_API.G_TRUE) THEN
1856: savepoint UPDATE_STRUC_VER_ATTR_PVT;

Line 1974: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION(

1970: and current_flag = 'Y';
1971:
1972: --Call baseline_structure_version API if workplan
1973: IF (PA_PROJECT_STRUCTURE_UTILS.Get_Struc_Type_For_Version(l_structure_version_id, 'WORKPLAN') = 'Y') THEN
1974: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION(
1975: p_commit => FND_API.G_FALSE,
1976: p_structure_version_id => l_structure_version_id,
1977: x_return_status => l_return_status,
1978: x_msg_count => l_msg_count,

Line 2217: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_STRUCTURE_VERSION_ATTR end');

2213:
2214: x_return_status := FND_API.G_RET_STS_SUCCESS;
2215:
2216: IF (p_debug_mode = 'Y') THEN
2217: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_STRUCTURE_VERSION_ATTR end');
2218: END IF;
2219:
2220: EXCEPTION
2221: WHEN NO_DATA_FOUND THEN

Line 2239: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

2235: END IF;
2236: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2237: x_msg_count := FND_MSG_PUB.count_msg;
2238: --put message
2239: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
2240: p_procedure_name => 'Update_Structure_Version_Attr',
2241: p_error_text => SUBSTRB(SQLERRM,1,240));
2242: RAISE;
2243: END Update_Structure_Version_Attr;

Line 2317: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUCTURE begin');

2313: -- End fix for Bug # 4506308.
2314:
2315: BEGIN
2316: IF (p_debug_mode = 'Y') THEN
2317: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUCTURE begin');
2318: END IF;
2319:
2320: if p_commit = FND_API.G_TRUE then
2321: savepoint delete_structure_pvt;

Line 2422: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUCTURE end');

2418:
2419: x_return_status := FND_API.G_RET_STS_SUCCESS;
2420:
2421: IF (p_debug_mode = 'Y') THEN
2422: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUCTURE end');
2423: END IF;
2424:
2425: EXCEPTION
2426: when FND_API.G_EXC_ERROR then

Line 2436: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

2432: if p_commit = FND_API.G_TRUE then
2433: rollback to delete_structure_pvt;
2434: end if;
2435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2436: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
2437: p_procedure_name => 'Delete_Structure',
2438: p_error_text => SUBSTRB(SQLERRM,1,240));
2439: raise;
2440: END Delete_Structure;

Line 2508: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUCTURE_VERSION begin');

2504: -- End fix for Bug # 4483222.
2505:
2506: BEGIN
2507: IF (p_debug_mode = 'Y') THEN
2508: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUCTURE_VERSION begin');
2509: END IF;
2510:
2511: if p_commit = FND_API.G_TRUE then
2512: savepoint delete_structure_version_pvt;

Line 2599: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

2595: ,x_Msg_data => x_msg_data
2596: );
2597: EXCEPTION
2598: WHEN OTHERS THEN
2599: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
2600: p_procedure_name => 'Delete_Structure_Version',
2601: p_error_text => SUBSTRB('PA_FIN_PLAN_PVT.delete_wp_budget_versions:'||SQLERRM,1,240));
2602: RAISE FND_API.G_EXC_ERROR;
2603: END;

Line 2620: p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

2616: );
2617: EXCEPTION
2618: WHEN OTHERS THEN
2619: fnd_msg_pub.add_exc_msg(
2620: p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
2621: p_procedure_name => 'Delete_Structure_Version',
2622: p_error_text => SUBSTRB('PA_PROGRESS_PUB.delete_working_wp_progress:'||SQLERRM,1,240));
2623: RAISE FND_API.G_EXC_ERROR;
2624: END;

Line 2685: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUCTURE_VERSION end');

2681:
2682: x_return_status := FND_API.G_RET_STS_SUCCESS;
2683:
2684: IF (p_debug_mode = 'Y') THEN
2685: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUCTURE_VERSION end');
2686: END IF;
2687:
2688: EXCEPTION
2689: when FND_API.G_EXC_ERROR then

Line 2699: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

2695: if p_commit = FND_API.G_TRUE then
2696: rollback to delete_structure_version_pvt;
2697: end if;
2698: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2699: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
2700: p_procedure_name => 'Delete_Structure_Version',
2701: p_error_text => SUBSTRB(SQLERRM,1,240));
2702: raise;
2703: END DELETE_STRUCTURE_VERSION;

Line 2784: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUCTURE_VERSION_ATTR begin');

2780: -- 3804437
2781:
2782: BEGIN
2783: IF (p_debug_mode = 'Y') THEN
2784: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUCTURE_VERSION_ATTR begin');
2785: END IF;
2786:
2787: if p_commit = FND_API.G_TRUE then
2788: savepoint delete_structure_ver_attr_pvt;

Line 2874: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUCTURE_VERSION_ATTR end');

2870: X_ROWID => l_rowid
2871: );
2872:
2873: IF (p_debug_mode = 'Y') THEN
2874: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUCTURE_VERSION_ATTR end');
2875: END IF;
2876:
2877: x_return_status := FND_API.G_RET_STS_SUCCESS;
2878:

Line 2890: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

2886: if p_commit = FND_API.G_TRUE then
2887: rollback to delete_structure_ver_attr_pvt;
2888: end if;
2889: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2890: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
2891: p_procedure_name => 'Delete_Structure',
2892: p_error_text => SUBSTRB(SQLERRM,1,240));
2893: raise;
2894: END Delete_Structure_Version_Attr;

Line 3215: l_messages PA_PROJECT_STRUCTURE_PVT1.PA_PUBLISH_ERR_TBL_TYPE;

3211: l_err_code NUMBER:= 0;
3212: l_err_stack VARCHAR2(630);
3213: l_err_stage VARCHAR2(80);
3214:
3215: l_messages PA_PROJECT_STRUCTURE_PVT1.PA_PUBLISH_ERR_TBL_TYPE;
3216: l_page_content_id NUMBER;
3217: l_item_key VARCHAR2(240);
3218:
3219: --added for performace improvement

Line 3264: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE begin');

3260:
3261: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
3262:
3263: IF (p_debug_mode = 'Y') THEN
3264: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE begin');
3265: END IF;
3266:
3267: IF (p_commit = FND_API.G_TRUE) THEN
3268: savepoint publish_structure_pvt;

Line 3578: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

3574: -- added for Bug fix: 4537865
3575:
3576: /* This API insert into planning txn table if wp. Call table hander instead
3577: --Call Create Structure Version
3578: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
3579: ( p_validate_only => p_validate_only
3580: ,p_structure_id => l_struc_ver_rec.proj_element_id
3581: ,p_attribute_category => l_struc_ver_rec.attribute_category
3582: ,p_attribute1 => l_struc_ver_rec.attribute1

Line 3618: -- PA_PROJECT_STRUCTURE_PVT1.UPDATE_LATEST_PUB_LINKS

3614: raise FND_API.G_EXC_ERROR;
3615: end if;
3616:
3617: --update links linking from working version to current published version
3618: -- PA_PROJECT_STRUCTURE_PVT1.UPDATE_LATEST_PUB_LINKS
3619: -- (
3620: -- p_init_msg_list => FND_API.G_FALSE
3621: -- ,p_commit => FND_API.G_FALSE
3622: -- ,p_debug_mode => p_debug_mode

Line 4132: -- PA_PROJECT_STRUCTURE_PVT1.UPDATE_LATEST_PUB_LINKS

4128: --update links linking from working version to current published version
4129: -- IF (p_debug_mode = 'Y') THEN
4130: -- pa_debug.debug('updating links');
4131: -- END IF;
4132: -- PA_PROJECT_STRUCTURE_PVT1.UPDATE_LATEST_PUB_LINKS
4133: -- (
4134: -- p_init_msg_list => FND_API.G_FALSE
4135: -- ,p_commit => FND_API.G_FALSE
4136: -- ,p_debug_mode => p_debug_mode

Line 4707: and PA_PROJECT_STRUCTURE_PVT1.copy_task_version( p_structure_version_id,

4703: and ppe.proj_element_id = ppev2.proj_element_id
4704: and ppe.link_task_flag = 'N'
4705: --bug 4573340
4706: */
4707: and PA_PROJECT_STRUCTURE_PVT1.copy_task_version( p_structure_version_id,
4708: ppev2.element_version_id ) = 'Y'
4709: order by ppev2.display_sequence ) ppev
4710: ;
4711:

Line 4717: and PA_PROJECT_STRUCTURE_PVT1.copy_task_version( p_structure_version_id,

4713: FROM pa_proj_element_versions ppev
4714: WHERE ppev.project_id = l_project_id
4715: and ppev.parent_structure_version_id = p_structure_version_id
4716: and ppev.object_type = 'PA_TASKS'
4717: and PA_PROJECT_STRUCTURE_PVT1.copy_task_version( p_structure_version_id,
4718: ppev.element_version_id ) = 'Y'
4719: order by ppev.display_sequence
4720: ;
4721: */

Line 4913: and PA_PROJECT_STRUCTURE_PVT1.copy_task_version( l_new_struct_ver_id, element_version_id ) = 'Y'

4909: INTO l_New_Task_Versions_Tab, l_Old_Task_Versions_Tab
4910: From pa_proj_element_versions
4911: Where parent_structure_version_id = l_new_struct_ver_id
4912: and object_type = 'PA_TASKS'
4913: and PA_PROJECT_STRUCTURE_PVT1.copy_task_version( l_new_struct_ver_id, element_version_id ) = 'Y'
4914: order by display_sequence;
4915:
4916: --bug 4019845
4917: --comment starts here

Line 5011: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

5007: -- updating links will break the logic for updating to latest published
5008: -- version.
5009:
5010: --Call Create Structure Version Attr
5011: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
5012: ( p_validate_only => FND_API.G_FALSE
5013: ,p_structure_version_id => l_new_struct_ver_id
5014: ,p_structure_version_name => l_new_struct_ver_name
5015: ,p_structure_version_desc => l_new_struct_ver_desc

Line 5073: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

5069: RAISE FND_API.G_EXC_ERROR;
5070: END IF;
5071: EXCEPTION
5072: WHEN OTHERS THEN
5073: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
5074: p_procedure_name => 'PUBLISH_STRUCTURE',
5075: p_error_text => SUBSTRB('PA_PROJ_STRUC_MAPPING_PUB.COPY_MAPPING:'||SQLERRM,1,240));
5076: RAISE FND_API.G_EXC_ERROR;
5077: END;

Line 5117: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

5113: ,x_Msg_data => x_msg_data
5114: );
5115: EXCEPTION
5116: WHEN OTHERS THEN
5117: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
5118: p_procedure_name => 'PUBLISH_STRUCTURE',
5119: p_error_text => SUBSTRB('PA_FP_COPY_FROM_PKG.copy_wp_budget_versions:'||SQLERRM,1,240));
5120: RAISE FND_API.G_EXC_ERROR;
5121: END;

Line 5143: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

5139: ,x_return_status => x_return_status
5140: );
5141: EXCEPTION
5142: WHEN OTHERS THEN
5143: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
5144: p_procedure_name => 'PUBLISH_STRUCTURE',
5145: p_error_text => SUBSTRB('PA_FP_COPY_FROM_PKG.copy_missing_unplanned_asgmts:'||SQLERRM,1,240));
5146: RAISE FND_API.G_EXC_ERROR;
5147: END;

Line 5566: pa_debug.write('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE', 'Before opening sel_other_structure_ver p_structure_version_id='||p_structure_version_id, 3);

5562:
5563: -- End
5564:
5565: IF l_debug_mode = 'Y' THEN
5566: pa_debug.write('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE', 'Before opening sel_other_structure_ver p_structure_version_id='||p_structure_version_id, 3);
5567: END IF;
5568:
5569: --hsiu
5570: --changes for advanced structure

Line 5578: pa_debug.write('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE', 'Before calling PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_wo_val', 3);

5574: FETCH sel_other_structure_ver into l_del_struc_ver_id, l_del_struc_ver_rvn;
5575: EXIT WHEN sel_other_structure_ver%NOTFOUND;
5576:
5577: IF l_debug_mode = 'Y' THEN
5578: pa_debug.write('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE', 'Before calling PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_wo_val', 3);
5579: pa_debug.write('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE', 'l_del_struc_ver_id='||l_del_struc_ver_id||' l_del_struc_ver_rvn='||l_del_struc_ver_rvn, 3);
5580: END IF;
5581:
5582: PA_PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_wo_val(

Line 5579: pa_debug.write('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE', 'l_del_struc_ver_id='||l_del_struc_ver_id||' l_del_struc_ver_rvn='||l_del_struc_ver_rvn, 3);

5575: EXIT WHEN sel_other_structure_ver%NOTFOUND;
5576:
5577: IF l_debug_mode = 'Y' THEN
5578: pa_debug.write('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE', 'Before calling PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_wo_val', 3);
5579: pa_debug.write('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE', 'l_del_struc_ver_id='||l_del_struc_ver_id||' l_del_struc_ver_rvn='||l_del_struc_ver_rvn, 3);
5580: END IF;
5581:
5582: PA_PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_wo_val(
5583: p_structure_version_id => l_del_struc_ver_id

Line 5582: PA_PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_wo_val(

5578: pa_debug.write('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE', 'Before calling PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_wo_val', 3);
5579: pa_debug.write('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE', 'l_del_struc_ver_id='||l_del_struc_ver_id||' l_del_struc_ver_rvn='||l_del_struc_ver_rvn, 3);
5580: END IF;
5581:
5582: PA_PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_wo_val(
5583: p_structure_version_id => l_del_struc_ver_id
5584: ,p_record_version_number => l_del_struc_ver_rvn
5585: ,x_return_status => l_return_status
5586: ,x_msg_count => l_msg_count

Line 5594: pa_debug.write('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE', 'After calling PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_wo_val l_return_status='||l_return_status||' l_msg_count='||l_msg_count, 3);

5590: --Check if there is any error.
5591: l_msg_count := FND_MSG_PUB.count_msg;
5592:
5593: IF l_debug_mode = 'Y' THEN
5594: pa_debug.write('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE', 'After calling PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_wo_val l_return_status='||l_return_status||' l_msg_count='||l_msg_count, 3);
5595: END IF;
5596:
5597: IF l_msg_count > 0 OR l_return_status ='E' THEN
5598: x_msg_count := l_msg_count;

Line 5666: 'PA_PROJECT_STRUCTURE_PVT1',

5662: );
5663: EXCEPTION
5664: WHEN OTHERS THEN
5665: fnd_msg_pub.add_exc_msg(p_pkg_name =>
5666: 'PA_PROJECT_STRUCTURE_PVT1',
5667: p_procedure_name => 'publish_structure',
5668: p_error_text => SUBSTRB('Call PA_PROGRESS_PUB.COPY_PROGRESS_ACT_ETC:'||SQLERRM,1,120));
5669: RAISE FND_API.G_EXC_ERROR;
5670: END;

Line 5705: 'PA_PROJECT_STRUCTURE_PVT1',

5701: );
5702: EXCEPTION
5703: WHEN OTHERS THEN
5704: fnd_msg_pub.add_exc_msg(p_pkg_name =>
5705: 'PA_PROJECT_STRUCTURE_PVT1',
5706: p_procedure_name => 'publish_structure',
5707: p_error_text => SUBSTRB('Call pa_progress_pub.populate_pji_tab_for_plan:'||SQLERRM,1,120));
5708: RAISE FND_API.G_EXC_ERROR;
5709: END;

Line 5738: 'PA_PROJECT_STRUCTURE_PVT1',

5734: ,x_msg_data => x_msg_data);
5735: EXCEPTION
5736: WHEN OTHERS THEN
5737: fnd_msg_pub.add_exc_msg(p_pkg_name =>
5738: 'PA_PROJECT_STRUCTURE_PVT1',
5739: p_procedure_name => 'publish_structure',
5740: p_error_text => SUBSTRB('Call PA_PROGRESS_PUB.ROLLUP_PROGRESS_PVT:'||SQLERRM,1,120));
5741: RAISE FND_API.G_EXC_ERROR;
5742: END;

Line 5775: 'PA_PROJECT_STRUCTURE_PVT1',

5771: ,x_msg_data => x_msg_data);
5772: EXCEPTION
5773: WHEN OTHERS THEN
5774: fnd_msg_pub.add_exc_msg(p_pkg_name =>
5775: 'PA_PROJECT_STRUCTURE_PVT1',
5776: p_procedure_name => 'publish_structure',
5777: p_error_text => SUBSTRB('Call PA_PROGRESS_UTILS.clear_prog_outdated_flag:'||SQLERRM,1,120));
5778: RAISE FND_API.G_EXC_ERROR;
5779: END;

Line 5817: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE end');

5813: raise FND_API.G_EXC_ERROR;
5814: end if;
5815:
5816: IF (p_debug_mode = 'Y') THEN
5817: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE end');
5818: END IF;
5819:
5820: EXCEPTION
5821: when FND_API.G_EXC_ERROR then

Line 5836: PA_PROJECT_STRUCTURE_PVT1.Generate_Error_Page(

5832: p_msg_index_out => l_msg_index_out);
5833: END LOOP;
5834:
5835: --create error clob
5836: PA_PROJECT_STRUCTURE_PVT1.Generate_Error_Page(
5837: p_structure_version_id => p_structure_version_id,
5838: p_error_tbl => l_messages,
5839: x_page_content_id => l_page_content_id,
5840: x_return_status => l_return_status,

Line 5852: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

5848: if p_commit = FND_API.G_TRUE then
5849: rollback to publish_structure_pvt;
5850: end if;
5851: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5852: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
5853: p_procedure_name => 'PUBLISH_STRUCTURE',
5854: p_error_text => SUBSTRB(SQLERRM,1,240));
5855: when OTHERS then
5856: if p_commit = FND_API.G_TRUE then

Line 5860: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

5856: if p_commit = FND_API.G_TRUE then
5857: rollback to publish_structure_pvt;
5858: end if;
5859: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5860: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
5861: p_procedure_name => 'PUBLISH_STRUCTURE',
5862: p_error_text => SUBSTRB(SQLERRM,1,240));
5863: raise;
5864: END Publish_Structure;

Line 5997: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_LATEST_PUB_LINKS begin');

5993: l_latest_parent_struc_ver NUMBER;
5994:
5995: BEGIN
5996: IF (p_debug_mode = 'Y') THEN
5997: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_LATEST_PUB_LINKS begin');
5998: END IF;
5999:
6000: IF (p_commit = FND_API.G_TRUE) THEN
6001: savepoint update_latest_pub_links_pvt;

Line 6157: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

6153: if p_commit = FND_API.G_TRUE then
6154: rollback to update_latest_pub_links_pvt;
6155: end if;
6156: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6157: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
6158: p_procedure_name => 'UPDATE_LATEST_PUB_LINKS',
6159: p_error_text => SUBSTRB(SQLERRM,1,240));
6160: when OTHERS then
6161: if p_commit = FND_API.G_TRUE then

Line 6165: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

6161: if p_commit = FND_API.G_TRUE then
6162: rollback to update_latest_pub_links_pvt;
6163: end if;
6164: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6165: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
6166: p_procedure_name => 'UPDATE_LATEST_PUB_LINKS',
6167: p_error_text => SUBSTRB(SQLERRM,1,240));
6168: raise;
6169: END UPDATE_LATEST_PUB_LINKS;

Line 6330: pa_debug.init_err_stack ('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION');

6326:
6327: X_Row_id VARCHAR2(255);
6328: BEGIN
6329:
6330: pa_debug.init_err_stack ('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION');
6331:
6332: IF (p_debug_mode = 'Y') THEN
6333: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION begin');
6334: END IF;

Line 6333: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION begin');

6329:
6330: pa_debug.init_err_stack ('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION');
6331:
6332: IF (p_debug_mode = 'Y') THEN
6333: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION begin');
6334: END IF;
6335:
6336: IF (p_commit = FND_API.G_TRUE) THEN
6337: savepoint copy_structure_version_pvt;

Line 6345: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

6341: OPEN l_get_structure_ver_csr(p_structure_version_id);
6342: FETCH l_get_structure_ver_csr INTO l_structure_ver_rec;
6343: CLOSE l_get_structure_ver_csr;
6344:
6345: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
6346: ( p_validate_only => p_validate_only
6347: ,p_structure_id => l_structure_ver_rec.proj_element_id
6348: ,p_attribute_category => l_structure_ver_rec.attribute_category
6349: ,p_attribute1 => l_structure_ver_rec.attribute1

Line 6394: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

6390: If (p_change_reason_code <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR ) THEN
6391: l_structure_ver_attr_rec.change_reason_code := p_change_reason_code;
6392: END IF;
6393:
6394: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
6395: ( p_validate_only => FND_API.G_FALSE
6396: ,p_structure_version_id => l_new_struct_ver_id
6397: ,p_structure_version_name => p_new_struct_ver_name
6398: ,p_structure_version_desc => p_new_struct_ver_desc

Line 6993: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION END');

6989: COMMIT;
6990: END IF;
6991:
6992: IF (p_debug_mode = 'Y') THEN
6993: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION END');
6994: END IF;
6995:
6996: EXCEPTION
6997: when FND_API.G_EXC_ERROR then

Line 7007: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

7003: if p_commit = FND_API.G_TRUE then
7004: rollback to copy_structure_version_pvt;
7005: end if;
7006: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7007: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
7008: p_procedure_name => 'COPY_STRUCTURE_VERSION',
7009: p_error_text => SUBSTRB(SQLERRM,1,240));
7010: when OTHERS then
7011: if p_commit = FND_API.G_TRUE then

Line 7015: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

7011: if p_commit = FND_API.G_TRUE then
7012: rollback to copy_structure_version_pvt;
7013: end if;
7014: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7015: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
7016: p_procedure_name => 'COPY_STRUCTURE_VERSION',
7017: p_error_text => SUBSTRB(SQLERRM,1,240));
7018: raise;
7019: END COPY_STRUCTURE_VERSION;

Line 7365: pa_debug.init_err_stack ('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE');

7361: where task_type_id = c_task_type_id;
7362: l_init_status_code PA_TASK_TYPES.INITIAL_STATUS_CODE%TYPE;
7363: --end bug 2667527
7364: BEGIN
7365: pa_debug.init_err_stack ('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE');
7366:
7367: IF (p_debug_mode = 'Y') THEN
7368: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE begin');
7369: END IF;

Line 7368: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE begin');

7364: BEGIN
7365: pa_debug.init_err_stack ('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE');
7366:
7367: IF (p_debug_mode = 'Y') THEN
7368: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE begin');
7369: END IF;
7370:
7371: IF (p_commit = FND_API.G_TRUE) THEN
7372: savepoint copy_structure_pvt;

Line 7629: -- PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

7625:
7626: -- IF (p_debug_mode = 'Y') THEN
7627: -- pa_debug.debug('create structure version');
7628: -- END IF;
7629: -- PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
7630: -- ( p_validate_only => FND_API.G_FALSE
7631: -- ,p_structure_id => l_structure_id
7632: -- ,x_structure_version_id => l_new_structure_version_id
7633: -- ,x_return_status => l_return_status

Line 7650: -- PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

7646:
7647: -- IF (p_debug_mode = 'Y') THEN
7648: -- pa_debug.debug('create structure version attr');
7649: -- END IF;
7650: -- PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
7651: -- ( p_validate_only => FND_API.G_FALSE
7652: -- ,p_structure_version_id => l_new_structure_version_id
7653: -- ,p_structure_version_name => l_name
7654: -- ,p_structure_version_desc => NULL

Line 7840: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

7836:
7837: IF (p_debug_mode = 'Y') THEN
7838: pa_debug.debug('create structure version');
7839: END IF;
7840: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
7841: ( p_validate_only => p_validate_only
7842: ,p_structure_id => l_structure_id
7843: ,p_attribute_category => l_structure_ver_rec.attribute_category
7844: ,p_attribute1 => l_structure_ver_rec.attribute1

Line 8287: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

8283: l_latest_flag := 'Y';
8284: END IF;
8285:
8286: --moved here for baseline purpose
8287: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
8288: ( p_validate_only => FND_API.G_FALSE
8289: ,p_structure_version_id => l_new_structure_version_id
8290: -- ,p_structure_version_name => l_name
8291: --hsiu

Line 8365: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE END');

8361: COMMIT;
8362: END IF;
8363:
8364: IF (p_debug_mode = 'Y') THEN
8365: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE END');
8366: END IF;
8367:
8368: EXCEPTION
8369: when FND_API.G_EXC_ERROR then

Line 8379: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

8375: if p_commit = FND_API.G_TRUE then
8376: rollback to copy_structure_pvt;
8377: end if;
8378: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8379: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
8380: p_procedure_name => 'COPY_STRUCTURE',
8381: p_error_text => SUBSTRB(SQLERRM,1,240));
8382: when OTHERS then
8383: if p_commit = FND_API.G_TRUE then

Line 8387: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

8383: if p_commit = FND_API.G_TRUE then
8384: rollback to copy_structure_pvt;
8385: end if;
8386: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8387: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
8388: p_procedure_name => 'COPY_STRUCTURE',
8389: p_error_text => SUBSTRB(SQLERRM,1,240));
8390: raise;
8391: END COPY_STRUCTURE;

Line 8443: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION BEGIN');

8439: where a.project_id = b.project_id
8440: and b.element_version_id = p_structure_version_id;
8441: BEGIN
8442: IF (p_debug_mode = 'Y') THEN
8443: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION BEGIN');
8444: END IF;
8445:
8446: IF (p_commit = FND_API.G_TRUE) THEN
8447: savepoint baseline_structure_pvt;

Line 8533: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION end');

8529: END LOOP;
8530: CLOSE c1;
8531:
8532: IF (p_debug_mode = 'Y') THEN
8533: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION end');
8534: END IF;
8535:
8536: x_return_status := FND_API.G_RET_STS_SUCCESS;
8537:

Line 8549: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

8545: if p_commit = FND_API.G_TRUE then
8546: rollback to baseline_structure_pvt;
8547: end if;
8548: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8549: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
8550: p_procedure_name => 'BASELINE_STRUCTURE_VERSION',
8551: p_error_text => SUBSTRB(SQLERRM,1,240));
8552: when OTHERS then
8553: if p_commit = FND_API.G_TRUE then

Line 8557: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

8553: if p_commit = FND_API.G_TRUE then
8554: rollback to baseline_structure_pvt;
8555: end if;
8556: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8557: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
8558: p_procedure_name => 'BASELINE_STRUCTURE_VERSION',
8559: p_error_text => SUBSTRB(SQLERRM,1,240));
8560: raise;
8561: END BASELINE_STRUCTURE_VERSION;

Line 8615: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.SPLIT_WORKPLAN BEGIN');

8611: l_pev_schedule_id NUMBER;
8612:
8613: BEGIN
8614: IF (p_debug_mode = 'Y') THEN
8615: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.SPLIT_WORKPLAN BEGIN');
8616: END IF;
8617:
8618: IF (p_commit = FND_API.G_TRUE) THEN
8619: savepoint split_workplan;

Line 8651: PA_PROJECT_STRUCTURE_PVT1.Create_Structure(

8647: END IF;
8648: CLOSE sel_struct_type;
8649:
8650: --create_structure
8651: PA_PROJECT_STRUCTURE_PVT1.Create_Structure(
8652: p_project_id => p_project_id
8653: ,p_structure_number => p_structure_number
8654: ,p_structure_name => p_structure_name
8655: ,p_structure_description => p_description

Line 8745: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.SPLIT_WORKPLAN end');

8741:
8742: x_return_status := FND_API.G_RET_STS_SUCCESS;
8743:
8744: IF (p_debug_mode = 'Y') THEN
8745: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.SPLIT_WORKPLAN end');
8746: END IF;
8747:
8748: EXCEPTION
8749: when FND_API.G_EXC_ERROR then

Line 8759: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

8755: if p_commit = FND_API.G_TRUE then
8756: rollback to split_workplan;
8757: end if;
8758: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8759: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
8760: p_procedure_name => 'SPLIT_WORKPLAN',
8761: p_error_text => SUBSTRB(SQLERRM,1,240));
8762: when OTHERS then
8763: if p_commit = FND_API.G_TRUE then

Line 8767: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

8763: if p_commit = FND_API.G_TRUE then
8764: rollback to split_workplan;
8765: end if;
8766: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8767: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
8768: p_procedure_name => 'SPLIT_WORKPLAN',
8769: p_error_text => SUBSTRB(SQLERRM,1,240));
8770: raise;
8771: END SPLIT_WORKPLAN;

Line 8855: PA_DEBUG.INIT_ERR_STACK('PA_PROJECT_STRUCTURE_PVT1.SUBMIT_WORKPLAN');

8851: and b.object_type = 'PA_STRUCTURES';
8852: l_del_struc_ver_id NUMBER;
8853:
8854: BEGIN
8855: PA_DEBUG.INIT_ERR_STACK('PA_PROJECT_STRUCTURE_PVT1.SUBMIT_WORKPLAN');
8856:
8857: x_return_status := FND_API.G_RET_STS_SUCCESS;
8858:
8859: IF (p_commit = FND_API.G_TRUE) THEN

Line 8969: PA_PROJECT_STRUCTURE_PVT1.Publish_Structure(

8965:
8966: /*
8967: savepoint check_workplan;
8968:
8969: PA_PROJECT_STRUCTURE_PVT1.Publish_Structure(
8970: p_responsibility_id => p_responsibility_id
8971: ,p_structure_version_id => p_structure_version_id
8972: ,p_publish_structure_ver_name => l_structure_version_name
8973: ,p_structure_ver_desc => l_structure_version_desc

Line 9091: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

9087: END IF;
9088: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9089: x_msg_count := FND_MSG_PUB.count_msg;
9090: --put message
9091: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
9092: p_procedure_name => 'Submit_Workplan',
9093: p_error_text => SUBSTRB(SQLERRM,1,240));
9094: RAISE;
9095: END SUBMIT_WORKPLAN;

Line 9151: PA_DEBUG.init_err_stack('PA_PROJECT_STRUCTURE_PVT1.CHANGE_WORKPLAN_STATUS');

9147: where project_status_code = c_status_code
9148: and status_type = 'STRUCTURE';
9149:
9150: BEGIN
9151: PA_DEBUG.init_err_stack('PA_PROJECT_STRUCTURE_PVT1.CHANGE_WORKPLAN_STATUS');
9152:
9153: -- Initialize the return status to success
9154: x_return_status := FND_API.G_RET_STS_SUCCESS;
9155:

Line 9271: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

9267: WHEN OTHERS THEN
9268: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9269: x_msg_count := FND_MSG_PUB.count_msg;
9270: --put message
9271: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
9272: p_procedure_name => 'Change_Workplan_Status',
9273: p_error_text => SUBSTRB(SQLERRM,1,240));
9274: RAISE;
9275: END CHANGE_WORKPLAN_STATUS;

Line 9328: PA_DEBUG.init_err_stack('PA_PROJECT_STRUCTURE_PVT1.REWORK_WORKPLAN');

9324: and pps.status_type = 'STRUCTURE'
9325: and pps.project_status_code = 'STRUCTURE_SUBMITTED';
9326:
9327: BEGIN
9328: PA_DEBUG.init_err_stack('PA_PROJECT_STRUCTURE_PVT1.REWORK_WORKPLAN');
9329: x_return_status := FND_API.G_RET_STS_SUCCESS;
9330:
9331: IF (p_commit = FND_API.G_TRUE) THEN
9332: savepoint rework_workplan_pvt;

Line 9422: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

9418: END IF;
9419: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9420: x_msg_count := FND_MSG_PUB.count_msg;
9421: --put message
9422: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
9423: p_procedure_name => 'rework_Workplan',
9424: p_error_text => SUBSTRB(SQLERRM,1,240));
9425: RAISE;
9426: END rework_workplan;

Line 9685: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.update_structures_setup_attr');

9681:
9682: l_wp_name VARCHAR2(240);
9683: BEGIN
9684: IF (p_debug_mode = 'Y') THEN
9685: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.update_structures_setup_attr');
9686: END IF;
9687:
9688: IF (p_commit = FND_API.G_TRUE) THEN
9689: savepoint update_struc_setup_attr_pvt;

Line 9755: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

9751: END IF;
9752: RAISE FND_API.G_EXC_ERROR;
9753: END IF;
9754:
9755: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
9756: ( p_validate_only => FND_API.G_FALSE
9757: ,p_structure_id => l_structure_id
9758: ,x_structure_version_id => l_structure_version_id
9759: ,x_return_status => l_return_status

Line 9809: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

9805: l_latest_eff_pub_flag := 'Y';
9806: l_effective_date := sysdate;
9807: END IF;
9808:
9809: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
9810: ( p_validate_only => FND_API.G_FALSE
9811: ,p_structure_version_id => l_structure_version_id
9812: ,p_structure_version_name => l_name
9813: ,p_structure_version_desc => NULL

Line 9906: PA_PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_Wo_Val(

9902: END LOOP;
9903: CLOSE get_top_tasks;
9904:
9905: -- PA_PROJECT_STRUCTURE_PUB1.Delete_Structure_Version(
9906: PA_PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_Wo_Val(
9907: p_structure_version_id => l_del_struc_ver_id
9908: ,p_record_version_number => l_struc_ver_rvn
9909: ,x_return_status => l_return_status
9910: ,x_msg_count => l_msg_count

Line 10066: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(

10062: END LOOP;
10063: CLOSE get_top_tasks;
10064:
10065: -- PA_PROJECT_STRUCTURE_PUB1.Delete_Structure_Version(
10066: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(
10067: p_structure_version_id => l_del_struc_ver_id
10068: ,p_record_version_number => l_struc_ver_rvn
10069: ,x_return_status => l_return_status
10070: ,x_msg_count => l_msg_count

Line 10177: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(

10173: END LOOP;
10174: CLOSE get_top_tasks;
10175:
10176: -- PA_PROJECT_STRUCTURE_PUB1.Delete_Structure_Version(
10177: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(
10178: p_structure_version_id => l_del_struc_ver_id
10179: ,p_record_version_number => l_struc_ver_rvn
10180: ,x_return_status => l_return_status
10181: ,x_msg_count => l_msg_count

Line 10503: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION(

10499: --bug 2843569
10500:
10501: IF (l_baseline_flag = 'Y') THEN
10502: --baseline structure
10503: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION(
10504: p_commit => FND_API.G_FALSE,
10505: p_structure_version_id => l_structure_version_id,
10506: x_return_status => l_return_status,
10507: x_msg_count => l_msg_count,

Line 10598: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(

10594: END LOOP;
10595: CLOSE get_top_tasks;
10596:
10597: -- PA_PROJECT_STRUCTURE_PUB1.Delete_Structure_Version(
10598: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(
10599: p_structure_version_id => l_del_struc_ver_id
10600: ,p_record_version_number => l_struc_ver_rvn
10601: ,x_return_status => l_return_status
10602: ,x_msg_count => l_msg_count

Line 10737: PA_PROJECT_STRUCTURE_PVT1.CREATE_STRUCTURE

10733: and lookup_code = 'WORKPLAN';
10734:
10735: l_name := substrb(l_name||l_append||l_suffix, 1, 240);
10736: --Create new structure
10737: PA_PROJECT_STRUCTURE_PVT1.CREATE_STRUCTURE
10738: ( p_validate_only => FND_API.G_FALSE
10739: ,p_project_id => p_project_id
10740: ,p_structure_number => l_name
10741: ,p_structure_name => l_name

Line 10778: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

10774: END IF;
10775: RAISE FND_API.G_EXC_ERROR;
10776: END IF;
10777:
10778: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
10779: ( p_validate_only => FND_API.G_FALSE
10780: ,p_structure_id => l_structure_id
10781: ,x_structure_version_id => l_structure_version_id
10782: ,x_return_status => l_return_status

Line 10870: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

10866: WHERE Project_id = p_project_id;
10867: END IF;
10868: END IF;
10869:
10870: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
10871: ( p_validate_only => FND_API.G_FALSE
10872: ,p_structure_version_id => l_structure_version_id
10873: ,p_structure_version_name => l_name
10874: ,p_structure_version_desc => NULL

Line 10905: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.update_structures_setup_attr end');

10901:
10902: x_return_status := FND_API.G_RET_STS_SUCCESS;
10903:
10904: IF (p_debug_mode = 'Y') THEN
10905: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.update_structures_setup_attr end');
10906: END IF;
10907:
10908: EXCEPTION
10909: WHEN FND_API.G_EXC_ERROR THEN

Line 10922: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

10918: END IF;
10919: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10920: x_msg_count := FND_MSG_PUB.count_msg;
10921: --put message
10922: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
10923: p_procedure_name => 'update_structures_setup_attr',
10924: p_error_text => SUBSTRB(SQLERRM,1,240));
10925: RAISE;
10926: END update_structures_setup_old;

Line 11040: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.update_workplan_versioning');

11036: --end bug 4546607
11037:
11038: BEGIN
11039: IF (p_debug_mode = 'Y') THEN
11040: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.update_workplan_versioning');
11041: END IF;
11042:
11043: IF (p_commit = FND_API.G_TRUE) THEN
11044: savepoint update_wp_versioning_pvt;

Line 11225: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION(

11221: record_version_number = record_version_number + 1
11222: where pev_structure_id = l_pev_structure_id;
11223:
11224: --baseline structure
11225: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION(
11226: p_commit => FND_API.G_FALSE,
11227: p_structure_version_id => l_keep_structure_ver_id,
11228: x_return_status => l_return_status,
11229: x_msg_count => l_msg_count,

Line 11250: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.update_workplan_versioning end');

11246:
11247: x_return_status := FND_API.G_RET_STS_SUCCESS;
11248:
11249: IF (p_debug_mode = 'Y') THEN
11250: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.update_workplan_versioning end');
11251: END IF;
11252:
11253: EXCEPTION
11254: WHEN FND_API.G_EXC_ERROR THEN

Line 11267: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

11263: END IF;
11264: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11265: x_msg_count := FND_MSG_PUB.count_msg;
11266: --put message
11267: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
11268: p_procedure_name => 'update_workplan_versioning',
11269: p_error_text => SUBSTRB(SQLERRM,1,240));
11270: RAISE;
11271: END update_workplan_versioning;

Line 11361: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_WP_CALENDAR BEGIN');

11357: l_bsl_dur NUMBER; -- Bug 3657808
11358: --
11359: BEGIN
11360: IF (p_debug_mode = 'Y') THEN
11361: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_WP_CALENDAR BEGIN');
11362: END IF;
11363:
11364: IF (p_commit = FND_API.G_TRUE) THEN
11365: savepoint update_wp_calendar;

Line 11565: PA_PROJECT_STRUCTURE_PVT1.RECALC_STRUC_VER_DURATION(

11561: raise FND_API.G_EXC_ERROR;
11562: END IF;
11563: END IF;
11564:
11565: PA_PROJECT_STRUCTURE_PVT1.RECALC_STRUC_VER_DURATION(
11566: p_structure_version_id => l_structure_version_id
11567: ,p_calendar_id => p_calendar_id
11568: ,x_return_status => l_return_status
11569: ,x_msg_count => l_msg_count

Line 11588: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_WP_CALENDAR end');

11584:
11585: x_return_status := FND_API.G_RET_STS_SUCCESS;
11586:
11587: IF (p_debug_mode = 'Y') THEN
11588: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_WP_CALENDAR end');
11589: END IF;
11590:
11591: EXCEPTION
11592: WHEN FND_API.G_EXC_ERROR THEN

Line 11605: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

11601: END IF;
11602: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11603: x_msg_count := FND_MSG_PUB.count_msg;
11604: --put message
11605: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
11606: p_procedure_name => 'Update_wp_calendar',
11607: p_error_text => SUBSTRB(SQLERRM,1,240));
11608: RAISE;
11609: END update_wp_calendar;

Line 11634: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_ALL_WP_CALENDAR BEGIN');

11630: from pa_projects_all
11631: where calendar_id = p_calendar_id;
11632: BEGIN
11633: IF (p_debug_mode = 'Y') THEN
11634: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_ALL_WP_CALENDAR BEGIN');
11635: END IF;
11636:
11637: IF (p_commit = FND_API.G_TRUE) THEN
11638: savepoint update_all_wp_calendar;

Line 11643: PA_PROJECT_STRUCTURE_PVT1.update_wp_calendar

11639: END IF;
11640:
11641: FOR c_rec IN c_calendar_projects
11642: LOOP
11643: PA_PROJECT_STRUCTURE_PVT1.update_wp_calendar
11644: (
11645: p_api_version => p_api_version
11646: ,p_init_msg_list => p_init_msg_list
11647: ,p_commit => p_commit

Line 11663: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_ALL_WP_CALENDAR END');

11659: END LOOP;
11660: x_return_status := FND_API.G_RET_STS_SUCCESS;
11661:
11662: IF (p_debug_mode = 'Y') THEN
11663: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_ALL_WP_CALENDAR END');
11664: END IF;
11665:
11666: EXCEPTION
11667: WHEN OTHERS THEN

Line 11674: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

11670: END IF;
11671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11672: x_msg_count := FND_MSG_PUB.count_msg;
11673: --put message
11674: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
11675: p_procedure_name => 'Update_all_wp_calendar',
11676: p_error_text => SUBSTRB(SQLERRM,1,240));
11677: RAISE;
11678: END UPDATE_ALL_WP_CALENDAR;

Line 11728: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.RECALC_STRUC_VER_DURATION BEGIN');

11724: l_est_days NUMBER; -- Bug 3657808
11725: BEGIN
11726:
11727: IF (p_debug_mode = 'Y') THEN
11728: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.RECALC_STRUC_VER_DURATION BEGIN');
11729: END IF;
11730:
11731: IF (p_commit = FND_API.G_TRUE) THEN
11732: savepoint RECALC_STRUC_VER_DURATION;

Line 11849: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.RECALC_STRUC_VER_DURATION end');

11845: END LOOP;
11846: CLOSE get_dates;
11847:
11848: IF (p_debug_mode = 'Y') THEN
11849: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.RECALC_STRUC_VER_DURATION end');
11850: END IF;
11851:
11852: EXCEPTION
11853: WHEN FND_API.G_EXC_ERROR THEN

Line 11866: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

11862: END IF;
11863: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11864: x_msg_count := FND_MSG_PUB.count_msg;
11865: --put message
11866: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
11867: p_procedure_name => 'RECALC_STRUC_VER_DURATION',
11868: p_error_text => SUBSTRB(SQLERRM,1,240));
11869: RAISE;
11870: END RECALC_STRUC_VER_DURATION;

Line 11956: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL begin');

11952: l_parent_struc_ver_id PA_PROJ_ELEMENT_VERSIONS.PARENT_STRUCTURE_VERSION_ID%TYPE;
11953:
11954: BEGIN
11955: IF (p_debug_mode = 'Y') THEN
11956: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL begin');
11957: END IF;
11958:
11959: IF (p_commit = FND_API.G_TRUE) THEN
11960: savepoint delete_struc_ver_wo_val;

Line 12045: --PA_PROJECT_STRUCTURE_PVT1.delete_structure_versions API.

12041: PA_PROJ_ELEMENT_SCH_PKG.Delete_Row(l_pevsh_rowid);
12042:
12043: --bug 4172646
12044: --remove the code to call PA_FIN_PLAN_PVT.delete_wp_budget_versions as its also called from
12045: --PA_PROJECT_STRUCTURE_PVT1.delete_structure_versions API.
12046: --
12047:
12048: END IF;
12049:

Line 12070: PA_PROJECT_STRUCTURE_PVT1.Delete_Structure_Version_Attr(

12066: IF (p_debug_mode = 'Y') THEN
12067: pa_debug.debug('del structure version attr');
12068: END IF;
12069: --Delete structure version attribute
12070: PA_PROJECT_STRUCTURE_PVT1.Delete_Structure_Version_Attr(
12071: p_commit => p_commit,
12072: p_debug_mode => p_debug_mode,
12073: p_pev_structure_id => l_pev_structure_id,
12074: p_record_version_number => l_pevs_rvn,

Line 12099: PA_PROJECT_STRUCTURE_PVT1.Delete_Structure_Version(

12095: pa_debug.debug('del structure version');
12096: END IF;
12097:
12098: --Delete structure version
12099: PA_PROJECT_STRUCTURE_PVT1.Delete_Structure_Version(
12100: p_commit => p_commit,
12101: p_debug_mode => p_debug_mode,
12102: p_structure_version_id => l_element_version_id,
12103: p_record_version_number => l_pev_rvn,

Line 12193: PA_PROJECT_STRUCTURE_PVT1.Delete_Structure(

12189: END IF;
12190:
12191: select record_version_number into l_pe_rvn
12192: from pa_proj_elements where proj_element_id = l_proj_element_id;
12193: PA_PROJECT_STRUCTURE_PVT1.Delete_Structure(
12194: p_commit => p_commit,
12195: p_debug_mode => p_debug_mode,
12196: p_structure_id => l_proj_element_id,
12197: p_record_version_number => l_pe_rvn,

Line 12222: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL end');

12218:
12219: x_return_status := FND_API.G_RET_STS_SUCCESS;
12220:
12221: IF (p_debug_mode = 'Y') THEN
12222: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL end');
12223: END IF;
12224:
12225: EXCEPTION
12226: when FND_API.G_EXC_ERROR then

Line 12237: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

12233: if p_commit = FND_API.G_TRUE then
12234: rollback to delete_struc_ver_wo_val;
12235: end if;
12236: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12237: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
12238: p_procedure_name => 'Delete_Struc_Ver_Wo_Val',
12239: p_error_text => SUBSTRB(SQLERRM,1,240));
12240: when OTHERS then
12241: if p_commit = FND_API.G_TRUE then

Line 12245: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

12241: if p_commit = FND_API.G_TRUE then
12242: rollback to delete_struc_ver_wo_val;
12243: end if;
12244: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12245: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
12246: p_procedure_name => 'Delete_Struc_Ver_Wo_Val',
12247: p_error_text => SUBSTRB(SQLERRM,1,240));
12248: raise;
12249: END DELETE_STRUC_VER_WO_VAL;

Line 12429: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12425: l_text := l_text||l_workplan_version_err||': ';
12426: l_text := l_text||l_struc_ver_info_rec.name;
12427: l_text := l_text||' ('||l_struc_ver_info_rec.version_number||')';
12428:
12429: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12430: l_text
12431: ,l_clob);
12432:
12433: --print instruction text

Line 12439: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12435: l_text := l_text||'';
12438:
12439: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12440: l_text
12441: ,l_clob);
12442:
12443: --print project info

Line 12450: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12446: l_text := l_text||'

';
12436: l_text := l_text||'';
12437: l_text := l_text||l_err_instruction||'
';
12449:
12450: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12451: l_text
12452: ,l_clob);
12453:
12454: --print project name

Line 12463: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12459: l_text := l_text||'

';
12462:
12463: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12464: l_text
12465: ,l_clob);
12466:
12467: --print project number

Line 12473: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12469: l_text := l_text||'

';
12472:
12473: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12474: l_text
12475: ,l_clob);
12476:
12477: --print project manager

Line 12485: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12481: l_text := l_text||l_project_mgr||'';
12482: l_text := l_text||'

';
12484:
12485: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12486: l_text
12487: ,l_clob);
12488:
12489: --print organization

Line 12497: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12493: l_text := l_text||l_proj_info_rec.carrying_out_org_name;
12494: l_text := l_text||'

';
12447: l_text := l_text||'';
12448: l_text := l_text||l_project_info||'
';
12461: l_text := l_text||l_proj_info_rec.name||'
';
12471: l_text := l_text||l_proj_info_rec.segment1||'
';
12483: l_text := l_text||l_proj_info_rec.full_name||'
';
12495: l_text := l_text||'';
12496:
12497: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12498: l_text
12499: ,l_clob);
12500:
12501: --print workplan version information

Line 12507: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12503: l_text := l_text||'';
12506:
12507: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12508: l_text
12509: ,l_clob);
12510:
12511: --print version name

Line 12521: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12517: l_text := l_text||l_workplan_ver_name||'

';
12520:
12521: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12522: l_text
12523: ,l_clob);
12524:
12525: --print version number

Line 12532: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12528: l_text := l_text||l_workplan_ver_num||'';
12529: l_text := l_text||'

';
12531:
12532: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12533: l_text
12534: ,l_clob);
12535:
12536: l_text := '';
12541:
12542: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12543: l_text
12544: ,l_clob);
12545:
12546: --print scheduled finish date

Line 12554: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12550: l_text := l_text||'';
12551: l_text := l_text||l_struc_ver_info_rec.scheduled_finish_date||'

';
12504: l_text := l_text||'';
12505: l_text := l_text||l_workplan_ver_info||'
';
12518: l_text := l_text||'';
12519: l_text := l_text||l_struc_ver_info_rec.name||'
';
12530: l_text := l_text||l_struc_ver_info_rec.version_number||'
';

Line 12542: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12538: l_text := l_text||l_wp_sch_start_date||'

';
12539: l_text := l_text||'';
12540: l_text := l_text||l_struc_ver_info_rec.scheduled_start_date||'

';
12552: l_text := l_text||'
';
12553:
12554: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12555: l_text
12556: ,l_clob);
12557:
12558: --print error header

Line 12564: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12560: l_text := l_text||'';
12563:
12564: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12565: l_text
12566: ,l_clob);
12567:
12568: --print error table

Line 12578: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12574: l_text := l_text||'';
12575: l_text := l_text||'';
12576: l_text := l_text||l_error||'

';
12577:
12578: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12579: l_text
12580: ,l_clob);
12581:
12582: --print errors

Line 12590: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12586: l_text := '

';
12589:
12590: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12591: l_text
12592: ,l_clob);
12593:
12594: EXIT WHEN l_index = p_error_tbl.LAST;

Line 12606: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12602: l_text := l_text||'

';
12603: l_text := l_text||'
';
12561: l_text := l_text||'';
12562: l_text := l_text||l_error_header||'
';
12587: l_text := l_text||'';
12588: l_text := l_text||p_error_tbl(l_index)||'
';
12604: l_text := l_text||'

';
12605:
12606: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12607: l_text
12608: ,l_clob);
12609:
12610: --send notification

Line 12657: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

12653: x_return_status := FND_API.G_RET_STS_ERROR;
12654: when OTHERS then
12655: ROLLBACK;
12656: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12657: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
12658: p_procedure_name => 'Generate_Error_Page',
12659: p_error_text => SUBSTRB(SQLERRM,1,240));
12660: raise;
12661: END Generate_Error_Page;

Line 12848: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

12844:
12845: EXCEPTION
12846: WHEN OTHERS THEN
12847: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12848: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
12849: p_procedure_name => 'RECALC_FIN_TASK_WEIGHTS',
12850: p_error_text => SUBSTRB(SQLERRM,1,240));
12851: END RECALC_FIN_TASK_WEIGHTS;
12852:

Line 13004: pa_debug.init_err_stack ('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION_BULK');

13000: l_fin_struc VARCHAR2(1);
13001:
13002: BEGIN
13003:
13004: pa_debug.init_err_stack ('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION_BULK');
13005:
13006: IF (p_debug_mode = 'Y') THEN
13007: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION_BULK begin');
13008: END IF;

Line 13007: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION_BULK begin');

13003:
13004: pa_debug.init_err_stack ('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION_BULK');
13005:
13006: IF (p_debug_mode = 'Y') THEN
13007: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION_BULK begin');
13008: END IF;
13009:
13010: IF (p_commit = FND_API.G_TRUE) THEN
13011: savepoint copy_structure_version_pvt_blk;

Line 13069: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

13065: l_new_struct_ver_id := l_tmp_struct_ver_id;
13066: -- added for bug Fix: 4537865
13067:
13068: /*
13069: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
13070: ( p_validate_only => p_validate_only
13071: ,p_structure_id => l_structure_ver_rec.proj_element_id
13072: ,p_attribute_category => l_structure_ver_rec.attribute_category
13073: ,p_attribute1 => l_structure_ver_rec.attribute1

Line 13119: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

13115: If (p_change_reason_code <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR ) THEN
13116: l_structure_ver_attr_rec.change_reason_code := p_change_reason_code;
13117: END IF;
13118:
13119: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
13120: ( p_validate_only => FND_API.G_FALSE
13121: ,p_structure_version_id => l_new_struct_ver_id
13122: ,p_structure_version_name => p_new_struct_ver_name
13123: ,p_structure_version_desc => p_new_struct_ver_desc

Line 13623: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

13619: RAISE FND_API.G_EXC_ERROR;
13620: END IF;
13621: EXCEPTION
13622: WHEN OTHERS THEN
13623: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
13624: p_procedure_name => 'COPY_STRUCTURE_VERSION_BULK',
13625: p_error_text => SUBSTRB('PA_PROJ_STRUC_MAPPING_PUB.copy_mapping:'||SQLERRM,1,240));
13626: RAISE FND_API.G_EXC_ERROR;
13627: END;

Line 13662: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

13658: ,x_Msg_data => x_msg_data
13659: );
13660: EXCEPTION
13661: WHEN OTHERS THEN
13662: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
13663: p_procedure_name => 'COPY_STRUCTURE_VERSION_BULK',
13664: p_error_text => SUBSTRB('PA_FP_COPY_FROM_PKG.copy_wp_budget_versions:'||SQLERRM,1,240));
13665: RAISE FND_API.G_EXC_ERROR;
13666: END;

Line 13695: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION_BULK END');

13691: COMMIT;
13692: END IF;
13693:
13694: IF (p_debug_mode = 'Y') THEN
13695: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION_BULK END');
13696: END IF;
13697:
13698: EXCEPTION
13699: when FND_API.G_EXC_ERROR then

Line 13709: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

13705: if p_commit = FND_API.G_TRUE then
13706: rollback to copy_structure_version_pvt_blk;
13707: end if;
13708: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13709: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
13710: p_procedure_name => 'COPY_STRUCTURE_VERSION_BULK',
13711: p_error_text => SUBSTRB(SQLERRM,1,240));
13712: when OTHERS then
13713: if p_commit = FND_API.G_TRUE then

Line 13717: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

13713: if p_commit = FND_API.G_TRUE then
13714: rollback to copy_structure_version_pvt_blk;
13715: end if;
13716: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13717: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
13718: p_procedure_name => 'COPY_STRUCTURE_VERSION_BULK',
13719: p_error_text => SUBSTRB(SQLERRM,1,240));
13720: raise;
13721: END COPY_STRUCTURE_VERSION_BULK;

Line 13787: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

13783: WHEN OTHERS THEN
13784: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13785: x_msg_count := FND_MSG_PUB.count_msg;
13786: --put message
13787: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
13788: p_procedure_name => 'update_sch_dirty_flag',
13789: p_error_text => SUBSTRB(SQLERRM,1,240));
13790: RAISE;
13791: END update_sch_dirty_flag;

Line 14147: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.update_structures_setup_attr');

14143: -- End fix for Bug # 4426392.
14144:
14145: BEGIN
14146: IF (p_debug_mode = 'Y') THEN
14147: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.update_structures_setup_attr');
14148: END IF;
14149:
14150: IF (p_commit = FND_API.G_TRUE) THEN
14151: savepoint update_struc_setup_attr_pvt;

Line 14317: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

14313: RAISE FND_API.G_EXC_ERROR;
14314: END IF;
14315:
14316: --create structure version
14317: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
14318: (p_validate_only => FND_API.G_FALSE
14319: ,p_structure_id => l_structure_id
14320: ,x_structure_version_id => l_structure_version_id
14321: ,x_return_status => l_return_status

Line 14348: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

14344: l_effective_date := sysdate;
14345: END IF;
14346:
14347: --create structure version
14348: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
14349: (p_validate_only => FND_API.G_FALSE
14350: ,p_structure_version_id => l_structure_version_id
14351: ,p_structure_version_name => l_name
14352: ,p_structure_version_desc => NULL

Line 14398: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

14394: END IF;
14395: RAISE FND_API.G_EXC_ERROR;
14396: END IF;
14397:
14398: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
14399: (p_validate_only => FND_API.G_FALSE
14400: ,p_structure_id => l_structure_id
14401: ,x_structure_version_id => l_structure_version_id
14402: ,x_return_status => l_return_status

Line 14448: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

14444: l_effective_date := sysdate;
14445: END IF;
14446:
14447: --create structure version
14448: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
14449: (p_validate_only => FND_API.G_FALSE
14450: ,p_structure_version_id => l_structure_version_id
14451: ,p_structure_version_name => l_name
14452: ,p_structure_version_desc => NULL

Line 14498: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

14494: END IF;
14495: RAISE FND_API.G_EXC_ERROR;
14496: END IF;
14497:
14498: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
14499: (p_validate_only => FND_API.G_FALSE
14500: ,p_structure_id => l_structure_id
14501: ,x_structure_version_id => l_structure_version_id
14502: ,x_return_status => l_return_status

Line 14548: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

14544: l_effective_date := sysdate;
14545: END IF;
14546:
14547: --create structure version
14548: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
14549: (p_validate_only => FND_API.G_FALSE
14550: ,p_structure_version_id => l_structure_version_id
14551: ,p_structure_version_name => l_name
14552: ,p_structure_version_desc => NULL

Line 14679: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

14675: RAISE FND_API.G_EXC_ERROR;
14676: END IF;
14677:
14678: --create structure version
14679: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
14680: (p_validate_only => FND_API.G_FALSE
14681: ,p_structure_id => l_structure_id
14682: ,x_structure_version_id => l_structure_version_id
14683: ,x_return_status => l_return_status

Line 14710: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

14706: l_effective_date := sysdate;
14707: END IF;
14708:
14709: --create structure version
14710: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
14711: (p_validate_only => FND_API.G_FALSE
14712: ,p_structure_version_id => l_structure_version_id
14713: ,p_structure_version_name => l_name
14714: ,p_structure_version_desc => NULL

Line 14758: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

14754: END IF;
14755: RAISE FND_API.G_EXC_ERROR;
14756: END IF;
14757:
14758: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
14759: (p_validate_only => FND_API.G_FALSE
14760: ,p_structure_id => l_structure_id
14761: ,x_structure_version_id => l_structure_version_id
14762: ,x_return_status => l_return_status

Line 14808: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

14804: l_effective_date := sysdate;
14805: END IF;
14806:
14807: --create structure version
14808: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
14809: (p_validate_only => FND_API.G_FALSE
14810: ,p_structure_version_id => l_structure_version_id
14811: ,p_structure_version_name => l_name
14812: ,p_structure_version_desc => NULL

Line 14909: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

14905: END IF;
14906: RAISE FND_API.G_EXC_ERROR;
14907: END IF;
14908:
14909: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
14910: (p_validate_only => FND_API.G_FALSE
14911: ,p_structure_id => l_structure_id
14912: ,x_structure_version_id => l_structure_version_id
14913: ,x_return_status => l_return_status

Line 14959: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

14955: l_effective_date := sysdate;
14956: END IF;
14957:
14958: --create structure version
14959: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
14960: (p_validate_only => FND_API.G_FALSE
14961: ,p_structure_version_id => l_structure_version_id
14962: ,p_structure_version_name => l_wp_name
14963: ,p_structure_version_desc => NULL

Line 15061: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

15057: ,x_msg_count => x_msg_count
15058: ,x_Msg_data => x_msg_data);
15059: EXCEPTION
15060: WHEN OTHERS THEN
15061: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
15062: p_procedure_name => 'update_structures_setup_attr',
15063: p_error_text => SUBSTRB('PA_FP_PLANNING_TRANSACTION_PUB.add_planning_transactions:'||SQLERRM,1,240));
15064: RAISE FND_API.G_EXC_ERROR;
15065: END;

Line 15289: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

15285: END IF;
15286: RAISE FND_API.G_EXC_ERROR;
15287: END IF;
15288:
15289: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
15290: (p_validate_only => FND_API.G_FALSE
15291: ,p_structure_id => l_structure_id
15292: ,x_structure_version_id => l_structure_version_id
15293: ,x_return_status => l_return_status

Line 15339: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

15335: l_effective_date := sysdate;
15336: END IF;
15337:
15338: --create structure version
15339: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
15340: (p_validate_only => FND_API.G_FALSE
15341: ,p_structure_version_id => l_structure_version_id
15342: ,p_structure_version_name => l_name
15343: ,p_structure_version_desc => NULL

Line 15424: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(

15420: END IF;
15421: END LOOP;
15422: CLOSE get_top_tasks;
15423:
15424: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(
15425: p_structure_version_id => l_del_struc_ver_id
15426: ,p_record_version_number => l_struc_ver_rvn
15427: ,x_return_status => l_return_status
15428: ,x_msg_count => l_msg_count

Line 15490: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

15486: RAISE FND_API.G_EXC_ERROR;
15487: END IF;
15488:
15489: --create structure version
15490: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
15491: (p_validate_only => FND_API.G_FALSE
15492: ,p_structure_id => l_structure_id
15493: ,x_structure_version_id => l_structure_version_id
15494: ,x_return_status => l_return_status

Line 15521: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

15517: l_effective_date := sysdate;
15518: END IF;
15519:
15520: --create structure version
15521: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
15522: (p_validate_only => FND_API.G_FALSE
15523: ,p_structure_version_id => l_structure_version_id
15524: ,p_structure_version_name => l_name
15525: ,p_structure_version_desc => NULL

Line 15796: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

15792: RAISE FND_API.G_EXC_ERROR;
15793: END IF;
15794:
15795: --create structure version
15796: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
15797: (p_validate_only => FND_API.G_FALSE
15798: ,p_structure_id => l_structure_id
15799: ,x_structure_version_id => l_structure_version_id
15800: ,x_return_status => l_return_status

Line 15827: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

15823: l_effective_date := sysdate;
15824: END IF;
15825:
15826: --create structure version
15827: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
15828: (p_validate_only => FND_API.G_FALSE
15829: ,p_structure_version_id => l_structure_version_id
15830: ,p_structure_version_name => l_name
15831: ,p_structure_version_desc => NULL

Line 15876: PA_PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_Wo_Val(

15872: LOOP
15873: FETCH sel_all_wp_structure_ver INTO l_structure_version_id, l_struc_ver_rvn;
15874: EXIT WHEN sel_all_wp_structure_ver%NOTFOUND;
15875:
15876: PA_PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_Wo_Val(
15877: p_structure_version_id => l_structure_version_id
15878: ,p_record_version_number => l_struc_ver_rvn
15879: ,x_return_status => l_return_status
15880: ,x_msg_count => l_msg_count

Line 15947: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

15943: x_msg_data => x_msg_data
15944: );
15945: EXCEPTION
15946: WHEN OTHERS THEN
15947: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
15948: p_procedure_name => 'update_structures_setup_attr',
15949: p_error_text => SUBSTRB('PA_FIN_PLAN_PVT.delete_wp_options :'||SQLERRM,1,240));
15950: RAISE FND_API.G_EXC_ERROR;
15951: END;

Line 16001: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(

15997: END IF;
15998: END LOOP;
15999: CLOSE get_top_tasks;
16000:
16001: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(
16002: p_structure_version_id => l_del_struc_ver_id
16003: ,p_record_version_number => l_struc_ver_rvn
16004: ,x_return_status => l_return_status
16005: ,x_msg_count => l_msg_count

Line 16189: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

16185: RAISE FND_API.G_EXC_ERROR;
16186: END IF;
16187:
16188: l_structure_version_id := NULL;
16189: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
16190: (p_validate_only => FND_API.G_FALSE
16191: ,p_structure_id => l_structure_id
16192: ,x_structure_version_id => l_structure_version_id
16193: ,x_return_status => l_return_status

Line 16239: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

16235: l_effective_date := sysdate;
16236: END IF;
16237:
16238: --create structure version
16239: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
16240: (p_validate_only => FND_API.G_FALSE
16241: ,p_structure_version_id => l_structure_version_id
16242: ,p_structure_version_name => l_name
16243: ,p_structure_version_desc => NULL

Line 16403: PA_PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_Wo_Val(

16399: LOOP
16400: FETCH sel_all_wp_structure_ver INTO l_structure_version_id, l_struc_ver_rvn;
16401: EXIT WHEN sel_all_wp_structure_ver%NOTFOUND;
16402:
16403: PA_PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_Wo_Val(
16404: p_structure_version_id => l_structure_version_id
16405: ,p_record_version_number => l_struc_ver_rvn
16406: ,x_return_status => l_return_status
16407: ,x_msg_count => l_msg_count

Line 16482: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

16478: x_msg_data => x_msg_data
16479: );
16480: EXCEPTION
16481: WHEN OTHERS THEN
16482: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
16483: p_procedure_name => 'update_structures_setup_attr',
16484: p_error_text => SUBSTRB('PA_FIN_PLAN_PVT.delete_wp_option:'||SQLERRM,1,240));
16485: RAISE FND_API.G_EXC_ERROR;
16486: END;

Line 16536: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(

16532: END IF;
16533: END LOOP;
16534: CLOSE get_top_tasks;
16535:
16536: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(
16537: p_structure_version_id => l_del_struc_ver_id
16538: ,p_record_version_number => l_struc_ver_rvn
16539: ,x_return_status => l_return_status
16540: ,x_msg_count => l_msg_count

Line 16653: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

16649: END IF;
16650: RAISE FND_API.G_EXC_ERROR;
16651: END IF;
16652:
16653: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
16654: (p_validate_only => FND_API.G_FALSE
16655: ,p_structure_id => l_structure_id
16656: ,x_structure_version_id => l_structure_version_id
16657: ,x_return_status => l_return_status

Line 16703: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

16699: l_effective_date := sysdate;
16700: END IF;
16701:
16702: --create structure version
16703: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
16704: (p_validate_only => FND_API.G_FALSE
16705: ,p_structure_version_id => l_structure_version_id
16706: ,p_structure_version_name => l_name
16707: ,p_structure_version_desc => NULL

Line 16871: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(

16867: END IF;
16868: END LOOP;
16869: CLOSE get_top_tasks;
16870:
16871: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(
16872: p_structure_version_id => l_del_struc_ver_id
16873: ,p_record_version_number => l_struc_ver_rvn
16874: ,x_return_status => l_return_status
16875: ,x_msg_count => l_msg_count

Line 16966: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(

16962: END IF;
16963: END LOOP;
16964: CLOSE get_top_tasks;
16965:
16966: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(
16967: p_structure_version_id => l_del_struc_ver_id
16968: ,p_record_version_number => l_struc_ver_rvn
16969: ,x_return_status => l_return_status
16970: ,x_msg_count => l_msg_count

Line 17051: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

17047: ,x_msg_count => x_msg_count
17048: ,x_Msg_data => x_msg_data);
17049: EXCEPTION
17050: WHEN OTHERS THEN
17051: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
17052: p_procedure_name => 'update_structures_setup_attr',
17053: p_error_text => SUBSTRB('PA_FP_PLANNING_TRANSACTION_PUB.add_planning_transactions:'||SQLERRM,1,240));
17054: RAISE FND_API.G_EXC_ERROR;
17055: END;

Line 17165: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION

17161: , ppevs.record_version_number = (ppevs.record_version_number+1)
17162: where ppevs.project_id = p_project_id
17163: and ppevs.element_version_id = l_structure_version_id;
17164:
17165: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION
17166: (p_commit => p_commit
17167: ,p_validate_only => p_validate_only
17168: ,p_validation_level => p_validation_level
17169: ,p_calling_module => p_calling_module

Line 17265: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(

17261: END IF;
17262: END LOOP;
17263: CLOSE get_top_tasks;
17264:
17265: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(
17266: p_structure_version_id => l_del_struc_ver_id
17267: ,p_record_version_number => l_struc_ver_rvn
17268: ,x_return_status => l_return_status
17269: ,x_msg_count => l_msg_count

Line 17358: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(

17354: END IF;
17355: END LOOP;
17356: CLOSE get_top_tasks;
17357:
17358: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(
17359: p_structure_version_id => l_del_struc_ver_id
17360: ,p_record_version_number => l_struc_ver_rvn
17361: ,x_return_status => l_return_status
17362: ,x_msg_count => l_msg_count

Line 17442: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

17438: ,x_msg_count => x_msg_count
17439: ,x_Msg_data => x_msg_data);
17440: EXCEPTION
17441: WHEN OTHERS THEN
17442: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
17443: p_procedure_name => 'update_structures_setup_attr',
17444: p_error_text => SUBSTRB('PA_FP_PLANNING_TRANSACTION_PUB.add_planning_transactions:'||SQLERRM,1,240));
17445: RAISE FND_API.G_EXC_ERROR;
17446: END;

Line 17556: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION

17552: , ppevs.record_version_number = (ppevs.record_version_number+1)
17553: where ppevs.project_id = p_project_id
17554: and ppevs.element_version_id = l_structure_version_id;
17555:
17556: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION
17557: (p_commit => p_commit
17558: ,p_validate_only => p_validate_only
17559: ,p_validation_level => p_validation_level
17560: ,p_calling_module => p_calling_module

Line 17648: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

17644: END IF;
17645: RAISE FND_API.G_EXC_ERROR;
17646: END IF;
17647:
17648: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
17649: (p_validate_only => FND_API.G_FALSE
17650: ,p_structure_id => l_structure_id
17651: ,x_structure_version_id => l_structure_version_id
17652: ,x_return_status => l_return_status

Line 17698: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

17694: l_effective_date := sysdate;
17695: END IF;
17696:
17697: --create structure version
17698: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
17699: (p_validate_only => FND_API.G_FALSE
17700: ,p_structure_version_id => l_structure_version_id
17701: ,p_structure_version_name => l_del_name
17702: ,p_structure_version_desc => NULL

Line 17782: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.update_structures_setup_attr end');

17778:
17779: x_return_status := FND_API.G_RET_STS_SUCCESS;
17780:
17781: IF (p_debug_mode = 'Y') THEN
17782: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.update_structures_setup_attr end');
17783: END IF;
17784:
17785: EXCEPTION
17786: WHEN FND_API.G_EXC_ERROR THEN

Line 17799: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

17795: END IF;
17796: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
17797: x_msg_count := FND_MSG_PUB.count_msg;
17798: --put message
17799: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
17800: p_procedure_name => 'update_structures_setup_attr',
17801: p_error_text => SUBSTRB(SQLERRM,1,240));
17802: RAISE;
17803: END update_structures_setup_attr;

Line 17805: end PA_PROJECT_STRUCTURE_PVT1;

17801: p_error_text => SUBSTRB(SQLERRM,1,240));
17802: RAISE;
17803: END update_structures_setup_attr;
17804:
17805: end PA_PROJECT_STRUCTURE_PVT1;