The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT 'X'
FROM PA_TASK_TYPES
WHERE TASK_TYPE = p_deliverable_type_name -- 3946664 removed upper from both the sides
AND OBJECT_TYPE='PA_DLVR_TYPES';
SELECT 'X'
FROM DUAL
WHERE EXISTS (SELECT 'X'
FROM PA_PROJ_ELEMENTS
WHERE TYPE_ID = p_deliverable_type_id
AND OBJECT_TYPE='PA_DELIVERABLES');
SELECT 'X'
FROM DUAL
WHERE EXISTS (SELECT 'X'
FROM PA_OBJECT_RELATIONSHIPS obj
WHERE obj.object_id_from2 = p_deliverable_type_id
AND obj.object_type_from = 'PA_DLVR_TYPES'
AND obj.relationship_subtype = 'DLVR_TYPE_TO_ACTION'
AND obj.relationship_type = 'A'
AND obj.object_type_to = 'PA_ACTIONS');
SELECT 'X'
FROM DUAL
WHERE EXISTS (SELECT 'X'
FROM PA_OBJECT_RELATIONSHIPS obj,
PA_PROJ_ELEMENTS ppe
where ppe.type_id = p_deliverable_type_id
and ppe.object_type='PA_DELIVERABLES'
and ppe.proj_element_id = obj.object_id_from2
and obj.object_type_from = 'PA_DELIVERABLES'
and obj.object_type_to = 'PA_ACTIONS'
and obj.relationship_subtype = 'DELIVERABLE_TO_ACTION'
and obj.relationship_type = 'A');
SELECT 'X'
FROM DUAL
WHERE EXISTS (SELECT 'X'
FROM PA_OBJECT_RELATIONSHIPS obj,
PA_PROJ_ELEMENTS ppe1,
PA_PROJ_ELEMENTS ppe2
where ppe1.type_id = p_deliverable_type_id
and ppe1.object_type= 'PA_DELIVERABLES'
and ppe1.proj_element_id = obj.object_id_to2
and ppe2. proj_element_id = obj.object_id_from2
and ppe2.object_type = 'PA_TASKS'
and ppe2.project_id = ppe1.project_id
and ppe2.base_percent_comp_deriv_code = 'DELIVERABLE'
and obj.object_type_from = 'PA_TASKS'
and obj.object_type_to = 'PA_DELIVERABLES' -- 3570283 removed extra spaces
and obj.relationship_subtype = 'TASK_TO_DELIVERABLE'
and obj.relationship_type = 'A');
SELECT ppe. name||'('|| ppe.element_number||')' name_number
FROM PA_PROJ_ELEMENTS ppe ,
PA_OBJECT_RELATIONSHIPS obj
WHERE ppe.object_type='PA_TASKS'
AND ppe.proj_element_id = OBJ.object_id_from2
AND OBJ.object_id_to2 =p_deliverable_id
AND OBJ.object_type_to = 'PA_DELIVERABLES'
AND OBJ.object_type_from = 'PA_TASKS'
AND OBJ.relationship_type = 'A'
AND OBJ.relationship_subtype = 'TASK_TO_DELIVERABLE'
ORDER BY ppe.base_percent_comp_deriv_code;
SELECT meaning
FROM pa_lookups
WHERE lookup_type = 'PA_DLV_MORE'
AND lookup_code = 'MORE';
SELECT 'Y'
FROM dual
WHERE EXISTS ( SELECT 'Y'
FROM pa_object_relationships obj
,pa_proj_element_versions ver
WHERE obj.object_id_from2 = p_dlvr_item_id
AND obj.object_type_to = 'PA_ACTIONS'
AND obj.object_type_from = 'PA_DELIVERABLES'
AND obj.object_id_to2 = ver.proj_element_id
AND obj.RELATIONSHIP_TYPE = 'A'
AND obj.RELATIONSHIP_SUBTYPE = 'DELIVERABLE_TO_ACTION'
AND (nvl(OKE_DELIVERABLE_UTILS_PUB.Ready_To_Ship_Yn(ver.element_version_id),'N') = 'Y'
OR nvl(OKE_DELIVERABLE_UTILS_PUB.Ready_To_Procure_Yn(ver.element_version_id),'N') = 'Y' )
) ;
IF p_calling_module IN ( 'DELETE_DELIVERABLE','DELETE_ASSOCIATION','UPDATE_DUE_DATE' ) THEN
OPEN ship_procure_flag_dlv ;
SELECT 'Y'
FROM dual
WHERE EXISTS (SELECT 'X'
from pa_object_relationships
where object_id_to2 = p_dlvr_item_id
and object_type_from = 'PA_ASSIGNMENTS'
and object_type_to = 'PA_DELIVERABELS'
and relationship_type = 'A'
and relationship_subtype = 'ASSIGNMENT_TO_DELIVERABLE') ;
SELECT 'Y'
FROM dual
WHERE EXISTS ( SELECT 'Y'
FROM pa_object_relationships obj
,pa_proj_element_versions ver
WHERE obj.object_id_from2 = p_dlvr_item_id
AND obj.object_type_to = 'PA_ACTIONS'
AND obj.object_type_from = 'PA_DELIVERABLES'
AND obj.object_id_to2 = ver.proj_element_id
AND obj.relationship_type = 'A'
AND obj.relationship_subtype = 'DELIVERABLE_TO_ACTION'
AND (nvl(OKE_DELIVERABLE_UTILS_PUB.WSH_Initiated_Yn(ver.element_version_id),'N') = 'Y'
OR nvl(OKE_DELIVERABLE_UTILS_PUB.REQ_Initiated_Yn(ver.element_version_id),'N') = 'Y'
OR PA_DELIVERABLE_UTILS.GET_FUNCTION_CODE(object_id_to2) = 'BILLING')
) ;
SELECT project_system_status_code
FROM pa_project_statuses
WHERE project_status_code = p_dlvr_status_code
AND status_type = 'DELIVERABLE' ;
SELECT 'Y'
FROM dual
WHERE EXISTS ( SELECT 'Y'
FROM pa_object_relationships obj
,pa_proj_element_versions ver
WHERE
obj.object_id_from2 = p_dlvr_item_id
AND obj.object_type_to = 'PA_ACTIONS'
AND obj.object_type_from = 'PA_DELIVERABLES'
AND obj.object_id_to2 = ver.proj_element_id
AND
(
(
PA_DELIVERABLE_UTILS.GET_FUNCTION_CODE(object_id_to2) = 'SHIPPING'
-- Commented for Bug 3503296 AND nvl(OKE_DELIVERABLE_UTILS_PUB.WSH_Initiated_Yn(ver.element_version_id),'N') = 'Y'
AND nvl(OKE_DELIVERABLE_UTILS_PUB.WSH_Initiated_Yn(ver.element_version_id),'N') = 'N' --Included for Bug 3503296
)
OR
(
PA_DELIVERABLE_UTILS.GET_FUNCTION_CODE(object_id_to2) = 'PROCUREMENT'
-- Commented for Bug 3503296 AND nvl(OKE_DELIVERABLE_UTILS_PUB.REQ_Initiated_Yn(ver.element_version_id),'N') = 'Y'
AND nvl(OKE_DELIVERABLE_UTILS_PUB.REQ_Initiated_Yn(ver.element_version_id),'N') = 'N' --Included for Bug 3503296
)
)
);
SELECT 'Y'
FROM dual
WHERE EXISTS ( SELECT 'Y'
FROM pa_object_relationships obj
,pa_proj_element_versions ver
WHERE
obj.object_id_from2 = p_dlvr_item_id
AND obj.object_type_to = 'PA_ACTIONS'
AND obj.object_type_from = 'PA_DELIVERABLES'
AND obj.object_id_to2 = ver.proj_element_id
AND
(
PA_DELIVERABLE_UTILS.GET_FUNCTION_CODE(object_id_to2) = 'BILLING'
AND nvl(PA_BILLING_WRKBNCH_EVENTS.CHECK_DELV_EVENT_PROCESSED(ver.project_id,p_dlvr_version_id,ver.element_version_id) ,'N') = 'N'
)
);
SELECT task_type_class_code
FROM pa_task_types
WHERE task_type_id = p_dlvr_type_id ;
SELECT function_code
FROM pa_proj_elements
WHERE proj_element_id = p_action_element_id ;
SELECT
'Y'
FROM
DUAL
WHERE EXISTS
(
SELECT
'Y'
FROM
FND_ATTACHED_DOCUMENTS ATT
WHERE
ATT.ENTITY_NAME = 'PA_DLVR_DOC_ATTACH'
AND ATT.PK1_VALUE = p_dlvr_version_id
);
SELECT ppe.proj_element_id
,ppe.element_version_id
FROM pa_proj_elem_ver_structure ppe
,pa_proj_structure_types pst
,pa_structure_types sty
WHERE ppe.project_id = p_project_id
AND ppe.proj_element_id = pst.proj_element_id
AND pst.structure_type_id = sty.structure_type_id
AND sty.structure_type = p_structure_type
AND sty.structure_type_class_code = p_structure_type ;
/*Select
ppe.proj_element_id
,pev.element_version_id
From
pa_proj_elements ppe,
pa_proj_element_versions pev,
pa_proj_structure_types pst,
pa_structure_types st
Where
ppe.project_id = p_project_id
and pev.project_id = p_project_id
and ppe.object_type = l_object_type
and ppe.proj_element_id = pev.proj_element_id
and pev.object_type = l_object_type
and ppe.proj_element_id = pst.proj_element_id
and pst.STRUCTURE_TYPE_ID = st.STRUCTURE_TYPE_ID
and st.structure_type = p_structure_type
and st.structure_type_class_code = p_structure_type;
SELECT
p.carrying_out_organization_id INTO x_organization_id
FROM
PA_PROJECTS_ALL p
WHERE p.project_id = p_project_id;
SELECT
ppe.carrying_out_organization_id INTO x_organization_id
FROM
PA_PROJ_ELEMENTS ppe
WHERE
ppe.proj_element_id = p_task_id
AND ppe.object_type = 'PA_TASKS'
AND ppe.project_id = p_project_id;
SELECT ppe.base_percent_comp_deriv_code
INTO x_base_percent_comp_deriv_code
FROM PA_PROJ_ELEMENTS ppe
WHERE ppe.proj_element_id = p_task_id
AND ppe.object_type = 'PA_TASKS';
select ptt.base_percent_comp_deriv_code
INTO x_base_percent_comp_deriv_code
from pa_task_types ptt,
pa_proj_elements ppe
where ppe.proj_element_id = p_task_id
and ptt.task_type_id = ppe.type_id ;
SELECT
'Y' into x_actions_exists
FROM
DUAL
WHERE
EXISTS
(
SELECT
OBJECT_RELATIONSHIP_ID
FROM
PA_OBJECT_RELATIONSHIPS
WHERE
OBJECT_ID_FROM2 = p_proj_element_id
AND RELATIONSHIP_SUBTYPE = l_relationship_type
AND RELATIONSHIP_TYPE = 'A'
);
SELECT
'Y' into x_biling_function_exists
FROM
DUAL
WHERE
EXISTS
(
SELECT
PPE.PROJ_ELEMENT_ID
FROM
PA_OBJECT_RELATIONSHIPS POR
,PA_PROJ_ELEMENTS PPE
WHERE
POR.OBJECT_ID_FROM2 = p_proj_element_id
AND PPE.PROJ_ELEMENT_ID = POR.OBJECT_ID_TO2
AND POR.OBJECT_TYPE_FROM = 'PA_DELIVERABLES'
AND POR.OBJECT_TYPE_TO = 'PA_ACTIONS'
AND PPE.FUNCTION_CODE = l_function_code
);
SELECT
ptt.prog_entry_enable_flag
,ptt.enable_dlvr_actions_flag
,ptt.initial_status_code
FROM
PA_TASK_TYPES ptt
WHERE
ptt.task_type_id = p_dlvr_type_id
AND ptt.object_type = 'PA_DLVR_TYPES';
SELECT
PPE.NAME,
PPE.ELEMENT_NUMBER
FROM
PA_PROJ_ELEMENTS PPE,
PA_PROJ_ELEMENT_VERSIONS PEV
WHERE
PEV.ELEMENT_VERSION_ID = p_dlvr_ver_id
AND PPE.PROJECT_ID = PEV.PROJECT_ID
AND PPE.PROJ_ELEMENT_ID = PEV.PROJ_ELEMENT_ID
AND PPE.OBJECT_TYPE = 'PA_DELIVERABLES'
AND PEV.OBJECT_TYPE = 'PA_DELIVERABLES';
SELECT
PPE.NAME,
PPE.ELEMENT_NUMBER
FROM
PA_PROJ_ELEMENTS PPE,
PA_PROJ_ELEMENT_VERSIONS PEV
WHERE
PEV.ELEMENT_VERSION_ID = p_dlvr_action_ver_id
AND PPE.PROJECT_ID = PEV.PROJECT_ID
AND PPE.PROJ_ELEMENT_ID = PEV.PROJ_ELEMENT_ID
AND PPE.OBJECT_TYPE = 'PA_ACTIONS'
AND PEV.OBJECT_TYPE = 'PA_ACTIONS';
SELECT
PPA.PROJFUNC_CURRENCY_CODE
FROM
PA_PROJECTS_ALL PPA,
PA_PROJ_ELEMENT_VERSIONS PEV
WHERE
PEV.ELEMENT_VERSION_ID = p_dlvr_ver_id
AND PEV.PROJECT_ID = PPA.PROJECT_ID
AND PEV.OBJECT_TYPE = 'PA_DELIVERABLES';
SELECT
PPA.PROJECT_ID,
PPA.NAME
FROM
PA_PROJECTS_ALL PPA,
PA_PROJ_ELEMENT_VERSIONS PEV
WHERE
PEV.ELEMENT_VERSION_ID = p_dlvr_ver_id
AND PEV.PROJECT_ID = PPA.PROJECT_ID
AND PEV.OBJECT_TYPE = 'PA_DELIVERABLES';
SELECT
PPA.PROJECT_ID,
PPA.NAME
FROM
PA_PROJECTS_ALL PPA,
PA_PROJ_ELEMENT_VERSIONS PEV
WHERE
PEV.ELEMENT_VERSION_ID = p_dlvr_action_ver_id
AND PEV.PROJECT_ID = PPA.PROJECT_ID
AND PEV.OBJECT_TYPE = 'PA_ACTIONS';
SELECT
PPE. NAME||'('|| PPE.ELEMENT_NUMBER||')' NAME_NUMBER
FROM
PA_PROJ_ELEMENTS PPE
WHERE PPE.PROJ_ELEMENT_ID = p_task_id
AND PPE.OBJECT_TYPE = 'PA_TASKS';
SELECT
PPF.PERSON_ID
,PPF.FULL_NAME
FROM
PA_PROJ_ELEMENTS PPE,
PER_ALL_PEOPLE_F PPF,
PA_PROJ_ELEMENT_VERSIONS PEV
WHERE
PEV.ELEMENT_VERSION_ID = p_task_ver_id
AND PEV.OBJECT_TYPE = 'PA_TASKS'
AND PEV.PROJ_ELEMENT_ID = PPE.PROJ_ELEMENT_ID
AND PPE.OBJECT_TYPE = 'PA_TASKS'
AND PPE.MANAGER_PERSON_ID = PPF.PERSON_ID
AND PPE.PROJECT_ID = p_project_id
AND PEV.PROJECT_ID = p_project_id
AND SYSDATE BETWEEN PPF.EFFECTIVE_START_DATE AND PPF.EFFECTIVE_END_DATE;
SELECT
SCHEDULED_FINISH_DATE,
TARGET_FINISH_DATE,
COMPLETION_DATE,
SYSDATE
FROM
PA_PROJECTS_ALL
WHERE
PROJECT_ID = p_project_id;
SELECT
PES.SCHEDULED_FINISH_DATE,
SYSDATE
FROM
PA_PROJ_ELEMENT_VERSIONS PEV
,PA_PROJ_ELEM_VER_SCHEDULE PES
WHERE
PEV.ELEMENT_VERSION_ID = p_task_ver_id
AND PEV.ELEMENT_VERSION_ID = PES.ELEMENT_VERSION_ID ;
SELECT
PPF.PERSON_ID
,PPF.FULL_NAME
FROM
PA_PROJ_ELEMENT_VERSIONS PEV
,PA_PROJ_ELEMENTS PPE
,PER_ALL_PEOPLE_F PPF
WHERE
PEV.ELEMENT_VERSION_ID = p_dlvr_ver_id
AND PPE.OBJECT_TYPE = 'PA_DELIVERABLES'
AND PPE.PROJ_ELEMENT_ID = PEV.PROJ_ELEMENT_ID
AND PEV.OBJECT_TYPE = 'PA_DELIVERABLES'
AND PPE.MANAGER_PERSON_ID = PPF.PERSON_ID
AND SYSDATE BETWEEN PPF.EFFECTIVE_START_DATE AND PPF.EFFECTIVE_END_DATE;
SELECT
PES.SCHEDULED_FINISH_DATE,
SYSDATE
FROM
PA_PROJ_ELEMENT_VERSIONS PEV,
PA_PROJ_ELEM_VER_SCHEDULE PES
WHERE
PEV.ELEMENT_VERSION_ID = p_dlvr_ver_id
AND PEV.ELEMENT_VERSION_ID = PES.ELEMENT_VERSION_ID ;
SELECT
PES.EARLY_START_DATE
,PES.EARLY_FINISH_DATE
,PES.SCHEDULED_FINISH_DATE
FROM
PA_PROJ_ELEMENT_VERSIONS PEV
,PA_PROJ_ELEM_VER_SCHEDULE PES
WHERE
PEV.ELEMENT_VERSION_ID = p_task_ver_id
AND PEV.ELEMENT_VERSION_ID = PES.ELEMENT_VERSION_ID ;
SELECT 'X'
FROM DUAL
WHERE EXISTS (SELECT 'X'
FROM PA_OBJECT_RELATIONSHIPS obj,
PA_PROJ_ELEMENTS ppe
where ppe.proj_element_id = p_dlv_element_id
and ppe.object_type= 'PA_DELIVERABLES'
and obj.object_id_to2 = ppe.proj_element_id
and obj.object_type_from = 'PA_TASKS'
and obj.object_type_to = 'PA_DELIVERABLES' -- 3570283 removed extra spaces
and obj.relationship_subtype = 'TASK_TO_DELIVERABLE'
and obj.relationship_type = 'A'
and nvl(PA_DELIVERABLE_UTILS.GET_PROGRESS_ROLLUP_METHOD(obj.object_id_from2),'X') = 'DELIVERABLE'
); */
SELECT 'X'
FROM DUAL
WHERE EXISTS (SELECT 'X'
FROM PA_OBJECT_RELATIONSHIPS obj,
pa_proj_elements ppe,
pa_task_types ptt
where obj.object_id_to2 = p_dlv_element_id
and obj.object_type_from = 'PA_TASKS'
and obj.object_type_to = 'PA_DELIVERABLES'
and obj.relationship_subtype = 'TASK_TO_DELIVERABLE'
and obj.relationship_type = 'A'
and ppe.proj_element_id = obj.object_id_from2
and ppe.type_id=ptt.task_type_id
and nvl(ppe.base_percent_comp_deriv_code,ptt.base_percent_comp_deriv_code) = 'DELIVERABLE');
SELECT 'Y'
FROM dual
WHERE EXISTS ( SELECT 'Y'
FROM pa_object_relationships obj
,pa_proj_element_versions ver
WHERE obj.object_id_from2 = p_dlv_element_id
AND obj.object_type_to = 'PA_ACTIONS'
AND obj.object_type_from = 'PA_DELIVERABLES'
AND obj.object_id_to2 = ver.proj_element_id
AND obj.relationship_type = 'A'
AND obj.relationship_subtype = 'DELIVERABLE_TO_ACTION'
AND nvl(OKE_DELIVERABLE_UTILS_PUB.Ready_To_Ship_Yn(ver.element_version_id),'N') = 'Y'
) ;
SELECT 'Y'
FROM dual
WHERE EXISTS ( SELECT 'Y'
FROM pa_object_relationships obj
,pa_proj_element_versions ver
WHERE obj.object_id_from2 = p_dlv_element_id
AND obj.object_type_to = 'PA_ACTIONS'
AND obj.object_type_from = 'PA_DELIVERABLES'
AND obj.object_id_to2 = ver.proj_element_id
AND obj.relationship_type = 'A'
AND obj.relationship_subtype = 'DELIVERABLE_TO_ACTION'
AND nvl(OKE_DELIVERABLE_UTILS_PUB.Ready_To_Procure_Yn(ver.element_version_id),'N') = 'Y'
) ;
SELECT 'Y'
FROM dual
WHERE EXISTS ( SELECT 'Y'
FROM pa_object_relationships obj
,pa_proj_elements ppe
,pa_task_types ptt
WHERE obj.object_id_from2 = p_proj_element_id
AND obj.object_type_to = 'PA_DELIVERABLES'
AND obj.object_type_from = 'PA_TASKS'
AND obj.relationship_type = 'A'
AND obj.relationship_subtype = 'TASK_TO_DELIVERABLE'
AND obj.object_id_to2 = ppe.proj_element_id
AND ppe.object_type = 'PA_DELIVERABLES'
AND ptt.task_type_id = ppe.type_id
AND nvl(ptt.prog_entry_enable_flag ,'N') = 'Y'
) ;
SELECT 'Y'
FROM pa_proj_elements ppe
,pa_task_types ptt
WHERE ppe.proj_element_id = p_proj_element_id
AND ppe.object_type = 'PA_DELIVERABLES'
AND ptt.task_type_id = ppe.type_id
AND nvl(ptt.prog_entry_enable_flag,'N') = 'Y'
AND ptt.object_type = 'PA_DLVR_TYPES' ;
SELECT
P.PROJFUNC_CURRENCY_CODE
-- ,P.ORG_ID -- 3462360 removed org_id column
FROM
PA_PROJECTS_ALL P
WHERE
P.PROJECT_ID = p_project_id;
SELECT ppe.description
FROM pa_proj_elements ppe
,pa_object_relationships obj
,pa_proj_element_versions pev
WHERE pev.element_version_id = p_action_ver_id
AND pev.object_type = 'PA_ACTIONS' /*Included this clause for Performance fix Bug # 3614361 */
AND pev.proj_element_id = obj.object_id_to2
AND obj.relationship_type = 'A'
AND obj.relationship_subtype = 'DELIVERABLE_TO_ACTION'
AND obj.object_type_from = 'PA_DELIVERABLES'
AND obj.object_type_to = 'PA_ACTIONS'
AND obj.object_id_from2 = ppe.proj_element_id
AND ppe.object_type = 'PA_DELIVERABLES' /*Included this clause for Performance fix Bug # 3614361 */
;
SELECT
ppe.description
FROM
pa_proj_elements ppe
,pa_proj_element_versions pev
WHERE
pev.element_version_id = p_deliverable_id
AND ppe.object_type = 'PA_DELIVERABLES'
AND pev.object_type = 'PA_DELIVERABLES'
AND ppe.proj_element_id = pev.proj_element_id
AND ppe.project_id = pev.project_id;
SELECT 'Y'
FROM dual
WHERE EXISTS (SELECT 'Y'
FROM pa_proj_elements ppe
,pa_object_relationships obj
,pa_proj_element_versions pev
,pa_task_types ptt
WHERE pev.element_version_id = p_action_ver_id
AND pev.proj_element_id = obj.object_id_to2
AND obj.relationship_type = 'A'
AND obj.relationship_subtype = 'DELIVERABLE_TO_ACTION'
AND obj.object_type_from = 'PA_DELIVERABLES'
AND obj.object_type_to = 'PA_ACTIONS'
AND obj.object_id_from2 = ppe.proj_element_id
AND ptt.task_type_id = ppe.type_id
AND ptt.task_type_class_code = 'ITEM'
) ;
SELECT
PES.SCHEDULED_FINISH_DATE,
SYSDATE
FROM
PA_PROJ_ELEMENT_VERSIONS PEV,
PA_PROJ_ELEM_VER_SCHEDULE PES
WHERE
PEV.ELEMENT_VERSION_ID = p_dlvr_ver_id
AND PEV.ELEMENT_VERSION_ID = PES.ELEMENT_VERSION_ID
AND PEV.OBJECT_TYPE = 'PA_DELIVERABLES'
AND PEV.PROJECT_ID = PES.PROJECT_ID;/* Including this additional clause for Performance Fix : Bug 3614361 */
SELECT
PES.EARLY_START_DATE
,PES.EARLY_FINISH_DATE
,PES.SCHEDULED_FINISH_DATE
FROM
PA_PROJ_ELEMENT_VERSIONS PEV
,PA_PROJ_ELEM_VER_SCHEDULE PES
WHERE
PEV.ELEMENT_VERSION_ID = p_task_ver_id
AND PEV.ELEMENT_VERSION_ID = PES.ELEMENT_VERSION_ID
AND PEV.OBJECT_TYPE = 'PA_TASKS'
AND PEV.PROJECT_ID = PES.PROJECT_ID;/* Including this additional clause for Performance Fix : Bug 3614361 */
SELECT 1 FROM dual
WHERE EXISTS(
SELECT ppe.proj_element_id DlvrElemId, ppev.element_version_id DlvrElemVerId
FROM pa_proj_elements ppe,
pa_proj_element_versions ppev
WHERE ppe.proj_element_id = ppev.proj_element_id
AND ppe.project_id = p_project_id
AND ppev.project_id = p_project_id
AND ppe.object_type = ppev.object_type
AND ppe.object_type = 'PA_DELIVERABLES'
AND 'Y' = PA_DELIVERABLE_UTILS.IS_DLV_BASED_ASSCN_EXISTS(ppe.proj_element_id,ppev.element_version_id)
);
SELECT 1 FROM dual
WHERE EXISTS(
SELECT 1
FROM pa_proj_elements ppe
WHERE ppe.project_id = p_project_id
AND ppe.object_type = 'PA_DELIVERABLES'
AND 'Y' = PA_DELIVERABLE_UTILS.IS_DELIVERABLE_HAS_PROGRESS(p_project_id,ppe.proj_element_id)
);
/* Commented the following SELECT statement for Performance Bug Fix 3614361 */
/*
SELECT 1 FROM dual
WHERE EXISTS(
SELECT ppe.proj_element_id DlvrElemId, ppev.element_version_id DlvrElemVerId
FROM pa_proj_elements ppe,
pa_proj_element_versions ppev
WHERE ppe.project_id = p_project_id
AND ppe.object_type = 'PA_DELIVERABLES'
AND 'Y' = PA_DELIVERABLE_UTILS.IS_DELIVERABLE_HAS_PROGRESS(p_project_id,ppe.proj_element_id)
);
SELECT 1 FROM dual
WHERE EXISTS(
SELECT ppe.proj_element_id DlvrElemId, ppev.element_version_id DlvrElemVerId
FROM pa_proj_elements ppe,
pa_proj_element_versions ppev
WHERE ppe.proj_element_id = ppev.proj_element_id
AND ppe.project_id = p_project_id
AND ppev.project_id = p_project_id
AND ppe.object_type = ppev.object_type
AND ppe.object_type = 'PA_ACTIONS'
AND ( 'Y' = PA_DELIVERABLE_UTILS.GET_READY_TO_SHIP_FLAG(ppe.proj_element_id,ppev.element_version_id)
OR 'Y' = PA_DELIVERABLE_UTILS.GET_READY_TO_PROC_FLAG(ppe.proj_element_id,ppev.element_version_id) )
);
SELECT 1 FROM dual
WHERE EXISTS(
SELECT 1
FROM pa_proj_elements ppe
WHERE ppe.project_id = p_project_id
AND ppe.object_type = 'PA_ACTIONS'
AND PA_DELIVERABLE_UTILS.GET_FUNCTION_CODE(ppe.proj_element_id) = 'BILLING'
AND 'Y' = PA_Billing_Wrkbnch_Events.CHECK_BILLING_EVENT_EXISTS(p_project_id,ppe.proj_element_id)
);
PROCEDURE UPDATE_TSK_STATUS_CANCELLED( p_api_version IN NUMBER := 1.0
,p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
,p_debug_mode IN VARCHAR2 := 'N'
,p_task_id IN NUMBER
,p_status_code IN PA_PROJECT_STATUSES.PROJECT_STATUS_CODE%TYPE
,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
,x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
,x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
)
IS
CURSOR cur_check_cancel_possible IS
SELECT 1 FROM dual
WHERE EXISTS(
SELECT 1
FROM pa_proj_elements ppe,
pa_proj_element_versions ppv,
pa_object_relationships obj1,
pa_object_relationships obj2
WHERE ppe.proj_element_id=p_task_id
AND ppe.object_type='PA_TASKS'
AND obj1.relationship_type='A'
AND obj1.relationship_subtype='TASK_TO_DELIVERABLE'
AND obj1.object_id_from2=p_task_id
AND obj1.object_type_from='PA_TASKS'
AND obj1.object_type_to='PA_DELIVERABLES'
AND obj2.relationship_type='A'
AND obj2.relationship_subtype='DELIVERABLE_TO_ACTION'
AND obj2.object_id_from2=obj1.object_id_to2
AND obj2.object_type_from='PA_DELIVERABLES'
AND obj2.object_type_to='PA_ACTIONS'
AND ppv.proj_element_id=obj2.object_id_to2
AND ppv.object_type='PA_ACTIONS'
AND ( nvl(OKE_DELIVERABLE_UTILS_PUB.WSH_Initiated_Yn(ppv.element_version_id),'N') = 'Y'
OR nvl(OKE_DELIVERABLE_UTILS_PUB.REQ_Initiated_Yn(ppv.element_version_id),'N') = 'Y'
OR PA_DELIVERABLE_UTILS.GET_FUNCTION_CODE(obj2.object_id_to2) = 'BILLING' )
);
SELECT proj_element_id
FROM pa_proj_elements ppe,
pa_object_relationships obj
WHERE obj.relationship_type='A'
AND obj.relationship_subtype='TASK_TO_DELIVERABLE'
AND obj.object_id_from2=p_task_id
AND obj.object_type_from='PA_TASKS'
AND obj.object_type_to='PA_DELIVERABLES'
AND ppe.proj_element_id = obj.object_id_to2
AND ppe.object_type = 'PA_DELIVERABLES';
PA_DEBUG.set_curr_function( p_function => 'PA_DELIVERABLE_UTILS : UPDATE_TSK_STATUS_CANCELLED',
p_debug_mode => l_debug_mode );
Pa_Debug.g_err_stage:= 'PA_DELIVERABLE_UTILS : UPDATE_TSK_STATUS_CANCELLED : Printing Input parameters';
SELECT distinct PROJECT_SYSTEM_STATUS_CODE INTO l_system_code
FROM pa_project_statuses
WHERE STATUS_TYPE='TASK'
AND PROJECT_STATUS_CODE=p_status_code;
UPDATE pa_proj_elements
SET status_code = p_status_code
WHERE proj_element_id = assoc_dlvr_rec.proj_element_id;
, p_procedure_name => 'UPDATE_TSK_STATUS_CANCELLED'
, p_error_text => x_msg_data );
END UPDATE_TSK_STATUS_CANCELLED;
SELECT 1 FROM dual
WHERE EXISTS(
SELECT 1
FROM pa_proj_elements ppe,
pa_proj_element_versions ppv,
pa_object_relationships obj1,
pa_object_relationships obj2
WHERE ppe.proj_element_id=p_wp_task_version_id
AND ppe.object_type='PA_TASKS'
AND obj1.relationship_type='A'
AND obj1.relationship_subtype='TASK_TO_DELIVERABLE'
AND obj1.object_id_from2=ppe.proj_element_id
AND obj1.object_type_from='PA_TASKS'
AND obj1.object_type_to='PA_DELIVERABLES'
AND obj2.relationship_type='A'
AND obj2.relationship_subtype='DELIVERABLE_TO_ACTION'
AND obj2.object_id_from2=obj1.object_id_to2
AND obj2.object_type_from='PA_DELIVERABLES'
AND obj2.object_type_to='PA_ACTIONS'
AND ppv.proj_element_id=obj2.object_id_to2
AND ppv.object_type='PA_ACTIONS'
AND ( nvl(OKE_DELIVERABLE_UTILS_PUB.WSH_Initiated_Yn(ppv.element_version_id),'N') = 'Y'
OR nvl(OKE_DELIVERABLE_UTILS_PUB.REQ_Initiated_Yn(ppv.element_version_id),'N') = 'Y'
OR nvl(OKE_DELIVERABLE_UTILS_PUB.MDS_Initiated_Yn(ppv.element_version_id),'N') = 'Y'
OR PA_DELIVERABLE_UTILS.GET_FUNCTION_CODE(obj2.object_id_to2) = 'BILLING' )
);
SELECT 1 FROM dual
WHERE EXISTS(
SELECT ppe.proj_element_id
FROM pa_proj_elements ppe,
pa_object_relationships obj
WHERE obj.relationship_type='A'
AND obj.relationship_subtype='TASK_TO_DELIVERABLE'
AND obj.object_id_from2=p_task_id
AND obj.object_type_from='PA_TASKS'
AND obj.object_type_to='PA_DELIVERABLES'
AND ppe.proj_element_id = obj.object_id_to2
AND 'Y' = PA_DELIVERABLE_UTILS.IS_DELIVERABLE_HAS_PROGRESS(ppe.project_id,ppe.proj_element_id)
);
SELECT 1 FROM dual
WHERE EXISTS(
SELECT 1
FROM pa_proj_elements ppe,
pa_object_relationships obj,
pa_proj_element_versions ppev
WHERE ppe.proj_element_id=p_task_id
AND ppe.object_type='PA_TASKS'
AND obj.relationship_type='A'
AND obj.relationship_subtype='TASK_TO_DELIVERABLE'
AND obj.object_id_from2=ppe.proj_element_id
AND obj.object_type_from='PA_TASKS'
AND obj.object_type_to='PA_DELIVERABLES'
AND ppev.proj_element_id = obj.object_id_to2
AND ppev.project_id = ppe.project_id
/*This AND Clause is Wrong as the 1st param passed is the Task ID whereas IS_DLV_BASED_ASSCN_EXISTS API
expects the 1st param as the Deliverable's Proj Element ID
AND 'Y' = PA_DELIVERABLE_UTILS.IS_DLV_BASED_ASSCN_EXISTS(ppe.proj_element_id,
ppev.element_version_id)
So,Included the new AND CLause as below */
AND 'Y' = PA_DELIVERABLE_UTILS.IS_DLV_BASED_ASSCN_EXISTS(ppev.proj_element_id ,
ppev.element_version_id)
);
SELECT 'Y' FROM dual
WHERE EXISTS(
SELECT 1
FROM pa_proj_elements ppe,
pa_proj_elements ppe2,
pa_proj_element_versions ppev,
pa_object_relationships obj1,
pa_object_relationships obj2
WHERE ppe.project_id = p_project_id
AND ppe.object_type = 'PA_ACTIONS'
AND ppev.project_id = p_project_id
AND ppe.proj_element_id = ppev.proj_element_id
AND obj1.object_id_to2 = ppe.proj_element_id
AND obj1.relationship_type ='A'
AND obj1.relationship_subtype = 'DELIVERABLE_TO_ACTION'
AND obj1.object_type_from ='PA_DELIVERABLES'
AND obj1.object_type_to = 'PA_ACTIONS'
AND obj2.object_id_to2 = obj1.object_id_from2
AND obj2.relationship_type ='A'
AND obj2.relationship_subtype='TASK_TO_DELIVERABLE'
AND obj2.object_type_from = 'PA_TASKS'
AND obj2.object_type_to = 'PA_DELIVERABLES'
AND ppe2.proj_element_id=obj2.object_id_from1
AND ppe2.object_type='PA_TASKS'
AND ( nvl(OKE_DELIVERABLE_UTILS_PUB.WSH_Initiated_Yn(ppev.element_version_id),'N') = 'Y'
OR nvl(OKE_DELIVERABLE_UTILS_PUB.REQ_Initiated_Yn(ppev.element_version_id),'N') = 'Y'
OR nvl(OKE_DELIVERABLE_UTILS_PUB.MDS_Initiated_Yn(ppev.element_version_id),'N') = 'Y'
OR PA_DELIVERABLE_UTILS.GET_FUNCTION_CODE(ppe.proj_element_id) = 'BILLING' )
);
SELECT ppe. name||'('|| ppe.element_number||')' name_number
FROM PA_PROJ_ELEMENTS ppe ,
PA_OBJECT_RELATIONSHIPS obj
WHERE ppe.object_type='PA_DELIVERABLES'
AND ppe.proj_element_id = OBJ.object_id_to2
AND OBJ.object_id_from2 =p_task_id
AND OBJ.object_type_to = 'PA_DELIVERABLES'
AND OBJ.object_type_from = 'PA_TASKS'
AND OBJ.relationship_type = 'A'
AND OBJ.relationship_subtype = 'TASK_TO_DELIVERABLE';
SELECT meaning
FROM pa_lookups
WHERE lookup_type = 'PA_DLV_MORE'
AND lookup_code = 'MORE';
SELECT start_date
,completion_date
FROM pa_projects_all pa
WHERE pa.project_id = p_project_id ;
SELECT 'Y' FROM DUAL
WHERE EXISTS(SELECT 'Y'
FROM pa_proj_elements ppe,
pa_task_types ptt
WHERE ppe.object_type = 'PA_DELIVERABLES'
AND ppe.type_id = ptt.task_type_id
AND ptt.task_type_class_code = 'ITEM'
AND ptt.object_type = 'PA_DLVR_TYPES'
) ;
SELECT 'Y'
FROM DUAL
WHERE EXISTS (Select 'Y'
from pa_proj_elements ppe,
pa_proj_element_versions pev
where pev.element_version_id = p_action_version_id
and ppe.proj_element_id = pev.proj_element_id
and ppe.function_code = 'BILLING'
) ;
SELECT ppt.project_type_class_code
FROM pa_projects_all ppa, pa_project_types ppt
WHERE ppa.project_id = p_project_id
AND ppa.project_type = ppt.project_type
AND ppa.org_id = ppt.org_id; -- 4363092 MOAC Changes
SELECT 'Y'
FROM PA_TASK_TYPES
WHERE TASK_TYPE_ID=(SELECT TYPE_ID
FROM PA_PROJ_ELEMENTS PPE,
PA_PROJ_ELEMENT_VERSIONS PEV
WHERE PPE.PROJ_ELEMENT_ID= PEV.PROJ_ELEMENT_ID
AND PEV.ELEMENT_VERSION_ID = p_deliverable_id
AND PEV.OBJECT_TYPE='PA_DELIVERABLES'
AND PPE.OBJECT_TYPE='PA_DELIVERABLES')
AND TASK_TYPE_CLASS_CODE='ITEM'
AND OBJECT_TYPE='PA_DLVR_TYPES';
SELECT
ppe.name || '(' || ppe.element_number || ')'
FROM
pa_proj_elements ppe
,pa_proj_element_versions pev
WHERE
pev.element_version_id = p_deliverable_id
AND ppe.object_type = 'PA_DELIVERABLES'
AND pev.object_type = 'PA_DELIVERABLES'
AND ppe.proj_element_id = pev.proj_element_id
AND ppe.project_id = pev.project_id;
SELECT
ppe.ELEMENT_NUMBER
FROM
pa_proj_elements ppe
,pa_proj_element_versions pev
WHERE
pev.element_version_id = p_deliverable_id
AND ppe.object_type = 'PA_DELIVERABLES'
AND pev.object_type = 'PA_DELIVERABLES'
AND ppe.proj_element_id = pev.proj_element_id
AND ppe.project_id = pev.project_id;
select
ppe.manager_person_id
from
pa_proj_elements ppe,
pa_proj_element_versions pev
where
pev.element_version_id = p_deliverable_id
and pev.object_type = 'PA_DELIVERABLES'
and ppe.object_type = 'PA_DELIVERABLES'
and pev.proj_element_id = ppe.proj_element_id
and pev.project_id = ppe.project_id
and pev.object_type = pev.object_type;
, p_calling_mode IN VARCHAR2 := 'INSERT'
, x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
, x_msg_count OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
, x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
)
IS
l_api_name CONSTANT VARCHAR2(100) := 'VALIDATE_DELIVERABLE';
SELECT name INTO l_task_number
FROM Pa_Proj_Elements
WHERE proj_element_id = p_task_id;
SELECT segment1 INTO l_project_number
FROM Pa_Projects_All
WHERE project_id = p_project_id;
SELECT 'X'
FROM PA_TASK_TYPES
WHERE TASK_TYPE_ID = p_deliverable_type_id
AND sysdate between nvl(start_date_active,sysdate) and nvl(end_date_active, sysdate)
AND OBJECT_TYPE='PA_DLVR_TYPES';
SELECT
pev.element_version_id
FROM
pa_proj_elements ppe
,pa_proj_element_versions pev
WHERE
pev.proj_element_id = p_deliverable_id
AND ppe.object_type = 'PA_DELIVERABLES'
AND pev.object_type = 'PA_DELIVERABLES'
AND ppe.proj_element_id = pev.proj_element_id
AND ppe.project_id = pev.project_id
AND ppe.project_id = p_project_id
AND pev.parent_structure_version_id = nvl(p_structure_version_id, pev.parent_structure_version_id);
SELECT obj.object_relationship_id
FROM PA_OBJECT_RELATIONSHIPS obj
WHERE OBJ.object_id_from2 = p_task_id
AND OBJ.object_id_to2 =p_deliverable_id
AND OBJ.object_type_to = 'PA_DELIVERABLES'
AND OBJ.object_type_from = 'PA_TASKS'
AND OBJ.relationship_type = 'A'
AND OBJ.relationship_subtype = 'TASK_TO_DELIVERABLE';
, p_calling_mode IN VARCHAR2 := 'INSERT'
) RETURN VARCHAR2
IS
l_return_status varchar2(1);
SELECT 'X'
FROM PA_PROJECT_STATUSES
WHERE UPPER(project_status_code) = UPPER(p_status_code)
AND UPPER(project_system_status_code) = DECODE(p_calling_mode, 'INSERT', 'DLVR_NOT_STARTED',project_system_status_code)
AND status_type = 'DELIVERABLE'
AND sysdate between nvl(start_date_active, sysdate) and nvl(end_date_active,sysdate);
SELECT elem.proj_element_id, proj.segment1
FROM pa_proj_elements elem, pa_projects_all proj
where pm_source_reference = p_deliverable_reference
and elem.project_id = p_project_id
and elem.project_id = proj.project_id
and object_type = 'PA_DELIVERABLES';
SELECT 'X'
FROM pa_proj_elements
where proj_element_id = p_deliverable_id
and project_id = p_project_id
and object_type = 'PA_DELIVERABLES';
SELECT proj_element_id
FROM pa_proj_elements
where pm_source_reference = p_deliverable_reference
and project_id = p_project_id
and object_type = 'PA_DELIVERABLES';
SELECT segment1
FROM pa_projects_all
WHERE project_id = p_project_id;
SELECT
pev.element_version_id
FROM
pa_proj_elements ppe
,pa_proj_element_versions pev
WHERE
pev.proj_element_id = p_action_id
AND ppe.object_type = 'PA_ACTIONS'
AND pev.object_type = 'PA_ACTIONS'
AND ppe.proj_element_id = pev.proj_element_id
AND ppe.project_id = pev.project_id
AND ppe.project_id = p_project_id
AND nvl(pev.parent_structure_version_id,-99) = nvl(nvl(p_structure_version_id, pev.parent_structure_version_id),-99);
SELECT 'X'
FROM pa_proj_elements ppe,
pa_object_relationships por
WHERE por.object_id_from2 = p_deliverable_id
AND object_id_to2 =ppe.proj_element_id
AND ppe.pm_source_reference = p_action_reference
and project_id = p_project_id
and object_type = 'PA_ACTIONS'
and object_type_from = 'PA_DELIVERABLES';
SELECT proj.segment1
, elem.name
FROM pa_projects_all proj
, pa_proj_elements elem
WHERE proj.project_id = p_project_id
AND elem.project_id = proj.project_id
AND elem.object_type = 'PA_DELIVERABLES'
AND elem.proj_element_id = p_deliverable_id;
SELECT 'X'
FROM pa_lookups
WHERE lookup_type = 'PA_DLVR_ACTION_FUNCTION'
AND lookup_code = p_function_code;
SELECT ppe.proj_element_id
FROM pa_proj_elements ppe,
pa_object_relationships por
WHERE por.object_id_from2 = p_deliverable_id
AND object_id_to2 = ppe.proj_element_id
AND ppe.proj_element_id = p_action_id
and ppe.project_id = p_project_id
and object_type = 'PA_ACTIONS'
and object_type_from = 'PA_DELIVERABLES';
SELECT ppe.proj_element_id
FROM pa_proj_elements ppe,
pa_object_relationships por
WHERE por.object_id_from2 = p_deliverable_id
AND object_id_to2 = ppe.proj_element_id
AND ppe.pm_source_reference = p_action_reference
and ppe.project_id = p_project_id
and object_type = 'PA_ACTIONS'
and object_type_from = 'PA_DELIVERABLES';
SELECT proj.segment1
, elem.name
FROM pa_projects_all proj
, pa_proj_elements elem
WHERE proj.project_id = p_project_id
AND elem.project_id = proj.project_id
AND elem.object_type = 'PA_DELIVERABLES'
AND elem.proj_element_id = p_deliverable_id;
, p_calling_Mode IN VARCHAR2 := 'INSERT'
) IS
Cursor C1 IS
SELECT completion_date, status_code
FROM pa_deliverables_v
WHERE project_id = p_project_id
AND proj_element_id = p_deliverable_id
AND dlvr_type_id = p_dlvr_type_id;
IF ( p_calling_mode = 'INSERT') THEN
px_actual_finish_date := NULL;
ELSE --p_calling_mode = 'UPDATE'
OPEN C1;
END IF; --p_calling_mode = 'INSERT'
IF ( p_calling_mode = 'INSERT') THEN
px_actual_finish_date := NULL;
ELSE --p_calling_mode = 'UPDATE'
px_actual_finish_date := px_actual_finish_date;
END IF; --p_calling_mode = 'INSERT'
SELECT segment1||':Deliverable'
FROM pa_Projects_All
WHERE Project_id = p_Project_Id;
SELECT nvl(prog_entry_enable_flag,'N')
from pa_proj_elements elem
, pa_task_types dlvtype
where elem.type_id = dlvtype.task_type_id
and elem.proj_element_id = p_deliverable_id
and elem.object_type = 'PA_DELIVERABLES'
and elem.project_id = p_project_id;
SELECT 'Y'
FROM dual
WHERE exists
(Select 'xyz'
from pa_object_relationships
where object_id_from2 = p_str_task_id
and relationship_type = 'A'
and relationship_subtype IN ('STRUCTURE_TO_DELIVERABLE', 'TASK_TO_DELIVERABLE')
);
SELECT
PEV.ELEMENT_VERSION_ID
FROM
PA_PROJ_ELEMENT_VERSIONS PEV
WHERE
PEV.PARENT_STRUCTURE_VERSION_ID = l_struct_ver_id
AND PEV.PROJ_ELEMENT_ID = p_task_id
AND PEV.PROJECT_ID = p_project_id;
SELECT
SCHEDULED_START_DATE
,SCHEDULED_FINISH_DATE
,ACTUAL_START_DATE
,ACTUAL_FINISH_DATE
,EARLY_START_DATE
,EARLY_FINISH_DATE
FROM
PA_PROJ_ELEM_VER_SCHEDULE
WHERE
ELEMENT_VERSION_ID = l_task_ver_id ;
SELECT 'Y'
FROM dual
WHERE EXISTS ( SELECT 'Y'
FROM pa_proj_elements
WHERE base_percent_comp_deriv_code = 'DELIVERABLE'
AND object_type = 'PA_TASKS'
AND project_id = p_project_id);
SELECT 'Y'
FROM dual
WHERE EXISTS ( SELECT 'Y'
FROM pa_proj_elements
WHERE object_type = 'PA_DELIVERABLES'
AND project_id = p_project_id);
SELECT distinct pt.task_id
,pt.task_name
,pt.task_number
FROM pa_tasks pt
,pa_proj_element_versions pev1
,pa_proj_element_versions pev2
,pa_object_relationships obj1
,pa_object_relationships obj2
WHERE obj1.object_id_to2 = p_dlv_element_id
AND obj1.relationship_type = 'A'
AND obj1.relationship_subtype = 'TASK_TO_DELIVERABLE'
AND obj1.object_type_from = 'PA_TASKS'
AND obj1.object_type_to = 'PA_DELIVERABLES'
AND pev1.proj_element_id = obj1.object_id_from2
AND pev1.parent_structure_version_id = c_parent_struct_ver_id
AND pev1.project_id = p_project_id
AND obj2.object_id_from1 = pev1.element_version_id
AND obj2.relationship_type = 'M'
AND pev2.element_version_id = obj2.object_id_to1
AND pt.project_id = p_project_id
AND pt.task_id = pev2.proj_element_id
AND pt.chargeable_flag = 'Y' ;
SELECT distinct pt.task_id
,pt.task_name
,pt.task_number
FROM pa_tasks pt
,pa_proj_element_versions pev
,pa_object_relationships obj
WHERE obj.object_id_to2 = p_dlv_element_id
AND obj.relationship_type = 'A'
AND obj.relationship_subtype = 'TASK_TO_DELIVERABLE'
AND obj.object_type_from = 'PA_TASKS'
AND obj.object_type_to = 'PA_DELIVERABLES'
AND pev.proj_element_id = obj.object_id_from2
AND pev.parent_structure_version_id = c_parent_struct_ver_id
AND pev.project_id = p_project_id
AND pev.proj_element_id = pt.task_id
AND pt.project_id = p_project_id
AND pt.chargeable_flag = 'Y' ;
SELECT distinct pt.top_task_id
,pt1.task_name
,pt1.task_number
FROM pa_tasks pt
,pa_proj_element_versions pev1
,pa_proj_element_versions pev2
,pa_object_relationships obj1
,pa_object_relationships obj2
,pa_tasks pt1
WHERE obj1.object_id_to2 = p_dlv_element_id
AND obj1.relationship_type = 'A'
AND obj1.relationship_subtype = 'TASK_TO_DELIVERABLE'
AND obj1.object_type_from = 'PA_TASKS'
AND obj1.object_type_to = 'PA_DELIVERABLES'
AND pev1.proj_element_id = obj1.object_id_from2
AND pev1.parent_structure_version_id = c_parent_struct_ver_id
AND pev1.project_id = p_project_id
AND obj2.object_id_from1 = pev1.element_version_id
AND obj2.relationship_type = 'M'
AND pev2.element_version_id = obj2.object_id_to1
AND pt.project_id = p_project_id
AND pt.task_id = pev2.proj_element_id
AND pt1.task_id = pt.top_task_id
AND pt1.project_id = p_project_id;
SELECT distinct pt.top_task_id
,pt1.task_name
,pt1.task_number
FROM pa_tasks pt
,pa_proj_element_versions pev
,pa_object_relationships obj
,pa_tasks pt1
WHERE obj.object_id_to2 = p_dlv_element_id
AND obj.relationship_type = 'A'
AND obj.relationship_subtype = 'TASK_TO_DELIVERABLE'
AND obj.object_type_from = 'PA_TASKS'
AND obj.object_type_to = 'PA_DELIVERABLES'
AND pev.proj_element_id = obj.object_id_from2
AND pev.parent_structure_version_id = c_parent_struct_ver_id
AND pev.project_id = p_project_id
AND pev.proj_element_id = pt.task_id
AND pt.project_id = p_project_id
AND pt1.task_id = pt.top_task_id
AND pt1.project_id = p_project_id;
SELECT 'Y'
FROM dual
WHERE EXISTS ( SELECT 'Y'
FROM pa_object_relationships obj
,pa_proj_element_versions ver
WHERE obj.object_id_from2 = p_dlv_element_id
AND obj.object_type_to = 'PA_ACTIONS'
AND obj.object_type_from = 'PA_DELIVERABLES'
AND obj.object_id_to2 = ver.proj_element_id
AND obj.relationship_type = 'A'
AND obj.relationship_subtype = 'DELIVERABLE_TO_ACTION'
AND nvl(OKE_DELIVERABLE_UTILS_PUB.WSH_Initiated_Yn(ver.element_version_id),'N') = 'Y'
) ;
SELECT 'Y'
FROM dual
WHERE EXISTS ( SELECT 'Y'
FROM pa_object_relationships obj
,pa_proj_element_versions ver
WHERE obj.object_id_from2 = p_dlv_element_id
AND obj.object_type_to = 'PA_ACTIONS'
AND obj.object_type_from = 'PA_DELIVERABLES'
AND obj.object_id_to2 = ver.proj_element_id
AND obj.relationship_type = 'A'
AND obj.relationship_subtype = 'DELIVERABLE_TO_ACTION'
AND nvl(OKE_DELIVERABLE_UTILS_PUB.REQ_Initiated_Yn(ver.element_version_id),'N') = 'Y'
) ;
SELECT 'Y'
FROM dual
WHERE EXISTS ( SELECT 'Y'
FROM pa_object_relationships obj
,pa_proj_element_versions ver
WHERE obj.object_id_from2 = p_dlv_element_id
AND obj.object_type_to = 'PA_ACTIONS'
AND obj.object_type_from = 'PA_DELIVERABLES'
AND obj.object_id_to2 = ver.proj_element_id
AND obj.relationship_type = 'A'
AND obj.relationship_subtype = 'DELIVERABLE_TO_ACTION'
AND nvl(PA_BILLING_WRKBNCH_EVENTS.CHECK_DELV_EVENT_PROCESSED(ver.project_id,p_dlv_version_id,ver.element_version_id),'N') = 'Y'
) ;
SELECT
PPE.DESCRIPTION
,PES.ACTUAL_FINISH_DATE
FROM
PA_PROJ_ELEMENTS PPE,
PA_PROJ_ELEM_VER_SCHEDULE PES
WHERE
PES.ELEMENT_VERSION_ID = p_action_version_id
AND PES.PROJ_ELEMENT_ID = PPE.PROJ_ELEMENT_ID
AND PPE.OBJECT_TYPE = 'PA_ACTIONS'
AND PPE.FUNCTION_CODE = 'BILLING'
AND PPE.PROJECT_ID = PES.PROJECT_ID ;
SELECT
PEV.ELEMENT_VERSION_ID
FROM
PA_PROJ_ELEMENT_VERSIONS PEV
WHERE
PEV.PARENT_STRUCTURE_VERSION_ID = l_struct_ver_id
AND PEV.PROJ_ELEMENT_ID = p_task_id
AND PEV.PROJECT_ID = p_project_id;
SELECT PPEVS.ELEMENT_VERSION_ID STRUCT_VER_ID
,PEV.ELEMENT_VERSION_ID TASK_VER_ID
FROM
PA_PROJ_ELEM_VER_STRUCTURE PPEVS
,PA_PROJ_ELEMENT_VERSIONS PEV
WHERE PEV.PROJECT_ID = p_project_id
AND PEV.PARENT_STRUCTURE_VERSION_ID = PPEVS.ELEMENT_VERSION_ID
AND PEV.PROJ_ELEMENT_ID = p_task_id
AND PEV.PROJECT_ID = PPEVS.PROJECT_ID
AND ROWNUM < 2
ORDER BY PPEVS.LAST_UPDATE_DATE DESC;
select
obj.object_id_to1
,ppe.name
,ppevs.scheduled_finish_date
from
pa_object_relationships obj
,pa_proj_elements ppe
,pa_proj_elem_ver_schedule ppevs
,pa_proj_element_versions pev
where
pev.element_version_id = p_dlvr_id
and obj.object_id_from2 = pev.proj_element_id
and pev.object_type = 'PA_DELIVERABLES'
and obj.object_type_from = 'PA_DELIVERABLES'
and obj.object_type_to = 'PA_ACTIONS'
and obj.relationship_type = 'A'
and obj.relationship_subtype = 'DELIVERABLE_TO_ACTION'
and ppe.proj_element_id = obj.object_id_to2
and ppe.proj_element_id = ppevs.proj_element_id
and ppe.project_id = ppevs.project_id
and ppe.function_code = 'SHIPPING';
select
obj.object_id_to1
,ppe.name
,ppevs.scheduled_finish_date
from
pa_object_relationships obj
,pa_proj_elements ppe
,pa_proj_elem_ver_schedule ppevs
,pa_proj_element_versions pev
where
pev.element_version_id = p_dlvr_id
and obj.object_id_from2 = pev.proj_element_id
and pev.object_type = 'PA_DELIVERABLES'
and obj.object_type_from = 'PA_DELIVERABLES'
and obj.object_type_to = 'PA_ACTIONS'
and obj.relationship_type = 'A'
and obj.relationship_subtype = 'DELIVERABLE_TO_ACTION'
and ppe.proj_element_id = obj.object_id_to2
and ppe.proj_element_id = ppevs.proj_element_id
and ppe.project_id = ppevs.project_id
and ppe.function_code = 'PROCUREMENT';