[Home] [Help]
404: CURSOR cur_obj_rel
405: IS
406: select object_id_to1 from pa_object_relationships
407: where object_id_to1 = l_element_version_id and
408: object_id_from1 = PA_PROJECT_STRUCTURE_UTILS.GET_FIN_STRUC_VER_ID(l_project_id)
409: and object_type_from = 'PA_STRUCTURES'
410: and relationship_type = 'S';
411: /*
412: CURSOR cur_obj_rel
436: from pa_resource_assignments ra,
437: pa_proj_element_versions pelm
438: where ra.resource_assignment_id = p_resource_assignment_id
439: AND pelm.proj_element_id(+)=ra.task_id
440: AND pelm.parent_structure_Version_id(+)=PA_PROJECT_STRUCTURE_UTILS.GET_FIN_STRUC_VER_ID(ra.project_id);
441: EXCEPTION
442: when NO_DATA_FOUND then
443: return l_return_value;
444: END;
2771: IF l_debug_mode = 'Y' THEN
2772: pa_debug.g_err_stage:='Fetching PARENT_STRUCTURE_VERSION_ID';
2773: pa_debug.write('PAFPPEUB.add_new_resource_assignments',pa_debug.g_err_stage,3);
2774: END IF;
2775: l_structure_version_id := PA_PROJECT_STRUCTURE_UTILS.GET_FIN_STRUC_VER_ID(p_project_id);
2776:
2777: /*
2778: Scheme Used Below To derive Data to be passed to Add Planning TXN API.
2779: Let the Folowing I/P Data is passed to this API.
3130: l_edit_plan_bv_id <> NVL(p_budget_version_id,-99)) THEN
3131:
3132: SELECT DECODE(wp_version_flag,
3133: 'Y',project_structure_version_id,
3134: PA_PROJECT_STRUCTURE_UTILS.GET_FIN_STRUC_VER_ID(project_id))
3135: INTO l_edit_plan_struct_id
3136: FROM pa_budget_versions
3137: WHERE budget_Version_id=p_budget_version_id;
3138:
3251: l_return_value := null;
3252: l_structure_version_id :=
3253: pa_planning_element_utils.get_fin_struct_id(p_project_id,p_budget_version_id);
3254: l_structure_status_flag :=
3255: PA_PROJECT_STRUCTURE_UTILS.Check_Struc_Ver_Published(
3256: p_project_id,
3257: l_structure_version_id);
3258: if l_structure_status_flag = 'Y' then
3259: l_structure_status := 'PUBLISHED';