[Home] [Help]
1: PACKAGE BODY pa_project_stus_utils AS
2: -- $Header: PAPSUTLB.pls 120.3 2007/02/08 12:50:38 sukhanna ship $
3:
4: l_pkg_name VARCHAR2(30) := 'PA_PROJECT_STUS_UTILS';
5: /* Bug 3059344: this function is commented, please see eof for the function code
1: PACKAGE BODY pa_project_stus_utils AS
2: -- $Header: PAPSUTLB.pls 120.3 2007/02/08 12:50:38 sukhanna ship $
3:
4: l_pkg_name VARCHAR2(30) := 'PA_PROJECT_STUS_UTILS';
5: /* Bug 3059344: this function is commented, please see eof for the function code
6: FUNCTION Is_Project_Closed
7: (x_project_id IN NUMBER ) return VARCHAR2 IS
8:
284: , p_procedure_name => l_api_name );
285: FND_MSG_PUB.Count_And_Get
286: (p_count => x_err_msg_count ,
287: p_data => X_err_stack);
288: WF_CORE.CONTEXT('PA_PROJECT_STUS_UTILS','HANDLE_PROJECT_STATUS_CHANGE') ;
289: RAISE;
290:
291: END Handle_Project_Status_Change;
292:
388: , p_procedure_name => l_api_name );
389: FND_MSG_PUB.Count_And_Get
390: (p_count => l_msg_count ,
391: p_data => l_msg_data );
392: WF_CORE.CONTEXT('PA_PROJECT_STUS_UTILS','CHECK_WF_ENABLED');
393:
394: -- 4537865 : RESET OUT params
395:
396: x_wf_item_type := NULL ;
484: -- hr_utility.trace_on(null, 'RMDEL');
485: -- hr_utility.trace('Start Allow_Status_Deletion');
486: x_err_code := 0;
487: old_stack := x_err_stack;
488: x_err_stack := x_err_stack||'PA_PROJECT_STUS_UTILS.Allow_Status_Deletion';
489: x_err_stage := 'IS_DELETABLE';
490: x_allow_deletion_flag := 'N';
491:
492: -- Added for lifecycle support
514: --Bug 5635429. Replaced the select statement below with a function call
515: --so that the same can be used in multiple places. The function will be
516: --used in PAXSUDPS.fmb
517: l_status_used_in_proj_type :=
518: pa_project_stus_utils.is_status_used_in_proj_type(p_project_status_code => p_project_status_code);
519:
520: IF l_status_used_in_proj_type = 'Y' THEN
521:
522: x_err_stage := 'PA_STATUS_CHECK_PRJSTRT';
1043: RETURN 'N';
1044: END;
1045:
1046:
1047: END PA_PROJECT_STUS_UTILS;
1048:
1049: