DBA Data[Home] [Help]

APPS.PA_PROJ_ELEMENTS_UTILS dependencies on PA_PROJ_ELEMENTS_UTILS

Line 1: PACKAGE BODY PA_PROJ_ELEMENTS_UTILS AS

1: PACKAGE BODY PA_PROJ_ELEMENTS_UTILS AS
2: /* $Header: PATSK1UB.pls 120.23.12020000.4 2013/05/23 13:05:09 djambhek ship $ */
3:
4: Invalid_Arg_Exc_WP Exception ;
5: g_module_name VARCHAR2(100) := 'pa.plsql.pa_proj_elements_utils';

Line 5: g_module_name VARCHAR2(100) := 'pa.plsql.pa_proj_elements_utils';

1: PACKAGE BODY PA_PROJ_ELEMENTS_UTILS AS
2: /* $Header: PATSK1UB.pls 120.23.12020000.4 2013/05/23 13:05:09 djambhek ship $ */
3:
4: Invalid_Arg_Exc_WP Exception ;
5: g_module_name VARCHAR2(100) := 'pa.plsql.pa_proj_elements_utils';
6:
7: -- Added for Bug 6156686
8: TYPE l_lookup_cache_tbl_typ IS TABLE OF VARCHAR2(80)
9: INDEX BY VARCHAR2(70);

Line 21: PA_PROJ_ELEMENTS_UTILS.g_Struc_Ver_Id := p_structure_version_id;

17:
18: PROCEDURE SetGlobalStrucVerId ( p_structure_version_id IN NUMBER )
19: IS
20: BEGIN
21: PA_PROJ_ELEMENTS_UTILS.g_Struc_Ver_Id := p_structure_version_id;
22: END SetGlobalStrucVerId;
23:
24: FUNCTION GetGlobalStrucVerId RETURN NUMBER
25: IS

Line 27: RETURN ( PA_PROJ_ELEMENTS_UTILS.g_Struc_Ver_Id );

23:
24: FUNCTION GetGlobalStrucVerId RETURN NUMBER
25: IS
26: BEGIN
27: RETURN ( PA_PROJ_ELEMENTS_UTILS.g_Struc_Ver_Id );
28: END GetGlobalStrucVerId;
29:
30: --This function checks if a WORKPLAN (split or shared) task
31: --may be updtaed by the logged in user.

Line 330: l_module_name VARCHAR2(100) := 'pa.plsql.PA_PROJ_ELEMENTS_UTILS';

326: l_debug_level2 CONSTANT NUMBER := 2;
327: l_debug_level3 CONSTANT NUMBER := 3;
328: l_debug_level4 CONSTANT NUMBER := 4;
329: l_debug_level5 CONSTANT NUMBER := 5;
330: l_module_name VARCHAR2(100) := 'pa.plsql.PA_PROJ_ELEMENTS_UTILS';
331:
332: l_date1 DATE ;
333: l_pev_structure_id1 pa_proj_elem_ver_structure.pev_structure_id%TYPE ;
334: l_element_version_id1 pa_proj_elem_ver_structure.element_version_id%TYPE ;

Line 598: ( p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS'

594: CLOSE cur_elem_ver_stru2;
595: END IF;
596:
597: FND_MSG_PUB.add_exc_msg
598: ( p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS'
599: ,p_procedure_name => 'Get_Last_Upd_Working_Wp_Ver'
600: ,p_error_text => x_msg_data);
601:
602: IF l_debug_mode = 'Y' THEN

Line 960: IF PA_PROJ_ELEMENTS_UTILS.structure_type(

956: return;
957: END IF;
958: -- anlee end of changes
959:
960: IF PA_PROJ_ELEMENTS_UTILS.structure_type(
961: p_structure_version_id => p_parent_structure_ver_id
962: ,p_task_version_id => null
963: ,p_structure_type => 'WORKPLAN'
964: ) = 'Y'

Line 1030: IF PA_PROJ_ELEMENTS_UTILS.structure_type(

1026: END IF;
1027: */
1028: END IF;
1029:
1030: IF PA_PROJ_ELEMENTS_UTILS.structure_type(
1031: p_structure_version_id => p_parent_structure_ver_id
1032: ,p_task_version_id => null
1033: ,p_structure_type => 'FINANCIAL'
1034: ) = 'Y' THEN

Line 1099: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',

1095: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1096:
1097: -- 4537865
1098: x_error_message_code := SQLCODE;
1099: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',
1100: p_procedure_name => 'Check_Delete_task_Ver_Ok',
1101: p_error_text => SUBSTRB(SQLERRM,1,240)); -- 4537865
1102: RAISE;
1103: END Check_Delete_task_Ver_Ok;

Line 1336: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',

1332: EXCEPTION
1333: WHEN OTHERS THEN
1334: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1335: x_error_message_code := SQLCODE ;
1336: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',
1337: p_procedure_name => 'Check_Date_range',
1338: p_error_text => SUBSTRB(SQLERRM,1,240));
1339: RAISE;
1340: end Check_Date_range;

Line 2782: l_element_version_id := PA_PROJ_ELEMENTS_UTILS.GET_LATEST_FIN_PUB_TASK_VER_ID

2778: OPEN c1 (p_task_id);
2779: FETCH c1 INTO v_c1;
2780: CLOSE c1;
2781:
2782: l_element_version_id := PA_PROJ_ELEMENTS_UTILS.GET_LATEST_FIN_PUB_TASK_VER_ID
2783: (p_project_id => v_c1.project_id,
2784: p_task_id => p_task_id);
2785:
2786: IF l_element_version_id IS NULL THEN

Line 2828: PA_PROJ_ELEMENTS_UTILS.CHECK_DELETE_TASK_VER_OK(

2824:
2825: l_task_ver_id_tbl SYSTEM.PA_NUM_TBL_TYPE := SYSTEM.PA_NUM_TBL_TYPE() ; -- 4201927 for performance issue
2826: BEGIN
2827:
2828: PA_PROJ_ELEMENTS_UTILS.CHECK_DELETE_TASK_VER_OK(
2829: p_project_id => p_project_id
2830: ,p_task_version_id => p_task_version_id
2831: ,p_parent_structure_ver_id => p_parent_structure_ver_id
2832: ,x_return_status => x_return_status

Line 2846: PA_PROJ_ELEMENTS_UTILS.Check_delete_task_ver_ok(

2842: OPEN c1;
2843: LOOP
2844: FETCH c1 into l_task_ver_id;
2845: EXIT WHEN c1%NOTFOUND;
2846: PA_PROJ_ELEMENTS_UTILS.Check_delete_task_ver_ok(
2847: p_project_id => p_project_id
2848: ,p_task_version_id => l_task_ver_id
2849: ,p_parent_structure_ver_id => p_parent_structure_ver_id
2850: ,x_return_status => x_return_status

Line 2869: PA_PROJ_ELEMENTS_UTILS.Check_delete_task_ver_ok(

2865:
2866: IF nvl(l_task_ver_id_tbl.LAST,0) > 0 THEN
2867: FOR i in reverse l_task_ver_id_tbl.FIRST..l_task_ver_id_tbl.LAST LOOP
2868:
2869: PA_PROJ_ELEMENTS_UTILS.Check_delete_task_ver_ok(
2870: p_project_id => p_project_id
2871: ,p_task_version_id => l_task_ver_id_tbl(i)
2872: ,p_parent_structure_ver_id => p_parent_structure_ver_id
2873: ,x_return_status => x_return_status

Line 2895: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',

2891: WHEN OTHERS THEN
2892: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2893: -- 4537865
2894: x_error_message_code := SQLCODE ;
2895: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',
2896: p_procedure_name => 'Check_Del_all_task_Ver_Ok
2897: ');
2898: RAISE;
2899: END Check_Del_all_task_Ver_Ok;

Line 2993: If (PA_PROJ_ELEMENTS_UTILS.CHECK_IS_FINANCIAL_TASK(l_proj_element_id) = 'Y') AND

2989:
2990: --if financial, check if ok to create subtask.
2991: --Bug 5988335 Adding condition for partial share project to skip financial validation
2992: --when a new subtask is getting created in workplan.
2993: If (PA_PROJ_ELEMENTS_UTILS.CHECK_IS_FINANCIAL_TASK(l_proj_element_id) = 'Y') AND
2994: (PA_PROJ_TASK_STRUC_PUB.GET_SHARE_TYPE(l_project_id) <> 'SHARE_PARTIAL') --Bug 5988335
2995: THEN
2996: PA_TASK_UTILS.CHECK_CREATE_SUBTASK_OK(x_task_id => l_proj_element_id,
2997: x_err_code => l_err_code,

Line 3065: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',

3061: EXCEPTION
3062: WHEN OTHERS THEN
3063: x_return_status := 'N';
3064: x_error_message_code := SQLCODE ;
3065: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',
3066: p_procedure_name => 'Check_create_subtask_ok',
3067: p_error_text => SUBSTRB(SQLERRM,1,240));
3068: RAISE ;
3069: END Check_create_subtask_ok;

Line 3329: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',

3325: EXCEPTION
3326: WHEN OTHERS THEN
3327: x_return_status := 'N' ;
3328: x_error_message_code := SQLCODE ;
3329: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',
3330: p_procedure_name => 'check_move_task_ok',
3331: p_error_text => SUBSTRB(SQLERRM,1,240));
3332: RAISE ;
3333: END check_move_task_ok;

Line 3459: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',

3455: -- 4537865
3456: -- Not resetting x_error_message_code as at this point it would have been already populated.
3457: WHEN OTHERS THEN
3458: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3459: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',
3460: p_procedure_name => 'Check_chg_stat_cancel_ok');
3461:
3462: -- 4537865
3463: x_error_message_code := SQLCODE ;

Line 3483: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',

3479:
3480: RETURN l_ret;
3481: EXCEPTION
3482: WHEN OTHERS THEN
3483: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',
3484: p_procedure_name => 'get_element_name');
3485: RAISE;
3486: END get_element_name;
3487:

Line 3504: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',

3500:
3501: RETURN l_ret;
3502: EXCEPTION
3503: WHEN OTHERS THEN
3504: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',
3505: p_procedure_name => 'get_element_number');
3506: RAISE;
3507: END get_element_number;
3508:

Line 3525: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',

3521:
3522: RETURN l_ret;
3523: EXCEPTION
3524: WHEN OTHERS THEN
3525: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS',
3526: p_procedure_name => 'get_element_name_number');
3527: RAISE;
3528: END get_element_name_number;
3529:

Line 3875: ( p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS'

3871: x_structure_version_id := NULL;
3872: -- 4537865 : End
3873:
3874: FND_MSG_PUB.add_exc_msg
3875: ( p_pkg_name => 'PA_PROJ_ELEMENTS_UTILS'
3876: ,p_procedure_name => 'GET_STRUCTURE_INFO'
3877: ,p_error_text => x_msg_data);
3878:
3879: IF l_debug_mode = 'Y' THEN

Line 3895: -- : PA_PROJ_ELEMENT_VERSIONS and pass to API PA_PROJ_ELEMENTS_UTILS.structure_type

3891: -- Purpose : This procedure will check whether the task has transaction or not.This API will be
3892: -- : called from Set_Financial_task_API.
3893: -- Note : Check whether it is a financial task or workplan task.
3894: -- : Fetch the parent_structure_version_id for the passed proj_element_Id from
3895: -- : PA_PROJ_ELEMENT_VERSIONS and pass to API PA_PROJ_ELEMENTS_UTILS.structure_type
3896:
3897: -- Assumptions : Only called for Financial task
3898:
3899: -- Parameters Type Required Description and Purpose

Line 3962: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : Printing Input parameters';

3958: PA_DEBUG.set_curr_function( p_function =>'CHECK_TASK_HAS_TRANSACTION' , p_debug_mode => l_debug_mode );
3959: END IF;
3960:
3961: IF l_debug_mode = 'Y' THEN
3962: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : Printing Input parameters';
3963: Pa_Debug.WRITE(g_module_name , Pa_Debug.g_err_stage , l_debug_level3);
3964: Pa_Debug.WRITE(g_module_name , 'p_task_id'||':'||p_task_id , l_debug_level3);
3965: END IF;
3966:

Line 3969: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : Validating Input Paramater';

3965: END IF;
3966:
3967:
3968: IF l_debug_mode = 'Y' THEN
3969: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : Validating Input Paramater';
3970: Pa_Debug.WRITE(g_module_name , Pa_Debug.g_err_stage , l_debug_level3);
3971: END IF;
3972:
3973: -- Validating for Input parameter

Line 3978: -- Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : Checking for financial type';

3974: IF ( p_task_id IS NOT NULL ) THEN
3975:
3976: --Commented to be reviewed once more with set financial task
3977: --IF l_debug_mode = 'Y' THEN
3978: -- Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : Checking for financial type';
3979: -- Pa_Debug.WRITE ( g_module_name , Pa_Debug.g_err_stage , l_debug_level3 );
3980: --END IF;
3981:
3982: --Select the parent structure version id for the passed task id

Line 3989: -- PA_PROJ_ELEMENTS_UTILS.structure_type

3985: --CLOSE c_get_parent_str_ver_id;
3986:
3987: --check if the structure type is financial
3988: --IF (
3989: -- PA_PROJ_ELEMENTS_UTILS.structure_type
3990: -- ( p_structure_version_id => l_prnt_str_ver_id
3991: -- , p_task_version_id => null
3992: -- , p_structure_type => 'FINANCIAL'
3993: -- ) = 'Y'

Line 4000: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check expenditure item for '|| p_task_id;

3996:
3997: -- Commenting code for 4903460 and replacing this wth new code
3998: --Check if task has expenditure item
3999: /* IF l_debug_mode = 'Y' THEN
4000: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check expenditure item for '|| p_task_id;
4001: Pa_Debug.WRITE(g_module_name , Pa_Debug.g_err_stage , l_debug_level3);
4002: END IF;
4003: l_status_code :=
4004: pa_proj_tsk_utils.check_exp_item_exists(null, p_task_id);

Line 4016: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check purchase order for '|| p_task_id;

4012: END IF;
4013:
4014: --Check if task has purchase order distribution
4015: IF l_debug_mode = 'Y' THEN
4016: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check purchase order for '|| p_task_id;
4017: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
4018: l_debug_level3);
4019: END IF;
4020: l_status_code :=

Line 4033: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check purchase order requisition for '|| p_task_id;

4029: END IF;
4030:
4031: -- Check if task has purchase order requisition
4032: IF l_debug_mode = 'Y' THEN
4033: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check purchase order requisition for '|| p_task_id;
4034: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
4035: l_debug_level3);
4036: END IF;
4037:

Line 4051: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check supplier invoice for '|| p_task_id;

4047: END IF;
4048:
4049: -- Check if task has supplier invoices
4050: IF l_debug_mode = 'Y' THEN
4051: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check supplier invoice for '|| p_task_id;
4052: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
4053: l_debug_level3);
4054: END IF;
4055:

Line 4069: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check supplier inv distribution for '|| p_task_id;

4065: END IF;
4066:
4067: -- Check if task has supplier invoice distribution
4068: IF l_debug_mode = 'Y' THEN
4069: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check supplier inv distribution for '|| p_task_id;
4070: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
4071: l_debug_level3);
4072: END IF;
4073:

Line 4087: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check commitment transaction for '|| p_task_id;

4083: END IF;
4084:
4085: -- Check if task has commitment transaction
4086: IF l_debug_mode = 'Y' THEN
4087: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check commitment transaction for '|| p_task_id;
4088: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
4089: l_debug_level3);
4090: END IF;
4091: l_status_code :=

Line 4104: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check compensation rule set for '|| p_task_id;

4100: END IF;
4101:
4102: -- Check if task has compensation rule set
4103: IF l_debug_mode = 'Y' THEN
4104: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check compensation rule set for '|| p_task_id;
4105: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
4106: l_debug_level3);
4107: END IF;
4108:

Line 4122: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check for task used in external system for'|| p_task_id;

4118: END IF; */
4119: -- End of Commenting for 4903460
4120: -- Check if task is in use in an external system
4121: IF l_debug_mode = 'Y' THEN
4122: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check for task used in external system for'|| p_task_id;
4123: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
4124: l_debug_level3);
4125: END IF;
4126:

Line 4150: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check if project allocations uses task '|| p_task_id;

4146: END IF;
4147:
4148: -- Check if task is used in allocations
4149: IF l_debug_mode = 'Y' THEN
4150: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check if project allocations uses task '|| p_task_id;
4151: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
4152: l_debug_level3);
4153: END IF;
4154:

Line 4167: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check draft invoice for '|| p_task_id;

4163: -- Commenting for Performance fix 4903460
4164: /*
4165: -- Check if task has draft invoices
4166: IF l_debug_mode = 'Y' THEN
4167: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check draft invoice for '|| p_task_id;
4168: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
4169: l_debug_level3);
4170: END IF;
4171:

Line 4185: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check Project Customers for '|| p_task_id;

4181: END IF;
4182:
4183: -- Check if task has Project_customers
4184: IF l_debug_mode = 'Y' THEN
4185: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check Project Customers for '|| p_task_id;
4186: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
4187: l_debug_level3);
4188: END IF;
4189:

Line 4204: PA_PROJ_ELEMENTS_UTILS.perform_task_validations

4200: END IF; */
4201: --End of Commenting for Performance fix 4903460
4202:
4203: -- Start of new code for Performance fix 4903460
4204: PA_PROJ_ELEMENTS_UTILS.perform_task_validations
4205: (
4206: p_project_id => p_project_id
4207: ,p_task_id => p_task_id
4208: ,x_error_code => x_error_code

Line 4220: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : Check contract association for task '|| p_task_id;

4216:
4217: -- Check if project contract is installed
4218: IF (pa_install.is_product_installed('OKE')) THEN
4219: IF l_debug_mode = 'Y' THEN
4220: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : Check contract association for task '|| p_task_id;
4221: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
4222: l_debug_level3);
4223: END IF;
4224:

Line 4250: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check if task '|| p_task_id || ' is charged in iexpense';

4246: --end of OTL check.
4247: Is_IEX_Installed := pa_install.is_product_installed('IEX');
4248: If Is_IEX_Installed then
4249: IF l_debug_mode = 'Y' THEN
4250: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : check if task '|| p_task_id || ' is charged in iexpense';
4251: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
4252: l_debug_level3);
4253: END IF;
4254:

Line 4267: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : PA_FIN_PLAN_UTILS.CHECK_DELETE_TASK_OK'|| p_task_id;

4263: END IF;
4264: END IF;
4265: --BEGIN
4266: IF l_debug_mode = 'Y' THEN
4267: Pa_Debug.g_err_stage:= 'PA_PROJ_ELEMENTS_UTILS : CHECK_TASK_HAS_TRANSACTION : PA_FIN_PLAN_UTILS.CHECK_DELETE_TASK_OK'|| p_task_id;
4268: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
4269: l_debug_level3);
4270: END IF;
4271:

Line 4621: ELSIF PA_PROJ_ELEMENTS_UTILS.CHECK_IS_FINANCIAL_TASK(p_proj_element_id) = 'N' THEN

4617: --If sharing is enabled, then financial and workplan tasks would be common
4618: IF str_sharing_code = 'SHARE_FULL' OR
4619: str_sharing_code = 'SHARE_PARTIAL' THEN
4620: return_flag := 'Y';
4621: ELSIF PA_PROJ_ELEMENTS_UTILS.CHECK_IS_FINANCIAL_TASK(p_proj_element_id) = 'N' THEN
4622: return_flag := 'Y';
4623: ELSE
4624: return_flag := 'N';
4625: END IF;

Line 6169: END PA_PROJ_ELEMENTS_UTILS;

6165: raise;
6166: END IS_LOWEST_PROJ_TASK;
6167:
6168:
6169: END PA_PROJ_ELEMENTS_UTILS;