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_RELATIONSHIP_PVT dependencies on PA_RELATIONSHIP_PVT

Line 1: package body PA_RELATIONSHIP_PVT as

1: package body PA_RELATIONSHIP_PVT as
2: /*$Header: PAXRELVB.pls 120.20 2011/04/14 07:43:59 bpottipa ship $*/
3:
4: -- API name : Create_Relationship
5: -- Type : Private Procedure

Line 163: pa_debug.debug('PA_RELATIONSHIP_PVT.CREATE_RELATIONSHIP begin');

159: l_priority pa_object_relationships.priority%TYPE;
160:
161: BEGIN
162: IF (p_debug_mode = 'Y') THEN
163: pa_debug.debug('PA_RELATIONSHIP_PVT.CREATE_RELATIONSHIP begin');
164: END IF;
165:
166: IF (p_commit = FND_API.G_TRUE) THEN
167: savepoint create_relationship_pvt;

Line 643: pa_debug.debug('PA_RELATIONSHIP_PVT.CREATE_RELATIONSHIP end');

639: -- End add rtarway FP.M development
640: END IF;
641:
642: IF (p_debug_mode = 'Y') THEN
643: pa_debug.debug('PA_RELATIONSHIP_PVT.CREATE_RELATIONSHIP end');
644: END IF;
645:
646: EXCEPTION
647: WHEN FND_API.G_EXC_ERROR THEN

Line 660: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',

656: END IF;
657: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
658: x_msg_count := FND_MSG_PUB.count_msg;
659: --put message
660: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',
661: p_procedure_name => 'Create_Relationship',
662: p_error_text => SUBSTRB(SQLERRM,1,240));
663: RAISE;
664: END;

Line 742: pa_debug.debug('PA_RELATIONSHIP_PVT.UPDATE_RELATIONSHIP begin');

738: l_or_id pa_object_relationships.object_relationship_id%TYPE;
739: l_weighting_percentage pa_object_relationships.weighting_percentage%TYPE;
740: BEGIN
741: IF (p_debug_mode = 'Y') THEN
742: pa_debug.debug('PA_RELATIONSHIP_PVT.UPDATE_RELATIONSHIP begin');
743: END IF;
744:
745: IF (p_commit = FND_API.G_TRUE) THEN
746: savepoint update_relationship_pvt;

Line 920: pa_debug.debug('PA_RELATIONSHIP_PVT.DELETE_RELATIONSHIP begin');

916: l_msg_index_out NUMBER;
917:
918: BEGIN
919: IF (p_debug_mode = 'Y') THEN
920: pa_debug.debug('PA_RELATIONSHIP_PVT.DELETE_RELATIONSHIP begin');
921: END IF;
922:
923: IF (p_commit = FND_API.G_TRUE) THEN
924: savepoint delete_relationship_pvt;

Line 994: pa_debug.debug('PA_RELATIONSHIP_PVT.DELETE_RELATIONSHIP end');

990: raise FND_API.G_EXC_ERROR;
991: END IF;
992:
993: IF (p_debug_mode = 'Y') THEN
994: pa_debug.debug('PA_RELATIONSHIP_PVT.DELETE_RELATIONSHIP end');
995: END IF;
996: EXCEPTION
997: WHEN FND_API.G_EXC_ERROR THEN
998: IF (p_commit = FND_API.G_TRUE) THEN

Line 1144: g_module_name varchar2(200) := 'PA_RELATIONSHIP_PVT.CREATE_DEPENDENCY';--BUG 4218977, rtarway

1140: AND por.object_type_from = 'PA_TASKS'
1141: AND por.relationship_type = 'S');
1142:
1143: l_debug_mode varchar2(1) := 'N'; --BUG 4218977, rtarway
1144: g_module_name varchar2(200) := 'PA_RELATIONSHIP_PVT.CREATE_DEPENDENCY';--BUG 4218977, rtarway
1145:
1146: BEGIN
1147:
1148: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');

Line 1151: pa_debug.debug('PA_RELATIONSHIP_PVT.CREATE_DEPENDENCY begin');

1147:
1148: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
1149:
1150: IF (p_debug_mode = 'Y') THEN
1151: pa_debug.debug('PA_RELATIONSHIP_PVT.CREATE_DEPENDENCY begin');
1152: END IF;
1153:
1154: IF (p_commit = FND_API.G_TRUE) THEN
1155: savepoint create_dependency_pvt;

Line 1409: pa_debug.debug('PA_RELATIONSHIP_PVT.CREATE_DEPENDENCY END');

1405: COMMIT;
1406: END IF;
1407:
1408: IF (p_debug_mode = 'Y') THEN
1409: pa_debug.debug('PA_RELATIONSHIP_PVT.CREATE_DEPENDENCY END');
1410: END IF;
1411:
1412: EXCEPTION
1413: when FND_API.G_EXC_ERROR then

Line 1423: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',

1419: if p_commit = FND_API.G_TRUE then
1420: rollback to create_dependency_pvt;
1421: end if;
1422: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1423: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',
1424: p_procedure_name => 'CREATE_DEPENDENCY',
1425: p_error_text => SUBSTRB(SQLERRM,1,240));
1426: when OTHERS then
1427: if p_commit = FND_API.G_TRUE then

Line 1431: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',

1427: if p_commit = FND_API.G_TRUE then
1428: rollback to create_dependency_pvt;
1429: end if;
1430: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1431: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',
1432: p_procedure_name => 'CREATE_DEPENDENCY',
1433: p_error_text => SUBSTRB(SQLERRM,1,240));
1434: raise;
1435: END Create_Dependency;

Line 1511: pa_debug.debug('PA_RELATIONSHIP_PVT.UPDATE_DEPENDENCY begin');

1507: AND relationship_type = 'D';
1508: BEGIN
1509:
1510: IF (p_debug_mode = 'Y') THEN
1511: pa_debug.debug('PA_RELATIONSHIP_PVT.UPDATE_DEPENDENCY begin');
1512: END IF;
1513:
1514: IF (p_commit = FND_API.G_TRUE) THEN
1515: savepoint update_dependency_pvt;

Line 1582: pa_debug.debug('PA_RELATIONSHIP_PVT.UPDATE_DEPENDENCY END');

1578: COMMIT;
1579: END IF;
1580:
1581: IF (p_debug_mode = 'Y') THEN
1582: pa_debug.debug('PA_RELATIONSHIP_PVT.UPDATE_DEPENDENCY END');
1583: END IF;
1584:
1585: EXCEPTION
1586: when FND_API.G_EXC_ERROR then

Line 1596: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',

1592: if p_commit = FND_API.G_TRUE then
1593: rollback to update_dependency_pvt;
1594: end if;
1595: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1596: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',
1597: p_procedure_name => 'UPDATE_DEPENDENCY',
1598: p_error_text => SUBSTRB(SQLERRM,1,240));
1599: when OTHERS then
1600: if p_commit = FND_API.G_TRUE then

Line 1604: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',

1600: if p_commit = FND_API.G_TRUE then
1601: rollback to update_dependency_pvt;
1602: end if;
1603: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1604: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',
1605: p_procedure_name => 'UPDATE_DEPENDENCY',
1606: p_error_text => SUBSTRB(SQLERRM,1,240));
1607: raise;
1608: END Update_Dependency;

Line 1696: pa_debug.debug('PA_RELATIONSHIP_PVT.DELETE_DEPENDENCY begin');

1692: l_struc_ver_id NUMBER;
1693: BEGIN
1694:
1695: IF (p_debug_mode = 'Y') THEN
1696: pa_debug.debug('PA_RELATIONSHIP_PVT.DELETE_DEPENDENCY begin');
1697: END IF;
1698:
1699: IF (p_commit = FND_API.G_TRUE) THEN
1700: savepoint delete_dependency_pvt;

Line 1763: pa_debug.debug('PA_RELATIONSHIP_PVT.DELETE_DEPENDENCY END');

1759: COMMIT;
1760: END IF;
1761:
1762: IF (p_debug_mode = 'Y') THEN
1763: pa_debug.debug('PA_RELATIONSHIP_PVT.DELETE_DEPENDENCY END');
1764: END IF;
1765: EXCEPTION
1766: when FND_API.G_EXC_ERROR then
1767: if p_commit = FND_API.G_TRUE then

Line 1776: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',

1772: if p_commit = FND_API.G_TRUE then
1773: rollback to delete_dependency_pvt;
1774: end if;
1775: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1776: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',
1777: p_procedure_name => 'DELETE_DEPENDENCY',
1778: p_error_text => SUBSTRB(SQLERRM,1,240));
1779: when OTHERS then
1780: if p_commit = FND_API.G_TRUE then

Line 1784: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',

1780: if p_commit = FND_API.G_TRUE then
1781: rollback to delete_dependency_pvt;
1782: end if;
1783: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1784: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',
1785: p_procedure_name => 'DELETE_DEPENDENCY',
1786: p_error_text => SUBSTRB(SQLERRM,1,240));
1787: raise;
1788: END Delete_Dependency;

Line 2066: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY Start : Passed Parameters :', x_Log_Level=> 3);

2062: --debug messages added while fixing bug 5067296
2063: l_debug_mode := NVL(FND_PROFILE.value_specific('PA_DEBUG_MODE',fnd_global.user_id,fnd_global.login_id,275,null,null), 'N');
2064:
2065: IF (l_debug_mode = 'Y') THEN
2066: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY Start : Passed Parameters :', x_Log_Level=> 3);
2067: /* These two lines are causing bug 5076461 in publish flow.
2068: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'P_Source_Ver_Tbl.Count='||P_Source_Ver_Tbl.Count, x_Log_Level=> 3);
2069: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'P_Destin_Ver_Tbl.Count='||P_Destin_Ver_Tbl.Count, x_Log_Level=> 3);
2070: */

Line 2068: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'P_Source_Ver_Tbl.Count='||P_Source_Ver_Tbl.Count, x_Log_Level=> 3);

2064:
2065: IF (l_debug_mode = 'Y') THEN
2066: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY Start : Passed Parameters :', x_Log_Level=> 3);
2067: /* These two lines are causing bug 5076461 in publish flow.
2068: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'P_Source_Ver_Tbl.Count='||P_Source_Ver_Tbl.Count, x_Log_Level=> 3);
2069: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'P_Destin_Ver_Tbl.Count='||P_Destin_Ver_Tbl.Count, x_Log_Level=> 3);
2070: */
2071: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'P_source_struc_ver_id='||P_source_struc_ver_id, x_Log_Level=> 3);
2072: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'p_dest_struc_ver_id='||p_dest_struc_ver_id, x_Log_Level=> 3);

Line 2069: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'P_Destin_Ver_Tbl.Count='||P_Destin_Ver_Tbl.Count, x_Log_Level=> 3);

2065: IF (l_debug_mode = 'Y') THEN
2066: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY Start : Passed Parameters :', x_Log_Level=> 3);
2067: /* These two lines are causing bug 5076461 in publish flow.
2068: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'P_Source_Ver_Tbl.Count='||P_Source_Ver_Tbl.Count, x_Log_Level=> 3);
2069: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'P_Destin_Ver_Tbl.Count='||P_Destin_Ver_Tbl.Count, x_Log_Level=> 3);
2070: */
2071: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'P_source_struc_ver_id='||P_source_struc_ver_id, x_Log_Level=> 3);
2072: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'p_dest_struc_ver_id='||p_dest_struc_ver_id, x_Log_Level=> 3);
2073: END IF;

Line 2071: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'P_source_struc_ver_id='||P_source_struc_ver_id, x_Log_Level=> 3);

2067: /* These two lines are causing bug 5076461 in publish flow.
2068: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'P_Source_Ver_Tbl.Count='||P_Source_Ver_Tbl.Count, x_Log_Level=> 3);
2069: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'P_Destin_Ver_Tbl.Count='||P_Destin_Ver_Tbl.Count, x_Log_Level=> 3);
2070: */
2071: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'P_source_struc_ver_id='||P_source_struc_ver_id, x_Log_Level=> 3);
2072: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'p_dest_struc_ver_id='||p_dest_struc_ver_id, x_Log_Level=> 3);
2073: END IF;
2074: --debug messages added while fixing bug 5067296
2075:

Line 2072: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'p_dest_struc_ver_id='||p_dest_struc_ver_id, x_Log_Level=> 3);

2068: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'P_Source_Ver_Tbl.Count='||P_Source_Ver_Tbl.Count, x_Log_Level=> 3);
2069: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'P_Destin_Ver_Tbl.Count='||P_Destin_Ver_Tbl.Count, x_Log_Level=> 3);
2070: */
2071: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'P_source_struc_ver_id='||P_source_struc_ver_id, x_Log_Level=> 3);
2072: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'p_dest_struc_ver_id='||p_dest_struc_ver_id, x_Log_Level=> 3);
2073: END IF;
2074: --debug messages added while fixing bug 5067296
2075:
2076:

Line 2083: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'Before BULK insert into PA_COPY_DEP_TEMP table', x_Log_Level=> 3);

2079: --bug 4153377
2080: --insert mapping ids
2081: --debug messages added while fixing bug 5067296
2082: IF (l_debug_mode = 'Y') THEN
2083: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'Before BULK insert into PA_COPY_DEP_TEMP table', x_Log_Level=> 3);
2084: END IF;
2085: --debug messages added while fixing bug 5067296
2086: Forall i IN 1..P_Source_Ver_Tbl.Count
2087: INSERT INTO PA_COPY_DEP_TEMP(SRC_TASK_VER_ID, DEST_TASK_VER_ID)

Line 2105: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'Before cursor l_cur_all_tasks', x_Log_Level=> 3);

2101: -- dest_task_ver_id.
2102:
2103: --debug messages added while fixing bug 5067296
2104: IF (l_debug_mode = 'Y') THEN
2105: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'Before cursor l_cur_all_tasks', x_Log_Level=> 3);
2106: END IF;
2107: --debug messages added while fixing bug 5067296
2108:
2109: IF P_Source_Ver_Tbl.Count > 0 --bug 5067296

Line 2119: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'After cursor l_cur_all_tasks l_count_all_tasks='||l_count_all_tasks, x_Log_Level=> 3);

2115: END IF;
2116:
2117: --debug messages added while fixing bug 5067296
2118: IF (l_debug_mode = 'Y') THEN
2119: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'After cursor l_cur_all_tasks l_count_all_tasks='||l_count_all_tasks, x_Log_Level=> 3);
2120: END IF;
2121: --debug messages added while fixing bug 5067296
2122:
2123: if (NVL(l_count_all_tasks,0) > 0) then

Line 2162: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'l_parent_ver_id1='||l_parent_ver_id1, x_Log_Level=> 3);

2158: CLOSE get_parent_struc_ver_id;
2159:
2160: --debug messages added while fixing bug 5067296
2161: IF (l_debug_mode = 'Y') THEN
2162: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'l_parent_ver_id1='||l_parent_ver_id1, x_Log_Level=> 3);
2163: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'l_parent_ver_id2='||l_parent_ver_id2, x_Log_Level=> 3);
2164: END IF;
2165: --debug messages added while fixing bug 5067296
2166:

Line 2163: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'l_parent_ver_id2='||l_parent_ver_id2, x_Log_Level=> 3);

2159:
2160: --debug messages added while fixing bug 5067296
2161: IF (l_debug_mode = 'Y') THEN
2162: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'l_parent_ver_id1='||l_parent_ver_id1, x_Log_Level=> 3);
2163: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'l_parent_ver_id2='||l_parent_ver_id2, x_Log_Level=> 3);
2164: END IF;
2165: --debug messages added while fixing bug 5067296
2166:
2167: IF (l_parent_ver_id1 = l_parent_ver_id2) THEN

Line 2195: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'Before opening cursor get_struc_dependency', x_Log_Level=> 3);

2191: --use get_struc_dependency to populate table
2192:
2193: --debug messages added while fixing bug 5067296
2194: IF (l_debug_mode = 'Y') THEN
2195: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'Before opening cursor get_struc_dependency', x_Log_Level=> 3);
2196: END IF;
2197: --debug messages added while fixing bug 5067296
2198:
2199: OPEN get_struc_dependency;

Line 2218: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'Before BULK insert into PA_OBJECT_RELATIONSHIPS table', x_Log_Level=> 3);

2214:
2215: --bulk insert into pa_object_relationships table
2216: --debug messages added while fixing bug 5067296
2217: IF (l_debug_mode = 'Y') THEN
2218: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.COPY_INTRA_DEPENDENCY', x_Msg => 'Before BULK insert into PA_OBJECT_RELATIONSHIPS table', x_Log_Level=> 3);
2219: END IF;
2220: --debug messages added while fixing bug 5067296
2221:
2222: FORALL i IN 1..l_suc_ver_id_tbl.COUNT

Line 2300: PA_Relationship_Pvt.Create_dependency (

2296: CLOSE get_dependency;
2297:
2298: IF l_found_flag = 1 THEN
2299:
2300: PA_Relationship_Pvt.Create_dependency (
2301: p_src_proj_id => l_project_id1
2302: ,p_src_task_ver_id => p_destin_ver_tbl(i)
2303: ,p_dest_proj_id => l_project_id2
2304: ,p_dest_task_ver_id => p_destin_ver_tbl(j)

Line 2344: PA_Relationship_Pvt.Create_dependency (

2340: LOOP
2341: FETCH get_struc_dependency INTO l_dep_struc_rec;
2342: EXIT WHEN get_struc_dependency%NOTFOUND;
2343:
2344: PA_Relationship_Pvt.Create_dependency (
2345: p_src_proj_id => l_dep_struc_rec.project_id
2346: ,p_src_task_ver_id => l_dep_struc_rec.dest_task_ver_id
2347: ,p_dest_proj_id => l_dep_struc_rec.project_id
2348: ,p_dest_task_ver_id => l_dep_struc_rec.dest_pred_ver_id

Line 2450: PA_Relationship_Pvt.Create_dependency (

2446: If l_Found_Flag = 1 Then
2447: -- Scan thru all the Source Version Object IDs
2448: For j IN 1..P_Destin_Ver_Tbl.Count Loop
2449: If l_Object_Task_ID = P_Destin_Ver_Tbl(j) Then
2450: PA_Relationship_Pvt.Create_dependency (
2451: p_src_proj_id => l_src_proj_id
2452: ,p_src_task_ver_id => l_src_task_ver_id
2453: ,p_dest_proj_id => l_dest_proj_id
2454: ,p_dest_task_ver_id => l_dest_task_ver_id

Line 2541: PA_Relationship_Pvt.Create_dependency (

2537: INTO l_src_proj_id
2538: FROM pa_proj_element_versions ppev
2539: WHERE ppev.element_version_id = p_destin_ver_tbl(i);
2540: --
2541: PA_Relationship_Pvt.Create_dependency (
2542: p_src_proj_id => l_src_proj_id
2543: ,p_src_task_ver_id => p_destin_ver_tbl(i)
2544: ,p_dest_proj_id => l_dependency_rec.object_id_to2
2545: ,p_dest_task_ver_id => l_dependency_rec.object_id_to1

Line 2759: PA_RELATIONSHIP_PVT.Delete_Relationship (

2755: EXIT when Check_Prev_Ver_Exists%NOTFOUND;
2756: --Close Check_Prev_Ver_Exists;
2757: -- Step 1: Delete Inter project dependencies from prev published version
2758: -- which does not exist in publishing structure
2759: PA_RELATIONSHIP_PVT.Delete_Relationship (
2760: p_object_relationship_id => l_Relationship_ID
2761: ,p_record_version_number => l_Record_Ver_Number
2762: ,x_return_status => x_return_status
2763: ,x_msg_count => x_msg_count

Line 2928: PA_RELATIONSHIP_PVT.Delete_Relationship (

2924: Raise FND_API.G_EXC_ERROR;
2925: END IF;
2926:
2927: /*
2928: PA_RELATIONSHIP_PVT.Delete_Relationship (
2929: p_object_relationship_id => l_del_obj_rel_id
2930: ,p_record_version_number => l_Record_Ver_Number
2931: ,x_return_status => x_return_status
2932: ,x_msg_count => x_msg_count

Line 2954: PA_RELATIONSHIP_PVT.Delete_Relationship (

2950: l_Record_Ver_Number := NULL;
2951: Fetch Delete_Publ_Ver
2952: INTO l_Relationship_ID, l_Record_Ver_Number;
2953: Exit When Delete_Publ_Ver%NOTFOUND;
2954: PA_RELATIONSHIP_PVT.Delete_Relationship (
2955: p_object_relationship_id => l_Relationship_ID
2956: ,p_record_version_number => l_Record_Ver_Number
2957: ,x_return_status => x_return_status
2958: ,x_msg_count => x_msg_count

Line 3059: pa_debug.debug('PA_RELATIONSHIP_PVT.Insert_Subproject_Association begin');

3055:
3056: BEGIN
3057: --
3058: IF (p_debug_mode = 'Y') THEN
3059: pa_debug.debug('PA_RELATIONSHIP_PVT.Insert_Subproject_Association begin');
3060: END IF;
3061: --
3062: IF (p_commit = FND_API.G_TRUE) THEN
3063: savepoint Insert_Subproject_Association;

Line 3380: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',

3376:
3377: -- End fix for Bug # 4485908.
3378:
3379: WHEN OTHERS THEN
3380: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',
3381: p_procedure_name => 'Insert_Subproject_Association',
3382: p_error_text => SUBSTRB('PA_RELATIONSHIP_PUB.UPDATE_PROGRAM_GROUPS:'||SQLERRM,1,240));
3383: RAISE FND_API.G_EXC_ERROR;
3384: END;

Line 3397: pa_debug.debug('PA_RELATIONSHIP_PVT.Insert_Subproject_Association END');

3393: COMMIT;
3394: END IF;
3395: --
3396: IF (p_debug_mode = 'Y') THEN
3397: pa_debug.debug('PA_RELATIONSHIP_PVT.Insert_Subproject_Association END');
3398: END IF;
3399: --
3400: EXCEPTION
3401: WHEN FND_API.G_EXC_ERROR THEN

Line 3426: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',

3422:
3423: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3424: x_msg_count := FND_MSG_PUB.count_msg;
3425: --put message
3426: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',
3427: p_procedure_name => 'Insert_Subproject_Association',
3428: p_error_text => SUBSTRB(SQLERRM,1,240));
3429: RAISE;
3430: END Insert_Subproject_Association;

Line 3566: pa_debug.debug('PA_RELATIONSHIP_PVT.Create_Subproject_Association begin');

3562: -- Bug # 4329284.
3563:
3564: BEGIN
3565: IF (p_debug_mode = 'Y') THEN
3566: pa_debug.debug('PA_RELATIONSHIP_PVT.Create_Subproject_Association begin');
3567: END IF;
3568: --
3569: IF (p_commit = FND_API.G_TRUE) THEN
3570: savepoint Create_Subproject_Ass_pvt;

Line 3885: PA_RELATIONSHIP_PVT.Insert_Subproject_Association

3881: IF (p_debug_mode = 'Y') THEN
3882: pa_debug.debug('After call to PA_RELATIONSHIP_UTILS.CREATE_SUB_PROJ_ASSO_OK api');
3883: END IF;
3884: --end bug 3716615
3885: PA_RELATIONSHIP_PVT.Insert_Subproject_Association
3886: ( p_init_msg_list => p_init_msg_list
3887: ,p_commit => p_commit
3888: ,p_validate_only => p_validate_only
3889: ,p_validation_level => p_validation_level

Line 3953: PA_RELATIONSHIP_PVT.Insert_Subproject_Association

3949: pa_debug.debug('After call to PA_RELATIONSHIP_UTILS.CREATE_SUB_PROJ_ASSO_OK api');
3950: END IF;
3951: --end bug 3716615
3952:
3953: PA_RELATIONSHIP_PVT.Insert_Subproject_Association
3954: ( p_init_msg_list => p_init_msg_list
3955: ,p_commit => p_commit
3956: ,p_validate_only => p_validate_only
3957: ,p_validation_level => p_validation_level

Line 4020: PA_RELATIONSHIP_PVT.Insert_Subproject_Association

4016: pa_debug.debug('After call to PA_RELATIONSHIP_UTILS.CREATE_SUB_PROJ_ASSO_OK api');
4017: END IF;
4018: --end bug 3716615
4019:
4020: PA_RELATIONSHIP_PVT.Insert_Subproject_Association
4021: ( p_init_msg_list => p_init_msg_list
4022: ,p_commit => p_commit
4023: ,p_validate_only => p_validate_only
4024: ,p_validation_level => p_validation_level

Line 4089: PA_RELATIONSHIP_PVT.Insert_Subproject_Association

4085: pa_debug.debug('After call to PA_RELATIONSHIP_UTILS.CREATE_SUB_PROJ_ASSO_OK api');
4086: END IF;
4087: --end bug 3716615
4088:
4089: PA_RELATIONSHIP_PVT.Insert_Subproject_Association
4090: ( p_init_msg_list => p_init_msg_list
4091: ,p_commit => p_commit
4092: ,p_validate_only => p_validate_only
4093: ,p_validation_level => p_validation_level

Line 4259: pa_debug.debug('PA_RELATIONSHIP_PVT.Create_Subproject_Association end');

4255:
4256: x_return_status := FND_API.G_RET_STS_SUCCESS;
4257: --
4258: IF (p_debug_mode = 'Y') THEN
4259: pa_debug.debug('PA_RELATIONSHIP_PVT.Create_Subproject_Association end');
4260: END IF;
4261: --
4262: EXCEPTION
4263: WHEN FND_API.G_EXC_ERROR THEN

Line 4276: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',

4272: END IF;
4273: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4274: x_msg_count := FND_MSG_PUB.count_msg;
4275: --put message
4276: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',
4277: p_procedure_name => 'Create_Subproject_Association',
4278: p_error_text => SUBSTRB(SQLERRM,1,240));
4279: RAISE;
4280: END Create_Subproject_Association;

Line 4551: pa_debug.debug('PA_RELATIONSHIP_PVT.Delete_SubProject_Association begin');

4547:
4548: BEGIN
4549: --
4550: IF (p_debug_mode = 'Y') THEN
4551: pa_debug.debug('PA_RELATIONSHIP_PVT.Delete_SubProject_Association begin');
4552: END IF;
4553: --
4554: IF (p_commit = FND_API.G_TRUE) THEN
4555: savepoint delete_subproject_ass_pvt;

Line 4652: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',

4648:
4649: -- End fix for Bug # 4485908.
4650:
4651: WHEN OTHERS THEN
4652: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',
4653: p_procedure_name => 'Delete_SubProject_Association',
4654: p_error_text => SUBSTRB('PA_RELATIONSHIP_PUB.UPDATE_PROGRAM_GROUPS:'||SQLERRM,1,240));
4655: RAISE FND_API.G_EXC_ERROR;
4656: END;

Line 4847: pa_debug.debug('PA_RELATIONSHIP_PVT.Delete_SubProject_Association end');

4843: pa_debug.debug('Return status before the end of Delete_SubProject_Association=> '||x_return_status);
4844: END IF;
4845: --
4846: IF (p_debug_mode = 'Y') THEN
4847: pa_debug.debug('PA_RELATIONSHIP_PVT.Delete_SubProject_Association end');
4848: END IF;
4849: --
4850: EXCEPTION
4851: WHEN FND_API.G_EXC_ERROR THEN

Line 4949: pa_debug.debug('PA_RELATIONSHIP_PVT.Copy_OG_Lnk_For_Subproj_Ass begin');

4945: AND proj_element_id = c_link_task_id;
4946: BEGIN
4947: --
4948: IF (p_debug_mode = 'Y') THEN
4949: pa_debug.debug('PA_RELATIONSHIP_PVT.Copy_OG_Lnk_For_Subproj_Ass begin');
4950: END IF;
4951: --
4952: IF (p_commit = FND_API.G_TRUE) THEN
4953: savepoint Copy_OG_Lnk_For_Subproj_Ass;

Line 5064: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',

5060:
5061: -- End fix for Bug # 4485908.
5062:
5063: WHEN OTHERS THEN
5064: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',
5065: p_procedure_name => 'Copy_OG_Lnk_For_Subproj_Ass',
5066: p_error_text => SUBSTRB('PA_RELATIONSHIP_PUB.UPDATE_PROGRAM_GROUPS:'||SQLERRM,1,240));
5067: RAISE FND_API.G_EXC_ERROR;
5068: END;

Line 5085: pa_debug.debug('PA_RELATIONSHIP_PVT.Copy_OG_Lnk_For_Subproj_Ass end');

5081: pa_debug.debug('Return status before the end of Copy_OG_Lnk_For_Subproj_Ass=> '||x_return_status);
5082: END IF;
5083: --
5084: IF (p_debug_mode = 'Y') THEN
5085: pa_debug.debug('PA_RELATIONSHIP_PVT.Copy_OG_Lnk_For_Subproj_Ass end');
5086: END IF;
5087: --
5088: EXCEPTION
5089: WHEN FND_API.G_EXC_ERROR THEN

Line 5209: pa_debug.debug('PA_RELATIONSHIP_PVT.Move_CI_Lnk_For_subproj_step2 begin');

5205:
5206: BEGIN
5207: --
5208: IF (p_debug_mode = 'Y') THEN
5209: pa_debug.debug('PA_RELATIONSHIP_PVT.Move_CI_Lnk_For_subproj_step2 begin');
5210: END IF;
5211: --
5212: IF (p_commit = FND_API.G_TRUE) THEN
5213: savepoint Move_CI_Lnk_For_subproj_step2;

Line 5322: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',

5318:
5319: -- End fix for Bug # 4485908.
5320:
5321: WHEN OTHERS THEN
5322: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',
5323: p_procedure_name => 'Insert_Subproject_Association',
5324: p_error_text => SUBSTRB('PA_RELATIONSHIP_PUB.UPDATE_PROGRAM_GROUPS:'||SQLERRM,1,240));
5325: RAISE FND_API.G_EXC_ERROR;
5326: END;

Line 5350: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',

5346:
5347: -- End fix for Bug # 4485908.
5348:
5349: WHEN OTHERS THEN
5350: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',
5351: p_procedure_name => 'Move_CI_Lnk_For_subproj_step2',
5352: p_error_text => SUBSTRB('PA_RELATIONSHIP_PUB.UPDATE_PROGRAM_GROUPS:'||SQLERRM,1,240));
5353: RAISE FND_API.G_EXC_ERROR;
5354: END;

Line 5395: pa_debug.debug('PA_RELATIONSHIP_PVT.Move_CI_Lnk_For_subproj_step2 end');

5391: pa_debug.debug('Return status before the end of Delete_SubProject_Association=> '||x_return_status);
5392: END IF;
5393: --
5394: IF (p_debug_mode = 'Y') THEN
5395: pa_debug.debug('PA_RELATIONSHIP_PVT.Move_CI_Lnk_For_subproj_step2 end');
5396: END IF;
5397: --
5398: EXCEPTION
5399: WHEN FND_API.G_EXC_ERROR THEN

Line 5447: pa_debug.debug('PA_RELATIONSHIP_PVT.Move_CI_Lnk_For_subproj_step1 begin');

5443: IS
5444: BEGIN
5445: --
5446: IF (p_debug_mode = 'Y') THEN
5447: pa_debug.debug('PA_RELATIONSHIP_PVT.Move_CI_Lnk_For_subproj_step1 begin');
5448: END IF;
5449: --
5450: IF (p_commit = FND_API.G_TRUE) THEN
5451: savepoint Move_CI_Lnk_For_subproj_step1;

Line 5495: pa_debug.debug('PA_RELATIONSHIP_PVT.Move_CI_Lnk_For_subproj_step1 end');

5491: pa_debug.debug('Return status before the end of Move_CI_Lnk_For_subproj_step1=> '||x_return_status);
5492: END IF;
5493: --
5494: IF (p_debug_mode = 'Y') THEN
5495: pa_debug.debug('PA_RELATIONSHIP_PVT.Move_CI_Lnk_For_subproj_step1 end');
5496: END IF;
5497: --
5498: EXCEPTION
5499: WHEN FND_API.G_EXC_ERROR THEN

Line 5591: pa_debug.debug('PA_RELATIONSHIP_PVT.UPDATE_DEPENDENCY begin');

5587: AND relationship_type = 'LW'; --Financial links should not be specified here bcoz Process WBS updates can be run only for workplan structures.
5588: BEGIN
5589:
5590: IF (p_debug_mode = 'Y') THEN
5591: pa_debug.debug('PA_RELATIONSHIP_PVT.UPDATE_DEPENDENCY begin');
5592: END IF;
5593:
5594: IF (p_commit = FND_API.G_TRUE) THEN
5595: savepoint UPDATE_PARENT_WBS_FLAG_DIRTY;

Line 5603: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.UPDATE_PARENT_WBS_FLAG_DIRTY', x_Msg => 'p_project_id: '||p_project_id, x_Log_Level=> 3);

5599:
5600: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
5601:
5602: IF l_debug_mode = 'Y' THEN
5603: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.UPDATE_PARENT_WBS_FLAG_DIRTY', x_Msg => 'p_project_id: '||p_project_id, x_Log_Level=> 3);
5604: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.UPDATE_PARENT_WBS_FLAG_DIRTY', x_Msg => 'p_structure_version_id: '||p_structure_version_id, x_Log_Level=> 3);
5605: END IF;
5606:
5607: FOR cur_obj_rel_rec in cur_obj_rel LOOP

Line 5604: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.UPDATE_PARENT_WBS_FLAG_DIRTY', x_Msg => 'p_structure_version_id: '||p_structure_version_id, x_Log_Level=> 3);

5600: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
5601:
5602: IF l_debug_mode = 'Y' THEN
5603: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.UPDATE_PARENT_WBS_FLAG_DIRTY', x_Msg => 'p_project_id: '||p_project_id, x_Log_Level=> 3);
5604: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.UPDATE_PARENT_WBS_FLAG_DIRTY', x_Msg => 'p_structure_version_id: '||p_structure_version_id, x_Log_Level=> 3);
5605: END IF;
5606:
5607: FOR cur_obj_rel_rec in cur_obj_rel LOOP
5608: UPDATE pa_proj_elem_ver_structure

Line 5620: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.UPDATE_PARENT_WBS_FLAG_DIRTY', x_Msg => 'Completed', x_Log_Level=> 3);

5616: );
5617: END LOOP;
5618:
5619: IF l_debug_mode = 'Y' THEN
5620: pa_debug.write(x_Module=>'PA_RELATIONSHIP_PVT.UPDATE_PARENT_WBS_FLAG_DIRTY', x_Msg => 'Completed', x_Log_Level=> 3);
5621: END IF;
5622:
5623: IF (p_commit = FND_API.G_TRUE) THEN
5624: COMMIT;

Line 5628: pa_debug.debug('PA_RELATIONSHIP_PVT.UPDATE_PARENT_WBS_FLAG_DIRTY END');

5624: COMMIT;
5625: END IF;
5626:
5627: IF (p_debug_mode = 'Y') THEN
5628: pa_debug.debug('PA_RELATIONSHIP_PVT.UPDATE_PARENT_WBS_FLAG_DIRTY END');
5629: END IF;
5630:
5631:
5632: EXCEPTION

Line 5643: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',

5639: if p_commit = FND_API.G_TRUE then
5640: rollback to UPDATE_PARENT_WBS_FLAG_DIRTY;
5641: end if;
5642: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5643: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',
5644: p_procedure_name => 'UPDATE_PARENT_WBS_FLAG_DIRTY',
5645: p_error_text => SUBSTRB(SQLERRM,1,240));
5646: when OTHERS then
5647: if p_commit = FND_API.G_TRUE then

Line 5651: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',

5647: if p_commit = FND_API.G_TRUE then
5648: rollback to UPDATE_PARENT_WBS_FLAG_DIRTY;
5649: end if;
5650: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5651: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_RELATIONSHIP_PVT',
5652: p_procedure_name => 'UPDATE_PARENT_WBS_FLAG_DIRTY',
5653: p_error_text => SUBSTRB(SQLERRM,1,240));
5654: raise;
5655: END UPDATE_PARENT_WBS_FLAG_DIRTY;

Line 5657: end PA_RELATIONSHIP_PVT;

5653: p_error_text => SUBSTRB(SQLERRM,1,240));
5654: raise;
5655: END UPDATE_PARENT_WBS_FLAG_DIRTY;
5656:
5657: end PA_RELATIONSHIP_PVT;