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_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.31.12020000.6 2013/03/28 11:13:22 bpottipa 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 2236: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_STRUCTURE_VERSION_ATTR end');

2232:
2233: x_return_status := FND_API.G_RET_STS_SUCCESS;
2234:
2235: IF (p_debug_mode = 'Y') THEN
2236: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_STRUCTURE_VERSION_ATTR end');
2237: END IF;
2238:
2239: EXCEPTION
2240: WHEN NO_DATA_FOUND THEN

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

2254: END IF;
2255: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2256: x_msg_count := FND_MSG_PUB.count_msg;
2257: --put message
2258: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
2259: p_procedure_name => 'Update_Structure_Version_Attr',
2260: p_error_text => SUBSTRB(SQLERRM,1,240));
2261: RAISE;
2262: END Update_Structure_Version_Attr;

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

2332: -- End fix for Bug # 4506308.
2333:
2334: BEGIN
2335: IF (p_debug_mode = 'Y') THEN
2336: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUCTURE begin');
2337: END IF;
2338:
2339: if p_commit = FND_API.G_TRUE then
2340: savepoint delete_structure_pvt;

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

2437:
2438: x_return_status := FND_API.G_RET_STS_SUCCESS;
2439:
2440: IF (p_debug_mode = 'Y') THEN
2441: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUCTURE end');
2442: END IF;
2443:
2444: EXCEPTION
2445: when FND_API.G_EXC_ERROR then

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

2451: if p_commit = FND_API.G_TRUE then
2452: rollback to delete_structure_pvt;
2453: end if;
2454: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2455: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
2456: p_procedure_name => 'Delete_Structure',
2457: p_error_text => SUBSTRB(SQLERRM,1,240));
2458: raise;
2459: END Delete_Structure;

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

2523: -- End fix for Bug # 4483222.
2524:
2525: BEGIN
2526: IF (p_debug_mode = 'Y') THEN
2527: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUCTURE_VERSION begin');
2528: END IF;
2529:
2530: if p_commit = FND_API.G_TRUE then
2531: savepoint delete_structure_version_pvt;

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

2614: ,x_Msg_data => x_msg_data
2615: );
2616: EXCEPTION
2617: WHEN OTHERS THEN
2618: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
2619: p_procedure_name => 'Delete_Structure_Version',
2620: p_error_text => SUBSTRB('PA_FIN_PLAN_PVT.delete_wp_budget_versions:'||SQLERRM,1,240));
2621: RAISE FND_API.G_EXC_ERROR;
2622: END;

Line 2639: p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',

2635: );
2636: EXCEPTION
2637: WHEN OTHERS THEN
2638: fnd_msg_pub.add_exc_msg(
2639: p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
2640: p_procedure_name => 'Delete_Structure_Version',
2641: p_error_text => SUBSTRB('PA_PROGRESS_PUB.delete_working_wp_progress:'||SQLERRM,1,240));
2642: RAISE FND_API.G_EXC_ERROR;
2643: END;

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

2700:
2701: x_return_status := FND_API.G_RET_STS_SUCCESS;
2702:
2703: IF (p_debug_mode = 'Y') THEN
2704: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUCTURE_VERSION end');
2705: END IF;
2706:
2707: EXCEPTION
2708: when FND_API.G_EXC_ERROR then

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

2714: if p_commit = FND_API.G_TRUE then
2715: rollback to delete_structure_version_pvt;
2716: end if;
2717: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2718: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
2719: p_procedure_name => 'Delete_Structure_Version',
2720: p_error_text => SUBSTRB(SQLERRM,1,240));
2721: raise;
2722: END DELETE_STRUCTURE_VERSION;

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

2799: -- 3804437
2800:
2801: BEGIN
2802: IF (p_debug_mode = 'Y') THEN
2803: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUCTURE_VERSION_ATTR begin');
2804: END IF;
2805:
2806: if p_commit = FND_API.G_TRUE then
2807: savepoint delete_structure_ver_attr_pvt;

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

2900: end if;
2901: /* Added for bug 8708651 */
2902:
2903: IF (p_debug_mode = 'Y') THEN
2904: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUCTURE_VERSION_ATTR end');
2905: END IF;
2906:
2907: x_return_status := FND_API.G_RET_STS_SUCCESS;
2908:

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

2916: if p_commit = FND_API.G_TRUE then
2917: rollback to delete_structure_ver_attr_pvt;
2918: end if;
2919: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2920: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
2921: p_procedure_name => 'Delete_Structure',
2922: p_error_text => SUBSTRB(SQLERRM,1,240));
2923: raise;
2924: END Delete_Structure_Version_Attr;

Line 3245: l_messages PA_PROJECT_STRUCTURE_PVT1.PA_PUBLISH_ERR_TBL_TYPE;

3241: l_err_code NUMBER:= 0;
3242: l_err_stack VARCHAR2(630);
3243: l_err_stage VARCHAR2(80);
3244:
3245: l_messages PA_PROJECT_STRUCTURE_PVT1.PA_PUBLISH_ERR_TBL_TYPE;
3246: l_page_content_id NUMBER;
3247: l_item_key VARCHAR2(240);
3248:
3249: --added for performace improvement

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

3300:
3301: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
3302:
3303: IF (p_debug_mode = 'Y') THEN
3304: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE begin');
3305: END IF;
3306:
3307: IF (p_commit = FND_API.G_TRUE) THEN
3308: savepoint publish_structure_pvt;

Line 3638: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

3634: -- added for Bug fix: 4537865
3635:
3636: /* This API insert into planning txn table if wp. Call table hander instead
3637: --Call Create Structure Version
3638: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
3639: ( p_validate_only => p_validate_only
3640: ,p_structure_id => l_struc_ver_rec.proj_element_id
3641: ,p_attribute_category => l_struc_ver_rec.attribute_category
3642: ,p_attribute1 => l_struc_ver_rec.attribute1

Line 3678: -- PA_PROJECT_STRUCTURE_PVT1.UPDATE_LATEST_PUB_LINKS

3674: raise FND_API.G_EXC_ERROR;
3675: end if;
3676:
3677: --update links linking from working version to current published version
3678: -- PA_PROJECT_STRUCTURE_PVT1.UPDATE_LATEST_PUB_LINKS
3679: -- (
3680: -- p_init_msg_list => FND_API.G_FALSE
3681: -- ,p_commit => FND_API.G_FALSE
3682: -- ,p_debug_mode => p_debug_mode

Line 4192: -- PA_PROJECT_STRUCTURE_PVT1.UPDATE_LATEST_PUB_LINKS

4188: --update links linking from working version to current published version
4189: -- IF (p_debug_mode = 'Y') THEN
4190: -- pa_debug.debug('updating links');
4191: -- END IF;
4192: -- PA_PROJECT_STRUCTURE_PVT1.UPDATE_LATEST_PUB_LINKS
4193: -- (
4194: -- p_init_msg_list => FND_API.G_FALSE
4195: -- ,p_commit => FND_API.G_FALSE
4196: -- ,p_debug_mode => p_debug_mode

Line 4767: and PA_PROJECT_STRUCTURE_PVT1.copy_task_version( p_structure_version_id,

4763: and ppe.proj_element_id = ppev2.proj_element_id
4764: and ppe.link_task_flag = 'N'
4765: --bug 4573340
4766: */
4767: and PA_PROJECT_STRUCTURE_PVT1.copy_task_version( p_structure_version_id,
4768: ppev2.element_version_id ) = 'Y'
4769: order by ppev2.display_sequence ) ppev
4770: ;
4771:

Line 4777: and PA_PROJECT_STRUCTURE_PVT1.copy_task_version( p_structure_version_id,

4773: FROM pa_proj_element_versions ppev
4774: WHERE ppev.project_id = l_project_id
4775: and ppev.parent_structure_version_id = p_structure_version_id
4776: and ppev.object_type = 'PA_TASKS'
4777: and PA_PROJECT_STRUCTURE_PVT1.copy_task_version( p_structure_version_id,
4778: ppev.element_version_id ) = 'Y'
4779: order by ppev.display_sequence
4780: ;
4781: */

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

4969: INTO l_New_Task_Versions_Tab, l_Old_Task_Versions_Tab
4970: From pa_proj_element_versions
4971: Where parent_structure_version_id = l_new_struct_ver_id
4972: and object_type = 'PA_TASKS'
4973: and PA_PROJECT_STRUCTURE_PVT1.copy_task_version( l_new_struct_ver_id, element_version_id ) = 'Y'
4974: order by display_sequence;
4975:
4976: --bug 4019845
4977: --comment starts here

Line 5071: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

5067: -- updating links will break the logic for updating to latest published
5068: -- version.
5069:
5070: --Call Create Structure Version Attr
5071: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
5072: ( p_validate_only => FND_API.G_FALSE
5073: ,p_structure_version_id => l_new_struct_ver_id
5074: ,p_structure_version_name => l_new_struct_ver_name
5075: ,p_structure_version_desc => l_new_struct_ver_desc

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

5129: RAISE FND_API.G_EXC_ERROR;
5130: END IF;
5131: EXCEPTION
5132: WHEN OTHERS THEN
5133: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
5134: p_procedure_name => 'PUBLISH_STRUCTURE',
5135: p_error_text => SUBSTRB('PA_PROJ_STRUC_MAPPING_PUB.COPY_MAPPING:'||SQLERRM,1,240));
5136: RAISE FND_API.G_EXC_ERROR;
5137: END;

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

5173: ,x_Msg_data => x_msg_data
5174: );
5175: EXCEPTION
5176: WHEN OTHERS THEN
5177: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
5178: p_procedure_name => 'PUBLISH_STRUCTURE',
5179: p_error_text => SUBSTRB('PA_FP_COPY_FROM_PKG.copy_wp_budget_versions:'||SQLERRM,1,240));
5180: RAISE FND_API.G_EXC_ERROR;
5181: END;

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

5199: ,x_return_status => x_return_status
5200: );
5201: EXCEPTION
5202: WHEN OTHERS THEN
5203: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
5204: p_procedure_name => 'PUBLISH_STRUCTURE',
5205: p_error_text => SUBSTRB('PA_FP_COPY_FROM_PKG.copy_missing_unplanned_asgmts:'||SQLERRM,1,240));
5206: RAISE FND_API.G_EXC_ERROR;
5207: END;

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

5622:
5623: -- End
5624:
5625: IF l_debug_mode = 'Y' THEN
5626: pa_debug.write('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE', 'Before opening sel_other_structure_ver p_structure_version_id='||p_structure_version_id, 3);
5627: END IF;
5628:
5629: --hsiu
5630: --changes for advanced structure

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

5634: FETCH sel_other_structure_ver into l_del_struc_ver_id, l_del_struc_ver_rvn;
5635: EXIT WHEN sel_other_structure_ver%NOTFOUND;
5636:
5637: IF l_debug_mode = 'Y' THEN
5638: pa_debug.write('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE', 'Before calling PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_wo_val', 3);
5639: 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);
5640: END IF;
5641:
5642: PA_PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_wo_val(

Line 5639: 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);

5635: EXIT WHEN sel_other_structure_ver%NOTFOUND;
5636:
5637: IF l_debug_mode = 'Y' THEN
5638: pa_debug.write('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE', 'Before calling PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_wo_val', 3);
5639: 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);
5640: END IF;
5641:
5642: PA_PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_wo_val(
5643: p_structure_version_id => l_del_struc_ver_id

Line 5642: PA_PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_wo_val(

5638: pa_debug.write('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE', 'Before calling PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_wo_val', 3);
5639: 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);
5640: END IF;
5641:
5642: PA_PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_wo_val(
5643: p_structure_version_id => l_del_struc_ver_id
5644: ,p_record_version_number => l_del_struc_ver_rvn
5645: ,x_return_status => l_return_status
5646: ,x_msg_count => l_msg_count

Line 5654: 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);

5650: --Check if there is any error.
5651: l_msg_count := FND_MSG_PUB.count_msg;
5652:
5653: IF l_debug_mode = 'Y' THEN
5654: 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);
5655: END IF;
5656:
5657: IF l_msg_count > 0 OR l_return_status ='E' THEN
5658: x_msg_count := l_msg_count;

Line 5726: 'PA_PROJECT_STRUCTURE_PVT1',

5722: );
5723: EXCEPTION
5724: WHEN OTHERS THEN
5725: fnd_msg_pub.add_exc_msg(p_pkg_name =>
5726: 'PA_PROJECT_STRUCTURE_PVT1',
5727: p_procedure_name => 'publish_structure',
5728: p_error_text => SUBSTRB('Call PA_PROGRESS_PUB.COPY_PROGRESS_ACT_ETC:'||SQLERRM,1,120));
5729: RAISE FND_API.G_EXC_ERROR;
5730: END;

Line 5765: 'PA_PROJECT_STRUCTURE_PVT1',

5761: );
5762: EXCEPTION
5763: WHEN OTHERS THEN
5764: fnd_msg_pub.add_exc_msg(p_pkg_name =>
5765: 'PA_PROJECT_STRUCTURE_PVT1',
5766: p_procedure_name => 'publish_structure',
5767: p_error_text => SUBSTRB('Call pa_progress_pub.populate_pji_tab_for_plan:'||SQLERRM,1,120));
5768: RAISE FND_API.G_EXC_ERROR;
5769: END;

Line 5798: 'PA_PROJECT_STRUCTURE_PVT1',

5794: ,x_msg_data => x_msg_data);
5795: EXCEPTION
5796: WHEN OTHERS THEN
5797: fnd_msg_pub.add_exc_msg(p_pkg_name =>
5798: 'PA_PROJECT_STRUCTURE_PVT1',
5799: p_procedure_name => 'publish_structure',
5800: p_error_text => SUBSTRB('Call PA_PROGRESS_PUB.ROLLUP_PROGRESS_PVT:'||SQLERRM,1,120));
5801: RAISE FND_API.G_EXC_ERROR;
5802: END;

Line 5835: 'PA_PROJECT_STRUCTURE_PVT1',

5831: ,x_msg_data => x_msg_data);
5832: EXCEPTION
5833: WHEN OTHERS THEN
5834: fnd_msg_pub.add_exc_msg(p_pkg_name =>
5835: 'PA_PROJECT_STRUCTURE_PVT1',
5836: p_procedure_name => 'publish_structure',
5837: p_error_text => SUBSTRB('Call PA_PROGRESS_UTILS.clear_prog_outdated_flag:'||SQLERRM,1,120));
5838: RAISE FND_API.G_EXC_ERROR;
5839: END;

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

5873: raise FND_API.G_EXC_ERROR;
5874: end if;
5875:
5876: IF (p_debug_mode = 'Y') THEN
5877: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.PUBLISH_STRUCTURE end');
5878: END IF;
5879:
5880: EXCEPTION
5881: when FND_API.G_EXC_ERROR then

Line 5896: PA_PROJECT_STRUCTURE_PVT1.Generate_Error_Page(

5892: p_msg_index_out => l_msg_index_out);
5893: END LOOP;
5894:
5895: --create error clob
5896: PA_PROJECT_STRUCTURE_PVT1.Generate_Error_Page(
5897: p_structure_version_id => p_structure_version_id,
5898: p_error_tbl => l_messages,
5899: x_page_content_id => l_page_content_id,
5900: x_return_status => l_return_status,

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

5908: if p_commit = FND_API.G_TRUE then
5909: rollback to publish_structure_pvt;
5910: end if;
5911: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5912: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
5913: p_procedure_name => 'PUBLISH_STRUCTURE',
5914: p_error_text => SUBSTRB(SQLERRM,1,240));
5915: when OTHERS then
5916: if p_commit = FND_API.G_TRUE then

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

5916: if p_commit = FND_API.G_TRUE then
5917: rollback to publish_structure_pvt;
5918: end if;
5919: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5920: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
5921: p_procedure_name => 'PUBLISH_STRUCTURE',
5922: p_error_text => SUBSTRB(SQLERRM,1,240));
5923: raise;
5924: END Publish_Structure;

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

6053: l_latest_parent_struc_ver NUMBER;
6054:
6055: BEGIN
6056: IF (p_debug_mode = 'Y') THEN
6057: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_LATEST_PUB_LINKS begin');
6058: END IF;
6059:
6060: IF (p_commit = FND_API.G_TRUE) THEN
6061: savepoint update_latest_pub_links_pvt;

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

6213: if p_commit = FND_API.G_TRUE then
6214: rollback to update_latest_pub_links_pvt;
6215: end if;
6216: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6217: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
6218: p_procedure_name => 'UPDATE_LATEST_PUB_LINKS',
6219: p_error_text => SUBSTRB(SQLERRM,1,240));
6220: when OTHERS then
6221: if p_commit = FND_API.G_TRUE then

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

6221: if p_commit = FND_API.G_TRUE then
6222: rollback to update_latest_pub_links_pvt;
6223: end if;
6224: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6225: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
6226: p_procedure_name => 'UPDATE_LATEST_PUB_LINKS',
6227: p_error_text => SUBSTRB(SQLERRM,1,240));
6228: raise;
6229: END UPDATE_LATEST_PUB_LINKS;

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

6386:
6387: X_Row_id VARCHAR2(255);
6388: BEGIN
6389:
6390: pa_debug.init_err_stack ('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION');
6391:
6392: IF (p_debug_mode = 'Y') THEN
6393: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION begin');
6394: END IF;

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

6389:
6390: pa_debug.init_err_stack ('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION');
6391:
6392: IF (p_debug_mode = 'Y') THEN
6393: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION begin');
6394: END IF;
6395:
6396: IF (p_commit = FND_API.G_TRUE) THEN
6397: savepoint copy_structure_version_pvt;

Line 6405: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

6401: OPEN l_get_structure_ver_csr(p_structure_version_id);
6402: FETCH l_get_structure_ver_csr INTO l_structure_ver_rec;
6403: CLOSE l_get_structure_ver_csr;
6404:
6405: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
6406: ( p_validate_only => p_validate_only
6407: ,p_structure_id => l_structure_ver_rec.proj_element_id
6408: ,p_attribute_category => l_structure_ver_rec.attribute_category
6409: ,p_attribute1 => l_structure_ver_rec.attribute1

Line 6454: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

6450: If (p_change_reason_code <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR ) THEN
6451: l_structure_ver_attr_rec.change_reason_code := p_change_reason_code;
6452: END IF;
6453:
6454: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
6455: ( p_validate_only => FND_API.G_FALSE
6456: ,p_structure_version_id => l_new_struct_ver_id
6457: ,p_structure_version_name => p_new_struct_ver_name
6458: ,p_structure_version_desc => p_new_struct_ver_desc

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

7049: COMMIT;
7050: END IF;
7051:
7052: IF (p_debug_mode = 'Y') THEN
7053: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION END');
7054: END IF;
7055:
7056: EXCEPTION
7057: when FND_API.G_EXC_ERROR then

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

7063: if p_commit = FND_API.G_TRUE then
7064: rollback to copy_structure_version_pvt;
7065: end if;
7066: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7067: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
7068: p_procedure_name => 'COPY_STRUCTURE_VERSION',
7069: p_error_text => SUBSTRB(SQLERRM,1,240));
7070: when OTHERS then
7071: if p_commit = FND_API.G_TRUE then

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

7071: if p_commit = FND_API.G_TRUE then
7072: rollback to copy_structure_version_pvt;
7073: end if;
7074: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7075: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
7076: p_procedure_name => 'COPY_STRUCTURE_VERSION',
7077: p_error_text => SUBSTRB(SQLERRM,1,240));
7078: raise;
7079: END COPY_STRUCTURE_VERSION;

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

7421: where task_type_id = c_task_type_id;
7422: l_init_status_code PA_TASK_TYPES.INITIAL_STATUS_CODE%TYPE;
7423: --end bug 2667527
7424: BEGIN
7425: pa_debug.init_err_stack ('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE');
7426:
7427: IF (p_debug_mode = 'Y') THEN
7428: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE begin');
7429: END IF;

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

7424: BEGIN
7425: pa_debug.init_err_stack ('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE');
7426:
7427: IF (p_debug_mode = 'Y') THEN
7428: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE begin');
7429: END IF;
7430:
7431: IF (p_commit = FND_API.G_TRUE) THEN
7432: savepoint copy_structure_pvt;

Line 7689: -- PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

7685:
7686: -- IF (p_debug_mode = 'Y') THEN
7687: -- pa_debug.debug('create structure version');
7688: -- END IF;
7689: -- PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
7690: -- ( p_validate_only => FND_API.G_FALSE
7691: -- ,p_structure_id => l_structure_id
7692: -- ,x_structure_version_id => l_new_structure_version_id
7693: -- ,x_return_status => l_return_status

Line 7710: -- PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

7706:
7707: -- IF (p_debug_mode = 'Y') THEN
7708: -- pa_debug.debug('create structure version attr');
7709: -- END IF;
7710: -- PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
7711: -- ( p_validate_only => FND_API.G_FALSE
7712: -- ,p_structure_version_id => l_new_structure_version_id
7713: -- ,p_structure_version_name => l_name
7714: -- ,p_structure_version_desc => NULL

Line 7900: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

7896:
7897: IF (p_debug_mode = 'Y') THEN
7898: pa_debug.debug('create structure version');
7899: END IF;
7900: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
7901: ( p_validate_only => p_validate_only
7902: ,p_structure_id => l_structure_id
7903: ,p_attribute_category => l_structure_ver_rec.attribute_category
7904: ,p_attribute1 => l_structure_ver_rec.attribute1

Line 8347: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

8343: l_latest_flag := 'Y';
8344: END IF;
8345:
8346: --moved here for baseline purpose
8347: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
8348: ( p_validate_only => FND_API.G_FALSE
8349: ,p_structure_version_id => l_new_structure_version_id
8350: -- ,p_structure_version_name => l_name
8351: --hsiu

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

8421: COMMIT;
8422: END IF;
8423:
8424: IF (p_debug_mode = 'Y') THEN
8425: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE END');
8426: END IF;
8427:
8428: EXCEPTION
8429: when FND_API.G_EXC_ERROR then

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

8435: if p_commit = FND_API.G_TRUE then
8436: rollback to copy_structure_pvt;
8437: end if;
8438: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8439: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
8440: p_procedure_name => 'COPY_STRUCTURE',
8441: p_error_text => SUBSTRB(SQLERRM,1,240));
8442: when OTHERS then
8443: if p_commit = FND_API.G_TRUE then

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

8443: if p_commit = FND_API.G_TRUE then
8444: rollback to copy_structure_pvt;
8445: end if;
8446: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8447: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
8448: p_procedure_name => 'COPY_STRUCTURE',
8449: p_error_text => SUBSTRB(SQLERRM,1,240));
8450: raise;
8451: END COPY_STRUCTURE;

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

8676: if p_commit = FND_API.G_TRUE then
8677: rollback to refresh_structure_ver;
8678: end if;
8679: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8680: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
8681: p_procedure_name => 'REFRESH_STRUCTURE_VERSION',
8682: p_error_text => SUBSTRB(SQLERRM,1,240));
8683: raise;
8684: END REFRESH_STRUCTURE_VERSION;

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

8782: where a.project_id = b.project_id
8783: and b.element_version_id = p_structure_version_id;
8784: BEGIN
8785: IF (p_debug_mode = 'Y') THEN
8786: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION BEGIN');
8787: END IF;
8788:
8789: IF (p_commit = FND_API.G_TRUE) THEN
8790: savepoint baseline_structure_pvt;

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

8901: END IF;
8902: -- End of changes
8903:
8904: IF (p_debug_mode = 'Y') THEN
8905: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION end');
8906: END IF;
8907:
8908: x_return_status := FND_API.G_RET_STS_SUCCESS;
8909:

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

8917: if p_commit = FND_API.G_TRUE then
8918: rollback to baseline_structure_pvt;
8919: end if;
8920: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8921: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
8922: p_procedure_name => 'BASELINE_STRUCTURE_VERSION',
8923: p_error_text => SUBSTRB(SQLERRM,1,240));
8924: when OTHERS then
8925: if p_commit = FND_API.G_TRUE then

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

8925: if p_commit = FND_API.G_TRUE then
8926: rollback to baseline_structure_pvt;
8927: end if;
8928: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8929: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
8930: p_procedure_name => 'BASELINE_STRUCTURE_VERSION',
8931: p_error_text => SUBSTRB(SQLERRM,1,240));
8932: raise;
8933: END BASELINE_STRUCTURE_VERSION;

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

8983: l_pev_schedule_id NUMBER;
8984:
8985: BEGIN
8986: IF (p_debug_mode = 'Y') THEN
8987: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.SPLIT_WORKPLAN BEGIN');
8988: END IF;
8989:
8990: IF (p_commit = FND_API.G_TRUE) THEN
8991: savepoint split_workplan;

Line 9023: PA_PROJECT_STRUCTURE_PVT1.Create_Structure(

9019: END IF;
9020: CLOSE sel_struct_type;
9021:
9022: --create_structure
9023: PA_PROJECT_STRUCTURE_PVT1.Create_Structure(
9024: p_project_id => p_project_id
9025: ,p_structure_number => p_structure_number
9026: ,p_structure_name => p_structure_name
9027: ,p_structure_description => p_description

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

9113:
9114: x_return_status := FND_API.G_RET_STS_SUCCESS;
9115:
9116: IF (p_debug_mode = 'Y') THEN
9117: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.SPLIT_WORKPLAN end');
9118: END IF;
9119:
9120: EXCEPTION
9121: when FND_API.G_EXC_ERROR then

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

9127: if p_commit = FND_API.G_TRUE then
9128: rollback to split_workplan;
9129: end if;
9130: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9131: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
9132: p_procedure_name => 'SPLIT_WORKPLAN',
9133: p_error_text => SUBSTRB(SQLERRM,1,240));
9134: when OTHERS then
9135: if p_commit = FND_API.G_TRUE then

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

9135: if p_commit = FND_API.G_TRUE then
9136: rollback to split_workplan;
9137: end if;
9138: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9139: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
9140: p_procedure_name => 'SPLIT_WORKPLAN',
9141: p_error_text => SUBSTRB(SQLERRM,1,240));
9142: raise;
9143: END SPLIT_WORKPLAN;

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

9223: and b.object_type = 'PA_STRUCTURES';
9224: l_del_struc_ver_id NUMBER;
9225:
9226: BEGIN
9227: PA_DEBUG.INIT_ERR_STACK('PA_PROJECT_STRUCTURE_PVT1.SUBMIT_WORKPLAN');
9228:
9229: x_return_status := FND_API.G_RET_STS_SUCCESS;
9230:
9231: IF (p_commit = FND_API.G_TRUE) THEN

Line 9341: PA_PROJECT_STRUCTURE_PVT1.Publish_Structure(

9337:
9338: /*
9339: savepoint check_workplan;
9340:
9341: PA_PROJECT_STRUCTURE_PVT1.Publish_Structure(
9342: p_responsibility_id => p_responsibility_id
9343: ,p_structure_version_id => p_structure_version_id
9344: ,p_publish_structure_ver_name => l_structure_version_name
9345: ,p_structure_ver_desc => l_structure_version_desc

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

9459: END IF;
9460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9461: x_msg_count := FND_MSG_PUB.count_msg;
9462: --put message
9463: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
9464: p_procedure_name => 'Submit_Workplan',
9465: p_error_text => SUBSTRB(SQLERRM,1,240));
9466: RAISE;
9467: END SUBMIT_WORKPLAN;

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

9519: where project_status_code = c_status_code
9520: and status_type = 'STRUCTURE';
9521:
9522: BEGIN
9523: PA_DEBUG.init_err_stack('PA_PROJECT_STRUCTURE_PVT1.CHANGE_WORKPLAN_STATUS');
9524:
9525: -- Initialize the return status to success
9526: x_return_status := FND_API.G_RET_STS_SUCCESS;
9527:

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

9639: WHEN OTHERS THEN
9640: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9641: x_msg_count := FND_MSG_PUB.count_msg;
9642: --put message
9643: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
9644: p_procedure_name => 'Change_Workplan_Status',
9645: p_error_text => SUBSTRB(SQLERRM,1,240));
9646: RAISE;
9647: END CHANGE_WORKPLAN_STATUS;

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

9696: and pps.status_type = 'STRUCTURE'
9697: and pps.project_status_code = 'STRUCTURE_SUBMITTED';
9698:
9699: BEGIN
9700: PA_DEBUG.init_err_stack('PA_PROJECT_STRUCTURE_PVT1.REWORK_WORKPLAN');
9701: x_return_status := FND_API.G_RET_STS_SUCCESS;
9702:
9703: IF (p_commit = FND_API.G_TRUE) THEN
9704: savepoint rework_workplan_pvt;

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

9790: END IF;
9791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9792: x_msg_count := FND_MSG_PUB.count_msg;
9793: --put message
9794: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
9795: p_procedure_name => 'rework_Workplan',
9796: p_error_text => SUBSTRB(SQLERRM,1,240));
9797: RAISE;
9798: END rework_workplan;

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

10053:
10054: l_wp_name VARCHAR2(240);
10055: BEGIN
10056: IF (p_debug_mode = 'Y') THEN
10057: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.update_structures_setup_attr');
10058: END IF;
10059:
10060: IF (p_commit = FND_API.G_TRUE) THEN
10061: savepoint update_struc_setup_attr_pvt;

Line 10127: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

10123: END IF;
10124: RAISE FND_API.G_EXC_ERROR;
10125: END IF;
10126:
10127: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
10128: ( p_validate_only => FND_API.G_FALSE
10129: ,p_structure_id => l_structure_id
10130: ,x_structure_version_id => l_structure_version_id
10131: ,x_return_status => l_return_status

Line 10181: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

10177: l_latest_eff_pub_flag := 'Y';
10178: l_effective_date := sysdate;
10179: END IF;
10180:
10181: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
10182: ( p_validate_only => FND_API.G_FALSE
10183: ,p_structure_version_id => l_structure_version_id
10184: ,p_structure_version_name => l_name
10185: ,p_structure_version_desc => NULL

Line 10278: PA_PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_Wo_Val(

10274: END LOOP;
10275: CLOSE get_top_tasks;
10276:
10277: -- PA_PROJECT_STRUCTURE_PUB1.Delete_Structure_Version(
10278: PA_PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_Wo_Val(
10279: p_structure_version_id => l_del_struc_ver_id
10280: ,p_record_version_number => l_struc_ver_rvn
10281: ,x_return_status => l_return_status
10282: ,x_msg_count => l_msg_count

Line 10438: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(

10434: END LOOP;
10435: CLOSE get_top_tasks;
10436:
10437: -- PA_PROJECT_STRUCTURE_PUB1.Delete_Structure_Version(
10438: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(
10439: p_structure_version_id => l_del_struc_ver_id
10440: ,p_record_version_number => l_struc_ver_rvn
10441: ,x_return_status => l_return_status
10442: ,x_msg_count => l_msg_count

Line 10549: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(

10545: END LOOP;
10546: CLOSE get_top_tasks;
10547:
10548: -- PA_PROJECT_STRUCTURE_PUB1.Delete_Structure_Version(
10549: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(
10550: p_structure_version_id => l_del_struc_ver_id
10551: ,p_record_version_number => l_struc_ver_rvn
10552: ,x_return_status => l_return_status
10553: ,x_msg_count => l_msg_count

Line 10875: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION(

10871: --bug 2843569
10872:
10873: IF (l_baseline_flag = 'Y') THEN
10874: --baseline structure
10875: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION(
10876: p_commit => FND_API.G_FALSE,
10877: p_structure_version_id => l_structure_version_id,
10878: x_return_status => l_return_status,
10879: x_msg_count => l_msg_count,

Line 10970: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(

10966: END LOOP;
10967: CLOSE get_top_tasks;
10968:
10969: -- PA_PROJECT_STRUCTURE_PUB1.Delete_Structure_Version(
10970: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(
10971: p_structure_version_id => l_del_struc_ver_id
10972: ,p_record_version_number => l_struc_ver_rvn
10973: ,x_return_status => l_return_status
10974: ,x_msg_count => l_msg_count

Line 11109: PA_PROJECT_STRUCTURE_PVT1.CREATE_STRUCTURE

11105: and lookup_code = 'WORKPLAN';
11106:
11107: l_name := substrb(l_name||l_append||l_suffix, 1, 240);
11108: --Create new structure
11109: PA_PROJECT_STRUCTURE_PVT1.CREATE_STRUCTURE
11110: ( p_validate_only => FND_API.G_FALSE
11111: ,p_project_id => p_project_id
11112: ,p_structure_number => l_name
11113: ,p_structure_name => l_name

Line 11150: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

11146: END IF;
11147: RAISE FND_API.G_EXC_ERROR;
11148: END IF;
11149:
11150: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
11151: ( p_validate_only => FND_API.G_FALSE
11152: ,p_structure_id => l_structure_id
11153: ,x_structure_version_id => l_structure_version_id
11154: ,x_return_status => l_return_status

Line 11242: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

11238: WHERE Project_id = p_project_id;
11239: END IF;
11240: END IF;
11241:
11242: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
11243: ( p_validate_only => FND_API.G_FALSE
11244: ,p_structure_version_id => l_structure_version_id
11245: ,p_structure_version_name => l_name
11246: ,p_structure_version_desc => NULL

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

11273:
11274: x_return_status := FND_API.G_RET_STS_SUCCESS;
11275:
11276: IF (p_debug_mode = 'Y') THEN
11277: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.update_structures_setup_attr end');
11278: END IF;
11279:
11280: EXCEPTION
11281: WHEN FND_API.G_EXC_ERROR THEN

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

11290: END IF;
11291: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11292: x_msg_count := FND_MSG_PUB.count_msg;
11293: --put message
11294: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
11295: p_procedure_name => 'update_structures_setup_attr',
11296: p_error_text => SUBSTRB(SQLERRM,1,240));
11297: RAISE;
11298: END update_structures_setup_old;

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

11408: --end bug 4546607
11409:
11410: BEGIN
11411: IF (p_debug_mode = 'Y') THEN
11412: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.update_workplan_versioning');
11413: END IF;
11414:
11415: IF (p_commit = FND_API.G_TRUE) THEN
11416: savepoint update_wp_versioning_pvt;

Line 11597: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION(

11593: record_version_number = record_version_number + 1
11594: where pev_structure_id = l_pev_structure_id;
11595:
11596: --baseline structure
11597: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION(
11598: p_commit => FND_API.G_FALSE,
11599: p_structure_version_id => l_keep_structure_ver_id,
11600: x_return_status => l_return_status,
11601: x_msg_count => l_msg_count,

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

11618:
11619: x_return_status := FND_API.G_RET_STS_SUCCESS;
11620:
11621: IF (p_debug_mode = 'Y') THEN
11622: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.update_workplan_versioning end');
11623: END IF;
11624:
11625: EXCEPTION
11626: WHEN FND_API.G_EXC_ERROR THEN

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

11635: END IF;
11636: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11637: x_msg_count := FND_MSG_PUB.count_msg;
11638: --put message
11639: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
11640: p_procedure_name => 'update_workplan_versioning',
11641: p_error_text => SUBSTRB(SQLERRM,1,240));
11642: RAISE;
11643: END update_workplan_versioning;

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

11729: l_bsl_dur NUMBER; -- Bug 3657808
11730: --
11731: BEGIN
11732: IF (p_debug_mode = 'Y') THEN
11733: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_WP_CALENDAR BEGIN');
11734: END IF;
11735:
11736: IF (p_commit = FND_API.G_TRUE) THEN
11737: savepoint update_wp_calendar;

Line 11937: PA_PROJECT_STRUCTURE_PVT1.RECALC_STRUC_VER_DURATION(

11933: raise FND_API.G_EXC_ERROR;
11934: END IF;
11935: END IF;
11936:
11937: PA_PROJECT_STRUCTURE_PVT1.RECALC_STRUC_VER_DURATION(
11938: p_structure_version_id => l_structure_version_id
11939: ,p_calendar_id => p_calendar_id
11940: ,x_return_status => l_return_status
11941: ,x_msg_count => l_msg_count

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

11956:
11957: x_return_status := FND_API.G_RET_STS_SUCCESS;
11958:
11959: IF (p_debug_mode = 'Y') THEN
11960: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_WP_CALENDAR end');
11961: END IF;
11962:
11963: EXCEPTION
11964: WHEN FND_API.G_EXC_ERROR THEN

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

11973: END IF;
11974: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11975: x_msg_count := FND_MSG_PUB.count_msg;
11976: --put message
11977: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
11978: p_procedure_name => 'Update_wp_calendar',
11979: p_error_text => SUBSTRB(SQLERRM,1,240));
11980: RAISE;
11981: END update_wp_calendar;

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

12002: from pa_projects_all
12003: where calendar_id = p_calendar_id;
12004: BEGIN
12005: IF (p_debug_mode = 'Y') THEN
12006: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_ALL_WP_CALENDAR BEGIN');
12007: END IF;
12008:
12009: IF (p_commit = FND_API.G_TRUE) THEN
12010: savepoint update_all_wp_calendar;

Line 12015: PA_PROJECT_STRUCTURE_PVT1.update_wp_calendar

12011: END IF;
12012:
12013: FOR c_rec IN c_calendar_projects
12014: LOOP
12015: PA_PROJECT_STRUCTURE_PVT1.update_wp_calendar
12016: (
12017: p_api_version => p_api_version
12018: ,p_init_msg_list => p_init_msg_list
12019: ,p_commit => p_commit

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

12031: END LOOP;
12032: x_return_status := FND_API.G_RET_STS_SUCCESS;
12033:
12034: IF (p_debug_mode = 'Y') THEN
12035: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.UPDATE_ALL_WP_CALENDAR END');
12036: END IF;
12037:
12038: EXCEPTION
12039: WHEN OTHERS THEN

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

12042: END IF;
12043: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12044: x_msg_count := FND_MSG_PUB.count_msg;
12045: --put message
12046: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
12047: p_procedure_name => 'Update_all_wp_calendar',
12048: p_error_text => SUBSTRB(SQLERRM,1,240));
12049: RAISE;
12050: END UPDATE_ALL_WP_CALENDAR;

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

12096: l_est_days NUMBER; -- Bug 3657808
12097: BEGIN
12098:
12099: IF (p_debug_mode = 'Y') THEN
12100: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.RECALC_STRUC_VER_DURATION BEGIN');
12101: END IF;
12102:
12103: IF (p_commit = FND_API.G_TRUE) THEN
12104: savepoint RECALC_STRUC_VER_DURATION;

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

12217: END LOOP;
12218: CLOSE get_dates;
12219:
12220: IF (p_debug_mode = 'Y') THEN
12221: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.RECALC_STRUC_VER_DURATION end');
12222: END IF;
12223:
12224: EXCEPTION
12225: WHEN FND_API.G_EXC_ERROR THEN

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

12234: END IF;
12235: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12236: x_msg_count := FND_MSG_PUB.count_msg;
12237: --put message
12238: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
12239: p_procedure_name => 'RECALC_STRUC_VER_DURATION',
12240: p_error_text => SUBSTRB(SQLERRM,1,240));
12241: RAISE;
12242: END RECALC_STRUC_VER_DURATION;

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

12324: l_parent_struc_ver_id PA_PROJ_ELEMENT_VERSIONS.PARENT_STRUCTURE_VERSION_ID%TYPE;
12325:
12326: BEGIN
12327: IF (p_debug_mode = 'Y') THEN
12328: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL begin');
12329: END IF;
12330:
12331: IF (p_commit = FND_API.G_TRUE) THEN
12332: savepoint delete_struc_ver_wo_val;

Line 12417: --PA_PROJECT_STRUCTURE_PVT1.delete_structure_versions API.

12413: PA_PROJ_ELEMENT_SCH_PKG.Delete_Row(l_pevsh_rowid);
12414:
12415: --bug 4172646
12416: --remove the code to call PA_FIN_PLAN_PVT.delete_wp_budget_versions as its also called from
12417: --PA_PROJECT_STRUCTURE_PVT1.delete_structure_versions API.
12418: --
12419:
12420: END IF;
12421:

Line 12442: PA_PROJECT_STRUCTURE_PVT1.Delete_Structure_Version_Attr(

12438: IF (p_debug_mode = 'Y') THEN
12439: pa_debug.debug('del structure version attr');
12440: END IF;
12441: --Delete structure version attribute
12442: PA_PROJECT_STRUCTURE_PVT1.Delete_Structure_Version_Attr(
12443: p_commit => p_commit,
12444: p_debug_mode => p_debug_mode,
12445: p_pev_structure_id => l_pev_structure_id,
12446: p_record_version_number => l_pevs_rvn,

Line 12471: PA_PROJECT_STRUCTURE_PVT1.Delete_Structure_Version(

12467: pa_debug.debug('del structure version');
12468: END IF;
12469:
12470: --Delete structure version
12471: PA_PROJECT_STRUCTURE_PVT1.Delete_Structure_Version(
12472: p_commit => p_commit,
12473: p_debug_mode => p_debug_mode,
12474: p_structure_version_id => l_element_version_id,
12475: p_record_version_number => l_pev_rvn,

Line 12565: PA_PROJECT_STRUCTURE_PVT1.Delete_Structure(

12561: END IF;
12562:
12563: select record_version_number into l_pe_rvn
12564: from pa_proj_elements where proj_element_id = l_proj_element_id;
12565: PA_PROJECT_STRUCTURE_PVT1.Delete_Structure(
12566: p_commit => p_commit,
12567: p_debug_mode => p_debug_mode,
12568: p_structure_id => l_proj_element_id,
12569: p_record_version_number => l_pe_rvn,

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

12590:
12591: x_return_status := FND_API.G_RET_STS_SUCCESS;
12592:
12593: IF (p_debug_mode = 'Y') THEN
12594: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL end');
12595: END IF;
12596:
12597: EXCEPTION
12598: when FND_API.G_EXC_ERROR then

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

12605: if p_commit = FND_API.G_TRUE then
12606: rollback to delete_struc_ver_wo_val;
12607: end if;
12608: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12609: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
12610: p_procedure_name => 'Delete_Struc_Ver_Wo_Val',
12611: p_error_text => SUBSTRB(SQLERRM,1,240));
12612: when OTHERS then
12613: if p_commit = FND_API.G_TRUE then

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

12613: if p_commit = FND_API.G_TRUE then
12614: rollback to delete_struc_ver_wo_val;
12615: end if;
12616: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12617: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
12618: p_procedure_name => 'Delete_Struc_Ver_Wo_Val',
12619: p_error_text => SUBSTRB(SQLERRM,1,240));
12620: raise;
12621: END DELETE_STRUC_VER_WO_VAL;

Line 12801: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12797: l_text := l_text||l_workplan_version_err||': ';
12798: l_text := l_text||l_struc_ver_info_rec.name;
12799: l_text := l_text||' ('||l_struc_ver_info_rec.version_number||')';
12800:
12801: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12802: l_text
12803: ,l_clob);
12804:
12805: --print instruction text

Line 12811: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12807: l_text := l_text||'';
12810:
12811: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12812: l_text
12813: ,l_clob);
12814:
12815: --print project info
Line 12822: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12818: l_text := l_text||'
';
12808: l_text := l_text||'';
12809: l_text := l_text||l_err_instruction||' ';
12821:
12822: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12823: l_text
12824: ,l_clob);
12825:
12826: --print project name
Line 12835: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12831: l_text := l_text||'';
12832: l_text := l_text||l_project_name||'
';
12834:
12835: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12836: l_text
12837: ,l_clob);
12838:
12839: --print project number
Line 12845: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12841: l_text := l_text||'';
12842: l_text := l_text||l_project_num||'
';
12844:
12845: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12846: l_text
12847: ,l_clob);
12848:
12849: --print project manager
Line 12857: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12853: l_text := l_text||l_project_mgr||'';
12854: l_text := l_text||'
';
12856:
12857: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12858: l_text
12859: ,l_clob);
12860:
12861: --print organization
Line 12869: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12865: l_text := l_text||l_proj_info_rec.carrying_out_org_name;
12866: l_text := l_text||'
';
12819: l_text := l_text||'';
12820: l_text := l_text||l_project_info||' ';
12833: l_text := l_text||l_proj_info_rec.name||' ';
12843: l_text := l_text||l_proj_info_rec.segment1||' ';
12855: l_text := l_text||l_proj_info_rec.full_name||'
';
12867: l_text := l_text||'';
12868:
12869: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12870: l_text
12871: ,l_clob);
12872:
12873: --print workplan version information

Line 12879: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12875: l_text := l_text||'';
12878:
12879: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12880: l_text
12881: ,l_clob);
12882:
12883: --print version name
Line 12893: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12889: l_text := l_text||l_workplan_ver_name||'
';
12892:
12893: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12894: l_text
12895: ,l_clob);
12896:
12897: --print version number
Line 12904: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12900: l_text := l_text||l_workplan_ver_num||'';
12901: l_text := l_text||'
';
12903:
12904: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12905: l_text
12906: ,l_clob);
12907:
12908: l_text := '';
12913:
12914: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12915: l_text
12916: ,l_clob);
12917:
12918: --print scheduled finish date
Line 12926: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12922: l_text := l_text||'';
12923: l_text := l_text||l_struc_ver_info_rec.scheduled_finish_date||'
';
12876: l_text := l_text||'';
12877: l_text := l_text||l_workplan_ver_info||' ';
12890: l_text := l_text||'';
12891: l_text := l_text||l_struc_ver_info_rec.name||' ';
12902: l_text := l_text||l_struc_ver_info_rec.version_number||'
';

Line 12914: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12910: l_text := l_text||l_wp_sch_start_date||'
';
12911: l_text := l_text||'';
12912: l_text := l_text||l_struc_ver_info_rec.scheduled_start_date||'

';
12924: l_text := l_text||'

';
12925:
12926: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12927: l_text
12928: ,l_clob);
12929:
12930: --print error header

Line 12936: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12932: l_text := l_text||'';
12935:
12936: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12937: l_text
12938: ,l_clob);
12939:
12940: --print error table
Line 12950: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12946: l_text := l_text||'';
12947: l_text := l_text||'';
12948: l_text := l_text||l_error||'
';
12949:
12950: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12951: l_text
12952: ,l_clob);
12953:
12954: --print errors
Line 12962: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12958: l_text := '
';
12961:
12962: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12963: l_text
12964: ,l_clob);
12965:
12966: EXIT WHEN l_index = p_error_tbl.LAST;
Line 12978: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(

12974: l_text := l_text||'
';
12975: l_text := l_text||'
';
12933: l_text := l_text||'';
12934: l_text := l_text||l_error_header||'

';
12959: l_text := l_text||'';
12960: l_text := l_text||p_error_tbl(l_index)||'

';
12976: l_text := l_text||'

';
12977:
12978: PA_PROJECT_STRUCTURE_PVT1.APPEND_VARCHAR_TO_CLOB(
12979: l_text
12980: ,l_clob);
12981:
12982: --send notification

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

13025: x_return_status := FND_API.G_RET_STS_ERROR;
13026: when OTHERS then
13027: ROLLBACK;
13028: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13029: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
13030: p_procedure_name => 'Generate_Error_Page',
13031: p_error_text => SUBSTRB(SQLERRM,1,240));
13032: raise;
13033: END Generate_Error_Page;

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

13216:
13217: EXCEPTION
13218: WHEN OTHERS THEN
13219: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13220: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
13221: p_procedure_name => 'RECALC_FIN_TASK_WEIGHTS',
13222: p_error_text => SUBSTRB(SQLERRM,1,240));
13223: END RECALC_FIN_TASK_WEIGHTS;
13224:

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

13372: l_fin_struc VARCHAR2(1);
13373:
13374: BEGIN
13375:
13376: pa_debug.init_err_stack ('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION_BULK');
13377:
13378: IF (p_debug_mode = 'Y') THEN
13379: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION_BULK begin');
13380: END IF;

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

13375:
13376: pa_debug.init_err_stack ('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION_BULK');
13377:
13378: IF (p_debug_mode = 'Y') THEN
13379: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION_BULK begin');
13380: END IF;
13381:
13382: IF (p_commit = FND_API.G_TRUE) THEN
13383: savepoint copy_structure_version_pvt_blk;

Line 13441: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

13437: l_new_struct_ver_id := l_tmp_struct_ver_id;
13438: -- added for bug Fix: 4537865
13439:
13440: /*
13441: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
13442: ( p_validate_only => p_validate_only
13443: ,p_structure_id => l_structure_ver_rec.proj_element_id
13444: ,p_attribute_category => l_structure_ver_rec.attribute_category
13445: ,p_attribute1 => l_structure_ver_rec.attribute1

Line 13491: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

13487: If (p_change_reason_code <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR ) THEN
13488: l_structure_ver_attr_rec.change_reason_code := p_change_reason_code;
13489: END IF;
13490:
13491: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
13492: ( p_validate_only => FND_API.G_FALSE
13493: ,p_structure_version_id => l_new_struct_ver_id
13494: ,p_structure_version_name => p_new_struct_ver_name
13495: ,p_structure_version_desc => p_new_struct_ver_desc

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

13991: RAISE FND_API.G_EXC_ERROR;
13992: END IF;
13993: EXCEPTION
13994: WHEN OTHERS THEN
13995: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
13996: p_procedure_name => 'COPY_STRUCTURE_VERSION_BULK',
13997: p_error_text => SUBSTRB('PA_PROJ_STRUC_MAPPING_PUB.copy_mapping:'||SQLERRM,1,240));
13998: RAISE FND_API.G_EXC_ERROR;
13999: END;

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

14030: ,x_Msg_data => x_msg_data
14031: );
14032: EXCEPTION
14033: WHEN OTHERS THEN
14034: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
14035: p_procedure_name => 'COPY_STRUCTURE_VERSION_BULK',
14036: p_error_text => SUBSTRB('PA_FP_COPY_FROM_PKG.copy_wp_budget_versions:'||SQLERRM,1,240));
14037: RAISE FND_API.G_EXC_ERROR;
14038: END;

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

14063: COMMIT;
14064: END IF;
14065:
14066: IF (p_debug_mode = 'Y') THEN
14067: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.COPY_STRUCTURE_VERSION_BULK END');
14068: END IF;
14069:
14070: EXCEPTION
14071: when FND_API.G_EXC_ERROR then

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

14077: if p_commit = FND_API.G_TRUE then
14078: rollback to copy_structure_version_pvt_blk;
14079: end if;
14080: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
14081: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
14082: p_procedure_name => 'COPY_STRUCTURE_VERSION_BULK',
14083: p_error_text => SUBSTRB(SQLERRM,1,240));
14084: when OTHERS then
14085: if p_commit = FND_API.G_TRUE then

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

14085: if p_commit = FND_API.G_TRUE then
14086: rollback to copy_structure_version_pvt_blk;
14087: end if;
14088: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
14089: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
14090: p_procedure_name => 'COPY_STRUCTURE_VERSION_BULK',
14091: p_error_text => SUBSTRB(SQLERRM,1,240));
14092: raise;
14093: END COPY_STRUCTURE_VERSION_BULK;

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

14155: WHEN OTHERS THEN
14156: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
14157: x_msg_count := FND_MSG_PUB.count_msg;
14158: --put message
14159: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
14160: p_procedure_name => 'update_sch_dirty_flag',
14161: p_error_text => SUBSTRB(SQLERRM,1,240));
14162: RAISE;
14163: END update_sch_dirty_flag;

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

14517: -- End fix for Bug # 4426392.
14518:
14519: BEGIN
14520: IF (p_debug_mode = 'Y') THEN
14521: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.update_structures_setup_attr');
14522: END IF;
14523:
14524: IF (p_commit = FND_API.G_TRUE) THEN
14525: savepoint update_struc_setup_attr_pvt;

Line 14693: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

14689: RAISE FND_API.G_EXC_ERROR;
14690: END IF;
14691:
14692: --create structure version
14693: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
14694: (p_validate_only => FND_API.G_FALSE
14695: ,p_structure_id => l_structure_id
14696: ,x_structure_version_id => l_structure_version_id
14697: ,x_return_status => l_return_status

Line 14724: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

14720: l_effective_date := sysdate;
14721: END IF;
14722:
14723: --create structure version
14724: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
14725: (p_validate_only => FND_API.G_FALSE
14726: ,p_structure_version_id => l_structure_version_id
14727: ,p_structure_version_name => l_name
14728: ,p_structure_version_desc => NULL

Line 14774: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

14770: END IF;
14771: RAISE FND_API.G_EXC_ERROR;
14772: END IF;
14773:
14774: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
14775: (p_validate_only => FND_API.G_FALSE
14776: ,p_structure_id => l_structure_id
14777: ,x_structure_version_id => l_structure_version_id
14778: ,x_return_status => l_return_status

Line 14824: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

14820: l_effective_date := sysdate;
14821: END IF;
14822:
14823: --create structure version
14824: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
14825: (p_validate_only => FND_API.G_FALSE
14826: ,p_structure_version_id => l_structure_version_id
14827: ,p_structure_version_name => l_name
14828: ,p_structure_version_desc => NULL

Line 14874: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

14870: END IF;
14871: RAISE FND_API.G_EXC_ERROR;
14872: END IF;
14873:
14874: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
14875: (p_validate_only => FND_API.G_FALSE
14876: ,p_structure_id => l_structure_id
14877: ,x_structure_version_id => l_structure_version_id
14878: ,x_return_status => l_return_status

Line 14924: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

14920: l_effective_date := sysdate;
14921: END IF;
14922:
14923: --create structure version
14924: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
14925: (p_validate_only => FND_API.G_FALSE
14926: ,p_structure_version_id => l_structure_version_id
14927: ,p_structure_version_name => l_name
14928: ,p_structure_version_desc => NULL

Line 15055: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

15051: RAISE FND_API.G_EXC_ERROR;
15052: END IF;
15053:
15054: --create structure version
15055: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
15056: (p_validate_only => FND_API.G_FALSE
15057: ,p_structure_id => l_structure_id
15058: ,x_structure_version_id => l_structure_version_id
15059: ,x_return_status => l_return_status

Line 15086: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

15082: l_effective_date := sysdate;
15083: END IF;
15084:
15085: --create structure version
15086: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
15087: (p_validate_only => FND_API.G_FALSE
15088: ,p_structure_version_id => l_structure_version_id
15089: ,p_structure_version_name => l_name
15090: ,p_structure_version_desc => NULL

Line 15134: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

15130: END IF;
15131: RAISE FND_API.G_EXC_ERROR;
15132: END IF;
15133:
15134: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
15135: (p_validate_only => FND_API.G_FALSE
15136: ,p_structure_id => l_structure_id
15137: ,x_structure_version_id => l_structure_version_id
15138: ,x_return_status => l_return_status

Line 15184: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

15180: l_effective_date := sysdate;
15181: END IF;
15182:
15183: --create structure version
15184: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
15185: (p_validate_only => FND_API.G_FALSE
15186: ,p_structure_version_id => l_structure_version_id
15187: ,p_structure_version_name => l_name
15188: ,p_structure_version_desc => NULL

Line 15285: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

15281: END IF;
15282: RAISE FND_API.G_EXC_ERROR;
15283: END IF;
15284:
15285: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
15286: (p_validate_only => FND_API.G_FALSE
15287: ,p_structure_id => l_structure_id
15288: ,x_structure_version_id => l_structure_version_id
15289: ,x_return_status => l_return_status

Line 15335: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

15331: l_effective_date := sysdate;
15332: END IF;
15333:
15334: --create structure version
15335: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
15336: (p_validate_only => FND_API.G_FALSE
15337: ,p_structure_version_id => l_structure_version_id
15338: ,p_structure_version_name => l_wp_name
15339: ,p_structure_version_desc => NULL

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

15433: ,x_msg_count => x_msg_count
15434: ,x_Msg_data => x_msg_data);
15435: EXCEPTION
15436: WHEN OTHERS THEN
15437: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
15438: p_procedure_name => 'update_structures_setup_attr',
15439: p_error_text => SUBSTRB('PA_FP_PLANNING_TRANSACTION_PUB.add_planning_transactions:'||SQLERRM,1,240));
15440: RAISE FND_API.G_EXC_ERROR;
15441: END;

Line 15665: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

15661: END IF;
15662: RAISE FND_API.G_EXC_ERROR;
15663: END IF;
15664:
15665: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
15666: (p_validate_only => FND_API.G_FALSE
15667: ,p_structure_id => l_structure_id
15668: ,x_structure_version_id => l_structure_version_id
15669: ,x_return_status => l_return_status

Line 15715: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

15711: l_effective_date := sysdate;
15712: END IF;
15713:
15714: --create structure version
15715: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
15716: (p_validate_only => FND_API.G_FALSE
15717: ,p_structure_version_id => l_structure_version_id
15718: ,p_structure_version_name => l_name
15719: ,p_structure_version_desc => NULL

Line 15800: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(

15796: END IF;
15797: END LOOP;
15798: CLOSE get_top_tasks;
15799:
15800: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(
15801: p_structure_version_id => l_del_struc_ver_id
15802: ,p_record_version_number => l_struc_ver_rvn
15803: ,x_return_status => l_return_status
15804: ,x_msg_count => l_msg_count

Line 15866: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

15862: RAISE FND_API.G_EXC_ERROR;
15863: END IF;
15864:
15865: --create structure version
15866: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
15867: (p_validate_only => FND_API.G_FALSE
15868: ,p_structure_id => l_structure_id
15869: ,x_structure_version_id => l_structure_version_id
15870: ,x_return_status => l_return_status

Line 15897: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

15893: l_effective_date := sysdate;
15894: END IF;
15895:
15896: --create structure version
15897: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
15898: (p_validate_only => FND_API.G_FALSE
15899: ,p_structure_version_id => l_structure_version_id
15900: ,p_structure_version_name => l_name
15901: ,p_structure_version_desc => NULL

Line 16172: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

16168: RAISE FND_API.G_EXC_ERROR;
16169: END IF;
16170:
16171: --create structure version
16172: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
16173: (p_validate_only => FND_API.G_FALSE
16174: ,p_structure_id => l_structure_id
16175: ,x_structure_version_id => l_structure_version_id
16176: ,x_return_status => l_return_status

Line 16203: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

16199: l_effective_date := sysdate;
16200: END IF;
16201:
16202: --create structure version
16203: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
16204: (p_validate_only => FND_API.G_FALSE
16205: ,p_structure_version_id => l_structure_version_id
16206: ,p_structure_version_name => l_name
16207: ,p_structure_version_desc => NULL

Line 16252: PA_PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_Wo_Val(

16248: LOOP
16249: FETCH sel_all_wp_structure_ver INTO l_structure_version_id, l_struc_ver_rvn;
16250: EXIT WHEN sel_all_wp_structure_ver%NOTFOUND;
16251:
16252: PA_PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_Wo_Val(
16253: p_structure_version_id => l_structure_version_id
16254: ,p_record_version_number => l_struc_ver_rvn
16255: ,x_return_status => l_return_status
16256: ,x_msg_count => l_msg_count

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

16319: x_msg_data => x_msg_data
16320: );
16321: EXCEPTION
16322: WHEN OTHERS THEN
16323: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
16324: p_procedure_name => 'update_structures_setup_attr',
16325: p_error_text => SUBSTRB('PA_FIN_PLAN_PVT.delete_wp_options :'||SQLERRM,1,240));
16326: RAISE FND_API.G_EXC_ERROR;
16327: END;

Line 16377: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(

16373: END IF;
16374: END LOOP;
16375: CLOSE get_top_tasks;
16376:
16377: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(
16378: p_structure_version_id => l_del_struc_ver_id
16379: ,p_record_version_number => l_struc_ver_rvn
16380: ,x_return_status => l_return_status
16381: ,x_msg_count => l_msg_count

Line 16565: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

16561: RAISE FND_API.G_EXC_ERROR;
16562: END IF;
16563:
16564: l_structure_version_id := NULL;
16565: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
16566: (p_validate_only => FND_API.G_FALSE
16567: ,p_structure_id => l_structure_id
16568: ,x_structure_version_id => l_structure_version_id
16569: ,x_return_status => l_return_status

Line 16615: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

16611: l_effective_date := sysdate;
16612: END IF;
16613:
16614: --create structure version
16615: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
16616: (p_validate_only => FND_API.G_FALSE
16617: ,p_structure_version_id => l_structure_version_id
16618: ,p_structure_version_name => l_name
16619: ,p_structure_version_desc => NULL

Line 16779: PA_PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_Wo_Val(

16775: LOOP
16776: FETCH sel_all_wp_structure_ver INTO l_structure_version_id, l_struc_ver_rvn;
16777: EXIT WHEN sel_all_wp_structure_ver%NOTFOUND;
16778:
16779: PA_PROJECT_STRUCTURE_PVT1.Delete_Struc_Ver_Wo_Val(
16780: p_structure_version_id => l_structure_version_id
16781: ,p_record_version_number => l_struc_ver_rvn
16782: ,x_return_status => l_return_status
16783: ,x_msg_count => l_msg_count

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

16854: x_msg_data => x_msg_data
16855: );
16856: EXCEPTION
16857: WHEN OTHERS THEN
16858: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
16859: p_procedure_name => 'update_structures_setup_attr',
16860: p_error_text => SUBSTRB('PA_FIN_PLAN_PVT.delete_wp_option:'||SQLERRM,1,240));
16861: RAISE FND_API.G_EXC_ERROR;
16862: END;

Line 16912: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(

16908: END IF;
16909: END LOOP;
16910: CLOSE get_top_tasks;
16911:
16912: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(
16913: p_structure_version_id => l_del_struc_ver_id
16914: ,p_record_version_number => l_struc_ver_rvn
16915: ,x_return_status => l_return_status
16916: ,x_msg_count => l_msg_count

Line 17029: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

17025: END IF;
17026: RAISE FND_API.G_EXC_ERROR;
17027: END IF;
17028:
17029: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
17030: (p_validate_only => FND_API.G_FALSE
17031: ,p_structure_id => l_structure_id
17032: ,x_structure_version_id => l_structure_version_id
17033: ,x_return_status => l_return_status

Line 17079: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

17075: l_effective_date := sysdate;
17076: END IF;
17077:
17078: --create structure version
17079: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
17080: (p_validate_only => FND_API.G_FALSE
17081: ,p_structure_version_id => l_structure_version_id
17082: ,p_structure_version_name => l_name
17083: ,p_structure_version_desc => NULL

Line 17247: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(

17243: END IF;
17244: END LOOP;
17245: CLOSE get_top_tasks;
17246:
17247: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(
17248: p_structure_version_id => l_del_struc_ver_id
17249: ,p_record_version_number => l_struc_ver_rvn
17250: ,x_return_status => l_return_status
17251: ,x_msg_count => l_msg_count

Line 17342: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(

17338: END IF;
17339: END LOOP;
17340: CLOSE get_top_tasks;
17341:
17342: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(
17343: p_structure_version_id => l_del_struc_ver_id
17344: ,p_record_version_number => l_struc_ver_rvn
17345: ,x_return_status => l_return_status
17346: ,x_msg_count => l_msg_count

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

17423: ,x_msg_count => x_msg_count
17424: ,x_Msg_data => x_msg_data);
17425: EXCEPTION
17426: WHEN OTHERS THEN
17427: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
17428: p_procedure_name => 'update_structures_setup_attr',
17429: p_error_text => SUBSTRB('PA_FP_PLANNING_TRANSACTION_PUB.add_planning_transactions:'||SQLERRM,1,240));
17430: RAISE FND_API.G_EXC_ERROR;
17431: END;

Line 17541: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION

17537: , ppevs.record_version_number = (ppevs.record_version_number+1)
17538: where ppevs.project_id = p_project_id
17539: and ppevs.element_version_id = l_structure_version_id;
17540:
17541: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION
17542: (p_commit => p_commit
17543: ,p_validate_only => p_validate_only
17544: ,p_validation_level => p_validation_level
17545: ,p_calling_module => p_calling_module

Line 17641: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(

17637: END IF;
17638: END LOOP;
17639: CLOSE get_top_tasks;
17640:
17641: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(
17642: p_structure_version_id => l_del_struc_ver_id
17643: ,p_record_version_number => l_struc_ver_rvn
17644: ,x_return_status => l_return_status
17645: ,x_msg_count => l_msg_count

Line 17734: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(

17730: END IF;
17731: END LOOP;
17732: CLOSE get_top_tasks;
17733:
17734: PA_PROJECT_STRUCTURE_PVT1.DELETE_STRUC_VER_WO_VAL(
17735: p_structure_version_id => l_del_struc_ver_id
17736: ,p_record_version_number => l_struc_ver_rvn
17737: ,x_return_status => l_return_status
17738: ,x_msg_count => l_msg_count

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

17814: ,x_msg_count => x_msg_count
17815: ,x_Msg_data => x_msg_data);
17816: EXCEPTION
17817: WHEN OTHERS THEN
17818: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
17819: p_procedure_name => 'update_structures_setup_attr',
17820: p_error_text => SUBSTRB('PA_FP_PLANNING_TRANSACTION_PUB.add_planning_transactions:'||SQLERRM,1,240));
17821: RAISE FND_API.G_EXC_ERROR;
17822: END;

Line 17932: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION

17928: , ppevs.record_version_number = (ppevs.record_version_number+1)
17929: where ppevs.project_id = p_project_id
17930: and ppevs.element_version_id = l_structure_version_id;
17931:
17932: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION
17933: (p_commit => p_commit
17934: ,p_validate_only => p_validate_only
17935: ,p_validation_level => p_validation_level
17936: ,p_calling_module => p_calling_module

Line 18024: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version

18020: END IF;
18021: RAISE FND_API.G_EXC_ERROR;
18022: END IF;
18023:
18024: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version
18025: (p_validate_only => FND_API.G_FALSE
18026: ,p_structure_id => l_structure_id
18027: ,x_structure_version_id => l_structure_version_id
18028: ,x_return_status => l_return_status

Line 18074: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr

18070: l_effective_date := sysdate;
18071: END IF;
18072:
18073: --create structure version
18074: PA_PROJECT_STRUCTURE_PVT1.Create_Structure_Version_Attr
18075: (p_validate_only => FND_API.G_FALSE
18076: ,p_structure_version_id => l_structure_version_id
18077: ,p_structure_version_name => l_del_name
18078: ,p_structure_version_desc => NULL

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

18156:
18157: x_return_status := FND_API.G_RET_STS_SUCCESS;
18158:
18159: IF (p_debug_mode = 'Y') THEN
18160: pa_debug.debug('PA_PROJECT_STRUCTURE_PVT1.update_structures_setup_attr end');
18161: END IF;
18162:
18163: EXCEPTION
18164: WHEN FND_API.G_EXC_ERROR THEN

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

18173: END IF;
18174: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
18175: x_msg_count := FND_MSG_PUB.count_msg;
18176: --put message
18177: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_PVT1',
18178: p_procedure_name => 'update_structures_setup_attr',
18179: p_error_text => SUBSTRB(SQLERRM,1,240));
18180: RAISE;
18181: END update_structures_setup_attr;

Line 18183: end PA_PROJECT_STRUCTURE_PVT1;

18179: p_error_text => SUBSTRB(SQLERRM,1,240));
18180: RAISE;
18181: END update_structures_setup_attr;
18182:
18183: end PA_PROJECT_STRUCTURE_PVT1;