[Home] [Help]
2361: --BUG 3924597, added by rtarway for etc source default
2362: else
2363: --Add the logic to default the gen_etc_source_code
2364: --1. get the structure sharing type
2365: l_wp_separate_from_fin := PA_PROJ_TASK_STRUC_PUB.IS_WP_SEPARATE_FROM_FN( l_project_id );
2366: --2. get if it is top task, assuming for top task, p_pa_parent_task_id/P_pm_parent_task_reference is null
2367: if (
2368: ( l_task_in_rec.pa_parent_task_id is null
2369: or l_task_in_rec.pa_parent_task_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
3182: l_parent_task_rec.gen_etc_source_code <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR)
3183: then l_task_in_rec.gen_etc_source_code :=
3184: l_parent_task_rec.gen_etc_source_code;
3185: else
3186: if (nvl (PA_PROJ_TASK_STRUC_PUB.IS_WP_SEPARATE_FROM_FN ( l_project_id ), 'N') = 'N')
3187: then
3188: l_task_in_rec.gen_etc_source_code := 'WORKPLAN_RESOURCES';
3189: else
3190: l_task_in_rec.gen_etc_source_code := 'FINANCIAL_PLAN';
3358: ) AND
3359: l_index_number = l_first_index1
3360: THEN
3361: v_task_id_above := null; --ref is the structure version. structure version is
3362: --derived in PA_PROJ_TASK_STRUC_PUB.create_task_structure API.
3363: END IF;
3364: ELSE --Called from PA_PROJECT_PUB.ADD_TASK API.
3365: v_task_id_above := p_ref_task_id;
3366: END IF;
3411: l_attribute14 := l_task_in_rec.attribute14;
3412: l_attribute15 := l_task_in_rec.attribute15;
3413: END IF;
3414:
3415: PA_PROJ_TASK_STRUC_PUB.CREATE_TASK_STRUCTURE(
3416: p_calling_module => 'AMG'
3417: ,p_project_id => l_project_id
3418: ,p_task_id => l_task_id
3419: ,p_parent_task_id => l_pa_tasks_rec.parent_task_id
4151: --Added by rtarway, for BUG 3919800
4152: --Get the structure sharing type, if its partial shared structure, check for the task in
4153: --pa_proj_elements too.
4154:
4155: l_project_sharing_type := PA_PROJ_TASK_STRUC_PUB.GET_SHARE_TYPE(p_pa_project_id);
4156:
4157: IF p_pa_task_id <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
4158: AND p_pa_task_id IS NOT NULL
4159: THEN
6620:
6621: --BUG 4081329 rtarway, validate for EI date also
6622: --bug 13011347 start
6623: --bypass the date validation for the partially shared when source is workplan and msproject.
6624: l_project_sharing_type := PA_PROJ_TASK_STRUC_PUB.GET_SHARE_TYPE(l_project_id);
6625: IF ((l_project_sharing_type = 'SHARE_PARTIAL' AND p_pm_product_code <> 'MSPROJECT' AND p_pm_product_code <> 'WORKPLAN') OR (l_project_sharing_type <> 'SHARE_PARTIAL'))
6626: THEN
6627: PA_TASKS_MAINT_UTILS.Check_Start_Date_EI(
6628: p_project_id => l_project_id,
6722: --BUG 4081329, rtarway
6723: -- Validate for END EI dates too
6724: --bug 13011347 start
6725: --bypass the date validation for the partially shared when source is workplan and msproject.
6726: l_project_sharing_type := PA_PROJ_TASK_STRUC_PUB.GET_SHARE_TYPE(l_project_id);
6727: IF ((l_project_sharing_type = 'SHARE_PARTIAL' AND p_pm_product_code <> 'MSPROJECT' AND p_pm_product_code <> 'WORKPLAN') OR (l_project_sharing_type <> 'SHARE_PARTIAL'))
6728: THEN
6729: PA_TASKS_MAINT_UTILS.Check_End_Date_EI(
6730: p_project_id => l_project_id,
9864: end IF;
9865:
9866: --Call plannable task api here bug 2947492
9867:
9868: PA_PROJ_TASK_STRUC_PUB.delete_fin_plan_from_task(
9869: p_task_id => l_task_id
9870: ,p_project_id => l_project_id
9871: ,P_calling_module => 'AMG'
9872: ,x_msg_count => l_msg_count
10005:
10006: --bug 2765115
10007:
10008: --only deletes from pa_proj_elements. There is a check in pa_task_pvt1.delete_task_version api not to delete from pa_tasks if called from AMG.
10009: PA_PROJ_TASK_STRUC_PUB.delete_task_structure
10010: (
10011: p_calling_module => 'AMG'
10012: ,p_task_id => l_task_id
10013: ,p_task_version_id => p_task_version_id
10091: -- end for bug# 3801426
10092:
10093: --Project Structures Integration
10094:
10095: PA_PROJ_TASK_STRUC_PUB.delete_task_structure
10096: (
10097: p_calling_module => 'AMG'
10098: ,p_task_id => l_task_id -- changed bug# 3801426 earlierr p_task_id was used
10099: ,p_task_version_id => p_task_version_id