156: IF p_validate_only <> FND_API.G_TRUE
157: THEN
158: BEGIN
159: SELECT 'x' INTO l_dummy_char
160: FROM pa_projects
161: WHERE project_id = p_project_id
162: AND record_version_number = p_record_version_number
163: FOR UPDATE OF record_version_number NOWAIT;
164: EXCEPTION
190: END;
191: ELSE
192: BEGIN
193: SELECT 'x' INTO l_dummy_char
194: FROM pa_projects
195: WHERE project_id = p_project_id
196: AND record_version_number = p_record_version_number;
197: EXCEPTION
198: WHEN NO_DATA_FOUND THEN
332: END IF;
333:
334: IF p_task_id = FND_API.G_MISS_NUM OR l_task_id is NULL
335: THEN
336: UPDATE pa_projects
337: SET LABOR_SCH_TYPE = l_lbr_schedule_type,
338: NON_LABOR_SCH_TYPE = l_non_lbr_schedule_type,
339: EMP_BILL_RATE_SCHEDULE_ID = l_emp_bill_rate_sch_id ,
340: JOB_BILL_RATE_SCHEDULE_ID = l_job_bill_rate_sch_id ,
560: IF p_validate_only <> FND_API.G_TRUE
561: THEN
562: BEGIN
563: SELECT 'x' INTO l_dummy_char
564: FROM pa_projects
565: WHERE project_id = p_project_id
566: AND record_version_number = p_record_version_number
567: FOR UPDATE OF record_version_number NOWAIT;
568: EXCEPTION
594: END;
595: ELSE
596: BEGIN
597: SELECT 'x' INTO l_dummy_char
598: FROM pa_projects
599: WHERE project_id = p_project_id
600: AND record_version_number = p_record_version_number;
601: EXCEPTION
602: WHEN NO_DATA_FOUND THEN
696: IF p_lbr_schedule_type = 'B' and p_non_lbr_schedule_type = 'B'
697: THEN
698: IF( p_task_id = FND_API.G_MISS_NUM OR l_task_id is NULL )
699: THEN
700: UPDATE pa_projects
701: SET LABOR_SCH_TYPE = p_lbr_schedule_type,
702: NON_LABOR_SCH_TYPE = p_non_lbr_schedule_type,
703: REV_IND_RATE_SCH_ID = null,
704: INV_IND_RATE_SCH_ID = null,
722: ELSIF p_lbr_schedule_type = 'B' and p_non_lbr_schedule_type = 'I'
723: THEN
724: IF( p_task_id = FND_API.G_MISS_NUM OR l_task_id is NULL )
725: THEN
726: UPDATE pa_projects
727: SET LABOR_SCH_TYPE = p_lbr_schedule_type,
728: NON_LABOR_SCH_TYPE = p_non_lbr_schedule_type,
729: NON_LABOR_BILL_RATE_ORG_ID = null,
730: NON_LABOR_STD_BILL_RATE_SCHDL = null,
748: ELSIF p_lbr_schedule_type = 'I' and p_non_lbr_schedule_type = 'B'
749: THEN
750: IF( p_task_id = FND_API.G_MISS_NUM OR l_task_id is NULL )
751: THEN
752: UPDATE pa_projects
753: SET LABOR_SCH_TYPE = p_lbr_schedule_type,
754: NON_LABOR_SCH_TYPE = p_non_lbr_schedule_type,
755: EMP_BILL_RATE_SCHEDULE_ID = null,
756: JOB_BILL_RATE_SCHEDULE_ID = null,
774: ELSIF p_lbr_schedule_type = 'I' and p_non_lbr_schedule_type = 'I'
775: THEN
776: IF( p_task_id = FND_API.G_MISS_NUM OR l_task_id is NULL )
777: THEN
778: UPDATE pa_projects
779: SET LABOR_SCH_TYPE = p_lbr_schedule_type,
780: NON_LABOR_SCH_TYPE = p_non_lbr_schedule_type,
781: EMP_BILL_RATE_SCHEDULE_ID = null,
782: JOB_BILL_RATE_SCHEDULE_ID = null,