[Home] [Help]
735:
736:
737: -- Check if task number is Unique
738: IF (p_calling_module IN ('FORMS', 'SELF_SERVICE')) THEN
739: If Pa_Task_Utils.Check_Unique_Task_number (p_project_id,
740: p_task_number, NULL ) <> 1 Then
741: PA_UTILS.ADD_MESSAGE('PA', 'PA_ALL_DUPLICATE_NUM');
742: END IF;
743: END IF;
809: -- Add as subtask
810:
811: -- Check create subtask ok
812: IF (p_calling_module IN ('FORMS', 'SELF_SERVICE')) THEN
813: --Call PA_TASK_UTILS.CHECK_CREATE_SUBTASK_OK
814: PA_TASK_UTILS.CHECK_CREATE_SUBTASK_OK(x_task_id => p_reference_task_id,
815: x_err_code => l_err_code,
816: x_err_stack => l_err_stack,
817: x_err_stage => l_err_stage
810:
811: -- Check create subtask ok
812: IF (p_calling_module IN ('FORMS', 'SELF_SERVICE')) THEN
813: --Call PA_TASK_UTILS.CHECK_CREATE_SUBTASK_OK
814: PA_TASK_UTILS.CHECK_CREATE_SUBTASK_OK(x_task_id => p_reference_task_id,
815: x_err_code => l_err_code,
816: x_err_stack => l_err_stack,
817: x_err_stage => l_err_stage
818: );
2481: IF (p_calling_module = 'FORMS') THEN
2482: IF (TCARRYING_OUT_ORG_ID <> p_carrying_out_organization_id) AND
2483: (p_carrying_out_organization_id IS NOT NULL) AND
2484: (p_carrying_out_organization_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM) THEN
2485: PA_TASK_UTILS.CHANGE_TASK_ORG_OK(p_task_id,
2486: l_err_code,
2487: l_err_stage,
2488: l_err_stack);
2489: IF (l_err_code <> 0) Then
2829:
2830: --hy
2831: --Check if child exist for current parent task. If not,
2832: --update chargeable flag to Y
2833: IF (Pa_Task_Utils.check_child_Exists(NVL(p_task_id,0)) = 1 ) THEN
2834: TCHARGEABLE := 'N';
2835: END IF;
2836:
2837:
3446: --PA_TASK_PUB1.DELETE_TASK_VERSION and PA_TASK_PUB1.DELETE_TASK_VERSION
3447: --is called from import logic.
3448: THEN
3449: --Check if this is last task;
3450: If (PA_TASK_UTILS.check_last_task(p_task_id) <> 0) THEN
3451: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
3452: p_msg_name => 'PA_TK_CANT_DELETE_LAST_TASK');
3453: raise FND_API.G_EXC_ERROR;
3454: END IF;
3459: --Check if it is okay to delete task
3460: -- 4201927 If this api is getting called from bulk task delete version, p_bulk_flag will
3461: -- be passed as 'Y' and below validation will not be done in that flow
3462: IF p_bulk_flag = 'N' THEN
3463: PA_TASK_UTILS.CHECK_DELETE_TASK_OK(x_task_id => p_task_id,
3464: x_err_code => l_err_code,
3465: x_err_stage => l_err_stage,
3466: x_err_stack => l_err_stack);
3467: IF (l_err_code <> 0) THEN
3489:
3490: IF (p_calling_module IN ('SELF_SERVICE', 'FORM')) THEN
3491: --Check if child exist for current parent task. If not,
3492: --update chargeable flag to Y
3493: IF (Pa_Task_Utils.check_child_Exists(NVL(t_parent_task_id,0)) = 0 ) THEN
3494: UPDATE Pa_tasks
3495: SET Chargeable_Flag = 'Y',
3496: RECORD_VERSION_NUMBER = nvl(RECORD_VERSION_NUMBER,0) + 1,
3497: last_updated_by = FND_GLOBAL.USER_ID,
3708: l_msg_count := FND_MSG_PUB.count_msg;
3709:
3710: --dbms_output.put_line( 'Indent Task PVT : Stage 3 '||'Count '||l_msg_count );
3711:
3712: PA_TASK_UTILS.CHECK_CREATE_SUBTASK_OK(x_task_id => l_task_id_above,
3713: x_err_code => l_err_code,
3714: x_err_stack => l_err_stack,
3715: x_err_stage => l_err_stage
3716: );
5832: l_parent_task_id := l_ref_parent_task_id;
5833: ELSE
5834: -- 23-JUL-2001
5835: -- Added by HSIU--check if the reference task can have child tasks
5836: PA_TASK_UTILS.CHECK_CREATE_SUBTASK_OK(x_task_id => p_reference_task_id,
5837: x_err_code => l_err_code,
5838: x_err_stack => l_err_stack,
5839: x_err_stage => l_err_stage
5840: );
5956:
5957: --dbms_output.put_line( 'In move task 6' );
5958:
5959: -- update chargeable flag for reference task to no.
5960: IF (Pa_Task_Utils.check_child_Exists(NVL(p_reference_task_id,0)) = 1 ) THEN
5961: UPDATE Pa_tasks
5962: SET Chargeable_Flag = 'N',
5963: RECORD_VERSION_NUMBER = nvl(RECORD_VERSION_NUMBER,0) + 1,
5964: last_updated_by = FND_GLOBAL.USER_ID,