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_PROGRESS_PVT dependencies on FND_API

Line 39: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

35: -- Bug 4317491 : Added check of WORKPLAN
36:
37: PROCEDURE ROLLUP_PROGRESS_PVT(
38: p_api_version IN NUMBER :=1.0
39: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
40: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
41: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
42: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
43: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 40: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

36:
37: PROCEDURE ROLLUP_PROGRESS_PVT(
38: p_api_version IN NUMBER :=1.0
39: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
40: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
41: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
42: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
43: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
44: ,p_calling_mode IN VARCHAR2 :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR

Line 41: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

37: PROCEDURE ROLLUP_PROGRESS_PVT(
38: p_api_version IN NUMBER :=1.0
39: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
40: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
41: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
42: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
43: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
44: ,p_calling_mode IN VARCHAR2 :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
45: ,p_debug_mode IN VARCHAR2 :='N'

Line 42: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

38: p_api_version IN NUMBER :=1.0
39: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
40: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
41: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
42: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
43: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
44: ,p_calling_mode IN VARCHAR2 :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
45: ,p_debug_mode IN VARCHAR2 :='N'
46: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 1469: --IF (p_commit = FND_API.G_TRUE) THEN

1465: --bug 4045979
1466: l_base_struct_ver_id := pa_project_structure_utils.get_baseline_struct_ver(p_project_id);
1467:
1468: --BUG 4355204, rtarway
1469: --IF (p_commit = FND_API.G_TRUE) THEN
1470: savepoint ROLLUP_PROGRESS_PVT2;
1471: --END IF;
1472:
1473: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 1473: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

1469: --IF (p_commit = FND_API.G_TRUE) THEN
1470: savepoint ROLLUP_PROGRESS_PVT2;
1471: --END IF;
1472:
1473: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
1474: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1475: END IF;
1476:
1477: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 1474: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1470: savepoint ROLLUP_PROGRESS_PVT2;
1471: --END IF;
1472:
1473: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
1474: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1475: END IF;
1476:
1477: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
1478: FND_MSG_PUB.initialize;

Line 1477: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

1473: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
1474: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1475: END IF;
1476:
1477: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
1478: FND_MSG_PUB.initialize;
1479: END IF;
1480:
1481: l_sharing_Enabled := PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(p_project_id);

Line 2632: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2628: IF g1_debug_mode = 'Y' THEN
2629: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PROGRESS_PVT', x_Msg => 'After GENERATE_SCHEDULE', x_Log_Level=> 3);
2630: END IF;
2631:
2632: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2633: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
2634: p_msg_name => l_msg_data
2635: );
2636: x_msg_data := l_msg_data;

Line 2638: RAISE FND_API.G_EXC_ERROR;

2634: p_msg_name => l_msg_data
2635: );
2636: x_msg_data := l_msg_data;
2637: x_return_status := 'E';
2638: RAISE FND_API.G_EXC_ERROR;
2639: END IF;
2640:
2641:
2642: IF g1_debug_mode = 'Y' THEN

Line 2708: RAISE FND_API.G_EXC_ERROR;

2704: p_msg_name => 'PA_FP_INVALID_DATE_RANGE');
2705: x_msg_data := 'PA_FP_INVALID_DATE_RANGE';
2706: x_return_status := 'E';
2707: x_msg_count := fnd_msg_pub.count_msg;
2708: RAISE FND_API.G_EXC_ERROR;
2709: END ;
2710:
2711: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PROGRESS_PVT', x_Msg => 'After Getting Periods', x_Log_Level=> 3);
2712:

Line 3001: RAISE FND_API.G_EXC_ERROR;

2997: WHEN OTHERS THEN
2998: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
2999: p_procedure_name => 'ROLLUP_PROGRESS_PVT',
3000: p_error_text => SUBSTRB('Call of PJI_FM_XBS_ACCUM_TMP1 Failed:'||SQLERRM,1,120));
3001: RAISE FND_API.G_EXC_ERROR;
3002: END;
3003:
3004:
3005:

Line 3502: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3498: ,x_msg_count => x_msg_count
3499: ,x_msg_data => x_msg_data
3500: );
3501:
3502: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3503: raise FND_API.G_EXC_ERROR;
3504: END IF;
3505:
3506: END IF;

Line 3503: raise FND_API.G_EXC_ERROR;

3499: ,x_msg_data => x_msg_data
3500: );
3501:
3502: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3503: raise FND_API.G_EXC_ERROR;
3504: END IF;
3505:
3506: END IF;
3507: -- 5119716 End

Line 3908: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3904: ,x_return_status => x_return_status
3905: ,x_msg_count => x_msg_count
3906: ,x_msg_data => x_msg_data
3907: );
3908: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3909: RAISE FND_API.G_EXC_ERROR;
3910: END IF;
3911: l_last_as_of_date := cur_tree_rollup_rec.as_of_date;
3912: END IF;

Line 3909: RAISE FND_API.G_EXC_ERROR;

3905: ,x_msg_count => x_msg_count
3906: ,x_msg_data => x_msg_data
3907: );
3908: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3909: RAISE FND_API.G_EXC_ERROR;
3910: END IF;
3911: l_last_as_of_date := cur_tree_rollup_rec.as_of_date;
3912: END IF;
3913: -- Bug 4573257 End

Line 3943: raise FND_API.G_EXC_ERROR;

3939: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PROGRESS_PVT', x_Msg => 'Rollup For Future Date x_return_status='||x_return_status, x_Log_Level=> 3);
3940: END IF;
3941:
3942: IF x_return_status <> 'S' THEN
3943: raise FND_API.G_EXC_ERROR;
3944: END IF;
3945: END LOOP;
3946: END IF; -- p_rollup_entire_wbs = 'Y'
3947:

Line 3952: x_return_status := FND_API.G_RET_STS_SUCCESS;

3948: DELETE from pa_proj_rollup_temp where process_number= l_process_number_temp;
3949:
3950:
3951:
3952: x_return_status := FND_API.G_RET_STS_SUCCESS;
3953:
3954: IF (p_commit = FND_API.G_TRUE) THEN
3955: COMMIT;
3956: END IF;

Line 3954: IF (p_commit = FND_API.G_TRUE) THEN

3950:
3951:
3952: x_return_status := FND_API.G_RET_STS_SUCCESS;
3953:
3954: IF (p_commit = FND_API.G_TRUE) THEN
3955: COMMIT;
3956: END IF;
3957:
3958:

Line 3964: WHEN FND_API.G_EXC_ERROR THEN

3960: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PROGRESS_PVT', x_Msg => 'PA_PROGRESS_PVT.ROLLUP_PROGRESS_PVT END', x_Log_Level=> 3);
3961: END IF;
3962:
3963: EXCEPTION
3964: WHEN FND_API.G_EXC_ERROR THEN
3965: --BUG 4355204
3966: --IF p_commit = FND_API.G_TRUE THEN
3967: rollback to ROLLUP_PROGRESS_PVT2;
3968: --END IF;

Line 3966: --IF p_commit = FND_API.G_TRUE THEN

3962:
3963: EXCEPTION
3964: WHEN FND_API.G_EXC_ERROR THEN
3965: --BUG 4355204
3966: --IF p_commit = FND_API.G_TRUE THEN
3967: rollback to ROLLUP_PROGRESS_PVT2;
3968: --END IF;
3969: x_return_status := FND_API.G_RET_STS_ERROR;
3970: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 3969: x_return_status := FND_API.G_RET_STS_ERROR;

3965: --BUG 4355204
3966: --IF p_commit = FND_API.G_TRUE THEN
3967: rollback to ROLLUP_PROGRESS_PVT2;
3968: --END IF;
3969: x_return_status := FND_API.G_RET_STS_ERROR;
3970: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3971: --BUG 4355204
3972: --IF p_commit = FND_API.G_TRUE THEN
3973: rollback to ROLLUP_PROGRESS_PVT2;

Line 3970: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3966: --IF p_commit = FND_API.G_TRUE THEN
3967: rollback to ROLLUP_PROGRESS_PVT2;
3968: --END IF;
3969: x_return_status := FND_API.G_RET_STS_ERROR;
3970: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3971: --BUG 4355204
3972: --IF p_commit = FND_API.G_TRUE THEN
3973: rollback to ROLLUP_PROGRESS_PVT2;
3974: --END IF;

Line 3972: --IF p_commit = FND_API.G_TRUE THEN

3968: --END IF;
3969: x_return_status := FND_API.G_RET_STS_ERROR;
3970: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3971: --BUG 4355204
3972: --IF p_commit = FND_API.G_TRUE THEN
3973: rollback to ROLLUP_PROGRESS_PVT2;
3974: --END IF;
3975: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3976: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 3975: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3971: --BUG 4355204
3972: --IF p_commit = FND_API.G_TRUE THEN
3973: rollback to ROLLUP_PROGRESS_PVT2;
3974: --END IF;
3975: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3976: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
3977: p_procedure_name => 'ROLLUP_PROGRESS_PVT',
3978: p_error_text => SUBSTRB(SQLERRM,1,120));
3979: WHEN OTHERS THEN

Line 3981: --IF p_commit = FND_API.G_TRUE THEN

3977: p_procedure_name => 'ROLLUP_PROGRESS_PVT',
3978: p_error_text => SUBSTRB(SQLERRM,1,120));
3979: WHEN OTHERS THEN
3980: --BUG 4355204
3981: --IF p_commit = FND_API.G_TRUE THEN
3982: rollback to ROLLUP_PROGRESS_PVT2;
3983: --END IF;
3984: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3985: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 3984: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3980: --BUG 4355204
3981: --IF p_commit = FND_API.G_TRUE THEN
3982: rollback to ROLLUP_PROGRESS_PVT2;
3983: --END IF;
3984: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3985: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
3986: p_procedure_name => 'ROLLUP_PROGRESS_PVT',
3987: p_error_text => SUBSTRB(SQLERRM,1,120));
3988: raise;

Line 4016: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

4012: -- End of comments
4013:
4014: PROCEDURE UPDATE_ROLLUP_PROGRESS_PVT(
4015: p_api_version IN NUMBER :=1.0
4016: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4017: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4018: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4019: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4020: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 4017: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

4013:
4014: PROCEDURE UPDATE_ROLLUP_PROGRESS_PVT(
4015: p_api_version IN NUMBER :=1.0
4016: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4017: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4018: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4019: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4020: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4021: ,p_calling_mode IN VARCHAR2 :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR -- Bug 4097710

Line 4018: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

4014: PROCEDURE UPDATE_ROLLUP_PROGRESS_PVT(
4015: p_api_version IN NUMBER :=1.0
4016: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4017: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4018: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4019: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4020: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4021: ,p_calling_mode IN VARCHAR2 :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR -- Bug 4097710
4022: ,p_debug_mode IN VARCHAR2 :='N'

Line 4019: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

4015: p_api_version IN NUMBER :=1.0
4016: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4017: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4018: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4019: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4020: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4021: ,p_calling_mode IN VARCHAR2 :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR -- Bug 4097710
4022: ,p_debug_mode IN VARCHAR2 :='N'
4023: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 4057: x_return_status := FND_API.G_RET_STS_SUCCESS;

4053: l_login_id NUMBER := FND_GLOBAL.LOGIN_ID ;
4054:
4055: BEGIN
4056: -- Bug 4242787 : Commented update_rollup_progress_pvt, IT is merged into rollup_progress_pvt
4057: x_return_status := FND_API.G_RET_STS_SUCCESS;
4058: IF (p_commit = FND_API.G_TRUE) THEN
4059: COMMIT;
4060: END IF;
4061: EXCEPTION

Line 4058: IF (p_commit = FND_API.G_TRUE) THEN

4054:
4055: BEGIN
4056: -- Bug 4242787 : Commented update_rollup_progress_pvt, IT is merged into rollup_progress_pvt
4057: x_return_status := FND_API.G_RET_STS_SUCCESS;
4058: IF (p_commit = FND_API.G_TRUE) THEN
4059: COMMIT;
4060: END IF;
4061: EXCEPTION
4062: WHEN FND_API.G_EXC_ERROR THEN

Line 4062: WHEN FND_API.G_EXC_ERROR THEN

4058: IF (p_commit = FND_API.G_TRUE) THEN
4059: COMMIT;
4060: END IF;
4061: EXCEPTION
4062: WHEN FND_API.G_EXC_ERROR THEN
4063: IF g1_debug_mode = 'Y' THEN
4064: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_ERROR', x_Log_Level=> 3);
4065: END IF;
4066:

Line 4064: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_ERROR', x_Log_Level=> 3);

4060: END IF;
4061: EXCEPTION
4062: WHEN FND_API.G_EXC_ERROR THEN
4063: IF g1_debug_mode = 'Y' THEN
4064: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_ERROR', x_Log_Level=> 3);
4065: END IF;
4066:
4067: IF p_commit = FND_API.G_TRUE THEN
4068: rollback to UPDATE_ROLLUP_PROGRESS_PVT2;

Line 4067: IF p_commit = FND_API.G_TRUE THEN

4063: IF g1_debug_mode = 'Y' THEN
4064: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_ERROR', x_Log_Level=> 3);
4065: END IF;
4066:
4067: IF p_commit = FND_API.G_TRUE THEN
4068: rollback to UPDATE_ROLLUP_PROGRESS_PVT2;
4069: END IF;
4070: x_return_status := FND_API.G_RET_STS_ERROR;
4071: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 4070: x_return_status := FND_API.G_RET_STS_ERROR;

4066:
4067: IF p_commit = FND_API.G_TRUE THEN
4068: rollback to UPDATE_ROLLUP_PROGRESS_PVT2;
4069: END IF;
4070: x_return_status := FND_API.G_RET_STS_ERROR;
4071: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4072:
4073: IF g1_debug_mode = 'Y' THEN
4074: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_UNEXPECTED_ERROR', x_Log_Level=> 3);

Line 4071: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4067: IF p_commit = FND_API.G_TRUE THEN
4068: rollback to UPDATE_ROLLUP_PROGRESS_PVT2;
4069: END IF;
4070: x_return_status := FND_API.G_RET_STS_ERROR;
4071: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4072:
4073: IF g1_debug_mode = 'Y' THEN
4074: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_UNEXPECTED_ERROR', x_Log_Level=> 3);
4075: END IF;

Line 4074: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_UNEXPECTED_ERROR', x_Log_Level=> 3);

4070: x_return_status := FND_API.G_RET_STS_ERROR;
4071: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4072:
4073: IF g1_debug_mode = 'Y' THEN
4074: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_UNEXPECTED_ERROR', x_Log_Level=> 3);
4075: END IF;
4076:
4077: IF p_commit = FND_API.G_TRUE THEN
4078: rollback to UPDATE_ROLLUP_PROGRESS_PVT2;

Line 4077: IF p_commit = FND_API.G_TRUE THEN

4073: IF g1_debug_mode = 'Y' THEN
4074: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_UNEXPECTED_ERROR', x_Log_Level=> 3);
4075: END IF;
4076:
4077: IF p_commit = FND_API.G_TRUE THEN
4078: rollback to UPDATE_ROLLUP_PROGRESS_PVT2;
4079: END IF;
4080: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4081: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 4080: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4076:
4077: IF p_commit = FND_API.G_TRUE THEN
4078: rollback to UPDATE_ROLLUP_PROGRESS_PVT2;
4079: END IF;
4080: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4081: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
4082: p_procedure_name => 'UPDATE_ROLLUP_PROGRESS_PVT',
4083: p_error_text => SUBSTRB(SQLERRM,1,120));
4084: WHEN OTHERS THEN

Line 4089: IF p_commit = FND_API.G_TRUE THEN

4085: IF g1_debug_mode = 'Y' THEN
4086: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'OTHERS = '||sqlerrm, x_Log_Level=> 3);
4087: END IF;
4088:
4089: IF p_commit = FND_API.G_TRUE THEN
4090: rollback to UPDATE_ROLLUP_PROGRESS_PVT2;
4091: END IF;
4092: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4093: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 4092: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4088:
4089: IF p_commit = FND_API.G_TRUE THEN
4090: rollback to UPDATE_ROLLUP_PROGRESS_PVT2;
4091: END IF;
4092: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4093: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
4094: p_procedure_name => 'UPDATE_ROLLUP_PROGRESS_PVT',
4095: p_error_text => SUBSTRB(SQLERRM,1,120));
4096: raise;

Line 4248: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

4244: ,x_return_status => x_return_status
4245: ,x_msg_count => x_msg_count
4246: ,x_msg_data => x_msg_data
4247: );
4248: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4249: RAISE FND_API.G_EXC_ERROR;
4250: END IF;
4251: l_last_as_of_date := cur_tree_rollup_rec.as_of_date;
4252: END IF;

Line 4249: RAISE FND_API.G_EXC_ERROR;

4245: ,x_msg_count => x_msg_count
4246: ,x_msg_data => x_msg_data
4247: );
4248: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4249: RAISE FND_API.G_EXC_ERROR;
4250: END IF;
4251: l_last_as_of_date := cur_tree_rollup_rec.as_of_date;
4252: END IF;
4253: -- Bug 4573257 End

Line 4283: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

4279: ,x_msg_count => x_msg_count
4280: ,x_msg_data => x_msg_data);
4281:
4282: -- Start : 4537865
4283: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4284: RAISE FND_API.G_EXC_ERROR;
4285: END IF;
4286: -- End : 4537865
4287: end if;

Line 4284: RAISE FND_API.G_EXC_ERROR;

4280: ,x_msg_data => x_msg_data);
4281:
4282: -- Start : 4537865
4283: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4284: RAISE FND_API.G_EXC_ERROR;
4285: END IF;
4286: -- End : 4537865
4287: end if;
4288: end loop;

Line 4296: when FND_API.G_EXC_ERROR then

4292: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_FUTURE_PROGRESS_PVT', x_Msg => 'End ', x_Log_Level=> 3);
4293: END IF;
4294: EXCEPTION
4295: -- 4537865 : Start
4296: when FND_API.G_EXC_ERROR then
4297: x_return_status := FND_API.G_RET_STS_ERROR;
4298:
4299: l_msg_count := Fnd_Msg_Pub.count_msg;
4300:

Line 4297: x_return_status := FND_API.G_RET_STS_ERROR;

4293: END IF;
4294: EXCEPTION
4295: -- 4537865 : Start
4296: when FND_API.G_EXC_ERROR then
4297: x_return_status := FND_API.G_RET_STS_ERROR;
4298:
4299: l_msg_count := Fnd_Msg_Pub.count_msg;
4300:
4301: IF l_msg_count = 1 AND x_msg_data IS NULL

Line 4304: ( p_encoded => Fnd_Api.G_FALSE

4300:
4301: IF l_msg_count = 1 AND x_msg_data IS NULL
4302: THEN
4303: Pa_Interface_Utils_Pub.get_messages
4304: ( p_encoded => Fnd_Api.G_FALSE
4305: , p_msg_index => 1
4306: , p_msg_count => l_msg_count
4307: , p_msg_data => l_msg_data
4308: , p_data => l_data

Line 4316: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4312: END IF;
4313:
4314: -- 4537865 : End
4315: WHEN OTHERS THEN
4316: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4317: x_msg_count := 1 ; -- 4537865
4318: x_msg_data := SUBSTRB(SQLERRM,1,120); -- 4537865
4319: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
4320: p_procedure_name => 'ROLLUP_FUTURE_PROGRESS_PVT',

Line 4327: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

4323: END ROLLUP_FUTURE_PROGRESS_PVT;
4324:
4325: PROCEDURE program_rollup_pvt(
4326: p_api_version IN NUMBER :=1.0
4327: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4328: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4329: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4330: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4331: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 4328: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

4324:
4325: PROCEDURE program_rollup_pvt(
4326: p_api_version IN NUMBER :=1.0
4327: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4328: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4329: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4330: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4331: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4332: ,p_debug_mode IN VARCHAR2 :='N'

Line 4329: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

4325: PROCEDURE program_rollup_pvt(
4326: p_api_version IN NUMBER :=1.0
4327: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4328: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4329: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4330: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4331: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4332: ,p_debug_mode IN VARCHAR2 :='N'
4333: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 4330: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

4326: p_api_version IN NUMBER :=1.0
4327: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4328: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4329: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4330: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4331: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4332: ,p_debug_mode IN VARCHAR2 :='N'
4333: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
4334: ,p_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 4558: IF (p_commit = FND_API.G_TRUE) THEN

4554: IF g1_debug_mode = 'Y' THEN
4555: pa_debug.init_err_stack ('PA_PROGRESS_PVT.PROGRAM_ROLLUP_PVT');
4556: END IF;
4557:
4558: IF (p_commit = FND_API.G_TRUE) THEN
4559: savepoint PROGRAM_ROLLUP_PVT2;
4560: END IF;
4561:
4562: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 4562: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

4558: IF (p_commit = FND_API.G_TRUE) THEN
4559: savepoint PROGRAM_ROLLUP_PVT2;
4560: END IF;
4561:
4562: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
4563: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4564: END IF;
4565:
4566: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 4563: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4559: savepoint PROGRAM_ROLLUP_PVT2;
4560: END IF;
4561:
4562: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
4563: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4564: END IF;
4565:
4566: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
4567: FND_MSG_PUB.initialize;

Line 4566: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

4562: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
4563: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4564: END IF;
4565:
4566: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
4567: FND_MSG_PUB.initialize;
4568: END IF;
4569:
4570: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 4570: x_return_status := FND_API.G_RET_STS_SUCCESS;

4566: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
4567: FND_MSG_PUB.initialize;
4568: END IF;
4569:
4570: x_return_status := FND_API.G_RET_STS_SUCCESS;
4571:
4572: -- Get the parent task of the project.
4573:
4574: IF p_structure_type <> 'WORKPLAN' THEN

Line 4640: p_init_msg_list => FND_API.G_FALSE

4636: -- In this case, we will get wrong data for program. So we need to populate it here too..
4637:
4638: IF l_parent_as_of_date > p_as_of_date THEN
4639: pa_progress_pub.populate_pji_tab_for_plan(
4640: p_init_msg_list => FND_API.G_FALSE
4641: ,p_commit => FND_API.G_FALSE
4642: ,p_calling_module => l_calling_module
4643: ,p_project_id => l_c1rec.parent_project_id
4644: ,p_structure_version_id => l_c1rec.parent_structure_ver_id

Line 4641: ,p_commit => FND_API.G_FALSE

4637:
4638: IF l_parent_as_of_date > p_as_of_date THEN
4639: pa_progress_pub.populate_pji_tab_for_plan(
4640: p_init_msg_list => FND_API.G_FALSE
4641: ,p_commit => FND_API.G_FALSE
4642: ,p_calling_module => l_calling_module
4643: ,p_project_id => l_c1rec.parent_project_id
4644: ,p_structure_version_id => l_c1rec.parent_structure_ver_id
4645: ,p_baselined_str_ver_id => PA_PROJECT_STRUCTURE_UTILS.Get_Baseline_Struct_Ver(l_c1rec.parent_project_id)

Line 4655: RAISE FND_API.G_EXC_ERROR;

4651: ,x_msg_count => x_msg_count
4652: ,x_msg_data => x_msg_data);
4653:
4654: IF x_return_status <> 'S' THEN
4655: RAISE FND_API.G_EXC_ERROR;
4656: END IF;
4657: END IF;
4658:
4659: /* Bug 4392189 : Now Rollup API will take care of everything. No need to do anything here

Line 4702: RAISE FND_API.G_EXC_ERROR;

4698: WHEN OTHERS THEN
4699: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
4700: p_procedure_name => 'PROGRAM_ROLLUP_PVT',
4701: p_error_text => SUBSTRB('Call of PA_FP_WP_GEN_AMT_UTILS.GET_WP_VERSION_ID Failed: SQLERRM'||SQLERRM,1,120));
4702: RAISE FND_API.G_EXC_ERROR;
4703: END;
4704:
4705: IF g1_debug_mode = 'Y' THEN
4706: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.PROGRAM_ROLLUP_PVT', x_Msg => 'l_parent_plan_version_id='||l_parent_plan_version_id, x_Log_Level=> 3);

Line 4895: RAISE FND_API.G_EXC_ERROR;

4891: x_msg_count => x_msg_count,
4892: x_msg_data => x_msg_data);
4893:
4894: IF x_return_status <> 'S' THEN
4895: RAISE FND_API.G_EXC_ERROR;
4896: END IF;
4897: */
4898: /*
4899:

Line 5035: RAISE FND_API.G_EXC_ERROR;

5031: WHEN OTHERS THEN
5032: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
5033: p_procedure_name => 'PROGRAM_ROLLUP_PVT',
5034: p_error_text => SUBSTRB('Select from PJI_FM_XBS_ACCUM_TMP1 Failed: SQLERRM'||SQLERRM,1,120));
5035: RAISE FND_API.G_EXC_ERROR;
5036: END;
5037:
5038:
5039: IF g1_debug_mode = 'Y' THEN

Line 5177: RAISE FND_API.G_EXC_ERROR;

5173: );
5174:
5175: -- FPM Dev CR 6
5176: IF Fnd_Msg_Pub.count_msg > 0 THEN
5177: RAISE FND_API.G_EXC_ERROR;
5178: END IF;
5179: ELSE -- IF l_mode = 'U' THEN
5180: BEGIN
5181: SELECT 'X'

Line 5367: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

5363: ,x_return_status => l_return_status
5364: ,x_msg_count => l_msg_count
5365: ,x_msg_data => l_msg_data);
5366:
5367: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5368: x_msg_data := l_msg_data;
5369: x_return_status := 'E';
5370: x_msg_count := l_msg_count;
5371: RAISE FND_API.G_EXC_ERROR;

Line 5371: RAISE FND_API.G_EXC_ERROR;

5367: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5368: x_msg_data := l_msg_data;
5369: x_return_status := 'E';
5370: x_msg_count := l_msg_count;
5371: RAISE FND_API.G_EXC_ERROR;
5372: END IF;
5373:
5374: -- 4392189 : Added call of ROLLUP_FUTURE_PROGRESS_PVT
5375:

Line 5392: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

5388: ,x_msg_count => l_msg_count
5389: ,x_msg_data => l_msg_data
5390: );
5391:
5392: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5393: x_msg_data := l_msg_data;
5394: x_return_status := 'E';
5395: x_msg_count := l_msg_count;
5396: RAISE FND_API.G_EXC_ERROR;

Line 5396: RAISE FND_API.G_EXC_ERROR;

5392: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5393: x_msg_data := l_msg_data;
5394: x_return_status := 'E';
5395: x_msg_count := l_msg_count;
5396: RAISE FND_API.G_EXC_ERROR;
5397: END IF;
5398:
5399: -- END IF; -- IF (l_base_prcnt_comp_drv_code = 'COST' or l_base_prcnt_comp_drv_code = 'EFFORT')
5400: END IF; -- p_structure_type = 'WORKPLAN'

Line 5424: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

5420: IF g1_debug_mode = 'Y' THEN
5421: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.PROGRAM_ROLLUP_PVT', x_Msg => 'After Calling program_rollup_pvt recursively l_return_status='||l_return_status, x_Log_Level=> 3);
5422: END IF;
5423:
5424: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5425: x_msg_data := l_msg_data;
5426: x_return_status := 'E';
5427: x_msg_count := l_msg_count;
5428: RAISE FND_API.G_EXC_ERROR;

Line 5428: RAISE FND_API.G_EXC_ERROR;

5424: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5425: x_msg_data := l_msg_data;
5426: x_return_status := 'E';
5427: x_msg_count := l_msg_count;
5428: RAISE FND_API.G_EXC_ERROR;
5429: END IF;
5430: --end bug 4033869
5431: end if; ---4492493
5432: END LOOP;

Line 5435: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

5431: end if; ---4492493
5432: END LOOP;
5433: CLOSE C1;
5434:
5435: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5436: x_msg_data := l_msg_data;
5437: x_return_status := 'E';
5438: x_msg_count := l_msg_count;
5439: RAISE FND_API.G_EXC_ERROR;

Line 5439: RAISE FND_API.G_EXC_ERROR;

5435: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5436: x_msg_data := l_msg_data;
5437: x_return_status := 'E';
5438: x_msg_count := l_msg_count;
5439: RAISE FND_API.G_EXC_ERROR;
5440: END IF;
5441:
5442: IF (p_commit = FND_API.G_TRUE) THEN
5443: COMMIT;

Line 5442: IF (p_commit = FND_API.G_TRUE) THEN

5438: x_msg_count := l_msg_count;
5439: RAISE FND_API.G_EXC_ERROR;
5440: END IF;
5441:
5442: IF (p_commit = FND_API.G_TRUE) THEN
5443: COMMIT;
5444: END IF;
5445:
5446:

Line 5448: when FND_API.G_EXC_ERROR then

5444: END IF;
5445:
5446:
5447: EXCEPTION
5448: when FND_API.G_EXC_ERROR then
5449: if p_commit = FND_API.G_TRUE then
5450: rollback to PROGRAM_ROLLUP_PVT2;
5451: end if;
5452: x_return_status := FND_API.G_RET_STS_ERROR;

Line 5449: if p_commit = FND_API.G_TRUE then

5445:
5446:
5447: EXCEPTION
5448: when FND_API.G_EXC_ERROR then
5449: if p_commit = FND_API.G_TRUE then
5450: rollback to PROGRAM_ROLLUP_PVT2;
5451: end if;
5452: x_return_status := FND_API.G_RET_STS_ERROR;
5453: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 5452: x_return_status := FND_API.G_RET_STS_ERROR;

5448: when FND_API.G_EXC_ERROR then
5449: if p_commit = FND_API.G_TRUE then
5450: rollback to PROGRAM_ROLLUP_PVT2;
5451: end if;
5452: x_return_status := FND_API.G_RET_STS_ERROR;
5453: when FND_API.G_EXC_UNEXPECTED_ERROR then
5454: if p_commit = FND_API.G_TRUE then
5455: rollback to PROGRAM_ROLLUP_PVT2;
5456: end if;

Line 5453: when FND_API.G_EXC_UNEXPECTED_ERROR then

5449: if p_commit = FND_API.G_TRUE then
5450: rollback to PROGRAM_ROLLUP_PVT2;
5451: end if;
5452: x_return_status := FND_API.G_RET_STS_ERROR;
5453: when FND_API.G_EXC_UNEXPECTED_ERROR then
5454: if p_commit = FND_API.G_TRUE then
5455: rollback to PROGRAM_ROLLUP_PVT2;
5456: end if;
5457: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 5454: if p_commit = FND_API.G_TRUE then

5450: rollback to PROGRAM_ROLLUP_PVT2;
5451: end if;
5452: x_return_status := FND_API.G_RET_STS_ERROR;
5453: when FND_API.G_EXC_UNEXPECTED_ERROR then
5454: if p_commit = FND_API.G_TRUE then
5455: rollback to PROGRAM_ROLLUP_PVT2;
5456: end if;
5457: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5458: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 5457: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5453: when FND_API.G_EXC_UNEXPECTED_ERROR then
5454: if p_commit = FND_API.G_TRUE then
5455: rollback to PROGRAM_ROLLUP_PVT2;
5456: end if;
5457: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5458: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
5459: p_procedure_name => 'PROGRAM_ROLLUP_PVT',
5460: p_error_text => SUBSTRB(SQLERRM,1,120));
5461: when OTHERS then

Line 5462: if p_commit = FND_API.G_TRUE then

5458: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
5459: p_procedure_name => 'PROGRAM_ROLLUP_PVT',
5460: p_error_text => SUBSTRB(SQLERRM,1,120));
5461: when OTHERS then
5462: if p_commit = FND_API.G_TRUE then
5463: rollback to PROGRAM_ROLLUP_PVT2;
5464: end if;
5465: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5466: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 5465: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5461: when OTHERS then
5462: if p_commit = FND_API.G_TRUE then
5463: rollback to PROGRAM_ROLLUP_PVT2;
5464: end if;
5465: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5466: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
5467: p_procedure_name => 'PROGRAM_ROLLUP_PVT',
5468: p_error_text => SUBSTRB(SQLERRM,1,120));
5469: raise;

Line 5484: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false

5480: -- End of comments
5481:
5482: PROCEDURE ASGN_DLV_TO_TASK_ROLLUP_PVT(
5483: p_api_version IN NUMBER :=1.0
5484: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false
5485: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
5486: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
5487: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
5488: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 5485: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

5481:
5482: PROCEDURE ASGN_DLV_TO_TASK_ROLLUP_PVT(
5483: p_api_version IN NUMBER :=1.0
5484: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false
5485: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
5486: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
5487: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
5488: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
5489: ,p_debug_mode IN VARCHAR2 :='N'

Line 5486: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

5482: PROCEDURE ASGN_DLV_TO_TASK_ROLLUP_PVT(
5483: p_api_version IN NUMBER :=1.0
5484: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false
5485: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
5486: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
5487: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
5488: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
5489: ,p_debug_mode IN VARCHAR2 :='N'
5490: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 5487: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

5483: p_api_version IN NUMBER :=1.0
5484: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false
5485: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
5486: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
5487: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
5488: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
5489: ,p_debug_mode IN VARCHAR2 :='N'
5490: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
5491: ,p_project_id IN NUMBER

Line 6877: IF (p_commit = FND_API.G_TRUE) THEN

6873: IF p_structure_version_id IS NULL THEN
6874: return;
6875: END IF;
6876:
6877: IF (p_commit = FND_API.G_TRUE) THEN
6878: savepoint ASGN_DLV_TO_TASK_ROLLUP_PVT2;
6879: END IF;
6880:
6881: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 6881: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

6877: IF (p_commit = FND_API.G_TRUE) THEN
6878: savepoint ASGN_DLV_TO_TASK_ROLLUP_PVT2;
6879: END IF;
6880:
6881: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
6882: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6883: END IF;
6884:
6885: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 6882: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

6878: savepoint ASGN_DLV_TO_TASK_ROLLUP_PVT2;
6879: END IF;
6880:
6881: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
6882: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6883: END IF;
6884:
6885: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
6886: FND_MSG_PUB.initialize;

Line 6885: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

6881: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
6882: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6883: END IF;
6884:
6885: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
6886: FND_MSG_PUB.initialize;
6887: END IF;
6888:
6889: l_sharing_Enabled := PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(p_project_id);

Line 7866: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

7862: IF g1_debug_mode = 'Y' THEN
7863: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ASGN_DLV_TO_TASK_ROLLUP_PVT', x_Msg => 'After GENERATE_SCHEDULE', x_Log_Level=> 3);
7864: END IF;
7865:
7866: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7867: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
7868: p_msg_name => l_msg_data
7869: );
7870: x_msg_data := l_msg_data;

Line 7872: RAISE FND_API.G_EXC_ERROR;

7868: p_msg_name => l_msg_data
7869: );
7870: x_msg_data := l_msg_data;
7871: x_return_status := 'E';
7872: RAISE FND_API.G_EXC_ERROR;
7873: END IF;
7874:
7875: -- Updating the Rolled up Task Record
7876: IF g1_debug_mode = 'Y' THEN

Line 7951: RAISE FND_API.G_EXC_ERROR;

7947: p_msg_name => 'PA_FP_INVALID_DATE_RANGE');
7948: x_msg_data := 'PA_FP_INVALID_DATE_RANGE';
7949: x_return_status := 'E';
7950: x_msg_count := fnd_msg_pub.count_msg;
7951: RAISE FND_API.G_EXC_ERROR;
7952: END ;
7953:
7954: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.UPDATE_ASGN_DLV_TO_TASK_ROLLUP_PVT', x_Msg => 'After Getting Periods', x_Log_Level=> 3);
7955:

Line 8441: RAISE FND_API.G_EXC_ERROR;

8437: WHEN OTHERS THEN
8438: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
8439: p_procedure_name => 'ASGN_DLV_TO_TASK_ROLLUP_PVT',
8440: p_error_text => SUBSTRB('PJI_FM_XBS_ACCUM_TMP1:'||SQLERRM,1,120));
8441: RAISE FND_API.G_EXC_ERROR;
8442: END;
8443: */
8444: --Bug 3614828 End
8445:

Line 8650: RAISE FND_API.G_EXC_ERROR;

8646: ,X_SUBPRJ_EQPMT_ETC_RAWCOST_PC => l_cur_rollup_rec.SUBPRJ_EQPMT_ETC_RAWCOST_PC
8647: );
8648: -- FPM Dev CR 6
8649: IF Fnd_Msg_Pub.count_msg > 0 THEN
8650: RAISE FND_API.G_EXC_ERROR;
8651: END IF;
8652:
8653: --update progress_outdated_flag for summary tasks if there exists any ppc record
8654: --for the summary task

Line 8913: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

8909: X_MSG_DATA => l_msg_data
8910: );
8911:
8912:
8913: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8914: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
8915: p_msg_name => l_msg_data);
8916: x_msg_data := l_msg_data;
8917: x_return_status := 'E';

Line 8919: RAISE FND_API.G_EXC_ERROR;

8915: p_msg_name => l_msg_data);
8916: x_msg_data := l_msg_data;
8917: x_return_status := 'E';
8918: x_msg_count := l_msg_count;
8919: RAISE FND_API.G_EXC_ERROR;
8920: END IF;
8921: EXCEPTION
8922: WHEN OTHERS THEN
8923: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 8926: RAISE FND_API.G_EXC_ERROR;

8922: WHEN OTHERS THEN
8923: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
8924: p_procedure_name => 'update_ASGN_DLV_TO_TASK_ROLLUP_PVT',
8925: p_error_text => SUBSTRB('PA_FP_MAINTAIN_ACTUAL_PUB.MAINTAIN_ACTUAL_AMT_WRP:'||SQLERRM,1,120));
8926: RAISE FND_API.G_EXC_ERROR;
8927: END;
8928: END IF;*/
8929:
8930:

Line 8931: x_return_status := FND_API.G_RET_STS_SUCCESS;

8927: END;
8928: END IF;*/
8929:
8930:
8931: x_return_status := FND_API.G_RET_STS_SUCCESS;
8932:
8933: IF (p_commit = FND_API.G_TRUE) THEN
8934: COMMIT;
8935: END IF;

Line 8933: IF (p_commit = FND_API.G_TRUE) THEN

8929:
8930:
8931: x_return_status := FND_API.G_RET_STS_SUCCESS;
8932:
8933: IF (p_commit = FND_API.G_TRUE) THEN
8934: COMMIT;
8935: END IF;
8936:
8937: IF g1_debug_mode = 'Y' THEN

Line 8942: x_return_status := FND_API.G_RET_STS_SUCCESS;

8938: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.UPDATE_ASGN_DLV_TO_TASK_ROLLUP_PVT', x_Msg => 'PA_PROGRESS_PVT.ASGN_DLV_TO_TASK_ROLLUP_PVT End', x_Log_Level=> 3);
8939: END IF;
8940:
8941:
8942: x_return_status := FND_API.G_RET_STS_SUCCESS;
8943:
8944: IF (p_commit = FND_API.G_TRUE) THEN
8945: COMMIT;
8946: END IF;

Line 8944: IF (p_commit = FND_API.G_TRUE) THEN

8940:
8941:
8942: x_return_status := FND_API.G_RET_STS_SUCCESS;
8943:
8944: IF (p_commit = FND_API.G_TRUE) THEN
8945: COMMIT;
8946: END IF;
8947:
8948:

Line 8954: WHEN FND_API.G_EXC_ERROR THEN

8950: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ASGN_DLV_TO_TASK_ROLLUP_PVT', x_Msg => 'PA_PROGRESS_PVT.ASGN_DLV_TO_TASK_ROLLUP_PVT END', x_Log_Level=> 3);
8951: END IF;
8952:
8953: EXCEPTION
8954: WHEN FND_API.G_EXC_ERROR THEN
8955: IF p_commit = FND_API.G_TRUE THEN
8956: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
8957: END IF;
8958: x_return_status := FND_API.G_RET_STS_ERROR;

Line 8955: IF p_commit = FND_API.G_TRUE THEN

8951: END IF;
8952:
8953: EXCEPTION
8954: WHEN FND_API.G_EXC_ERROR THEN
8955: IF p_commit = FND_API.G_TRUE THEN
8956: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
8957: END IF;
8958: x_return_status := FND_API.G_RET_STS_ERROR;
8959: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 8958: x_return_status := FND_API.G_RET_STS_ERROR;

8954: WHEN FND_API.G_EXC_ERROR THEN
8955: IF p_commit = FND_API.G_TRUE THEN
8956: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
8957: END IF;
8958: x_return_status := FND_API.G_RET_STS_ERROR;
8959: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8960: IF p_commit = FND_API.G_TRUE THEN
8961: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
8962: END IF;

Line 8959: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

8955: IF p_commit = FND_API.G_TRUE THEN
8956: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
8957: END IF;
8958: x_return_status := FND_API.G_RET_STS_ERROR;
8959: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8960: IF p_commit = FND_API.G_TRUE THEN
8961: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
8962: END IF;
8963: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 8960: IF p_commit = FND_API.G_TRUE THEN

8956: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
8957: END IF;
8958: x_return_status := FND_API.G_RET_STS_ERROR;
8959: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8960: IF p_commit = FND_API.G_TRUE THEN
8961: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
8962: END IF;
8963: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8964: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 8963: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8959: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8960: IF p_commit = FND_API.G_TRUE THEN
8961: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
8962: END IF;
8963: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8964: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
8965: p_procedure_name => 'ASGN_DLV_TO_TASK_ROLLUP_PVT',
8966: p_error_text => SUBSTRB(SQLERRM,1,120));
8967: WHEN OTHERS THEN

Line 8968: IF p_commit = FND_API.G_TRUE THEN

8964: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
8965: p_procedure_name => 'ASGN_DLV_TO_TASK_ROLLUP_PVT',
8966: p_error_text => SUBSTRB(SQLERRM,1,120));
8967: WHEN OTHERS THEN
8968: IF p_commit = FND_API.G_TRUE THEN
8969: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
8970: END IF;
8971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8972: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 8971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8967: WHEN OTHERS THEN
8968: IF p_commit = FND_API.G_TRUE THEN
8969: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
8970: END IF;
8971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8972: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
8973: p_procedure_name => 'ASGN_DLV_TO_TASK_ROLLUP_PVT',
8974: p_error_text => SUBSTRB(SQLERRM,1,120));
8975: raise;

Line 8985: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false

8981:
8982: PROCEDURE convert_task_prog_to_assgn
8983: (
8984: p_api_version IN NUMBER :=1.0
8985: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false
8986: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
8987: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
8988: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
8989: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 8986: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

8982: PROCEDURE convert_task_prog_to_assgn
8983: (
8984: p_api_version IN NUMBER :=1.0
8985: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false
8986: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
8987: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
8988: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
8989: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
8990: ,p_debug_mode IN VARCHAR2 :='N'

Line 8987: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

8983: (
8984: p_api_version IN NUMBER :=1.0
8985: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false
8986: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
8987: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
8988: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
8989: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
8990: ,p_debug_mode IN VARCHAR2 :='N'
8991: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 8988: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

8984: p_api_version IN NUMBER :=1.0
8985: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false
8986: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
8987: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
8988: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
8989: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
8990: ,p_debug_mode IN VARCHAR2 :='N'
8991: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
8992: ,p_resource_list_mem_id IN NUMBER

Line 9139: IF (p_commit = FND_API.G_TRUE) THEN

9135: IF g1_debug_mode = 'Y' THEN
9136: pa_debug.init_err_stack ('PA_PROGRESS_PVT.convert_task_prog_to_assgn');
9137: END IF;
9138:
9139: IF (p_commit = FND_API.G_TRUE) THEN
9140: savepoint convert_task_prog_to_assgn;
9141: END IF;
9142:
9143: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 9143: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

9139: IF (p_commit = FND_API.G_TRUE) THEN
9140: savepoint convert_task_prog_to_assgn;
9141: END IF;
9142:
9143: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
9144: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9145: END IF;
9146:
9147: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 9144: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

9140: savepoint convert_task_prog_to_assgn;
9141: END IF;
9142:
9143: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
9144: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9145: END IF;
9146:
9147: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
9148: FND_MSG_PUB.initialize;

Line 9147: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

9143: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
9144: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9145: END IF;
9146:
9147: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
9148: FND_MSG_PUB.initialize;
9149: END IF;
9150:
9151: IF g1_debug_mode = 'Y' THEN

Line 9618: x_return_status := FND_API.G_RET_STS_SUCCESS;

9614: END IF;
9615:
9616: -- END IF;
9617:
9618: x_return_status := FND_API.G_RET_STS_SUCCESS;
9619:
9620: EXCEPTION
9621: WHEN FND_API.G_EXC_ERROR THEN
9622: IF p_commit = FND_API.G_TRUE THEN

Line 9621: WHEN FND_API.G_EXC_ERROR THEN

9617:
9618: x_return_status := FND_API.G_RET_STS_SUCCESS;
9619:
9620: EXCEPTION
9621: WHEN FND_API.G_EXC_ERROR THEN
9622: IF p_commit = FND_API.G_TRUE THEN
9623: rollback to convert_task_prog_to_assgn;
9624: END IF;
9625: x_return_status := FND_API.G_RET_STS_ERROR;

Line 9622: IF p_commit = FND_API.G_TRUE THEN

9618: x_return_status := FND_API.G_RET_STS_SUCCESS;
9619:
9620: EXCEPTION
9621: WHEN FND_API.G_EXC_ERROR THEN
9622: IF p_commit = FND_API.G_TRUE THEN
9623: rollback to convert_task_prog_to_assgn;
9624: END IF;
9625: x_return_status := FND_API.G_RET_STS_ERROR;
9626: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 9625: x_return_status := FND_API.G_RET_STS_ERROR;

9621: WHEN FND_API.G_EXC_ERROR THEN
9622: IF p_commit = FND_API.G_TRUE THEN
9623: rollback to convert_task_prog_to_assgn;
9624: END IF;
9625: x_return_status := FND_API.G_RET_STS_ERROR;
9626: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9627: IF p_commit = FND_API.G_TRUE THEN
9628: rollback to convert_task_prog_to_assgn;
9629: END IF;

Line 9626: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

9622: IF p_commit = FND_API.G_TRUE THEN
9623: rollback to convert_task_prog_to_assgn;
9624: END IF;
9625: x_return_status := FND_API.G_RET_STS_ERROR;
9626: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9627: IF p_commit = FND_API.G_TRUE THEN
9628: rollback to convert_task_prog_to_assgn;
9629: END IF;
9630: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 9627: IF p_commit = FND_API.G_TRUE THEN

9623: rollback to convert_task_prog_to_assgn;
9624: END IF;
9625: x_return_status := FND_API.G_RET_STS_ERROR;
9626: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9627: IF p_commit = FND_API.G_TRUE THEN
9628: rollback to convert_task_prog_to_assgn;
9629: END IF;
9630: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9631: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 9630: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

9626: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9627: IF p_commit = FND_API.G_TRUE THEN
9628: rollback to convert_task_prog_to_assgn;
9629: END IF;
9630: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9631: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
9632: p_procedure_name => 'convert_task_prog_to_assgn',
9633: p_error_text => SUBSTRB(SQLERRM,1,120));
9634: WHEN OTHERS THEN

Line 9635: IF p_commit = FND_API.G_TRUE THEN

9631: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
9632: p_procedure_name => 'convert_task_prog_to_assgn',
9633: p_error_text => SUBSTRB(SQLERRM,1,120));
9634: WHEN OTHERS THEN
9635: IF p_commit = FND_API.G_TRUE THEN
9636: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
9637: END IF;
9638: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9639: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 9638: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

9634: WHEN OTHERS THEN
9635: IF p_commit = FND_API.G_TRUE THEN
9636: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
9637: END IF;
9638: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9639: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
9640: p_procedure_name => 'convert_task_prog_to_assgn',
9641: p_error_text => SUBSTRB(SQLERRM,1,120));
9642: raise;

Line 9771: x_return_status := FND_API.G_RET_STS_SUCCESS;

9767: l_bv_id NUMBER;
9768: --end bug 4255329
9769: BEGIN
9770: x_msg_count := 0;
9771: x_return_status := FND_API.G_RET_STS_SUCCESS;
9772:
9773: l_debug_mode := NVL(FND_PROFILE.value_specific('PA_DEBUG_MODE',fnd_global.user_id,fnd_global.login_id,275,null,null), 'N');
9774:
9775: -- Set curr function

Line 10118: (p_encoded => FND_API.G_TRUE

10114: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
10115: l_msg_count := FND_MSG_PUB.count_msg;
10116: IF l_msg_count = 1 THEN
10117: PA_INTERFACE_UTILS_PUB.get_messages
10118: (p_encoded => FND_API.G_TRUE
10119: ,p_msg_index => 1
10120: ,p_msg_count => l_msg_count
10121: ,p_msg_data => l_msg_data
10122: ,p_data => l_data

Line 10131: x_return_status := FND_API.G_RET_STS_ERROR;

10127: ELSE
10128: x_msg_count := l_msg_count;
10129: END IF;
10130:
10131: x_return_status := FND_API.G_RET_STS_ERROR;
10132:
10133: IF l_debug_mode = 'Y' THEN
10134: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.copy_actuals_for_workplan', x_Msg => 'Invalid Arguments Passed Or called api raised an error', x_Log_Level=> 3);
10135: END IF;

Line 10142: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

10138: pa_debug.reset_curr_function();
10139:
10140: RETURN;
10141: WHEN Others THEN
10142: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10143: x_msg_count := 1;
10144: x_msg_data := SQLERRM;
10145:
10146: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fp_copy_from_pkg'

Line 10162: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

10158:
10159: -- Bug 4575855 : Added rollup_prog_from_subprojs
10160: PROCEDURE ROLLUP_PROG_FROM_SUBPROJS(
10161: p_api_version IN NUMBER :=1.0
10162: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10163: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10164: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10165: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10166: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

Line 10163: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE

10159: -- Bug 4575855 : Added rollup_prog_from_subprojs
10160: PROCEDURE ROLLUP_PROG_FROM_SUBPROJS(
10161: p_api_version IN NUMBER :=1.0
10162: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10163: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10164: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10165: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10166: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
10167: ,p_debug_mode IN VARCHAR2 :='N'

Line 10164: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE

10160: PROCEDURE ROLLUP_PROG_FROM_SUBPROJS(
10161: p_api_version IN NUMBER :=1.0
10162: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10163: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10164: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10165: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10166: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
10167: ,p_debug_mode IN VARCHAR2 :='N'
10168: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 10165: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL

10161: p_api_version IN NUMBER :=1.0
10162: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10163: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10164: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10165: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10166: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
10167: ,p_debug_mode IN VARCHAR2 :='N'
10168: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
10169: ,p_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 10235: IF (p_commit = FND_API.G_TRUE) THEN

10231: IF g1_debug_mode = 'Y' THEN
10232: pa_debug.init_err_stack ('PA_PROGRESS_PVT.ROLLUP_PROG_FROM_SUBPROJS');
10233: END IF;
10234:
10235: IF (p_commit = FND_API.G_TRUE) THEN
10236: savepoint rollup_prog_from_subprojs2;
10237: END IF;
10238:
10239: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

Line 10239: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

10235: IF (p_commit = FND_API.G_TRUE) THEN
10236: savepoint rollup_prog_from_subprojs2;
10237: END IF;
10238:
10239: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
10240: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10241: END IF;
10242:
10243: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 10240: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

10236: savepoint rollup_prog_from_subprojs2;
10237: END IF;
10238:
10239: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
10240: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10241: END IF;
10242:
10243: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
10244: FND_MSG_PUB.initialize;

Line 10243: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

10239: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
10240: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10241: END IF;
10242:
10243: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
10244: FND_MSG_PUB.initialize;
10245: END IF;
10246:
10247: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 10247: x_return_status := FND_API.G_RET_STS_SUCCESS;

10243: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
10244: FND_MSG_PUB.initialize;
10245: END IF;
10246:
10247: x_return_status := FND_API.G_RET_STS_SUCCESS;
10248:
10249: FOR rec_subprojs IN cur_select_grid LOOP
10250: IF g1_debug_mode = 'Y' THEN
10251: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PROG_FROM_SUBPROJS', x_Msg => 'rec_subprojs.project_id='||rec_subprojs.project_id, x_Log_Level=> 3);

Line 10258: p_init_msg_list => FND_API.G_FALSE

10254: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PROG_FROM_SUBPROJS', x_Msg => 'Calling populate_pji_tab_for_plan', x_Log_Level=> 3);
10255: END IF;
10256:
10257: pa_progress_pub.populate_pji_tab_for_plan(
10258: p_init_msg_list => FND_API.G_FALSE
10259: ,p_commit => FND_API.G_FALSE
10260: ,p_calling_module => p_calling_module
10261: ,p_project_id => rec_subprojs.project_id
10262: ,p_structure_version_id => rec_subprojs.element_version_id

Line 10259: ,p_commit => FND_API.G_FALSE

10255: END IF;
10256:
10257: pa_progress_pub.populate_pji_tab_for_plan(
10258: p_init_msg_list => FND_API.G_FALSE
10259: ,p_commit => FND_API.G_FALSE
10260: ,p_calling_module => p_calling_module
10261: ,p_project_id => rec_subprojs.project_id
10262: ,p_structure_version_id => rec_subprojs.element_version_id
10263: ,p_baselined_str_ver_id => PA_PROJECT_STRUCTURE_UTILS.Get_Baseline_Struct_Ver(rec_subprojs.project_id)

Line 10278: RAISE FND_API.G_EXC_ERROR;

10274: END IF;
10275:
10276:
10277: IF x_return_status <> 'S' THEN
10278: RAISE FND_API.G_EXC_ERROR;
10279: END IF;
10280:
10281: IF g1_debug_mode = 'Y' THEN
10282: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PROG_FROM_SUBPROJS', x_Msg => 'Calling program_rollup_pvt', x_Log_Level=> 3);

Line 10286: p_init_msg_list => FND_API.G_FALSE

10282: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PROG_FROM_SUBPROJS', x_Msg => 'Calling program_rollup_pvt', x_Log_Level=> 3);
10283: END IF;
10284:
10285: pa_progress_pvt.program_rollup_pvt(
10286: p_init_msg_list => FND_API.G_FALSE
10287: ,p_commit => FND_API.G_FALSE
10288: ,p_validate_only => FND_API.G_FALSE
10289: ,p_project_id => rec_subprojs.project_id
10290: ,p_as_of_date => rec_subprojs.as_of_date

Line 10287: ,p_commit => FND_API.G_FALSE

10283: END IF;
10284:
10285: pa_progress_pvt.program_rollup_pvt(
10286: p_init_msg_list => FND_API.G_FALSE
10287: ,p_commit => FND_API.G_FALSE
10288: ,p_validate_only => FND_API.G_FALSE
10289: ,p_project_id => rec_subprojs.project_id
10290: ,p_as_of_date => rec_subprojs.as_of_date
10291: ,p_structure_type => 'WORKPLAN'

Line 10288: ,p_validate_only => FND_API.G_FALSE

10284:
10285: pa_progress_pvt.program_rollup_pvt(
10286: p_init_msg_list => FND_API.G_FALSE
10287: ,p_commit => FND_API.G_FALSE
10288: ,p_validate_only => FND_API.G_FALSE
10289: ,p_project_id => rec_subprojs.project_id
10290: ,p_as_of_date => rec_subprojs.as_of_date
10291: ,p_structure_type => 'WORKPLAN'
10292: ,p_structure_ver_id => rec_subprojs.element_version_id

Line 10302: RAISE FND_API.G_EXC_ERROR;

10298: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PROG_FROM_SUBPROJS', x_Msg => 'After Calling program_rollup_pvt x_return_status='||x_return_status, x_Log_Level=> 3);
10299: END IF;
10300:
10301: IF x_return_status <> 'S' THEN
10302: RAISE FND_API.G_EXC_ERROR;
10303: END IF;
10304: END LOOP;
10305:
10306: IF (p_commit = FND_API.G_TRUE) THEN

Line 10306: IF (p_commit = FND_API.G_TRUE) THEN

10302: RAISE FND_API.G_EXC_ERROR;
10303: END IF;
10304: END LOOP;
10305:
10306: IF (p_commit = FND_API.G_TRUE) THEN
10307: COMMIT;
10308: END IF;
10309: EXCEPTION
10310: when FND_API.G_EXC_ERROR then

Line 10310: when FND_API.G_EXC_ERROR then

10306: IF (p_commit = FND_API.G_TRUE) THEN
10307: COMMIT;
10308: END IF;
10309: EXCEPTION
10310: when FND_API.G_EXC_ERROR then
10311: if p_commit = FND_API.G_TRUE then
10312: rollback to rollup_prog_from_subprojs2;
10313: end if;
10314: x_return_status := FND_API.G_RET_STS_ERROR;

Line 10311: if p_commit = FND_API.G_TRUE then

10307: COMMIT;
10308: END IF;
10309: EXCEPTION
10310: when FND_API.G_EXC_ERROR then
10311: if p_commit = FND_API.G_TRUE then
10312: rollback to rollup_prog_from_subprojs2;
10313: end if;
10314: x_return_status := FND_API.G_RET_STS_ERROR;
10315: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 10314: x_return_status := FND_API.G_RET_STS_ERROR;

10310: when FND_API.G_EXC_ERROR then
10311: if p_commit = FND_API.G_TRUE then
10312: rollback to rollup_prog_from_subprojs2;
10313: end if;
10314: x_return_status := FND_API.G_RET_STS_ERROR;
10315: when FND_API.G_EXC_UNEXPECTED_ERROR then
10316: if p_commit = FND_API.G_TRUE then
10317: rollback to rollup_prog_from_subprojs2;
10318: end if;

Line 10315: when FND_API.G_EXC_UNEXPECTED_ERROR then

10311: if p_commit = FND_API.G_TRUE then
10312: rollback to rollup_prog_from_subprojs2;
10313: end if;
10314: x_return_status := FND_API.G_RET_STS_ERROR;
10315: when FND_API.G_EXC_UNEXPECTED_ERROR then
10316: if p_commit = FND_API.G_TRUE then
10317: rollback to rollup_prog_from_subprojs2;
10318: end if;
10319: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 10316: if p_commit = FND_API.G_TRUE then

10312: rollback to rollup_prog_from_subprojs2;
10313: end if;
10314: x_return_status := FND_API.G_RET_STS_ERROR;
10315: when FND_API.G_EXC_UNEXPECTED_ERROR then
10316: if p_commit = FND_API.G_TRUE then
10317: rollback to rollup_prog_from_subprojs2;
10318: end if;
10319: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10320: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 10319: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

10315: when FND_API.G_EXC_UNEXPECTED_ERROR then
10316: if p_commit = FND_API.G_TRUE then
10317: rollback to rollup_prog_from_subprojs2;
10318: end if;
10319: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10320: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
10321: p_procedure_name => 'ROLLUP_PROG_FROM_SUBPROJS',
10322: p_error_text => SUBSTRB(SQLERRM,1,120));
10323: when OTHERS then

Line 10324: if p_commit = FND_API.G_TRUE then

10320: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
10321: p_procedure_name => 'ROLLUP_PROG_FROM_SUBPROJS',
10322: p_error_text => SUBSTRB(SQLERRM,1,120));
10323: when OTHERS then
10324: if p_commit = FND_API.G_TRUE then
10325: rollback to rollup_prog_from_subprojs2;
10326: end if;
10327: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10328: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 10327: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

10323: when OTHERS then
10324: if p_commit = FND_API.G_TRUE then
10325: rollback to rollup_prog_from_subprojs2;
10326: end if;
10327: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10328: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
10329: p_procedure_name => 'ROLLUP_PROG_FROM_SUBPROJS',
10330: p_error_text => SUBSTRB(SQLERRM,1,120));
10331: raise;

Line 10385: raise FND_API.G_EXC_ERROR;

10381: fetch new_str_version_id into l_str_ver_id;
10382: close new_str_version_id;
10383:
10384: if (l_str_ver_id is null) then
10385: raise FND_API.G_EXC_ERROR;
10386: end if;
10387:
10388: -- Begin bug 5452282
10389: open obj_version_id(l_str_ver_id);

Line 10418: when FND_API.G_EXC_ERROR then

10414: and object_version_id = l_old_element_version_id_tab(i);
10415: End if;
10416:
10417: exception
10418: when FND_API.G_EXC_ERROR then
10419: x_return_status := 'E';
10420: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
10421: p_procedure_name => 'UPD_PROG_RECS_STR_DELETE',
10422: p_error_text => 'This workplan structure cannot be deleted.');

Line 10425: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

10421: p_procedure_name => 'UPD_PROG_RECS_STR_DELETE',
10422: p_error_text => 'This workplan structure cannot be deleted.');
10423:
10424: when OTHERS then
10425: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10426: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
10427: p_procedure_name => 'UPD_PROG_RECS_STR_DELETE',
10428: p_error_text => SUBSTRB(SQLERRM,1,120));
10429: raise;