[Home] [Help]
444: l_msg_count_tbl SYSTEM.PA_NUM_TBL_TYPE := p_project_id_tbl;
445: l_return_status_tbl SYSTEM.PA_VARCHAR2_2000_TBL_TYPE := p_validate_only_tbl;
446: l_msg_data_tbl SYSTEM.PA_VARCHAR2_2000_TBL_TYPE := p_validate_only_tbl;
447: --Bug#9817752 start
448: l_assignment_type pa_project_assignments.assignment_type%TYPE :=NULL ;
449: l_assignment_status_code VARCHAR2(50) := NULL;
450: --Bug#9817752 end
451:
452:
538: -- For new period of schedule generated from update scheduled people page, the status should always be Provisional
539: IF PA_ASSIGNMENTS_PUB.G_update_assignment_bulk_call = 'Y' THEN
540: SELECT Assignment_type
541: INTO l_assignment_type
542: FROM pa_project_assignments
543: WHERE assignment_id= p_assignment_id_tbl(k);
544:
545: pa_schedule_utils.debug('pa.plsql.pa_schedule_pub.update_schedule_bulk', 'Assignment_type:'||l_assignment_type, 6);
546: IF l_assignment_type IN ('STAFFED_ASSIGNMENT','STAFFED_ADMIN_ASSIGNMENT') THEN
921: status_code,
922: calendar_id,
923: start_date,
924: end_date
925: FROM pa_project_assignments
926: WHERE assignment_id = p_assignment_id;
927:
928: BEGIN
929:
1156: CURSOR get_asgmt_info_csr(l_assignment_id IN NUMBER) IS
1157: SELECT assignment_type,
1158: status_code,
1159: resource_id
1160: FROM pa_project_assignments
1161: WHERE assignment_id = l_assignment_id;
1162:
1163:
1164: BEGIN
1459: l_new_resource_id NUMBER; -- 4537865
1460: -- For retrieving resource_source_id
1461: CURSOR get_resource_source_id IS
1462: SELECT a.person_id, b.resource_id
1463: FROM pa_resource_txn_attributes a, pa_project_assignments b
1464: WHERE a.resource_id = b.resource_id
1465: AND b.assignment_id = p_assignment_id;
1466:
1467: l_resource_source_id NUMBER;
2885:
2886: -- This cursor will select the distinct assignment id
2887: CURSOR csr_sch_excp IS
2888: SELECT distinct a.assignment_id, b.record_version_number, b.project_id
2889: FROM pa_schedule_exceptions a , pa_project_assignments b
2890: WHERE a.assignment_id = b.assignment_id
2891: ORDER by a.assignment_id;
2892: BEGIN
2893: -- store the status success to track the error
3035: l_p_start_id NUMBER;
3036: l_p_end_id NUMBER;
3037: l_apply_schedule_changes BOOLEAN;
3038: l_change_id PA_SCHEDULES_HISTORY.change_id%type;
3039: l_temp_status_code PA_PROJECT_ASSIGNMENTS.status_code%type;
3040:
3041: l_save_to_hist VARCHAR2(1); -- Unilog
3042: l_record_version_number_wo_chg NUMBER; -- Unilog
3043: l_exception_type_code VARCHAR2(100); --7663765
3265:
3266: -- jmarques: 1776658: Get old duration.
3267: select start_date, end_date, resource_id, record_version_number -- Unilog Selected record_version_number too
3268: into l_old_start_date, l_old_end_date, l_resource_id, l_record_version_number_wo_chg
3269: from pa_project_assignments
3270: where assignment_id = p_assignment_id;
3271:
3272: -- Unilog Added this IF condition
3273: IF p_generate_timeline_flag = 'N' THEN
5143: DECODE(pending_approval_flag, 'Y', 1,
5144: DECODE(apprvl_status_code, 'ASGMT_APPRVL_CANCELED', 1, -- Bug 3235731
5145: DECODE(status_code, null, 0, -- 3235675 This is needed as is_asgmt_allow_stus_ctl_check returns N if status_code is null
5146: DECODE(pa_assignment_utils.is_asgmt_allow_stus_ctl_check(status_code, project_id, 'N'), 'N', 1, 0))))) read_only_flag
5147: FROM pa_project_assignments_v asgn
5148: WHERE asgn.resource_id = l_res_id
5149: AND (
5150: ((p_assgn_range_start_date IS NOT NULL AND p_assgn_range_end_date IS NOT NULL)
5151: AND
5190: fi.item_quantity quantity,
5191: fi.resource_id,
5192: fi.forecast_item_type,
5193: asgn.assignment_id
5194: FROM pa_project_assignments asgn,
5195: pa_forecast_items fi
5196: WHERE asgn.resource_id = l_res_id
5197: AND fi.resource_id = l_res_id
5198: AND fi.delete_flag = 'N'