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 40: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE

36: -- 23-Jun-2009 rthumma Bug 6854114 : Changes done for 8 digit precision for physical percent complete.
37:
38: PROCEDURE ROLLUP_PROGRESS_PVT(
39: p_api_version IN NUMBER :=1.0
40: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
41: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
42: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
43: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
44: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

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

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

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

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

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

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

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

1474: --bug 4045979
1475: l_base_struct_ver_id := pa_project_structure_utils.get_baseline_struct_ver(p_project_id);
1476:
1477: --BUG 4355204, rtarway
1478: --IF (p_commit = FND_API.G_TRUE) THEN
1479: savepoint ROLLUP_PROGRESS_PVT2;
1480: --END IF;
1481:
1482: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

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

1478: --IF (p_commit = FND_API.G_TRUE) THEN
1479: savepoint ROLLUP_PROGRESS_PVT2;
1480: --END IF;
1481:
1482: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
1483: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1484: END IF;
1485:
1486: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 1483: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1479: savepoint ROLLUP_PROGRESS_PVT2;
1480: --END IF;
1481:
1482: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
1483: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1484: END IF;
1485:
1486: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
1487: FND_MSG_PUB.initialize;

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

1482: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
1483: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1484: END IF;
1485:
1486: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
1487: FND_MSG_PUB.initialize;
1488: END IF;
1489:
1490: l_sharing_Enabled := PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(p_project_id);

Line 2675: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2671: IF g1_debug_mode = 'Y' THEN
2672: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PROGRESS_PVT', x_Msg => 'After GENERATE_SCHEDULE', x_Log_Level=> 3);
2673: END IF;
2674:
2675: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2676: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
2677: p_msg_name => l_msg_data
2678: );
2679: x_msg_data := l_msg_data;

Line 2681: RAISE FND_API.G_EXC_ERROR;

2677: p_msg_name => l_msg_data
2678: );
2679: x_msg_data := l_msg_data;
2680: x_return_status := 'E';
2681: RAISE FND_API.G_EXC_ERROR;
2682: END IF;
2683:
2684:
2685: IF g1_debug_mode = 'Y' THEN

Line 2751: RAISE FND_API.G_EXC_ERROR;

2747: p_msg_name => 'PA_FP_INVALID_DATE_RANGE');
2748: x_msg_data := 'PA_FP_INVALID_DATE_RANGE';
2749: x_return_status := 'E';
2750: x_msg_count := fnd_msg_pub.count_msg;
2751: RAISE FND_API.G_EXC_ERROR;
2752: END ;
2753:
2754: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PROGRESS_PVT', x_Msg => 'After Getting Periods', x_Log_Level=> 3);
2755:

Line 3044: RAISE FND_API.G_EXC_ERROR;

3040: WHEN OTHERS THEN
3041: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
3042: p_procedure_name => 'ROLLUP_PROGRESS_PVT',
3043: p_error_text => SUBSTRB('Call of PJI_FM_XBS_ACCUM_TMP1 Failed:'||SQLERRM,1,120));
3044: RAISE FND_API.G_EXC_ERROR;
3045: END;
3046:
3047:
3048:

Line 3545: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3541: ,x_msg_count => x_msg_count
3542: ,x_msg_data => x_msg_data
3543: );
3544:
3545: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3546: raise FND_API.G_EXC_ERROR;
3547: END IF;
3548:
3549: END IF;

Line 3546: raise FND_API.G_EXC_ERROR;

3542: ,x_msg_data => x_msg_data
3543: );
3544:
3545: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3546: raise FND_API.G_EXC_ERROR;
3547: END IF;
3548:
3549: END IF;
3550: -- 5119716 End

Line 3951: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3947: ,x_return_status => x_return_status
3948: ,x_msg_count => x_msg_count
3949: ,x_msg_data => x_msg_data
3950: );
3951: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3952: RAISE FND_API.G_EXC_ERROR;
3953: END IF;
3954: l_last_as_of_date := cur_tree_rollup_rec.as_of_date;
3955: END IF;

Line 3952: RAISE FND_API.G_EXC_ERROR;

3948: ,x_msg_count => x_msg_count
3949: ,x_msg_data => x_msg_data
3950: );
3951: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3952: RAISE FND_API.G_EXC_ERROR;
3953: END IF;
3954: l_last_as_of_date := cur_tree_rollup_rec.as_of_date;
3955: END IF;
3956: -- Bug 4573257 End

Line 3986: raise FND_API.G_EXC_ERROR;

3982: 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);
3983: END IF;
3984:
3985: IF x_return_status <> 'S' THEN
3986: raise FND_API.G_EXC_ERROR;
3987: END IF;
3988: END LOOP;
3989: END IF; -- p_rollup_entire_wbs = 'Y'
3990:

Line 3995: x_return_status := FND_API.G_RET_STS_SUCCESS;

3991: DELETE from pa_proj_rollup_temp where process_number= l_process_number_temp;
3992:
3993:
3994:
3995: x_return_status := FND_API.G_RET_STS_SUCCESS;
3996:
3997: IF (p_commit = FND_API.G_TRUE) THEN
3998: COMMIT;
3999: END IF;

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

3993:
3994:
3995: x_return_status := FND_API.G_RET_STS_SUCCESS;
3996:
3997: IF (p_commit = FND_API.G_TRUE) THEN
3998: COMMIT;
3999: END IF;
4000:
4001:

Line 4007: WHEN FND_API.G_EXC_ERROR THEN

4003: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PROGRESS_PVT', x_Msg => 'PA_PROGRESS_PVT.ROLLUP_PROGRESS_PVT END', x_Log_Level=> 3);
4004: END IF;
4005:
4006: EXCEPTION
4007: WHEN FND_API.G_EXC_ERROR THEN
4008: --BUG 4355204
4009: --IF p_commit = FND_API.G_TRUE THEN
4010: rollback to ROLLUP_PROGRESS_PVT2;
4011: --END IF;

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

4005:
4006: EXCEPTION
4007: WHEN FND_API.G_EXC_ERROR THEN
4008: --BUG 4355204
4009: --IF p_commit = FND_API.G_TRUE THEN
4010: rollback to ROLLUP_PROGRESS_PVT2;
4011: --END IF;
4012: x_return_status := FND_API.G_RET_STS_ERROR;
4013: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 4012: x_return_status := FND_API.G_RET_STS_ERROR;

4008: --BUG 4355204
4009: --IF p_commit = FND_API.G_TRUE THEN
4010: rollback to ROLLUP_PROGRESS_PVT2;
4011: --END IF;
4012: x_return_status := FND_API.G_RET_STS_ERROR;
4013: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4014: --BUG 4355204
4015: --IF p_commit = FND_API.G_TRUE THEN
4016: rollback to ROLLUP_PROGRESS_PVT2;

Line 4013: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4009: --IF p_commit = FND_API.G_TRUE THEN
4010: rollback to ROLLUP_PROGRESS_PVT2;
4011: --END IF;
4012: x_return_status := FND_API.G_RET_STS_ERROR;
4013: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4014: --BUG 4355204
4015: --IF p_commit = FND_API.G_TRUE THEN
4016: rollback to ROLLUP_PROGRESS_PVT2;
4017: --END IF;

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

4011: --END IF;
4012: x_return_status := FND_API.G_RET_STS_ERROR;
4013: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4014: --BUG 4355204
4015: --IF p_commit = FND_API.G_TRUE THEN
4016: rollback to ROLLUP_PROGRESS_PVT2;
4017: --END IF;
4018: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4019: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 4018: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4014: --BUG 4355204
4015: --IF p_commit = FND_API.G_TRUE THEN
4016: rollback to ROLLUP_PROGRESS_PVT2;
4017: --END IF;
4018: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4019: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
4020: p_procedure_name => 'ROLLUP_PROGRESS_PVT',
4021: p_error_text => SUBSTRB(SQLERRM,1,120));
4022: WHEN OTHERS THEN

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

4020: p_procedure_name => 'ROLLUP_PROGRESS_PVT',
4021: p_error_text => SUBSTRB(SQLERRM,1,120));
4022: WHEN OTHERS THEN
4023: --BUG 4355204
4024: --IF p_commit = FND_API.G_TRUE THEN
4025: rollback to ROLLUP_PROGRESS_PVT2;
4026: --END IF;
4027: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4028: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 4027: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4023: --BUG 4355204
4024: --IF p_commit = FND_API.G_TRUE THEN
4025: rollback to ROLLUP_PROGRESS_PVT2;
4026: --END IF;
4027: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4028: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
4029: p_procedure_name => 'ROLLUP_PROGRESS_PVT',
4030: p_error_text => SUBSTRB(SQLERRM,1,120));
4031: raise;

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

4055: -- End of comments
4056:
4057: PROCEDURE UPDATE_ROLLUP_PROGRESS_PVT(
4058: p_api_version IN NUMBER :=1.0
4059: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4060: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4061: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4062: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4063: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

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

4056:
4057: PROCEDURE UPDATE_ROLLUP_PROGRESS_PVT(
4058: p_api_version IN NUMBER :=1.0
4059: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4060: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4061: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4062: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4063: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4064: ,p_calling_mode IN VARCHAR2 :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR -- Bug 4097710

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

4057: PROCEDURE UPDATE_ROLLUP_PROGRESS_PVT(
4058: p_api_version IN NUMBER :=1.0
4059: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4060: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4061: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4062: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4063: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4064: ,p_calling_mode IN VARCHAR2 :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR -- Bug 4097710
4065: ,p_debug_mode IN VARCHAR2 :='N'

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

4058: p_api_version IN NUMBER :=1.0
4059: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4060: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4061: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4062: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4063: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4064: ,p_calling_mode IN VARCHAR2 :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR -- Bug 4097710
4065: ,p_debug_mode IN VARCHAR2 :='N'
4066: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

Line 4100: x_return_status := FND_API.G_RET_STS_SUCCESS;

4096: l_login_id NUMBER := FND_GLOBAL.LOGIN_ID ;
4097:
4098: BEGIN
4099: -- Bug 4242787 : Commented update_rollup_progress_pvt, IT is merged into rollup_progress_pvt
4100: x_return_status := FND_API.G_RET_STS_SUCCESS;
4101: IF (p_commit = FND_API.G_TRUE) THEN
4102: COMMIT;
4103: END IF;
4104: EXCEPTION

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

4097:
4098: BEGIN
4099: -- Bug 4242787 : Commented update_rollup_progress_pvt, IT is merged into rollup_progress_pvt
4100: x_return_status := FND_API.G_RET_STS_SUCCESS;
4101: IF (p_commit = FND_API.G_TRUE) THEN
4102: COMMIT;
4103: END IF;
4104: EXCEPTION
4105: WHEN FND_API.G_EXC_ERROR THEN

Line 4105: WHEN FND_API.G_EXC_ERROR THEN

4101: IF (p_commit = FND_API.G_TRUE) THEN
4102: COMMIT;
4103: END IF;
4104: EXCEPTION
4105: WHEN FND_API.G_EXC_ERROR THEN
4106: IF g1_debug_mode = 'Y' THEN
4107: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_ERROR', x_Log_Level=> 3);
4108: END IF;
4109:

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

4103: END IF;
4104: EXCEPTION
4105: WHEN FND_API.G_EXC_ERROR THEN
4106: IF g1_debug_mode = 'Y' THEN
4107: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_ERROR', x_Log_Level=> 3);
4108: END IF;
4109:
4110: IF p_commit = FND_API.G_TRUE THEN
4111: rollback to UPDATE_ROLLUP_PROGRESS_PVT2;

Line 4110: IF p_commit = FND_API.G_TRUE THEN

4106: IF g1_debug_mode = 'Y' THEN
4107: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_ERROR', x_Log_Level=> 3);
4108: END IF;
4109:
4110: IF p_commit = FND_API.G_TRUE THEN
4111: rollback to UPDATE_ROLLUP_PROGRESS_PVT2;
4112: END IF;
4113: x_return_status := FND_API.G_RET_STS_ERROR;
4114: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 4113: x_return_status := FND_API.G_RET_STS_ERROR;

4109:
4110: IF p_commit = FND_API.G_TRUE THEN
4111: rollback to UPDATE_ROLLUP_PROGRESS_PVT2;
4112: END IF;
4113: x_return_status := FND_API.G_RET_STS_ERROR;
4114: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4115:
4116: IF g1_debug_mode = 'Y' THEN
4117: 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 4114: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4110: IF p_commit = FND_API.G_TRUE THEN
4111: rollback to UPDATE_ROLLUP_PROGRESS_PVT2;
4112: END IF;
4113: x_return_status := FND_API.G_RET_STS_ERROR;
4114: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4115:
4116: IF g1_debug_mode = 'Y' THEN
4117: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_UNEXPECTED_ERROR', x_Log_Level=> 3);
4118: END IF;

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

4113: x_return_status := FND_API.G_RET_STS_ERROR;
4114: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4115:
4116: IF g1_debug_mode = 'Y' THEN
4117: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_UNEXPECTED_ERROR', x_Log_Level=> 3);
4118: END IF;
4119:
4120: IF p_commit = FND_API.G_TRUE THEN
4121: rollback to UPDATE_ROLLUP_PROGRESS_PVT2;

Line 4120: IF p_commit = FND_API.G_TRUE THEN

4116: IF g1_debug_mode = 'Y' THEN
4117: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'FND_API.G_EXC_UNEXPECTED_ERROR', x_Log_Level=> 3);
4118: END IF;
4119:
4120: IF p_commit = FND_API.G_TRUE THEN
4121: rollback to UPDATE_ROLLUP_PROGRESS_PVT2;
4122: END IF;
4123: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4124: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 4123: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4119:
4120: IF p_commit = FND_API.G_TRUE THEN
4121: rollback to UPDATE_ROLLUP_PROGRESS_PVT2;
4122: END IF;
4123: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4124: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
4125: p_procedure_name => 'UPDATE_ROLLUP_PROGRESS_PVT',
4126: p_error_text => SUBSTRB(SQLERRM,1,120));
4127: WHEN OTHERS THEN

Line 4132: IF p_commit = FND_API.G_TRUE THEN

4128: IF g1_debug_mode = 'Y' THEN
4129: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.UPDATE_ROLLUP_PROGRESS_PVT', x_Msg => 'OTHERS = '||sqlerrm, x_Log_Level=> 3);
4130: END IF;
4131:
4132: IF p_commit = FND_API.G_TRUE THEN
4133: rollback to UPDATE_ROLLUP_PROGRESS_PVT2;
4134: END IF;
4135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4136: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 4135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4131:
4132: IF p_commit = FND_API.G_TRUE THEN
4133: rollback to UPDATE_ROLLUP_PROGRESS_PVT2;
4134: END IF;
4135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4136: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
4137: p_procedure_name => 'UPDATE_ROLLUP_PROGRESS_PVT',
4138: p_error_text => SUBSTRB(SQLERRM,1,120));
4139: raise;

Line 4291: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

4287: ,x_return_status => x_return_status
4288: ,x_msg_count => x_msg_count
4289: ,x_msg_data => x_msg_data
4290: );
4291: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4292: RAISE FND_API.G_EXC_ERROR;
4293: END IF;
4294: l_last_as_of_date := cur_tree_rollup_rec.as_of_date;
4295: END IF;

Line 4292: RAISE FND_API.G_EXC_ERROR;

4288: ,x_msg_count => x_msg_count
4289: ,x_msg_data => x_msg_data
4290: );
4291: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4292: RAISE FND_API.G_EXC_ERROR;
4293: END IF;
4294: l_last_as_of_date := cur_tree_rollup_rec.as_of_date;
4295: END IF;
4296: -- Bug 4573257 End

Line 4326: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

4322: ,x_msg_count => x_msg_count
4323: ,x_msg_data => x_msg_data);
4324:
4325: -- Start : 4537865
4326: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4327: RAISE FND_API.G_EXC_ERROR;
4328: END IF;
4329: -- End : 4537865
4330: end if;

Line 4327: RAISE FND_API.G_EXC_ERROR;

4323: ,x_msg_data => x_msg_data);
4324:
4325: -- Start : 4537865
4326: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4327: RAISE FND_API.G_EXC_ERROR;
4328: END IF;
4329: -- End : 4537865
4330: end if;
4331: end loop;

Line 4339: when FND_API.G_EXC_ERROR then

4335: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_FUTURE_PROGRESS_PVT', x_Msg => 'End ', x_Log_Level=> 3);
4336: END IF;
4337: EXCEPTION
4338: -- 4537865 : Start
4339: when FND_API.G_EXC_ERROR then
4340: x_return_status := FND_API.G_RET_STS_ERROR;
4341:
4342: l_msg_count := Fnd_Msg_Pub.count_msg;
4343:

Line 4340: x_return_status := FND_API.G_RET_STS_ERROR;

4336: END IF;
4337: EXCEPTION
4338: -- 4537865 : Start
4339: when FND_API.G_EXC_ERROR then
4340: x_return_status := FND_API.G_RET_STS_ERROR;
4341:
4342: l_msg_count := Fnd_Msg_Pub.count_msg;
4343:
4344: IF l_msg_count = 1 AND x_msg_data IS NULL

Line 4347: ( p_encoded => Fnd_Api.G_FALSE

4343:
4344: IF l_msg_count = 1 AND x_msg_data IS NULL
4345: THEN
4346: Pa_Interface_Utils_Pub.get_messages
4347: ( p_encoded => Fnd_Api.G_FALSE
4348: , p_msg_index => 1
4349: , p_msg_count => l_msg_count
4350: , p_msg_data => l_msg_data
4351: , p_data => l_data

Line 4359: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4355: END IF;
4356:
4357: -- 4537865 : End
4358: WHEN OTHERS THEN
4359: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4360: x_msg_count := 1 ; -- 4537865
4361: x_msg_data := SUBSTRB(SQLERRM,1,120); -- 4537865
4362: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
4363: p_procedure_name => 'ROLLUP_FUTURE_PROGRESS_PVT',

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

4366: END ROLLUP_FUTURE_PROGRESS_PVT;
4367:
4368: PROCEDURE program_rollup_pvt(
4369: p_api_version IN NUMBER :=1.0
4370: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4371: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4372: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4373: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4374: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

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

4367:
4368: PROCEDURE program_rollup_pvt(
4369: p_api_version IN NUMBER :=1.0
4370: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4371: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4372: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4373: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4374: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4375: ,p_debug_mode IN VARCHAR2 :='N'

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

4368: PROCEDURE program_rollup_pvt(
4369: p_api_version IN NUMBER :=1.0
4370: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4371: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4372: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4373: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4374: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4375: ,p_debug_mode IN VARCHAR2 :='N'
4376: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

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

4369: p_api_version IN NUMBER :=1.0
4370: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
4371: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
4372: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
4373: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
4374: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
4375: ,p_debug_mode IN VARCHAR2 :='N'
4376: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
4377: ,p_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

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

4607: IF g1_debug_mode = 'Y' THEN
4608: pa_debug.init_err_stack ('PA_PROGRESS_PVT.PROGRAM_ROLLUP_PVT');
4609: END IF;
4610:
4611: IF (p_commit = FND_API.G_TRUE) THEN
4612: savepoint PROGRAM_ROLLUP_PVT2;
4613: END IF;
4614:
4615: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

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

4611: IF (p_commit = FND_API.G_TRUE) THEN
4612: savepoint PROGRAM_ROLLUP_PVT2;
4613: END IF;
4614:
4615: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
4616: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4617: END IF;
4618:
4619: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 4616: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4612: savepoint PROGRAM_ROLLUP_PVT2;
4613: END IF;
4614:
4615: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
4616: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4617: END IF;
4618:
4619: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
4620: FND_MSG_PUB.initialize;

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

4615: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
4616: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4617: END IF;
4618:
4619: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
4620: FND_MSG_PUB.initialize;
4621: END IF;
4622:
4623: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 4623: x_return_status := FND_API.G_RET_STS_SUCCESS;

4619: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
4620: FND_MSG_PUB.initialize;
4621: END IF;
4622:
4623: x_return_status := FND_API.G_RET_STS_SUCCESS;
4624:
4625: -- Get the parent task of the project.
4626:
4627: IF p_structure_type <> 'WORKPLAN' THEN

Line 4706: p_init_msg_list => FND_API.G_FALSE

4702: -- In this case, we will get wrong data for program. So we need to populate it here too..
4703:
4704: IF l_parent_as_of_date > p_as_of_date THEN
4705: pa_progress_pub.populate_pji_tab_for_plan(
4706: p_init_msg_list => FND_API.G_FALSE
4707: ,p_commit => FND_API.G_FALSE
4708: ,p_calling_module => l_calling_module
4709: ,p_project_id => l_c1rec.parent_project_id
4710: ,p_structure_version_id => l_c1rec.parent_structure_ver_id

Line 4707: ,p_commit => FND_API.G_FALSE

4703:
4704: IF l_parent_as_of_date > p_as_of_date THEN
4705: pa_progress_pub.populate_pji_tab_for_plan(
4706: p_init_msg_list => FND_API.G_FALSE
4707: ,p_commit => FND_API.G_FALSE
4708: ,p_calling_module => l_calling_module
4709: ,p_project_id => l_c1rec.parent_project_id
4710: ,p_structure_version_id => l_c1rec.parent_structure_ver_id
4711: ,p_baselined_str_ver_id => PA_PROJECT_STRUCTURE_UTILS.Get_Baseline_Struct_Ver(l_c1rec.parent_project_id)

Line 4721: RAISE FND_API.G_EXC_ERROR;

4717: ,x_msg_count => x_msg_count
4718: ,x_msg_data => x_msg_data);
4719:
4720: IF x_return_status <> 'S' THEN
4721: RAISE FND_API.G_EXC_ERROR;
4722: END IF;
4723: END IF;
4724:
4725: /* Bug 4392189 : Now Rollup API will take care of everything. No need to do anything here

Line 4768: RAISE FND_API.G_EXC_ERROR;

4764: WHEN OTHERS THEN
4765: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
4766: p_procedure_name => 'PROGRAM_ROLLUP_PVT',
4767: p_error_text => SUBSTRB('Call of PA_FP_WP_GEN_AMT_UTILS.GET_WP_VERSION_ID Failed: SQLERRM'||SQLERRM,1,120));
4768: RAISE FND_API.G_EXC_ERROR;
4769: END;
4770:
4771: IF g1_debug_mode = 'Y' THEN
4772: 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 4961: RAISE FND_API.G_EXC_ERROR;

4957: x_msg_count => x_msg_count,
4958: x_msg_data => x_msg_data);
4959:
4960: IF x_return_status <> 'S' THEN
4961: RAISE FND_API.G_EXC_ERROR;
4962: END IF;
4963: */
4964: /*
4965:

Line 5101: RAISE FND_API.G_EXC_ERROR;

5097: WHEN OTHERS THEN
5098: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
5099: p_procedure_name => 'PROGRAM_ROLLUP_PVT',
5100: p_error_text => SUBSTRB('Select from PJI_FM_XBS_ACCUM_TMP1 Failed: SQLERRM'||SQLERRM,1,120));
5101: RAISE FND_API.G_EXC_ERROR;
5102: END;
5103:
5104:
5105: IF g1_debug_mode = 'Y' THEN

Line 5243: RAISE FND_API.G_EXC_ERROR;

5239: );
5240:
5241: -- FPM Dev CR 6
5242: IF Fnd_Msg_Pub.count_msg > 0 THEN
5243: RAISE FND_API.G_EXC_ERROR;
5244: END IF;
5245: ELSE -- IF l_mode = 'U' THEN
5246: BEGIN
5247: SELECT 'X'

Line 5433: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

5429: ,x_return_status => l_return_status
5430: ,x_msg_count => l_msg_count
5431: ,x_msg_data => l_msg_data);
5432:
5433: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5434: x_msg_data := l_msg_data;
5435: x_return_status := 'E';
5436: x_msg_count := l_msg_count;
5437: RAISE FND_API.G_EXC_ERROR;

Line 5437: RAISE FND_API.G_EXC_ERROR;

5433: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5434: x_msg_data := l_msg_data;
5435: x_return_status := 'E';
5436: x_msg_count := l_msg_count;
5437: RAISE FND_API.G_EXC_ERROR;
5438: END IF;
5439:
5440: -- 4392189 : Added call of ROLLUP_FUTURE_PROGRESS_PVT
5441:

Line 5458: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

5454: ,x_msg_count => l_msg_count
5455: ,x_msg_data => l_msg_data
5456: );
5457:
5458: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5459: x_msg_data := l_msg_data;
5460: x_return_status := 'E';
5461: x_msg_count := l_msg_count;
5462: RAISE FND_API.G_EXC_ERROR;

Line 5462: RAISE FND_API.G_EXC_ERROR;

5458: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5459: x_msg_data := l_msg_data;
5460: x_return_status := 'E';
5461: x_msg_count := l_msg_count;
5462: RAISE FND_API.G_EXC_ERROR;
5463: END IF;
5464:
5465: -- END IF; -- IF (l_base_prcnt_comp_drv_code = 'COST' or l_base_prcnt_comp_drv_code = 'EFFORT')
5466: END IF; -- p_structure_type = 'WORKPLAN'

Line 5490: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

5486: IF g1_debug_mode = 'Y' THEN
5487: 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);
5488: END IF;
5489:
5490: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5491: x_msg_data := l_msg_data;
5492: x_return_status := 'E';
5493: x_msg_count := l_msg_count;
5494: RAISE FND_API.G_EXC_ERROR;

Line 5494: RAISE FND_API.G_EXC_ERROR;

5490: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5491: x_msg_data := l_msg_data;
5492: x_return_status := 'E';
5493: x_msg_count := l_msg_count;
5494: RAISE FND_API.G_EXC_ERROR;
5495: END IF;
5496: --end bug 4033869
5497: end if; ---4492493
5498: END LOOP;

Line 5501: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

5497: end if; ---4492493
5498: END LOOP;
5499: CLOSE C1;
5500:
5501: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5502: x_msg_data := l_msg_data;
5503: x_return_status := 'E';
5504: x_msg_count := l_msg_count;
5505: RAISE FND_API.G_EXC_ERROR;

Line 5505: RAISE FND_API.G_EXC_ERROR;

5501: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5502: x_msg_data := l_msg_data;
5503: x_return_status := 'E';
5504: x_msg_count := l_msg_count;
5505: RAISE FND_API.G_EXC_ERROR;
5506: END IF;
5507:
5508: IF (p_commit = FND_API.G_TRUE) THEN
5509: COMMIT;

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

5504: x_msg_count := l_msg_count;
5505: RAISE FND_API.G_EXC_ERROR;
5506: END IF;
5507:
5508: IF (p_commit = FND_API.G_TRUE) THEN
5509: COMMIT;
5510: END IF;
5511:
5512:

Line 5514: when FND_API.G_EXC_ERROR then

5510: END IF;
5511:
5512:
5513: EXCEPTION
5514: when FND_API.G_EXC_ERROR then
5515: if p_commit = FND_API.G_TRUE then
5516: rollback to PROGRAM_ROLLUP_PVT2;
5517: end if;
5518: x_return_status := FND_API.G_RET_STS_ERROR;

Line 5515: if p_commit = FND_API.G_TRUE then

5511:
5512:
5513: EXCEPTION
5514: when FND_API.G_EXC_ERROR then
5515: if p_commit = FND_API.G_TRUE then
5516: rollback to PROGRAM_ROLLUP_PVT2;
5517: end if;
5518: x_return_status := FND_API.G_RET_STS_ERROR;
5519: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 5518: x_return_status := FND_API.G_RET_STS_ERROR;

5514: when FND_API.G_EXC_ERROR then
5515: if p_commit = FND_API.G_TRUE then
5516: rollback to PROGRAM_ROLLUP_PVT2;
5517: end if;
5518: x_return_status := FND_API.G_RET_STS_ERROR;
5519: when FND_API.G_EXC_UNEXPECTED_ERROR then
5520: if p_commit = FND_API.G_TRUE then
5521: rollback to PROGRAM_ROLLUP_PVT2;
5522: end if;

Line 5519: when FND_API.G_EXC_UNEXPECTED_ERROR then

5515: if p_commit = FND_API.G_TRUE then
5516: rollback to PROGRAM_ROLLUP_PVT2;
5517: end if;
5518: x_return_status := FND_API.G_RET_STS_ERROR;
5519: when FND_API.G_EXC_UNEXPECTED_ERROR then
5520: if p_commit = FND_API.G_TRUE then
5521: rollback to PROGRAM_ROLLUP_PVT2;
5522: end if;
5523: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 5520: if p_commit = FND_API.G_TRUE then

5516: rollback to PROGRAM_ROLLUP_PVT2;
5517: end if;
5518: x_return_status := FND_API.G_RET_STS_ERROR;
5519: when FND_API.G_EXC_UNEXPECTED_ERROR then
5520: if p_commit = FND_API.G_TRUE then
5521: rollback to PROGRAM_ROLLUP_PVT2;
5522: end if;
5523: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5524: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 5523: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5519: when FND_API.G_EXC_UNEXPECTED_ERROR then
5520: if p_commit = FND_API.G_TRUE then
5521: rollback to PROGRAM_ROLLUP_PVT2;
5522: end if;
5523: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5524: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
5525: p_procedure_name => 'PROGRAM_ROLLUP_PVT',
5526: p_error_text => SUBSTRB(SQLERRM,1,120));
5527: when OTHERS then

Line 5528: if p_commit = FND_API.G_TRUE then

5524: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
5525: p_procedure_name => 'PROGRAM_ROLLUP_PVT',
5526: p_error_text => SUBSTRB(SQLERRM,1,120));
5527: when OTHERS then
5528: if p_commit = FND_API.G_TRUE then
5529: rollback to PROGRAM_ROLLUP_PVT2;
5530: end if;
5531: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5532: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 5531: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5527: when OTHERS then
5528: if p_commit = FND_API.G_TRUE then
5529: rollback to PROGRAM_ROLLUP_PVT2;
5530: end if;
5531: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5532: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
5533: p_procedure_name => 'PROGRAM_ROLLUP_PVT',
5534: p_error_text => SUBSTRB(SQLERRM,1,120));
5535: raise;

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

5546: -- End of comments
5547:
5548: PROCEDURE ASGN_DLV_TO_TASK_ROLLUP_PVT(
5549: p_api_version IN NUMBER :=1.0
5550: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false
5551: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
5552: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
5553: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
5554: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

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

5547:
5548: PROCEDURE ASGN_DLV_TO_TASK_ROLLUP_PVT(
5549: p_api_version IN NUMBER :=1.0
5550: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false
5551: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
5552: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
5553: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
5554: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
5555: ,p_debug_mode IN VARCHAR2 :='N'

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

5548: PROCEDURE ASGN_DLV_TO_TASK_ROLLUP_PVT(
5549: p_api_version IN NUMBER :=1.0
5550: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false
5551: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
5552: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
5553: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
5554: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
5555: ,p_debug_mode IN VARCHAR2 :='N'
5556: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

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

5549: p_api_version IN NUMBER :=1.0
5550: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false
5551: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
5552: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
5553: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
5554: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
5555: ,p_debug_mode IN VARCHAR2 :='N'
5556: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
5557: ,p_project_id IN NUMBER

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

6939: IF p_structure_version_id IS NULL THEN
6940: return;
6941: END IF;
6942:
6943: IF (p_commit = FND_API.G_TRUE) THEN
6944: savepoint ASGN_DLV_TO_TASK_ROLLUP_PVT2;
6945: END IF;
6946:
6947: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

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

6943: IF (p_commit = FND_API.G_TRUE) THEN
6944: savepoint ASGN_DLV_TO_TASK_ROLLUP_PVT2;
6945: END IF;
6946:
6947: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
6948: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6949: END IF;
6950:
6951: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 6948: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

6944: savepoint ASGN_DLV_TO_TASK_ROLLUP_PVT2;
6945: END IF;
6946:
6947: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
6948: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6949: END IF;
6950:
6951: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
6952: FND_MSG_PUB.initialize;

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

6947: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
6948: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6949: END IF;
6950:
6951: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
6952: FND_MSG_PUB.initialize;
6953: END IF;
6954:
6955: l_sharing_Enabled := PA_PROJECT_STRUCTURE_UTILS.check_sharing_enabled(p_project_id);

Line 7932: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

7928: IF g1_debug_mode = 'Y' THEN
7929: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ASGN_DLV_TO_TASK_ROLLUP_PVT', x_Msg => 'After GENERATE_SCHEDULE', x_Log_Level=> 3);
7930: END IF;
7931:
7932: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7933: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
7934: p_msg_name => l_msg_data
7935: );
7936: x_msg_data := l_msg_data;

Line 7938: RAISE FND_API.G_EXC_ERROR;

7934: p_msg_name => l_msg_data
7935: );
7936: x_msg_data := l_msg_data;
7937: x_return_status := 'E';
7938: RAISE FND_API.G_EXC_ERROR;
7939: END IF;
7940:
7941: -- Updating the Rolled up Task Record
7942: IF g1_debug_mode = 'Y' THEN

Line 8017: RAISE FND_API.G_EXC_ERROR;

8013: p_msg_name => 'PA_FP_INVALID_DATE_RANGE');
8014: x_msg_data := 'PA_FP_INVALID_DATE_RANGE';
8015: x_return_status := 'E';
8016: x_msg_count := fnd_msg_pub.count_msg;
8017: RAISE FND_API.G_EXC_ERROR;
8018: END ;
8019:
8020: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.UPDATE_ASGN_DLV_TO_TASK_ROLLUP_PVT', x_Msg => 'After Getting Periods', x_Log_Level=> 3);
8021:

Line 8507: RAISE FND_API.G_EXC_ERROR;

8503: WHEN OTHERS THEN
8504: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
8505: p_procedure_name => 'ASGN_DLV_TO_TASK_ROLLUP_PVT',
8506: p_error_text => SUBSTRB('PJI_FM_XBS_ACCUM_TMP1:'||SQLERRM,1,120));
8507: RAISE FND_API.G_EXC_ERROR;
8508: END;
8509: */
8510: --Bug 3614828 End
8511:

Line 8716: RAISE FND_API.G_EXC_ERROR;

8712: ,X_SUBPRJ_EQPMT_ETC_RAWCOST_PC => l_cur_rollup_rec.SUBPRJ_EQPMT_ETC_RAWCOST_PC
8713: );
8714: -- FPM Dev CR 6
8715: IF Fnd_Msg_Pub.count_msg > 0 THEN
8716: RAISE FND_API.G_EXC_ERROR;
8717: END IF;
8718:
8719: --update progress_outdated_flag for summary tasks if there exists any ppc record
8720: --for the summary task

Line 8979: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

8975: X_MSG_DATA => l_msg_data
8976: );
8977:
8978:
8979: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8980: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
8981: p_msg_name => l_msg_data);
8982: x_msg_data := l_msg_data;
8983: x_return_status := 'E';

Line 8985: RAISE FND_API.G_EXC_ERROR;

8981: p_msg_name => l_msg_data);
8982: x_msg_data := l_msg_data;
8983: x_return_status := 'E';
8984: x_msg_count := l_msg_count;
8985: RAISE FND_API.G_EXC_ERROR;
8986: END IF;
8987: EXCEPTION
8988: WHEN OTHERS THEN
8989: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 8992: RAISE FND_API.G_EXC_ERROR;

8988: WHEN OTHERS THEN
8989: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
8990: p_procedure_name => 'update_ASGN_DLV_TO_TASK_ROLLUP_PVT',
8991: p_error_text => SUBSTRB('PA_FP_MAINTAIN_ACTUAL_PUB.MAINTAIN_ACTUAL_AMT_WRP:'||SQLERRM,1,120));
8992: RAISE FND_API.G_EXC_ERROR;
8993: END;
8994: END IF;*/
8995:
8996:

Line 8997: x_return_status := FND_API.G_RET_STS_SUCCESS;

8993: END;
8994: END IF;*/
8995:
8996:
8997: x_return_status := FND_API.G_RET_STS_SUCCESS;
8998:
8999: IF (p_commit = FND_API.G_TRUE) THEN
9000: COMMIT;
9001: END IF;

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

8995:
8996:
8997: x_return_status := FND_API.G_RET_STS_SUCCESS;
8998:
8999: IF (p_commit = FND_API.G_TRUE) THEN
9000: COMMIT;
9001: END IF;
9002:
9003: IF g1_debug_mode = 'Y' THEN

Line 9008: x_return_status := FND_API.G_RET_STS_SUCCESS;

9004: 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);
9005: END IF;
9006:
9007:
9008: x_return_status := FND_API.G_RET_STS_SUCCESS;
9009:
9010: IF (p_commit = FND_API.G_TRUE) THEN
9011: COMMIT;
9012: END IF;

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

9006:
9007:
9008: x_return_status := FND_API.G_RET_STS_SUCCESS;
9009:
9010: IF (p_commit = FND_API.G_TRUE) THEN
9011: COMMIT;
9012: END IF;
9013:
9014:

Line 9020: WHEN FND_API.G_EXC_ERROR THEN

9016: 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);
9017: END IF;
9018:
9019: EXCEPTION
9020: WHEN FND_API.G_EXC_ERROR THEN
9021: IF p_commit = FND_API.G_TRUE THEN
9022: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
9023: END IF;
9024: x_return_status := FND_API.G_RET_STS_ERROR;

Line 9021: IF p_commit = FND_API.G_TRUE THEN

9017: END IF;
9018:
9019: EXCEPTION
9020: WHEN FND_API.G_EXC_ERROR THEN
9021: IF p_commit = FND_API.G_TRUE THEN
9022: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
9023: END IF;
9024: x_return_status := FND_API.G_RET_STS_ERROR;
9025: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 9024: x_return_status := FND_API.G_RET_STS_ERROR;

9020: WHEN FND_API.G_EXC_ERROR THEN
9021: IF p_commit = FND_API.G_TRUE THEN
9022: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
9023: END IF;
9024: x_return_status := FND_API.G_RET_STS_ERROR;
9025: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9026: IF p_commit = FND_API.G_TRUE THEN
9027: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
9028: END IF;

Line 9025: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

9021: IF p_commit = FND_API.G_TRUE THEN
9022: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
9023: END IF;
9024: x_return_status := FND_API.G_RET_STS_ERROR;
9025: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9026: IF p_commit = FND_API.G_TRUE THEN
9027: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
9028: END IF;
9029: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 9026: IF p_commit = FND_API.G_TRUE THEN

9022: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
9023: END IF;
9024: x_return_status := FND_API.G_RET_STS_ERROR;
9025: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9026: IF p_commit = FND_API.G_TRUE THEN
9027: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
9028: END IF;
9029: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9030: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 9029: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

9025: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9026: IF p_commit = FND_API.G_TRUE THEN
9027: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
9028: END IF;
9029: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9030: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
9031: p_procedure_name => 'ASGN_DLV_TO_TASK_ROLLUP_PVT',
9032: p_error_text => SUBSTRB(SQLERRM,1,120));
9033: WHEN OTHERS THEN

Line 9034: IF p_commit = FND_API.G_TRUE THEN

9030: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
9031: p_procedure_name => 'ASGN_DLV_TO_TASK_ROLLUP_PVT',
9032: p_error_text => SUBSTRB(SQLERRM,1,120));
9033: WHEN OTHERS THEN
9034: IF p_commit = FND_API.G_TRUE THEN
9035: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
9036: END IF;
9037: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9038: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 9037: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

9033: WHEN OTHERS THEN
9034: IF p_commit = FND_API.G_TRUE THEN
9035: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
9036: END IF;
9037: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9038: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
9039: p_procedure_name => 'ASGN_DLV_TO_TASK_ROLLUP_PVT',
9040: p_error_text => SUBSTRB(SQLERRM,1,120));
9041: raise;

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

9047:
9048: PROCEDURE convert_task_prog_to_assgn
9049: (
9050: p_api_version IN NUMBER :=1.0
9051: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false
9052: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
9053: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
9054: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
9055: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

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

9048: PROCEDURE convert_task_prog_to_assgn
9049: (
9050: p_api_version IN NUMBER :=1.0
9051: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false
9052: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
9053: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
9054: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
9055: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
9056: ,p_debug_mode IN VARCHAR2 :='N'

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

9049: (
9050: p_api_version IN NUMBER :=1.0
9051: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false
9052: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
9053: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
9054: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
9055: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
9056: ,p_debug_mode IN VARCHAR2 :='N'
9057: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

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

9050: p_api_version IN NUMBER :=1.0
9051: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_FALSE -- Since it is a private API so false
9052: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
9053: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
9054: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
9055: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
9056: ,p_debug_mode IN VARCHAR2 :='N'
9057: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
9058: ,p_resource_list_mem_id IN NUMBER

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

9201: IF g1_debug_mode = 'Y' THEN
9202: pa_debug.init_err_stack ('PA_PROGRESS_PVT.convert_task_prog_to_assgn');
9203: END IF;
9204:
9205: IF (p_commit = FND_API.G_TRUE) THEN
9206: savepoint convert_task_prog_to_assgn;
9207: END IF;
9208:
9209: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

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

9205: IF (p_commit = FND_API.G_TRUE) THEN
9206: savepoint convert_task_prog_to_assgn;
9207: END IF;
9208:
9209: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
9210: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9211: END IF;
9212:
9213: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 9210: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

9206: savepoint convert_task_prog_to_assgn;
9207: END IF;
9208:
9209: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
9210: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9211: END IF;
9212:
9213: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
9214: FND_MSG_PUB.initialize;

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

9209: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
9210: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9211: END IF;
9212:
9213: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
9214: FND_MSG_PUB.initialize;
9215: END IF;
9216:
9217: IF g1_debug_mode = 'Y' THEN

Line 9684: x_return_status := FND_API.G_RET_STS_SUCCESS;

9680: END IF;
9681:
9682: -- END IF;
9683:
9684: x_return_status := FND_API.G_RET_STS_SUCCESS;
9685:
9686: EXCEPTION
9687: WHEN FND_API.G_EXC_ERROR THEN
9688: IF p_commit = FND_API.G_TRUE THEN

Line 9687: WHEN FND_API.G_EXC_ERROR THEN

9683:
9684: x_return_status := FND_API.G_RET_STS_SUCCESS;
9685:
9686: EXCEPTION
9687: WHEN FND_API.G_EXC_ERROR THEN
9688: IF p_commit = FND_API.G_TRUE THEN
9689: rollback to convert_task_prog_to_assgn;
9690: END IF;
9691: x_return_status := FND_API.G_RET_STS_ERROR;

Line 9688: IF p_commit = FND_API.G_TRUE THEN

9684: x_return_status := FND_API.G_RET_STS_SUCCESS;
9685:
9686: EXCEPTION
9687: WHEN FND_API.G_EXC_ERROR THEN
9688: IF p_commit = FND_API.G_TRUE THEN
9689: rollback to convert_task_prog_to_assgn;
9690: END IF;
9691: x_return_status := FND_API.G_RET_STS_ERROR;
9692: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 9691: x_return_status := FND_API.G_RET_STS_ERROR;

9687: WHEN FND_API.G_EXC_ERROR THEN
9688: IF p_commit = FND_API.G_TRUE THEN
9689: rollback to convert_task_prog_to_assgn;
9690: END IF;
9691: x_return_status := FND_API.G_RET_STS_ERROR;
9692: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9693: IF p_commit = FND_API.G_TRUE THEN
9694: rollback to convert_task_prog_to_assgn;
9695: END IF;

Line 9692: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

9688: IF p_commit = FND_API.G_TRUE THEN
9689: rollback to convert_task_prog_to_assgn;
9690: END IF;
9691: x_return_status := FND_API.G_RET_STS_ERROR;
9692: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9693: IF p_commit = FND_API.G_TRUE THEN
9694: rollback to convert_task_prog_to_assgn;
9695: END IF;
9696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 9693: IF p_commit = FND_API.G_TRUE THEN

9689: rollback to convert_task_prog_to_assgn;
9690: END IF;
9691: x_return_status := FND_API.G_RET_STS_ERROR;
9692: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9693: IF p_commit = FND_API.G_TRUE THEN
9694: rollback to convert_task_prog_to_assgn;
9695: END IF;
9696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9697: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 9696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

9692: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9693: IF p_commit = FND_API.G_TRUE THEN
9694: rollback to convert_task_prog_to_assgn;
9695: END IF;
9696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9697: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
9698: p_procedure_name => 'convert_task_prog_to_assgn',
9699: p_error_text => SUBSTRB(SQLERRM,1,120));
9700: WHEN OTHERS THEN

Line 9701: IF p_commit = FND_API.G_TRUE THEN

9697: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
9698: p_procedure_name => 'convert_task_prog_to_assgn',
9699: p_error_text => SUBSTRB(SQLERRM,1,120));
9700: WHEN OTHERS THEN
9701: IF p_commit = FND_API.G_TRUE THEN
9702: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
9703: END IF;
9704: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9705: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 9704: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

9700: WHEN OTHERS THEN
9701: IF p_commit = FND_API.G_TRUE THEN
9702: rollback to ASGN_DLV_TO_TASK_ROLLUP_PVT2;
9703: END IF;
9704: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9705: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
9706: p_procedure_name => 'convert_task_prog_to_assgn',
9707: p_error_text => SUBSTRB(SQLERRM,1,120));
9708: raise;

Line 9839: x_return_status := FND_API.G_RET_STS_SUCCESS;

9835: l_bv_id NUMBER;
9836: --end bug 4255329
9837: BEGIN
9838: x_msg_count := 0;
9839: x_return_status := FND_API.G_RET_STS_SUCCESS;
9840:
9841: l_debug_mode := NVL(FND_PROFILE.value_specific('PA_DEBUG_MODE',fnd_global.user_id,fnd_global.login_id,275,null,null), 'N');
9842:
9843: -- Set curr function

Line 10186: (p_encoded => FND_API.G_TRUE

10182: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
10183: l_msg_count := FND_MSG_PUB.count_msg;
10184: IF l_msg_count = 1 THEN
10185: PA_INTERFACE_UTILS_PUB.get_messages
10186: (p_encoded => FND_API.G_TRUE
10187: ,p_msg_index => 1
10188: ,p_msg_count => l_msg_count
10189: ,p_msg_data => l_msg_data
10190: ,p_data => l_data

Line 10199: x_return_status := FND_API.G_RET_STS_ERROR;

10195: ELSE
10196: x_msg_count := l_msg_count;
10197: END IF;
10198:
10199: x_return_status := FND_API.G_RET_STS_ERROR;
10200:
10201: IF l_debug_mode = 'Y' THEN
10202: 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);
10203: END IF;

Line 10210: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

10206: pa_debug.reset_curr_function();
10207:
10208: RETURN;
10209: WHEN Others THEN
10210: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10211: x_msg_count := 1;
10212: x_msg_data := SQLERRM;
10213:
10214: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fp_copy_from_pkg'

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

10226:
10227: -- Bug 4575855 : Added rollup_prog_from_subprojs
10228: PROCEDURE ROLLUP_PROG_FROM_SUBPROJS(
10229: p_api_version IN NUMBER :=1.0
10230: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10231: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10232: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10233: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10234: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

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

10227: -- Bug 4575855 : Added rollup_prog_from_subprojs
10228: PROCEDURE ROLLUP_PROG_FROM_SUBPROJS(
10229: p_api_version IN NUMBER :=1.0
10230: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10231: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10232: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10233: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10234: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
10235: ,p_debug_mode IN VARCHAR2 :='N'

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

10228: PROCEDURE ROLLUP_PROG_FROM_SUBPROJS(
10229: p_api_version IN NUMBER :=1.0
10230: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10231: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10232: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10233: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10234: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
10235: ,p_debug_mode IN VARCHAR2 :='N'
10236: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

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

10229: p_api_version IN NUMBER :=1.0
10230: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10231: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10232: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10233: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10234: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
10235: ,p_debug_mode IN VARCHAR2 :='N'
10236: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
10237: ,p_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

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

10347: IF g1_debug_mode = 'Y' THEN
10348: pa_debug.init_err_stack ('PA_PROGRESS_PVT.ROLLUP_PROG_FROM_SUBPROJS');
10349: END IF;
10350:
10351: IF (p_commit = FND_API.G_TRUE) THEN
10352: savepoint rollup_prog_from_subprojs2;
10353: END IF;
10354:
10355: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

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

10351: IF (p_commit = FND_API.G_TRUE) THEN
10352: savepoint rollup_prog_from_subprojs2;
10353: END IF;
10354:
10355: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
10356: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10357: END IF;
10358:
10359: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 10356: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

10352: savepoint rollup_prog_from_subprojs2;
10353: END IF;
10354:
10355: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
10356: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10357: END IF;
10358:
10359: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
10360: FND_MSG_PUB.initialize;

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

10355: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
10356: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10357: END IF;
10358:
10359: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
10360: FND_MSG_PUB.initialize;
10361: END IF;
10362:
10363: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 10363: x_return_status := FND_API.G_RET_STS_SUCCESS;

10359: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
10360: FND_MSG_PUB.initialize;
10361: END IF;
10362:
10363: x_return_status := FND_API.G_RET_STS_SUCCESS;
10364:
10365: FOR rec_subprojs IN cur_select_grid LOOP
10366: IF g1_debug_mode = 'Y' THEN
10367: 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 10374: p_init_msg_list => FND_API.G_FALSE

10370: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PROG_FROM_SUBPROJS', x_Msg => 'Calling populate_pji_tab_for_plan', x_Log_Level=> 3);
10371: END IF;
10372:
10373: pa_progress_pub.populate_pji_tab_for_plan(
10374: p_init_msg_list => FND_API.G_FALSE
10375: ,p_commit => FND_API.G_FALSE
10376: ,p_calling_module => p_calling_module
10377: ,p_project_id => rec_subprojs.project_id
10378: ,p_structure_version_id => rec_subprojs.element_version_id

Line 10375: ,p_commit => FND_API.G_FALSE

10371: END IF;
10372:
10373: pa_progress_pub.populate_pji_tab_for_plan(
10374: p_init_msg_list => FND_API.G_FALSE
10375: ,p_commit => FND_API.G_FALSE
10376: ,p_calling_module => p_calling_module
10377: ,p_project_id => rec_subprojs.project_id
10378: ,p_structure_version_id => rec_subprojs.element_version_id
10379: ,p_baselined_str_ver_id => PA_PROJECT_STRUCTURE_UTILS.Get_Baseline_Struct_Ver(rec_subprojs.project_id)

Line 10394: RAISE FND_API.G_EXC_ERROR;

10390: END IF;
10391:
10392:
10393: IF x_return_status <> 'S' THEN
10394: RAISE FND_API.G_EXC_ERROR;
10395: END IF;
10396:
10397: IF g1_debug_mode = 'Y' THEN
10398: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PROG_FROM_SUBPROJS', x_Msg => 'Calling program_rollup_pvt', x_Log_Level=> 3);

Line 10402: p_init_msg_list => FND_API.G_FALSE

10398: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PROG_FROM_SUBPROJS', x_Msg => 'Calling program_rollup_pvt', x_Log_Level=> 3);
10399: END IF;
10400:
10401: pa_progress_pvt.program_rollup_pvt(
10402: p_init_msg_list => FND_API.G_FALSE
10403: ,p_commit => FND_API.G_FALSE
10404: ,p_validate_only => FND_API.G_FALSE
10405: ,p_project_id => rec_subprojs.project_id
10406: ,p_as_of_date => rec_subprojs.as_of_date

Line 10403: ,p_commit => FND_API.G_FALSE

10399: END IF;
10400:
10401: pa_progress_pvt.program_rollup_pvt(
10402: p_init_msg_list => FND_API.G_FALSE
10403: ,p_commit => FND_API.G_FALSE
10404: ,p_validate_only => FND_API.G_FALSE
10405: ,p_project_id => rec_subprojs.project_id
10406: ,p_as_of_date => rec_subprojs.as_of_date
10407: ,p_structure_type => 'WORKPLAN'

Line 10404: ,p_validate_only => FND_API.G_FALSE

10400:
10401: pa_progress_pvt.program_rollup_pvt(
10402: p_init_msg_list => FND_API.G_FALSE
10403: ,p_commit => FND_API.G_FALSE
10404: ,p_validate_only => FND_API.G_FALSE
10405: ,p_project_id => rec_subprojs.project_id
10406: ,p_as_of_date => rec_subprojs.as_of_date
10407: ,p_structure_type => 'WORKPLAN'
10408: ,p_structure_ver_id => rec_subprojs.element_version_id

Line 10418: RAISE FND_API.G_EXC_ERROR;

10414: 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);
10415: END IF;
10416:
10417: IF x_return_status <> 'S' THEN
10418: RAISE FND_API.G_EXC_ERROR;
10419: END IF;
10420: END LOOP;
10421:
10422: IF (p_commit = FND_API.G_TRUE) THEN

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

10418: RAISE FND_API.G_EXC_ERROR;
10419: END IF;
10420: END LOOP;
10421:
10422: IF (p_commit = FND_API.G_TRUE) THEN
10423: COMMIT;
10424: END IF;
10425: EXCEPTION
10426: when FND_API.G_EXC_ERROR then

Line 10426: when FND_API.G_EXC_ERROR then

10422: IF (p_commit = FND_API.G_TRUE) THEN
10423: COMMIT;
10424: END IF;
10425: EXCEPTION
10426: when FND_API.G_EXC_ERROR then
10427: if p_commit = FND_API.G_TRUE then
10428: rollback to rollup_prog_from_subprojs2;
10429: end if;
10430: x_return_status := FND_API.G_RET_STS_ERROR;

Line 10427: if p_commit = FND_API.G_TRUE then

10423: COMMIT;
10424: END IF;
10425: EXCEPTION
10426: when FND_API.G_EXC_ERROR then
10427: if p_commit = FND_API.G_TRUE then
10428: rollback to rollup_prog_from_subprojs2;
10429: end if;
10430: x_return_status := FND_API.G_RET_STS_ERROR;
10431: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 10430: x_return_status := FND_API.G_RET_STS_ERROR;

10426: when FND_API.G_EXC_ERROR then
10427: if p_commit = FND_API.G_TRUE then
10428: rollback to rollup_prog_from_subprojs2;
10429: end if;
10430: x_return_status := FND_API.G_RET_STS_ERROR;
10431: when FND_API.G_EXC_UNEXPECTED_ERROR then
10432: if p_commit = FND_API.G_TRUE then
10433: rollback to rollup_prog_from_subprojs2;
10434: end if;

Line 10431: when FND_API.G_EXC_UNEXPECTED_ERROR then

10427: if p_commit = FND_API.G_TRUE then
10428: rollback to rollup_prog_from_subprojs2;
10429: end if;
10430: x_return_status := FND_API.G_RET_STS_ERROR;
10431: when FND_API.G_EXC_UNEXPECTED_ERROR then
10432: if p_commit = FND_API.G_TRUE then
10433: rollback to rollup_prog_from_subprojs2;
10434: end if;
10435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 10432: if p_commit = FND_API.G_TRUE then

10428: rollback to rollup_prog_from_subprojs2;
10429: end if;
10430: x_return_status := FND_API.G_RET_STS_ERROR;
10431: when FND_API.G_EXC_UNEXPECTED_ERROR then
10432: if p_commit = FND_API.G_TRUE then
10433: rollback to rollup_prog_from_subprojs2;
10434: end if;
10435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10436: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 10435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

10431: when FND_API.G_EXC_UNEXPECTED_ERROR then
10432: if p_commit = FND_API.G_TRUE then
10433: rollback to rollup_prog_from_subprojs2;
10434: end if;
10435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10436: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
10437: p_procedure_name => 'ROLLUP_PROG_FROM_SUBPROJS',
10438: p_error_text => SUBSTRB(SQLERRM,1,120));
10439: when OTHERS then

Line 10440: if p_commit = FND_API.G_TRUE then

10436: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
10437: p_procedure_name => 'ROLLUP_PROG_FROM_SUBPROJS',
10438: p_error_text => SUBSTRB(SQLERRM,1,120));
10439: when OTHERS then
10440: if p_commit = FND_API.G_TRUE then
10441: rollback to rollup_prog_from_subprojs2;
10442: end if;
10443: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10444: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 10443: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

10439: when OTHERS then
10440: if p_commit = FND_API.G_TRUE then
10441: rollback to rollup_prog_from_subprojs2;
10442: end if;
10443: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10444: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
10445: p_procedure_name => 'ROLLUP_PROG_FROM_SUBPROJS',
10446: p_error_text => SUBSTRB(SQLERRM,1,120));
10447: raise;

Line 10501: raise FND_API.G_EXC_ERROR;

10497: fetch new_str_version_id into l_str_ver_id;
10498: close new_str_version_id;
10499:
10500: if (l_str_ver_id is null) then
10501: raise FND_API.G_EXC_ERROR;
10502: end if;
10503:
10504: -- Begin bug 5452282
10505: open obj_version_id(l_str_ver_id);

Line 10534: when FND_API.G_EXC_ERROR then

10530: and object_version_id = l_old_element_version_id_tab(i);
10531: End if;
10532:
10533: exception
10534: when FND_API.G_EXC_ERROR then
10535: x_return_status := 'E';
10536: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
10537: p_procedure_name => 'UPD_PROG_RECS_STR_DELETE',
10538: p_error_text => 'This workplan structure cannot be deleted.');

Line 10541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

10537: p_procedure_name => 'UPD_PROG_RECS_STR_DELETE',
10538: p_error_text => 'This workplan structure cannot be deleted.');
10539:
10540: when OTHERS then
10541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10542: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
10543: p_procedure_name => 'UPD_PROG_RECS_STR_DELETE',
10544: p_error_text => SUBSTRB(SQLERRM,1,120));
10545: raise;

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

10547: END UPD_PROG_RECS_STR_DELETE;
10548:
10549: PROCEDURE ROLLUP_PVT(
10550: p_api_version IN NUMBER :=1.0
10551: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10552: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10553: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10554: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10555: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

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

10548:
10549: PROCEDURE ROLLUP_PVT(
10550: p_api_version IN NUMBER :=1.0
10551: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10552: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10553: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10554: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10555: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
10556: ,p_calling_mode IN VARCHAR2 :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR

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

10549: PROCEDURE ROLLUP_PVT(
10550: p_api_version IN NUMBER :=1.0
10551: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10552: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10553: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10554: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10555: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
10556: ,p_calling_mode IN VARCHAR2 :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
10557: ,p_debug_mode IN VARCHAR2 :='N'

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

10550: p_api_version IN NUMBER :=1.0
10551: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
10552: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
10553: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
10554: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
10555: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
10556: ,p_calling_mode IN VARCHAR2 :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
10557: ,p_debug_mode IN VARCHAR2 :='N'
10558: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

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

11767: --bug 4045979
11768: l_base_struct_ver_id := pa_project_structure_utils.get_baseline_struct_ver(p_project_id);
11769:
11770: --BUG 4355204, rtarway
11771: --IF (p_commit = FND_API.G_TRUE) THEN
11772: savepoint ROLLUP_PVT2;
11773: --END IF;
11774:
11775: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

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

11771: --IF (p_commit = FND_API.G_TRUE) THEN
11772: savepoint ROLLUP_PVT2;
11773: --END IF;
11774:
11775: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
11776: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11777: END IF;
11778:
11779: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 11776: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

11772: savepoint ROLLUP_PVT2;
11773: --END IF;
11774:
11775: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
11776: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11777: END IF;
11778:
11779: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
11780: FND_MSG_PUB.initialize;

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

11775: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
11776: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11777: END IF;
11778:
11779: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
11780: FND_MSG_PUB.initialize;
11781: END IF;
11782:
11783: PA_PROGRESS_PUB.POPULATE_PJI_TAB_FOR_PLAN(

Line 12910: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

12906: IF g1_debug_mode = 'Y' THEN
12907: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PVT', x_Msg => 'After GENERATE_SCHEDULE', x_Log_Level=> 3);
12908: END IF;
12909:
12910: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12911: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
12912: p_msg_name => l_msg_data);
12913: x_msg_data := l_msg_data;
12914: x_return_status := 'E';

Line 12915: RAISE FND_API.G_EXC_ERROR;

12911: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
12912: p_msg_name => l_msg_data);
12913: x_msg_data := l_msg_data;
12914: x_return_status := 'E';
12915: RAISE FND_API.G_EXC_ERROR;
12916: END IF;
12917:
12918: IF g1_debug_mode = 'Y' THEN
12919: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PVT', x_Msg => 'Doing UPDATE_ROLLUP_PVT', x_Log_Level=> 3);

Line 12983: RAISE FND_API.G_EXC_ERROR;

12979: p_msg_name => 'PA_FP_INVALID_DATE_RANGE');
12980: x_msg_data := 'PA_FP_INVALID_DATE_RANGE';
12981: x_return_status := 'E';
12982: x_msg_count := fnd_msg_pub.count_msg;
12983: RAISE FND_API.G_EXC_ERROR;
12984: END ;
12985:
12986: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PVT', x_Msg => 'After Getting Periods', x_Log_Level=> 3);
12987:

Line 13263: RAISE FND_API.G_EXC_ERROR;

13259: WHEN OTHERS THEN
13260: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
13261: p_procedure_name => 'ROLLUP_PVT',
13262: p_error_text => SUBSTRB('Call of PJI_FM_XBS_ACCUM_TMP1 Failed:'||SQLERRM,1,120));
13263: RAISE FND_API.G_EXC_ERROR;
13264: END;
13265:
13266: IF g1_debug_mode = 'Y' THEN
13267: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PVT', x_Msg => 'Printing all the values retrieved from PJI ', x_Log_Level=> 3);

Line 13622: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

13618: ,p_dirty_flag => 'Y'
13619: ,x_return_status => x_return_status
13620: ,x_msg_count => x_msg_count
13621: ,x_msg_data => x_msg_data);
13622: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13623: raise FND_API.G_EXC_ERROR;
13624: END IF;
13625: END IF;
13626: -- 5119716 End

Line 13623: raise FND_API.G_EXC_ERROR;

13619: ,x_return_status => x_return_status
13620: ,x_msg_count => x_msg_count
13621: ,x_msg_data => x_msg_data);
13622: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
13623: raise FND_API.G_EXC_ERROR;
13624: END IF;
13625: END IF;
13626: -- 5119716 End
13627:

Line 14034: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

14030: ,x_return_status => x_return_status
14031: ,x_msg_count => x_msg_count
14032: ,x_msg_data => x_msg_data
14033: );
14034: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14035: RAISE FND_API.G_EXC_ERROR;
14036: END IF;
14037: l_last_as_of_date := cur_tree_rollup_rec.as_of_date;
14038: END IF;

Line 14035: RAISE FND_API.G_EXC_ERROR;

14031: ,x_msg_count => x_msg_count
14032: ,x_msg_data => x_msg_data
14033: );
14034: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14035: RAISE FND_API.G_EXC_ERROR;
14036: END IF;
14037: l_last_as_of_date := cur_tree_rollup_rec.as_of_date;
14038: END IF;
14039: -- Bug 4573257 End

Line 14069: raise FND_API.G_EXC_ERROR;

14065: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PVT', x_Msg => 'Rollup For Future Date x_return_status='||x_return_status, x_Log_Level=> 3);
14066: END IF;
14067:
14068: IF x_return_status <> 'S' THEN
14069: raise FND_API.G_EXC_ERROR;
14070: END IF;
14071: END LOOP;
14072: END IF; -- p_rollup_entire_wbs = 'Y'
14073:

Line 14076: x_return_status := FND_API.G_RET_STS_SUCCESS;

14072: END IF; -- p_rollup_entire_wbs = 'Y'
14073:
14074: DELETE from pa_proj_rollup_temp where process_number= l_process_number_temp;
14075:
14076: x_return_status := FND_API.G_RET_STS_SUCCESS;
14077:
14078: IF (p_commit = FND_API.G_TRUE) THEN
14079: COMMIT;
14080: END IF;

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

14074: DELETE from pa_proj_rollup_temp where process_number= l_process_number_temp;
14075:
14076: x_return_status := FND_API.G_RET_STS_SUCCESS;
14077:
14078: IF (p_commit = FND_API.G_TRUE) THEN
14079: COMMIT;
14080: END IF;
14081:
14082: IF g1_debug_mode = 'Y' THEN

Line 14087: WHEN FND_API.G_EXC_ERROR THEN

14083: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PVT', x_Msg => 'PA_PROGRESS_PVT.ROLLUP_PVT END', x_Log_Level=> 3);
14084: END IF;
14085:
14086: EXCEPTION
14087: WHEN FND_API.G_EXC_ERROR THEN
14088: rollback to ROLLUP_PVT2;
14089: x_return_status := FND_API.G_RET_STS_ERROR;
14090: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
14091: rollback to ROLLUP_PVT2;

Line 14089: x_return_status := FND_API.G_RET_STS_ERROR;

14085:
14086: EXCEPTION
14087: WHEN FND_API.G_EXC_ERROR THEN
14088: rollback to ROLLUP_PVT2;
14089: x_return_status := FND_API.G_RET_STS_ERROR;
14090: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
14091: rollback to ROLLUP_PVT2;
14092: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
14093: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 14090: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

14086: EXCEPTION
14087: WHEN FND_API.G_EXC_ERROR THEN
14088: rollback to ROLLUP_PVT2;
14089: x_return_status := FND_API.G_RET_STS_ERROR;
14090: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
14091: rollback to ROLLUP_PVT2;
14092: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
14093: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
14094: p_procedure_name => 'ROLLUP_PVT',

Line 14092: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

14088: rollback to ROLLUP_PVT2;
14089: x_return_status := FND_API.G_RET_STS_ERROR;
14090: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
14091: rollback to ROLLUP_PVT2;
14092: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
14093: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
14094: p_procedure_name => 'ROLLUP_PVT',
14095: p_error_text => SUBSTRB(SQLERRM,1,120));
14096: WHEN OTHERS THEN

Line 14098: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

14094: p_procedure_name => 'ROLLUP_PVT',
14095: p_error_text => SUBSTRB(SQLERRM,1,120));
14096: WHEN OTHERS THEN
14097: rollback to ROLLUP_PVT2;
14098: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
14099: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
14100: p_procedure_name => 'ROLLUP_PVT',
14101: p_error_text => SUBSTRB(SQLERRM,1,120));
14102: raise;

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

14103: END ROLLUP_PVT;
14104:
14105: PROCEDURE DEFER_ROLLUP_PVT(
14106: p_api_version IN NUMBER :=1.0
14107: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
14108: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
14109: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
14110: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
14111: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'

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

14104:
14105: PROCEDURE DEFER_ROLLUP_PVT(
14106: p_api_version IN NUMBER :=1.0
14107: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
14108: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
14109: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
14110: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
14111: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
14112: ,p_calling_mode IN VARCHAR2 :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR

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

14105: PROCEDURE DEFER_ROLLUP_PVT(
14106: p_api_version IN NUMBER :=1.0
14107: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
14108: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
14109: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
14110: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
14111: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
14112: ,p_calling_mode IN VARCHAR2 :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
14113: ,p_debug_mode IN VARCHAR2 :='N'

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

14106: p_api_version IN NUMBER :=1.0
14107: ,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
14108: ,p_commit IN VARCHAR2 :=FND_API.G_FALSE
14109: ,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
14110: ,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
14111: ,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
14112: ,p_calling_mode IN VARCHAR2 :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR
14113: ,p_debug_mode IN VARCHAR2 :='N'
14114: ,p_max_msg_count IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM

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

15337: --bug 4045979
15338: l_base_struct_ver_id := pa_project_structure_utils.get_baseline_struct_ver(p_project_id);
15339:
15340: --BUG 4355204, rtarway
15341: --IF (p_commit = FND_API.G_TRUE) THEN
15342: savepoint ROLLUP_PVT2;
15343: --END IF;
15344:
15345: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then

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

15341: --IF (p_commit = FND_API.G_TRUE) THEN
15342: savepoint ROLLUP_PVT2;
15343: --END IF;
15344:
15345: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
15346: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
15347: END IF;
15348:
15349: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN

Line 15346: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

15342: savepoint ROLLUP_PVT2;
15343: --END IF;
15344:
15345: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
15346: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
15347: END IF;
15348:
15349: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
15350: FND_MSG_PUB.initialize;

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

15345: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, g_pkg_name) then
15346: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
15347: END IF;
15348:
15349: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_FALSE)) THEN
15350: FND_MSG_PUB.initialize;
15351: END IF;
15352:
15353: /* sridhar_rollup

Line 16497: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

16493: IF g1_debug_mode = 'Y' THEN
16494: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PVT', x_Msg => 'After GENERATE_SCHEDULE', x_Log_Level=> 3);
16495: END IF;
16496:
16497: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
16498: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
16499: p_msg_name => l_msg_data);
16500: x_msg_data := l_msg_data;
16501: x_return_status := 'E';

Line 16502: RAISE FND_API.G_EXC_ERROR;

16498: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
16499: p_msg_name => l_msg_data);
16500: x_msg_data := l_msg_data;
16501: x_return_status := 'E';
16502: RAISE FND_API.G_EXC_ERROR;
16503: END IF;
16504:
16505: IF g1_debug_mode = 'Y' THEN
16506: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PVT', x_Msg => 'Doing UPDATE_ROLLUP_PVT', x_Log_Level=> 3);

Line 16570: RAISE FND_API.G_EXC_ERROR;

16566: p_msg_name => 'PA_FP_INVALID_DATE_RANGE');
16567: x_msg_data := 'PA_FP_INVALID_DATE_RANGE';
16568: x_return_status := 'E';
16569: x_msg_count := fnd_msg_pub.count_msg;
16570: RAISE FND_API.G_EXC_ERROR;
16571: END ;
16572:
16573: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PVT', x_Msg => 'After Getting Periods', x_Log_Level=> 3);
16574:

Line 16875: RAISE FND_API.G_EXC_ERROR;

16871: WHEN OTHERS THEN
16872: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
16873: p_procedure_name => 'ROLLUP_PVT',
16874: p_error_text => SUBSTRB('Call of PJI_FM_XBS_ACCUM_TMP1 Failed:'||SQLERRM,1,120));
16875: RAISE FND_API.G_EXC_ERROR;
16876: END;
16877:
16878: IF g1_debug_mode = 'Y' THEN
16879: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PVT', x_Msg => 'Printing all the values retrieved from PJI ', x_Log_Level=> 3);

Line 17243: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

17239: ,p_dirty_flag => 'Y'
17240: ,x_return_status => x_return_status
17241: ,x_msg_count => x_msg_count
17242: ,x_msg_data => x_msg_data);
17243: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
17244: raise FND_API.G_EXC_ERROR;
17245: END IF;
17246: END IF;
17247: -- 5119716 End

Line 17244: raise FND_API.G_EXC_ERROR;

17240: ,x_return_status => x_return_status
17241: ,x_msg_count => x_msg_count
17242: ,x_msg_data => x_msg_data);
17243: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
17244: raise FND_API.G_EXC_ERROR;
17245: END IF;
17246: END IF;
17247: -- 5119716 End
17248:

Line 17666: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

17662: ,x_return_status => x_return_status
17663: ,x_msg_count => x_msg_count
17664: ,x_msg_data => x_msg_data
17665: );
17666: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
17667: RAISE FND_API.G_EXC_ERROR;
17668: END IF;
17669: l_last_as_of_date := cur_tree_rollup_rec.as_of_date;
17670: END IF;

Line 17667: RAISE FND_API.G_EXC_ERROR;

17663: ,x_msg_count => x_msg_count
17664: ,x_msg_data => x_msg_data
17665: );
17666: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
17667: RAISE FND_API.G_EXC_ERROR;
17668: END IF;
17669: l_last_as_of_date := cur_tree_rollup_rec.as_of_date;
17670: END IF;
17671: -- Bug 4573257 End

Line 17701: raise FND_API.G_EXC_ERROR;

17697: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PVT', x_Msg => 'Rollup For Future Date x_return_status='||x_return_status, x_Log_Level=> 3);
17698: END IF;
17699:
17700: IF x_return_status <> 'S' THEN
17701: raise FND_API.G_EXC_ERROR;
17702: END IF;
17703: END LOOP;
17704: END IF; -- p_rollup_entire_wbs = 'Y'
17705:

Line 17708: x_return_status := FND_API.G_RET_STS_SUCCESS;

17704: END IF; -- p_rollup_entire_wbs = 'Y'
17705:
17706: DELETE from pa_proj_rollup_temp where process_number= l_process_number_temp;
17707:
17708: x_return_status := FND_API.G_RET_STS_SUCCESS;
17709:
17710: IF (p_commit = FND_API.G_TRUE) THEN
17711: COMMIT;
17712: END IF;

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

17706: DELETE from pa_proj_rollup_temp where process_number= l_process_number_temp;
17707:
17708: x_return_status := FND_API.G_RET_STS_SUCCESS;
17709:
17710: IF (p_commit = FND_API.G_TRUE) THEN
17711: COMMIT;
17712: END IF;
17713:
17714: IF g1_debug_mode = 'Y' THEN

Line 17719: WHEN FND_API.G_EXC_ERROR THEN

17715: pa_debug.write(x_Module=>'PA_PROGRESS_PVT.ROLLUP_PVT', x_Msg => 'PA_PROGRESS_PVT.ROLLUP_PVT END', x_Log_Level=> 3);
17716: END IF;
17717:
17718: EXCEPTION
17719: WHEN FND_API.G_EXC_ERROR THEN
17720: rollback to ROLLUP_PVT2;
17721: x_return_status := FND_API.G_RET_STS_ERROR;
17722: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
17723: rollback to ROLLUP_PVT2;

Line 17721: x_return_status := FND_API.G_RET_STS_ERROR;

17717:
17718: EXCEPTION
17719: WHEN FND_API.G_EXC_ERROR THEN
17720: rollback to ROLLUP_PVT2;
17721: x_return_status := FND_API.G_RET_STS_ERROR;
17722: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
17723: rollback to ROLLUP_PVT2;
17724: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
17725: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',

Line 17722: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

17718: EXCEPTION
17719: WHEN FND_API.G_EXC_ERROR THEN
17720: rollback to ROLLUP_PVT2;
17721: x_return_status := FND_API.G_RET_STS_ERROR;
17722: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
17723: rollback to ROLLUP_PVT2;
17724: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
17725: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
17726: p_procedure_name => 'ROLLUP_PVT',

Line 17724: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

17720: rollback to ROLLUP_PVT2;
17721: x_return_status := FND_API.G_RET_STS_ERROR;
17722: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
17723: rollback to ROLLUP_PVT2;
17724: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
17725: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
17726: p_procedure_name => 'ROLLUP_PVT',
17727: p_error_text => SUBSTRB(SQLERRM,1,120));
17728: WHEN OTHERS THEN

Line 17730: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

17726: p_procedure_name => 'ROLLUP_PVT',
17727: p_error_text => SUBSTRB(SQLERRM,1,120));
17728: WHEN OTHERS THEN
17729: rollback to ROLLUP_PVT2;
17730: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
17731: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROGRESS_PVT',
17732: p_procedure_name => 'ROLLUP_PVT',
17733: p_error_text => SUBSTRB(SQLERRM,1,120));
17734: raise;