DBA Data[Home] [Help]

APPS.PA_STRUCT_TASK_ROLLUP_PUB dependencies on PA_DEBUG

Line 293: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');

289: i number;
290:
291:
292: BEGIN
293: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
294:
295: IF (l_debug_mode = 'Y') THEN
296: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Entered...', 3);
297: END IF;

Line 296: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Entered...', 3);

292: BEGIN
293: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
294:
295: IF (l_debug_mode = 'Y') THEN
296: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Entered...', 3);
297: END IF;
298:
299: IF (p_commit = FND_API.G_TRUE) THEN
300: savepoint Rollup_From_Subproject_PVT;

Line 304: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Performing validations...', 3);

300: savepoint Rollup_From_Subproject_PVT;
301: END IF;
302:
303: IF (l_debug_mode = 'Y') THEN
304: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Performing validations...', 3);
305: END IF;
306:
307: IF (p_element_versions.count = 0) THEN
308: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 338: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Inside Loop p_element_versions(i)='||p_element_versions(i-1), 3);

334: i:=i+1;
335: END IF;
336:
337: IF (l_debug_mode = 'Y') THEN
338: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Inside Loop p_element_versions(i)='||p_element_versions(i-1), 3);
339: END IF;
340: LOOP -- bug 5638103 loop3
341:
342: FETCH get_lnk_task INTO get_lnk_task_rec;

Line 410: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Updating task ver:'||get_lnk_task_rec.lnk_task_ver_id, 3);

406: -- Fix for Bug # 4385027.
407:
408: --end bug 4238036
409: IF (l_debug_mode = 'Y') THEN
410: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Updating task ver:'||get_lnk_task_rec.lnk_task_ver_id, 3);
411: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Sch start date='||l_parent_start_date, 3);
412: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Sch finish date='||l_parent_finish_date, 3);
413: END IF;
414:

Line 411: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Sch start date='||l_parent_start_date, 3);

407:
408: --end bug 4238036
409: IF (l_debug_mode = 'Y') THEN
410: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Updating task ver:'||get_lnk_task_rec.lnk_task_ver_id, 3);
411: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Sch start date='||l_parent_start_date, 3);
412: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Sch finish date='||l_parent_finish_date, 3);
413: END IF;
414:
415: UPDATE pa_proj_elem_ver_schedule

Line 412: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Sch finish date='||l_parent_finish_date, 3);

408: --end bug 4238036
409: IF (l_debug_mode = 'Y') THEN
410: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Updating task ver:'||get_lnk_task_rec.lnk_task_ver_id, 3);
411: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Sch start date='||l_parent_start_date, 3);
412: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Sch finish date='||l_parent_finish_date, 3);
413: END IF;
414:
415: UPDATE pa_proj_elem_ver_schedule
416: SET scheduled_start_date = l_parent_start_date

Line 459: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Predicate = '||l_predicate, 3);

455: -- we will have predicate with not more than 1000
456: --params
457: --
458: IF (l_debug_mode = 'Y') THEN
459: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Predicate = '||l_predicate, 3);
460: END IF;
461: --
462: -- 5660584, pqe base bug 5638103
463: /* bug 5638103

Line 688: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Before calling PA_TASK_ASSIGNMENT_UTILS.Adjust_Asgmt_Dates', 3);

684: END IF;
685: --bug 4153366
686:
687: IF (l_debug_mode = 'Y') THEN
688: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Before calling PA_TASK_ASSIGNMENT_UTILS.Adjust_Asgmt_Dates', 3);
689: END IF;
690:
691: PA_TASK_ASSIGNMENT_UTILS.Adjust_Asgmt_Dates(
692: p_element_version_id => l_elem_ver_id_tbl(i),

Line 704: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'After calling PA_TASK_ASSIGNMENT_UTILS.Adjust_Asgmt_Dates x_return_status='||x_return_status, 3);

700: x_planning_end_tbl => l_planning_end_tbl,
701: x_return_status => x_return_status);
702:
703: IF (l_debug_mode = 'Y') THEN
704: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'After calling PA_TASK_ASSIGNMENT_UTILS.Adjust_Asgmt_Dates x_return_status='||x_return_status, 3);
705: END IF;
706:
707: IF x_return_status = FND_API.G_RET_STS_ERROR then
708: RAISE FND_API.G_EXC_ERROR;

Line 751: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Before calling PA_PROJECT_DATES_PUB.UPDATE_PROJECT_DATES', 3);

747: FETCH get_scheduled_dates into l_get_sch_dates_cur;
748: CLOSE get_scheduled_dates;
749:
750: IF (l_debug_mode = 'Y') THEN
751: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Before calling PA_PROJECT_DATES_PUB.UPDATE_PROJECT_DATES', 3);
752: END IF;
753:
754: PA_PROJECT_DATES_PUB.UPDATE_PROJECT_DATES (
755: p_validate_only => FND_API.G_FALSE

Line 766: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'After calling PA_PROJECT_DATES_PUB.UPDATE_PROJECT_DATES x_return_status='||x_return_status, 3);

762: ,x_msg_count => x_msg_count
763: ,x_msg_data => x_msg_data );
764:
765: IF (l_debug_mode = 'Y') THEN
766: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'After calling PA_PROJECT_DATES_PUB.UPDATE_PROJECT_DATES x_return_status='||x_return_status, 3);
767: END IF;
768:
769: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
770: RAISE FND_API.G_EXC_ERROR;

Line 777: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Before calling PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION', 3);

773:
774: IF (l_versioning = 'N') THEN
775: --baseline
776: IF (l_debug_mode = 'Y') THEN
777: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Before calling PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION', 3);
778: END IF;
779:
780: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION(
781: p_commit => FND_API.G_FALSE,

Line 788: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'After calling PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION x_return_status='||x_return_status, 3);

784: x_msg_count => x_msg_count,
785: x_msg_data => x_msg_data);
786:
787: IF (l_debug_mode = 'Y') THEN
788: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'After calling PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION x_return_status='||x_return_status, 3);
789: END IF;
790:
791:
792: If (x_return_status <> FND_API.G_RET_STS_SUCCESS) then

Line 813: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Before calling PA_PROJECT_DATES_PUB.COPY_PROJECT_DATES', 3);

809: (PA_PROJECT_STRUCTURE_UTILS.get_Structure_sharing_code(l_struc_project_id) = 'SHARE_FULL')) AND
810: (l_versioning = 'N') THEN
811: --copy to transaction dates
812: IF (l_debug_mode = 'Y') THEN
813: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'Before calling PA_PROJECT_DATES_PUB.COPY_PROJECT_DATES', 3);
814: END IF;
815:
816: PA_PROJECT_DATES_PUB.COPY_PROJECT_DATES(
817: p_validate_only => FND_API.G_FALSE

Line 825: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'After calling PA_PROJECT_DATES_PUB.COPY_PROJECT_DATESx_return_status='||x_return_status, 3);

821: ,x_msg_data => x_msg_data
822: );
823:
824: IF (l_debug_mode = 'Y') THEN
825: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 'After calling PA_PROJECT_DATES_PUB.COPY_PROJECT_DATESx_return_status='||x_return_status, 3);
826: END IF;
827:
828: If (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
829: x_msg_count := FND_MSG_PUB.count_msg;

Line 891: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');

887: l_debug_mode VARCHAR2(1);
888:
889: BEGIN
890:
891: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
892:
893: IF (l_debug_mode = 'Y') THEN
894: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.ROLLUP_FROM_SUBPROJECT', 'BEGIN', 3);
895: END IF;

Line 894: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.ROLLUP_FROM_SUBPROJECT', 'BEGIN', 3);

890:
891: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
892:
893: IF (l_debug_mode = 'Y') THEN
894: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.ROLLUP_FROM_SUBPROJECT', 'BEGIN', 3);
895: END IF;
896:
897: IF (p_element_versions.count = 0) THEN
898: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 901: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.ROLLUP_FROM_SUBPROJECT', 'p_element_versions.COUNT is 0', 3);

897: IF (p_element_versions.count = 0) THEN
898: x_return_status := FND_API.G_RET_STS_SUCCESS;
899:
900: IF (l_debug_mode = 'Y') THEN
901: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.ROLLUP_FROM_SUBPROJECT', 'p_element_versions.COUNT is 0', 3);
902: END IF;
903:
904: return;
905: END IF;

Line 927: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.ROLLUP_FROM_SUBPROJECT', 'END', 3);

923: x_msg_count => x_msg_count,
924: x_msg_data => x_msg_data);
925:
926: IF (l_debug_mode = 'Y') THEN
927: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.ROLLUP_FROM_SUBPROJECT', 'END', 3);
928: END IF;
929:
930: END Rollup_From_Subproject;
931:

Line 977: pa_debug.debug('PA_STRUCT_TASK_ROLLUP_PUB.Tasks_Rollup_Unlimited BEGIN');

973: l_count number :=0;
974: BEGIN
975:
976: IF (p_debug_mode = 'Y') THEN
977: pa_debug.debug('PA_STRUCT_TASK_ROLLUP_PUB.Tasks_Rollup_Unlimited BEGIN');
978: END IF;
979:
980: IF (p_commit = FND_API.G_TRUE) THEN
981: savepoint TASKS_ROLLUP_UNLIMITED_PUB;

Line 1323: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');--added by rtarway, 4218977

1319: --end bug 4541039
1320:
1321: begin
1322:
1323: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');--added by rtarway, 4218977
1324:
1325: IF (l_debug_mode = 'Y') THEN
1326: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP', 'Entered...', 3);
1327: END IF;

Line 1326: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP', 'Entered...', 3);

1322:
1323: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');--added by rtarway, 4218977
1324:
1325: IF (l_debug_mode = 'Y') THEN
1326: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP', 'Entered...', 3);
1327: END IF;
1328:
1329: IF (p_commit = FND_API.G_TRUE) THEN
1330: savepoint TASKS_ROLLUP_PVT;

Line 1334: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP', 'Performing validations',3);

1330: savepoint TASKS_ROLLUP_PVT;
1331: END IF;
1332:
1333: IF (l_debug_mode = 'Y') THEN
1334: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP', 'Performing validations',3);
1335: END IF;
1336:
1337: If (p_element_versions.count = 0) THEN
1338: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1358: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Predicate = '||l_predicate,3);

1354: --dbms_output.put_line('Predicate => '||l_predicate);
1355: --dbms_output.put_line('Predicate2 => '||l_predicate2);
1356:
1357: IF (l_debug_mode = 'Y') THEN
1358: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Predicate = '||l_predicate,3);
1359: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Predicate2 = '||l_predicate2,3);
1360: END IF;
1361:
1362: --first select stmt - get all parents along the branch of the element

Line 1359: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Predicate2 = '||l_predicate2,3);

1355: --dbms_output.put_line('Predicate2 => '||l_predicate2);
1356:
1357: IF (l_debug_mode = 'Y') THEN
1358: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Predicate = '||l_predicate,3);
1359: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Predicate2 = '||l_predicate2,3);
1360: END IF;
1361:
1362: --first select stmt - get all parents along the branch of the element
1363: --second select stmt - get direct child of all parents

Line 1509: pa_debug.g_err_stage := 'Value of G_OP_VALIDATE_flag'||PA_PROJECT_PUB.G_OP_VALIDATE_FLAG ;

1505:
1506: close l_cur;
1507: --Added by rtarway, 4218977
1508: IF l_debug_mode = 'Y' THEN
1509: pa_debug.g_err_stage := 'Value of G_OP_VALIDATE_flag'||PA_PROJECT_PUB.G_OP_VALIDATE_FLAG ;
1510: pa_debug.write(g_module_name,pa_debug.g_err_stage,3);
1511: END IF;
1512: --If Added by rtarway, BUG 4218977
1513: --Added null condition, for BUG 4226832

Line 1510: pa_debug.write(g_module_name,pa_debug.g_err_stage,3);

1506: close l_cur;
1507: --Added by rtarway, 4218977
1508: IF l_debug_mode = 'Y' THEN
1509: pa_debug.g_err_stage := 'Value of G_OP_VALIDATE_flag'||PA_PROJECT_PUB.G_OP_VALIDATE_FLAG ;
1510: pa_debug.write(g_module_name,pa_debug.g_err_stage,3);
1511: END IF;
1512: --If Added by rtarway, BUG 4218977
1513: --Added null condition, for BUG 4226832
1514: if (PA_PROJECT_PUB.G_OP_VALIDATE_FLAG is null OR PA_PROJECT_PUB.G_OP_VALIDATE_FLAG = 'Y' ) then

Line 1555: pa_debug.debug('Binding: '||l_index||', id = '||l_rollup_table(l_index).object_id);

1551:
1552: l_index := l_rollup_table.First;
1553: LOOP
1554: IF (p_debug_mode = 'Y') THEN
1555: pa_debug.debug('Binding: '||l_index||', id = '||l_rollup_table(l_index).object_id);
1556: END IF;
1557: --dbms_output.put_line('Binding: '||l_index||', id = '||l_rollup_table(l_index).object_id);
1558:
1559: -- hyau l_duration := trunc(l_rollup_table(l_index).finish_date1 - l_rollup_table(l_index).start_date1) + 1;

Line 1647: pa_debug.debug('Updating linking task '||c1_rec.element_version_id);

1643: DBMS_SQL.BIND_VARIABLE(l_CursorId, ':pid', c1_rec.project_id);
1644: DBMS_SQL.BIND_VARIABLE(l_CursorId, ':evid', c1_rec.element_version_id);
1645:
1646: IF (p_debug_mode = 'Y') THEN
1647: pa_debug.debug('Updating linking task '||c1_rec.element_version_id);
1648: END IF;
1649: --dbms_output.put_line('Updating linking task '||c1_rec.element_version_id);
1650: --Update rows
1651: l_RowsUpdated := DBMS_SQL.EXECUTE(l_CursorId);

Line 1773: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Before calling PA_TASK_ASSIGNMENT_UTILS.Adjust_Asgmt_Dates l_assgn_context = '||l_assgn_context,3);

1769: END IF;
1770: --bug 4153366
1771:
1772: IF (l_debug_mode = 'Y') THEN
1773: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Before calling PA_TASK_ASSIGNMENT_UTILS.Adjust_Asgmt_Dates l_assgn_context = '||l_assgn_context,3);
1774: END IF;
1775:
1776: PA_TASK_ASSIGNMENT_UTILS.Adjust_Asgmt_Dates(
1777: p_element_version_id => l_elem_ver_id_tbl(i),

Line 1788: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','After calling PA_TASK_ASSIGNMENT_UTILS.Adjust_Asgmt_Dates x_return_status = '||x_return_status,3);

1784: x_planning_start_tbl => l_planning_start_tbl,
1785: x_planning_end_tbl => l_planning_end_tbl,
1786: x_return_status => x_return_status);
1787: IF (l_debug_mode = 'Y') THEN
1788: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','After calling PA_TASK_ASSIGNMENT_UTILS.Adjust_Asgmt_Dates x_return_status = '||x_return_status,3);
1789: END IF;
1790:
1791: EXCEPTION
1792: WHEN OTHERS THEN

Line 1817: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Before calling PA_PROJECT_DATES_PUB.UPDATE_PROJECT_DATES',3);

1813: FETCH get_scheduled_dates into l_get_sch_dates_cur;
1814: CLOSE get_scheduled_dates;
1815:
1816: IF (l_debug_mode = 'Y') THEN
1817: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Before calling PA_PROJECT_DATES_PUB.UPDATE_PROJECT_DATES',3);
1818: END IF;
1819:
1820:
1821: PA_PROJECT_DATES_PUB.UPDATE_PROJECT_DATES (

Line 1833: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','After calling PA_PROJECT_DATES_PUB.UPDATE_PROJECT_DATES x_return_status='||x_return_status,3);

1829: ,x_msg_count => x_msg_count
1830: ,x_msg_data => x_msg_data );
1831:
1832: IF (l_debug_mode = 'Y') THEN
1833: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','After calling PA_PROJECT_DATES_PUB.UPDATE_PROJECT_DATES x_return_status='||x_return_status,3);
1834: END IF;
1835:
1836:
1837: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

Line 1846: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Before calling PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION l_structure_version_id='||l_structure_version_id,3);

1842:
1843: IF (l_template_flag = 'N' AND l_versioning = 'N') THEN
1844: --baseline
1845: IF (l_debug_mode = 'Y') THEN
1846: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Before calling PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION l_structure_version_id='||l_structure_version_id,3);
1847: END IF;
1848:
1849: PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION(
1850: p_commit => FND_API.G_FALSE,

Line 1857: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','After calling PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION x_return_status='||x_return_status,3);

1853: x_msg_count => x_msg_count,
1854: x_msg_data => x_msg_data);
1855:
1856: IF (l_debug_mode = 'Y') THEN
1857: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','After calling PA_PROJECT_STRUCTURE_PVT1.BASELINE_STRUCTURE_VERSION x_return_status='||x_return_status,3);
1858: END IF;
1859:
1860:
1861: If (x_return_status <> FND_API.G_RET_STS_SUCCESS) then

Line 1889: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Before calling PA_PROJECT_DATES_PUB.COPY_PROJECT_DATES',3);

1885: (PA_WORKPLAN_ATTR_UTILS.CHECK_WP_VERSIONING_ENABLED(l_struc_project_id) = 'N') THEN
1886: --copy to transaction dates
1887:
1888: IF (l_debug_mode = 'Y') THEN
1889: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Before calling PA_PROJECT_DATES_PUB.COPY_PROJECT_DATES',3);
1890: END IF;
1891:
1892: PA_PROJECT_DATES_PUB.COPY_PROJECT_DATES(
1893: p_validate_only => FND_API.G_FALSE

Line 1901: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','After calling PA_PROJECT_DATES_PUB.COPY_PROJECT_DATES x_return_status='||x_return_status,3);

1897: ,x_msg_data => x_msg_data
1898: );
1899:
1900: IF (l_debug_mode = 'Y') THEN
1901: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','After calling PA_PROJECT_DATES_PUB.COPY_PROJECT_DATES x_return_status='||x_return_status,3);
1902: END IF;
1903:
1904:
1905: If (x_return_status <> FND_API.G_RET_STS_SUCCESS) then

Line 1942: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Before calling Rollup_From_Subproject to rollup from the current project''s sub-project',3);

1938: --Bug No.3450684
1939: --Start rolling up from subproject associations
1940:
1941: IF (l_debug_mode = 'Y') THEN
1942: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Before calling Rollup_From_Subproject to rollup from the current project''s sub-project',3);
1943: END IF;
1944:
1945: Rollup_From_Subproject(
1946: p_api_version => p_api_version

Line 1960: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','After calling Rollup_From_Subproject to rollup from the current project''s sub-project x_return_status='||x_return_status,3);

1956: ,x_msg_count => x_msg_count
1957: ,x_msg_data => x_msg_data);
1958:
1959: IF (l_debug_mode = 'Y') THEN
1960: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','After calling Rollup_From_Subproject to rollup from the current project''s sub-project x_return_status='||x_return_status,3);
1961: END IF;
1962:
1963: --
1964: If (x_return_status <> FND_API.G_RET_STS_SUCCESS) then

Line 1995: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','l_struc_project_id='||l_struc_project_id,3);

1991:
1992: ----bug 4541039
1993:
1994: IF (l_debug_mode = 'Y') THEN
1995: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','l_struc_project_id='||l_struc_project_id,3);
1996: END IF;
1997:
1998: FOR cur_select_hier_rec in cur_select_hier( l_struc_project_id, l_structure_version_id ) LOOP ----bug 4541039
1999:

Line 2011: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','l_rollup_from_sub_project='||l_struc_project_id,3);

2007: END IF;
2008:
2009:
2010: IF (l_debug_mode = 'Y') THEN
2011: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','l_rollup_from_sub_project='||l_struc_project_id,3);
2012: END IF;
2013:
2014: IF l_rollup_from_sub_project = 'Y'
2015: THEN

Line 2058: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Before calling Rollup_From_Subproject to rollup from the current project id='||

2054: l_index := 1;
2055: l_parent_task_ver_id_tbl.extend;
2056: l_parent_task_ver_id_tbl(l_index):=get_str_ver_ic_lnk_tasks_rec.parent_task_ver_id;
2057: IF (l_debug_mode = 'Y') THEN
2058: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Before calling Rollup_From_Subproject to rollup from the current project id='||
2059: cur_select_hier_rec.object_id_to2||' to its parent project id='||get_str_ver_ic_lnk_tasks_rec.parent_proj_id,3);
2060: END IF;
2061:
2062: PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject(

Line 2077: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','After calling Rollup_From_Subproject to rollup from the current project id='||

2073: ,x_msg_count => x_msg_count
2074: ,x_msg_data => x_msg_data);
2075:
2076: IF (l_debug_mode = 'Y') THEN
2077: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','After calling Rollup_From_Subproject to rollup from the current project id='||
2078: cur_select_hier_rec.object_id_to2||' to its parent project id='||get_str_ver_ic_lnk_tasks_rec.parent_proj_id||' x_return_status='||x_return_status,3);
2079: END If;
2080: If (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
2081: x_msg_count := FND_MSG_PUB.count_msg;

Line 2099: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Before calling Rollup_From_Subproject to rollup from the current project id='||

2095: l_parent_task_ver_id_tbl.extend;
2096: l_parent_task_ver_id_tbl(l_index):=get_str_ver_ic_lnk_tasks_rec.parent_task_ver_id;
2097:
2098: IF (l_debug_mode = 'Y') THEN
2099: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','Before calling Rollup_From_Subproject to rollup from the current project id='||
2100: cur_select_hier_rec.object_id_to2||' to its parent project id='||get_str_ver_ic_lnk_tasks_rec.parent_proj_id,3);
2101: END IF;
2102:
2103: PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject(

Line 2117: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','After calling Rollup_From_Subproject to rollup from the current project id='||

2113: ,x_return_status => x_return_status
2114: ,x_msg_count => x_msg_count
2115: ,x_msg_data => x_msg_data);
2116: IF (l_debug_mode = 'Y') THEN
2117: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.TASKS_ROLLUP','After calling Rollup_From_Subproject to rollup from the current project id='||
2118: cur_select_hier_rec.object_id_to2||' to its parent project id='||get_str_ver_ic_lnk_tasks_rec.parent_proj_id||' x_return_status='||x_return_status,3);
2119: END IF;
2120:
2121: If (x_return_status <> FND_API.G_RET_STS_SUCCESS) then

Line 2269: pa_debug.debug('PVT.TASK_STATUS_ROLLUP BEGIN');

2265: --hsiu: bug 2800553: added for performance improvement
2266: l_partial_flag VARCHAR2(1);
2267: BEGIN
2268: IF (p_debug_mode = 'Y') THEN
2269: pa_debug.debug('PVT.TASK_STATUS_ROLLUP BEGIN');
2270: END IF;
2271:
2272: IF (p_commit = FND_API.G_TRUE) THEN
2273: savepoint TASK_STATUS_ROLLUP_PUB;

Line 2277: pa_debug.debug('Performing validations');

2273: savepoint TASK_STATUS_ROLLUP_PUB;
2274: END IF;
2275:
2276: IF (p_debug_mode = 'Y') THEN
2277: pa_debug.debug('Performing validations');
2278: END IF;
2279:
2280: --begin rollup
2281: --check if task id is available. If not, rollup the whole structure

Line 2446: pa_debug.debug('PVT.TASK_STATUS_ROLLUP BEGIN');

2442: and c.status_type = 'TASK';
2443: l_zero_weight_rec get_zero_weight_status%ROWTYPE;
2444: BEGIN
2445: IF (p_debug_mode = 'Y') THEN
2446: pa_debug.debug('PVT.TASK_STATUS_ROLLUP BEGIN');
2447: END IF;
2448:
2449: IF (p_commit = FND_API.G_TRUE) THEN
2450: savepoint TASK_STAT_PUSHDOWN_ROLLUP;

Line 2454: pa_debug.debug('Performing validations');

2450: savepoint TASK_STAT_PUSHDOWN_ROLLUP;
2451: END IF;
2452:
2453: IF (p_debug_mode = 'Y') THEN
2454: pa_debug.debug('Performing validations');
2455: END IF;
2456:
2457: --push down all cancelled and on-hold statuses
2458: OPEN get_zero_weight_status;

Line 2619: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');

2615: BEGIN
2616:
2617: x_msg_count := 0;
2618: x_return_status := FND_API.G_RET_STS_SUCCESS;
2619: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
2620:
2621: IF (p_debug_mode = 'Y') THEN
2622: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDULE_DATES_ROLLUP','Entered in PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP p_structure_version_id='||p_structure_version_id, 3);
2623: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDULE_DATES_ROLLUP','Entered in PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP p_project_id='||p_project_id, 3);

Line 2622: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDULE_DATES_ROLLUP','Entered in PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP p_structure_version_id='||p_structure_version_id, 3);

2618: x_return_status := FND_API.G_RET_STS_SUCCESS;
2619: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
2620:
2621: IF (p_debug_mode = 'Y') THEN
2622: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDULE_DATES_ROLLUP','Entered in PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP p_structure_version_id='||p_structure_version_id, 3);
2623: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDULE_DATES_ROLLUP','Entered in PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP p_project_id='||p_project_id, 3);
2624: END IF;
2625:
2626: IF (p_commit = FND_API.G_TRUE) THEN

Line 2623: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDULE_DATES_ROLLUP','Entered in PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP p_project_id='||p_project_id, 3);

2619: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
2620:
2621: IF (p_debug_mode = 'Y') THEN
2622: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDULE_DATES_ROLLUP','Entered in PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP p_structure_version_id='||p_structure_version_id, 3);
2623: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDULE_DATES_ROLLUP','Entered in PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP p_project_id='||p_project_id, 3);
2624: END IF;
2625:
2626: IF (p_commit = FND_API.G_TRUE) THEN
2627: savepoint Program_Schedule_dates_rollup;

Line 2634: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP', 'Before Opening cursor cur_select_grid', 3);

2630: IF (p_structure_version_id IS NULL OR p_structure_version_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM )
2631: AND (p_project_id IS NOT NULL AND p_project_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM )
2632: THEN
2633: IF l_debug_mode = 'Y' THEN
2634: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP', 'Before Opening cursor cur_select_grid', 3);
2635: END IF;
2636:
2637: FOR cur_select_grid_rec IN cur_select_grid LOOP
2638:

Line 2646: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP', 'Before calling PA_STRUCT_TASK_ROLLUP_PUB.Program_Schedule_dates_rollup for published version of the project:'||cur_select_grid_rec.project_id, 3);

2642: AND p_project_id= cur_select_grid_rec.project_id
2643: THEN
2644:
2645: IF l_debug_mode = 'Y' THEN
2646: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP', 'Before calling PA_STRUCT_TASK_ROLLUP_PUB.Program_Schedule_dates_rollup for published version of the project:'||cur_select_grid_rec.project_id, 3);
2647: END IF;
2648:
2649: PA_STRUCT_TASK_ROLLUP_PUB.Program_Schedule_dates_rollup(
2650: p_project_id => p_project_id,

Line 2663: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP', 'After calling PA_STRUCT_TASK_ROLLUP_PUB.Program_Schedule_dates_rollup for published version of the project:'||

2659: END IF;
2660:
2661:
2662: IF l_debug_mode = 'Y' THEN
2663: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP', 'After calling PA_STRUCT_TASK_ROLLUP_PUB.Program_Schedule_dates_rollup for published version of the project:'||
2664: cur_select_grid_rec.project_id||' x_return_status='||x_return_status, 3);
2665: END IF;
2666:
2667: END IF;

Line 2676: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP', 'Before calling PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd for project'||cur_select_grid_rec.project_id, 3);

2672:
2673: IF l_tasks_ver_ids.count > 0 THEN
2674:
2675: IF l_debug_mode = 'Y' THEN
2676: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP', 'Before calling PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd for project'||cur_select_grid_rec.project_id, 3);
2677: END IF;
2678:
2679: -- Bug 6854670: Changed call to Rollup_From_Subproject_Unltd
2680: PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd(

Line 2697: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP', 'After calling PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd x_return_status='||x_return_status, 3);

2693: ,x_msg_data => x_msg_data);
2694:
2695:
2696: IF l_debug_mode = 'Y' THEN
2697: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP', 'After calling PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd x_return_status='||x_return_status, 3);
2698: END IF;
2699:
2700: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2701: RAISE FND_API.G_EXC_ERROR;

Line 2715: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP', 'Before calling PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 3);

2711:
2712: IF l_tasks_ver_ids.count > 0 THEN
2713:
2714: IF l_debug_mode = 'Y' THEN
2715: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP', 'Before calling PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd', 3);
2716: END IF;
2717:
2718: -- Bug 6854670: Changed call to Rollup_From_Subproject_Unltd
2719: PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd(

Line 2736: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP', 'After calling PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd x_return_status='||x_return_status, 3);

2732: ,x_msg_data => x_msg_data);
2733:
2734:
2735: IF l_debug_mode = 'Y' THEN
2736: pa_debug.write('PA_STRUCT_TASK_ROLLUP_PUB.PROGRAM_SCHEDUlE_DATES_ROLLUP', 'After calling PA_STRUCT_TASK_ROLLUP_PUB.Rollup_From_Subproject_Unltd x_return_status='||x_return_status, 3);
2737: END IF;
2738:
2739: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2740: RAISE FND_API.G_EXC_ERROR;