The following lines contain the word 'select', 'insert', 'update' or 'delete':
g_insert CONSTANT PA_LOOKUPS.LOOKUP_CODE%TYPE := 'INSERT' ;
g_delete CONSTANT PA_LOOKUPS.LOOKUP_CODE%TYPE := 'DELETE' ;
g_update CONSTANT PA_LOOKUPS.LOOKUP_CODE%TYPE := 'UPDATE' ;
PROCEDURE UPDATE_DLV_ACTIONS_IN_BULK
(p_api_version IN NUMBER :=1.0
,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
,p_commit IN VARCHAR2 :=FND_API.G_FALSE
,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
,p_debug_mode IN VARCHAR2 :='N'
,p_max_msg_count IN NUMBER :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
,p_name_tbl IN SYSTEM.PA_VARCHAR2_240_TBL_TYPE := SYSTEM.PA_VARCHAR2_240_TBL_TYPE()
,p_manager_person_id_tbl IN SYSTEM.PA_NUM_TBL_TYPE := SYSTEM.PA_NUM_TBL_TYPE()
,p_function_code_tbl IN SYSTEM.PA_VARCHAR2_30_TBL_TYPE := SYSTEM.PA_VARCHAR2_30_TBL_TYPE()
,p_due_date_tbl IN SYSTEM.PA_DATE_TBL_TYPE := SYSTEM.PA_DATE_TBL_TYPE()
,p_completed_flag_tbl IN SYSTEM.PA_VARCHAR2_1_TBL_TYPE := SYSTEM. PA_VARCHAR2_1_TBL_TYPE()
,p_completion_date_tbl IN SYSTEM.PA_DATE_TBL_TYPE := SYSTEM.PA_DATE_TBL_TYPE()
,p_description_tbl IN SYSTEM.PA_VARCHAR2_2000_TBL_TYPE := SYSTEM.PA_VARCHAR2_2000_TBL_TYPE()
,p_attribute_category_tbl IN SYSTEM.PA_VARCHAR2_30_TBL_TYPE := SYSTEM.PA_VARCHAR2_30_TBL_TYPE()
,p_attribute1_tbl IN SYSTEM.PA_VARCHAR2_240_TBL_TYPE := SYSTEM.PA_VARCHAR2_240_TBL_TYPE()
,p_attribute2_tbl IN SYSTEM.PA_VARCHAR2_240_TBL_TYPE := SYSTEM.PA_VARCHAR2_240_TBL_TYPE()
,p_attribute3_tbl IN SYSTEM.PA_VARCHAR2_240_TBL_TYPE := SYSTEM.PA_VARCHAR2_240_TBL_TYPE()
,p_attribute4_tbl IN SYSTEM.PA_VARCHAR2_240_TBL_TYPE := SYSTEM.PA_VARCHAR2_240_TBL_TYPE()
,p_attribute5_tbl IN SYSTEM.PA_VARCHAR2_240_TBL_TYPE := SYSTEM.PA_VARCHAR2_240_TBL_TYPE()
,p_attribute6_tbl IN SYSTEM.PA_VARCHAR2_240_TBL_TYPE := SYSTEM.PA_VARCHAR2_240_TBL_TYPE()
,p_attribute7_tbl IN SYSTEM.PA_VARCHAR2_240_TBL_TYPE := SYSTEM.PA_VARCHAR2_240_TBL_TYPE()
,p_attribute8_tbl IN SYSTEM.PA_VARCHAR2_240_TBL_TYPE := SYSTEM.PA_VARCHAR2_240_TBL_TYPE()
,p_attribute9_tbl IN SYSTEM.PA_VARCHAR2_240_TBL_TYPE := SYSTEM.PA_VARCHAR2_240_TBL_TYPE()
,p_attribute10_tbl IN SYSTEM.PA_VARCHAR2_240_TBL_TYPE := SYSTEM.PA_VARCHAR2_240_TBL_TYPE()
,p_attribute11_tbl IN SYSTEM.PA_VARCHAR2_240_TBL_TYPE := SYSTEM.PA_VARCHAR2_240_TBL_TYPE()
,p_attribute12_tbl IN SYSTEM.PA_VARCHAR2_240_TBL_TYPE := SYSTEM.PA_VARCHAR2_240_TBL_TYPE()
,p_attribute13_tbl IN SYSTEM.PA_VARCHAR2_240_TBL_TYPE := SYSTEM.PA_VARCHAR2_240_TBL_TYPE()
,p_attribute14_tbl IN SYSTEM.PA_VARCHAR2_240_TBL_TYPE := SYSTEM.PA_VARCHAR2_240_TBL_TYPE()
,p_attribute15_tbl IN SYSTEM.PA_VARCHAR2_240_TBL_TYPE := SYSTEM.PA_VARCHAR2_240_TBL_TYPE()
,p_element_version_id_tbl IN SYSTEM.PA_NUM_TBL_TYPE := SYSTEM.PA_NUM_TBL_TYPE()
,p_proj_element_id_tbl IN SYSTEM.PA_NUM_TBL_TYPE := SYSTEM.PA_NUM_TBL_TYPE()
,p_record_version_number_tbl IN SYSTEM.PA_NUM_TBL_TYPE := SYSTEM.PA_NUM_TBL_TYPE()
,p_project_id IN PA_PROJECTS_ALL.PROJECT_ID%TYPE := null
,p_object_id IN PA_OBJECT_RELATIONSHIPS.OBJECT_ID_TO1%TYPE := null -- 3578694 passing default null
,p_object_version_id IN PA_OBJECT_RELATIONSHIPS.OBJECT_ID_TO1%TYPE := null
,p_object_type IN PA_LOOKUPS.LOOKUP_CODE%TYPE
,p_pm_source_code IN pa_proj_elements.pm_source_code%TYPE := null
,p_pm_source_reference IN pa_proj_elements.pm_source_reference%TYPE := null
,p_carrying_out_organization_id IN pa_proj_elements.carrying_out_organization_id%TYPE := null
,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_debug_mode VARCHAR2(10);
pa_debug.g_err_stage:= 'Inside UPDATE_DLV_ACTIONS_IN_BULK ';
PA_ACTIONS_PVT.UPDATE_DLV_ACTIONS_IN_BULK
(p_api_version => p_api_version
,p_init_msg_list => FND_API.G_FALSE
,p_commit => p_commit
,p_validate_only => p_validate_only
,p_validation_level => p_validation_level
,p_calling_module => p_calling_module
,p_debug_mode => l_debug_mode
,p_max_msg_count => p_max_msg_count
,p_name_tbl => p_name_tbl
,p_manager_person_id_tbl => p_manager_person_id_tbl
,p_function_code_tbl => p_function_code_tbl
,p_due_date_tbl => p_due_date_tbl
,p_completed_flag_tbl => p_completed_flag_tbl
,p_completion_date_tbl => p_completion_date_tbl
,p_description_tbl => p_description_tbl
,p_attribute_category_tbl => p_attribute_category_tbl
,p_attribute1_tbl => p_attribute1_tbl
,p_attribute2_tbl => p_attribute2_tbl
,p_attribute3_tbl => p_attribute3_tbl
,p_attribute4_tbl => p_attribute4_tbl
,p_attribute5_tbl => p_attribute5_tbl
,p_attribute6_tbl => p_attribute6_tbl
,p_attribute7_tbl => p_attribute7_tbl
,p_attribute8_tbl => p_attribute8_tbl
,p_attribute9_tbl => p_attribute9_tbl
,p_attribute10_tbl => p_attribute10_tbl
,p_attribute11_tbl => p_attribute11_tbl
,p_attribute12_tbl => p_attribute12_tbl
,p_attribute13_tbl => p_attribute13_tbl
,p_attribute14_tbl => p_attribute14_tbl
,p_attribute15_tbl => p_attribute15_tbl
,p_element_version_id_tbl => p_element_version_id_tbl
,p_proj_element_id_tbl => p_proj_element_id_tbl
,p_record_version_number_tbl => p_record_version_number_tbl
,p_project_id => p_project_id
,p_object_id => p_object_id
,p_object_version_id => p_object_version_id
,p_object_type => p_object_type
,p_pm_source_code => p_pm_source_code
,p_pm_source_reference => p_pm_source_reference
,p_carrying_out_organization_id => p_carrying_out_organization_id
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
) ;
pa_debug.g_err_stage:= 'Exiting UPDATE_DLV_ACTIONS_IN_BULK' ;
pa_debug.g_err_stage := 'inside invalid arg exception of UPDATE_DLV_ACTIONS_IN_BULK';
,p_procedure_name => 'UPDATE_DLV_ACTIONS_IN_BULK');
pa_debug.write('UPDATE_DLV_ACTIONS_IN_BULK: ' || g_module_name,pa_debug.g_err_stage,5);
END UPDATE_DLV_ACTIONS_IN_BULK ;
PROCEDURE DELETE_DLV_ACTIONS_IN_BULK
(p_api_version IN NUMBER :=1.0
,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
,p_commit IN VARCHAR2 :=FND_API.G_FALSE
,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
,p_debug_mode IN VARCHAR2 :='N'
,p_max_msg_count IN NUMBER :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
,p_object_type IN PA_LOOKUPS.LOOKUP_CODE%TYPE
,p_object_id IN PA_OBJECT_RELATIONSHIPS.OBJECT_ID_TO1%TYPE
,p_element_version_id_tbl IN SYSTEM.PA_NUM_TBL_TYPE := SYSTEM.PA_NUM_TBL_TYPE()
,p_proj_element_id_tbl IN SYSTEM.PA_NUM_TBL_TYPE := SYSTEM.PA_NUM_TBL_TYPE()
,p_record_version_number_tbl IN SYSTEM.PA_NUM_TBL_TYPE := SYSTEM.PA_NUM_TBL_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
l_debug_mode VARCHAR2(10);
PA_DEBUG.set_curr_function( p_function => 'DELETE_DLV_ACTIONS_IN_BULK',
p_debug_mode => l_debug_mode );
pa_debug.g_err_stage:= 'Inside DELETE_DLV_ACTIONS_IN_BULK ';
PA_ACTIONS_PVT.DELETE_DLV_ACTIONS_IN_BULK
(p_api_version => p_api_version
,p_init_msg_list => FND_API.G_FALSE
,p_commit => p_commit
,p_validate_only => p_validate_only
,p_validation_level => p_validation_level
,p_calling_module => p_calling_module
,p_debug_mode => l_debug_mode
,p_max_msg_count => p_max_msg_count
,p_object_type => p_object_type
,p_object_id => p_object_id
,p_element_version_id_tbl => p_element_version_id_tbl
,p_proj_element_id_tbl => p_proj_element_id_tbl
,p_record_version_number_tbl => p_record_version_number_tbl
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
) ;
,p_procedure_name => 'DELETE_DLV_ACTIONS_IN_BULK');
pa_debug.write('DELETE_DLV_ACTIONS_IN_BULK: ' || g_module_name,pa_debug.g_err_stage,5);
END DELETE_DLV_ACTIONS_IN_BULK ;
,p_insert_or_update 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_debug_mode VARCHAR2(10);
SELECT
PEV.PROJ_ELEMENT_ID
FROM
PA_PROJ_ELEMENT_VERSIONS PEV
WHERE
PEV.ELEMENT_VERSION_ID = l_action_ver_id
AND PEV.OBJECT_TYPE = 'PA_ACTIONS';
pa_debug.write(g_module_name,'p_insert_or_update'||':'||p_insert_or_update,3) ;
IF p_insert_or_update IS NULL
THEN
IF l_debug_mode = 'Y' THEN
pa_debug.g_err_stage:= 'INVALID INPUT PARAMETER';
,p_insert_or_update => p_insert_or_update
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
) ;
IF nvl(p_user_action_tbl(i),g_insert) = g_insert THEN
IF l_debug_mode = 'Y' THEN
pa_debug.g_err_stage:= 'Insert Operation';
ELSIF nvl(p_user_action_tbl(i),g_insert) = g_modified THEN
IF l_debug_mode = 'Y' THEN
pa_debug.g_err_stage:= 'Update Operation';
ELSIF nvl(p_user_action_tbl(i),g_insert) = g_delete THEN
IF l_debug_mode = 'Y' THEN
pa_debug.g_err_stage:= 'Delete Operation';
pa_debug.g_err_stage:= 'Call DELETE_DLV_ACTIONS_IN_BULK ';
PA_ACTIONS_PUB.DELETE_DLV_ACTIONS_IN_BULK
(p_api_version => p_api_version
,p_init_msg_list => FND_API.G_FALSE
,p_commit => p_commit
,p_validate_only => p_validate_only
,p_validation_level => p_validation_level
,p_calling_module => p_calling_module
,p_debug_mode => l_debug_mode
,p_max_msg_count => p_max_msg_count
,p_object_type => p_object_type
,p_object_id => p_object_id
,p_element_version_id_tbl => l_del_element_ver_id_tbl
,p_proj_element_id_tbl => l_del_element_id_tbl
,p_record_version_number_tbl => l_del_rec_ver_num_id_tbl
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
) ;
pa_debug.g_err_stage:= 'Call UPDATE_DLV_ACTIONS_IN_BULK ';
PA_ACTIONS_PUB.UPDATE_DLV_ACTIONS_IN_BULK
(p_api_version => p_api_version
,p_init_msg_list => FND_API.G_FALSE
,p_commit => p_commit
,p_validate_only => p_validate_only
,p_validation_level => p_validation_level
,p_calling_module => p_calling_module
,p_debug_mode => l_debug_mode
,p_max_msg_count => p_max_msg_count
,p_name_tbl => l_upd_name_tbl
,p_manager_person_id_tbl => l_upd_mgr_person_id_tbl
,p_function_code_tbl => l_upd_function_code_tbl
,p_due_date_tbl => l_upd_due_date_tbl
,p_completed_flag_tbl => l_upd_comp_flag_tbl
,p_completion_date_tbl => l_upd_comp_date_tbl
,p_description_tbl => l_upd_description_tbl
,p_attribute_category_tbl => l_upd_attribute_category_tbl
,p_attribute1_tbl => l_upd_attribute1_tbl
,p_attribute2_tbl => l_upd_attribute2_tbl
,p_attribute3_tbl => l_upd_attribute3_tbl
,p_attribute4_tbl => l_upd_attribute4_tbl
,p_attribute5_tbl => l_upd_attribute5_tbl
,p_attribute6_tbl => l_upd_attribute6_tbl
,p_attribute7_tbl => l_upd_attribute7_tbl
,p_attribute8_tbl => l_upd_attribute8_tbl
,p_attribute9_tbl => l_upd_attribute9_tbl
,p_attribute10_tbl => l_upd_attribute10_tbl
,p_attribute11_tbl => l_upd_attribute11_tbl
,p_attribute12_tbl => l_upd_attribute12_tbl
,p_attribute13_tbl => l_upd_attribute13_tbl
,p_attribute14_tbl => l_upd_attribute14_tbl
,p_attribute15_tbl => l_upd_attribute15_tbl
,p_element_version_id_tbl => l_upd_element_ver_id_tbl
,p_proj_element_id_tbl => l_upd_element_id_tbl
,p_record_version_number_tbl => l_upd_rec_ver_num_id_tbl
,p_project_id => p_project_id
,p_object_id => p_object_id
,p_object_version_id => p_object_version_id
,p_object_type => p_object_type
,p_pm_source_code => p_pm_source_code
,p_pm_source_reference => p_pm_source_reference
,p_carrying_out_organization_id => p_carrying_out_organization_id
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
) ;
,p_insert_or_update IN VARCHAR2 := 'INSERT'
,p_project_id IN PA_PROJECTS_ALL.PROJECT_ID%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
l_err_message fnd_new_messages.message_text%TYPE ;
SELECT decode(pps.project_system_status_code,'DLVR_COMPLETED','Y','N')
FROM pa_project_statuses pps,
pa_proj_elements ppe
WHERE ppe.proj_element_id = c_action_id
AND pps.project_status_code = ppe.status_code ;
SELECT actual_finish_date
,scheduled_finish_date
FROM pa_proj_elem_ver_schedule
WHERE element_version_id = c_action_ver_id ;
SELECT PPE.NAME ,
PPE.FUNCTION_CODE,
PPE.PROJ_ELEMENT_ID
FROM PA_PROJ_ELEMENTS PPE ,
PA_OBJECT_RELATIONSHIPS OBJ
WHERE PPE.PROJECT_ID = p_project_id
AND OBJ.OBJECT_ID_FROM2= p_object_id
AND PPE.PROJ_ELEMENT_ID = OBJ.OBJECT_ID_TO2
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
PEV.PROJ_ELEMENT_ID
FROM
PA_PROJ_ELEMENT_VERSIONS PEV
WHERE
PEV.ELEMENT_VERSION_ID = l_action_ver_id
AND PEV.OBJECT_TYPE = 'PA_ACTIONS';
l_err_message := FND_MESSAGE.GET_STRING('PA','PA_SHIP_DUE_DATE_UPDATE_ERR') ;
l_err_message := FND_MESSAGE.GET_STRING('PA','PA_PROC_DUE_DATE_UPDATE_ERR') ;
SELECT element_Number INTO l_deliverable_number
FROM pa_Proj_elements
WHERE proj_element_id = p_deliverable_id
AND project_id = p_project_id;
SELECT segment1 INTO l_project_number
FROM Pa_Projects_All
WHERE project_id = p_project_id;
PROCEDURE DELETE_DLV_ACTION
(p_api_version IN NUMBER :=1.0
,p_init_msg_list IN VARCHAR2 :=FND_API.G_TRUE
,p_commit IN VARCHAR2 :=FND_API.G_FALSE
,p_validate_only IN VARCHAR2 :=FND_API.G_TRUE
,p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL
,p_calling_module IN VARCHAR2 :='SELF_SERVICE'
,p_debug_mode IN VARCHAR2 :='N'
,p_max_msg_count IN NUMBER :=PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM
,p_action_id IN pa_proj_elements.proj_element_id%TYPE
,p_action_ver_id IN pa_proj_element_versions.element_version_id%TYPE
,p_dlv_element_id IN pa_proj_elements.proj_element_id%TYPE
,p_dlv_version_id IN pa_proj_element_versions.element_version_id%TYPE
,p_function_code IN pa_proj_elements.function_code%TYPE
,p_project_id IN pa_projects_all.project_id%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
l_debug_mode VARCHAR2(10);
SELECT
PEV.PROJ_ELEMENT_ID
FROM
PA_PROJ_ELEMENT_VERSIONS PEV
WHERE
PEV.ELEMENT_VERSION_ID = p_action_ver_id
AND PEV.OBJECT_TYPE = 'PA_ACTIONS'
AND PEV.PROJECT_ID = p_project_id;
PA_DEBUG.set_curr_function( p_function => 'DELETE_DLV_ACTION',
p_debug_mode => l_debug_mode );
pa_debug.g_err_stage:= 'Inside DELETE_DLV_ACTIONS ';
savepoint DELETE_DLV_ACTIONS_SP ;
PA_ACTIONS_PVT.DELETE_DLV_ACTION
(p_api_version => p_api_version
,p_init_msg_list => p_init_msg_list
,p_commit => p_commit
,p_validate_only => p_validate_only
,p_validation_level => p_validation_level
,p_calling_module => p_calling_module
,p_debug_mode => l_debug_mode
,p_max_msg_count => p_max_msg_count
,p_action_id => l_action_id -- 3769024 using derived value
,p_action_ver_id => p_action_ver_id
,p_dlv_element_id => p_dlv_element_id
,p_dlv_version_id => p_dlv_version_id
,p_function_code => p_function_code
,p_project_id => p_project_id
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
) ;
pa_debug.g_err_stage:= 'Exiting DELETE_DLV_ACTION' ;
ROLLBACK TO DELETE_DLV_ACTIONS_SP;
pa_debug.g_err_stage := 'inside invalid arg exception of DELETE_DLV_ACTIONS';
ROLLBACK TO DELETE_DLV_ACTIONS_SP;
,p_procedure_name => 'DELETE_DLV_ACTION');
pa_debug.write('DELETE_DLV_ACTION: ' || g_module_name,pa_debug.g_err_stage,5);
END DELETE_DLV_ACTION ;
, p_insert_or_update IN VARCHAR2 := 'INSERT'
, p_action_in_tbl IN PA_PROJECT_PUB.action_in_tbl_type
, x_action_out_tbl OUT NOCOPY PA_PROJECT_PUB.action_out_tbl_type --File.Sql.39 bug 4440895
, 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_action_name_tbl SYSTEM.PA_VARCHAR2_240_TBL_TYPE := SYSTEM.PA_VARCHAR2_240_TBL_TYPE() ;
SELECT vers.element_version_id
, elem.carrying_out_organization_id
, proj.segment1
, elem.element_Number
, proj.project_id
, Pa_Deliverable_Utils.IS_Dlvr_Item_Based(vers.element_version_id)
FROM pa_proj_element_versions vers
, pa_proj_elements elem
, pa_projects_all proj
WHERE vers.proj_element_id = elem.proj_element_id
AND elem.project_id = vers.project_id
AND elem.proj_element_id = p_Proj_element_id
AND elem.project_id = proj.project_id
AND elem.object_type = 'PA_DELIVERABLES';
SELECT name
FROM pa_organizations_event_v
WHERE organization_id = P_org_id
AND TRUNC(SYSDATE) BETWEEN date_from AND nvl(date_to, TRUNC(SYSDATE));
SELECT pev.element_version_id
FROM pa_proj_element_versions pev
WHERE pev.proj_element_id = p_proj_element_id
AND pev.object_type = 'PA_ACTIONS';
SELECT
TASK_NUMBER
FROM
PA_TASKS
WHERE
PROJECT_ID = project_id
AND TASK_ID = TOP_TASK_ID
AND TASK_ID = fin_task_id;
SELECT
TASK_NUMBER
FROM
PA_TASKS
WHERE
PROJECT_ID = project_id
AND TASK_ID = fin_task_id
AND CHARGEABLE_FLAG = 'Y';
SELECT type_id
FROM PA_PROJ_ELEMENTS
WHERE proj_element_id = l_deliverable_id
AND project_id = l_project_id
AND OBJECT_TYPE = 'PA_DELIVERABLES';
l_update_oke_yn VARCHAR2(1) := 'Y';
IF (p_insert_or_update = g_insert) THEN
l_action := g_create;
l_action := p_insert_or_update;
SELECT
decode(p_action_in_tbl(i_actn).action_name ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).action_name )
, l_action_owner_id
, decode(p_action_in_tbl(i_actn).function_code ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).function_code )
, decode(p_action_in_tbl(i_actn).due_date ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE , null, p_action_in_tbl(i_actn).due_date )
, NULL --l_completed_flag
, NULL --l_completion_date
, NULL --l_element_version_id
, NULL --l_proj_element_id
, 1 --l_rec_ver_num_id
, decode(p_action_in_tbl(i_actn).description ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).description )
, p_insert_or_update
, decode(p_action_in_tbl(i_actn).pm_action_reference,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).pm_action_reference )
, NULL --l_attribute_category
, NULL --l_attribute1
, NULL --l_attribute2
, NULL --l_attribute3
, NULL --l_attribute4
, NULL --l_attribute5
, NULL --l_attribute6
, NULL --l_attribute7
, NULL --l_attribute8
, NULL --l_attribute9
, NULL --l_attribute10
, NULL --l_attribute11
, NULL --l_attribute12
, NULL --l_attribute13
, NULL --l_attribute14
, NULL --l_attribute15
INTO
l_action_name_tbl(i_actn)
, l_action_owner_id_tbl(i_actn)
, l_function_code_tbl(i_actn)
, l_due_date_tbl(i_actn)
, l_completed_flag_tbl(i_actn)
, l_completion_date_tbl(i_actn)
, l_element_version_id_tbl(i_actn)
, l_proj_element_id_tbl(i_actn)
, l_rec_ver_num_id_tbl(i_actn)
, l_description_tbl(i_actn)
, l_user_action_tbl(i_actn)
, l_pm_source_reference_tbl(i_actn)
, l_attribute_category_tbl(i_actn)
, l_attribute1_tbl(i_actn)
, l_attribute2_tbl(i_actn)
, l_attribute3_tbl(i_actn)
, l_attribute4_tbl(i_actn)
, l_attribute5_tbl(i_actn)
, l_attribute6_tbl(i_actn)
, l_attribute7_tbl(i_actn)
, l_attribute8_tbl(i_actn)
, l_attribute9_tbl(i_actn)
, l_attribute10_tbl(i_actn)
, l_attribute11_tbl(i_actn)
, l_attribute12_tbl(i_actn)
, l_attribute13_tbl(i_actn)
, l_attribute14_tbl(i_actn)
, l_attribute15_tbl(i_actn)
FROM DUAL;
ELSE -- UPDATE
SELECT
decode(p_action_in_tbl(i_actn).action_name ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , element_name , p_action_in_tbl(i_actn).action_name )
, decode(p_action_in_tbl(i_actn).action_owner_id ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , manager_person_id, p_action_in_tbl(i_actn).action_owner_id )
, decode(p_action_in_tbl(i_actn).function_code ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , function_code , p_action_in_tbl(i_actn).function_code )
, decode(p_action_in_tbl(i_actn).due_date ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE , due_date , p_action_in_tbl(i_actn).due_date )
, decode(action_status_code , 'DLVR_COMPLETED', 'Y', 'N') --l_completed_flag
, decode(p_action_in_tbl(i_actn).completion_date ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE , actual_finish_date, p_action_in_tbl(i_actn).completion_date ) -- for bug# 3749462-- earlier passed as NULL --l_completion_date
, element_version_id
, proj_element_id
, NULL --l_rec_ver_num_id
, decode(p_action_in_tbl(i_actn).description ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , description, p_action_in_tbl(i_actn).description )
-- 3729250 removed p_insert_or_update passing , for update expected value is 'MODIFIED'
-- because CR_UP_DLV_ACTIONS_IN_BULK procedure is expecting this value to be 'MODIFIED' , not 'UPDATE'
, g_modified
, decode(p_action_in_tbl(i_actn).pm_action_reference,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).pm_action_reference )
, attribute_category
, attribute1
, attribute2
, attribute3
, attribute4
, attribute5
, attribute6
, attribute7
, attribute8
, attribute9
, attribute10
, attribute11
, attribute12
, attribute13
, attribute14
, attribute15
INTO
l_action_name_tbl(i_actn)
, l_action_owner_id_tbl(i_actn)
, l_function_code_tbl(i_actn)
, l_due_date_tbl(i_actn)
, l_completed_flag_tbl(i_actn)
, l_completion_date_tbl(i_actn)
, l_element_version_id_tbl(i_actn)
, l_proj_element_id_tbl(i_actn)
, l_rec_ver_num_id_tbl(i_actn)
, l_description_tbl(i_actn)
, l_user_action_tbl(i_actn)
, l_pm_source_reference_tbl(i_actn)
, l_attribute_category_tbl(i_actn)
, l_attribute1_tbl(i_actn)
, l_attribute2_tbl(i_actn)
, l_attribute3_tbl(i_actn)
, l_attribute4_tbl(i_actn)
, l_attribute5_tbl(i_actn)
, l_attribute6_tbl(i_actn)
, l_attribute7_tbl(i_actn)
, l_attribute8_tbl(i_actn)
, l_attribute9_tbl(i_actn)
, l_attribute10_tbl(i_actn)
, l_attribute11_tbl(i_actn)
, l_attribute12_tbl(i_actn)
, l_attribute13_tbl(i_actn)
, l_attribute14_tbl(i_actn)
, l_attribute15_tbl(i_actn)
FROM pa_dlvr_actions_V
where proj_element_id = p_action_in_tbl(i_actn).action_id;
pa_debug.write(g_module_name,'Populated action PLSQL table, calling api for bulk insert',3) ;
,p_insert_or_update => p_insert_or_update
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data);
l_update_oke_yn := 'Y';
IF (p_insert_or_update = 'INSERT') THEN
Pa_Deliverable_Utils.Convert_pm_actionref_to_id
(
p_action_reference => p_action_in_tbl(i_actn).pm_action_reference
,p_action_id => null
,p_deliverable_id => l_object_id
,p_project_id => l_Project_id
,p_out_action_id => l_action_id
,p_return_status => x_return_status
);
ELSE -- p_insert_or_update = 'INSERT'
-- bug 7385017 skkoppul - if action record is empty,
-- OKE_AMG_GRP.manage_dlv_action should not be called so update the flag
IF is_action_rec_empty_yn(p_action_in_tbl(i_actn),l_function_code_tbl(i_actn)) = 'Y' THEN
l_update_oke_yn := 'N';
END IF; --p_insert_or_update = 'INSERT'
pa_debug.write(g_module_name,'Should we update OKE attributes? '||l_update_oke_yn);
IF l_update_oke_yn = 'Y' THEN -- Bug 7759051 (For OKE Procurement)
i_proc := i_proc + 1;
SELECT l_object_version_id
, l_actn_version_id -- 3651489 changed from l_action_id to l_actn_version_id, as element version id should be passed to oke
, decode(p_action_in_tbl(i_actn).action_name ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).action_name )
, decode(l_fin_task_id_tbl(i_actn) ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , null, l_fin_task_id_tbl(i_actn) ) -- for bug# 3749462
, decode(p_action_in_tbl(i_actn).destination_type_code ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).destination_type_code )
, decode(p_action_in_tbl(i_actn).receiving_org_id ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , null, p_action_in_tbl(i_actn).receiving_org_id )
, decode(p_action_in_tbl(i_actn).receiving_location_id ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , null, p_action_in_tbl(i_actn).receiving_location_id )
-- 3729250 , po_need_by_date should be populated with procurement action due date
-- 3749462 changed from po_need_by_date to p_action_in_tbl(i_actn).due_date
, l_due_date_tbl(i_actn) -- 3651542 Using local variable , if defaulting is done p_action_in_tbl(i_actn).due_date will not reflect it
, decode(p_action_in_tbl(i_actn).vendor_id ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , null, p_action_in_tbl(i_actn).vendor_id )
, decode(p_action_in_tbl(i_actn).vendor_site_code ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).vendor_site_code )
, decode(p_action_in_tbl(i_actn).quantity ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , null, p_action_in_tbl(i_actn).quantity )
, decode(p_action_in_tbl(i_actn).unit_price ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , null, p_action_in_tbl(i_actn).unit_price )
, decode(p_action_in_tbl(i_actn).exchange_rate_type ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).exchange_rate_type )
, decode(p_action_in_tbl(i_actn).exchange_rate_date ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE , null, p_action_in_tbl(i_actn).exchange_rate_date )
, decode(p_action_in_tbl(i_actn).exchange_rate ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , null, p_action_in_tbl(i_actn).exchange_rate )
, decode(p_action_in_tbl(i_actn).expenditure_type ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).expenditure_type )
, decode(p_action_in_tbl(i_actn).expenditure_org_id ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , null, p_action_in_tbl(i_actn).expenditure_org_id )
, decode(p_action_in_tbl(i_actn).expenditure_item_date ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE , null, p_action_in_tbl(i_actn).expenditure_item_date )
, decode(p_action_in_tbl(i_actn).requisition_line_type_id ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , null, p_action_in_tbl(i_actn).requisition_line_type_id )
, decode(p_action_in_tbl(i_actn).category_id ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , null, p_action_in_tbl(i_actn).category_id )
, decode(p_action_in_tbl(i_actn).ready_to_procure_flag ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).ready_to_procure_flag )
, decode(p_action_in_tbl(i_actn).initiate_procure_flag ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).initiate_procure_flag )
, decode(p_action_in_tbl(i_actn).uom_code ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).uom_code )
, decode(p_action_in_tbl(i_actn).currency ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).currency )
INTO
l_dlv_req_action_tbl(i_proc).pa_deliverable_id
, l_dlv_req_action_tbl(i_proc).pa_action_id
, l_dlv_req_action_tbl(i_proc).action_name
, l_dlv_req_action_tbl(i_proc).proc_finnancial_task_id
, l_dlv_req_action_tbl(i_proc).destination_type_code
, l_dlv_req_action_tbl(i_proc).receiving_org_id
, l_dlv_req_action_tbl(i_proc).receiving_location_id
, l_dlv_req_action_tbl(i_proc).po_need_by_date
, l_dlv_req_action_tbl(i_proc).vendor_id
, l_dlv_req_action_tbl(i_proc).vendor_site_id
, l_dlv_req_action_tbl(i_proc).quantity
, l_dlv_req_action_tbl(i_proc).unit_price
, l_dlv_req_action_tbl(i_proc).exchange_rate_type
, l_dlv_req_action_tbl(i_proc).exchange_rate_date
, l_dlv_req_action_tbl(i_proc).exchange_rate
, l_dlv_req_action_tbl(i_proc).expenditure_type
, l_dlv_req_action_tbl(i_proc).expenditure_org_id
, l_dlv_req_action_tbl(i_proc).expenditure_item_date
, l_dlv_req_action_tbl(i_proc).requisition_line_type_id
, l_dlv_req_action_tbl(i_proc).category_id
, l_dlv_req_action_tbl(i_proc).ready_to_procure_flag
, l_dlv_req_action_tbl(i_proc).initiate_procure_flag
, l_dlv_req_action_tbl(i_proc).uom_code
, l_dlv_req_action_tbl(i_proc).currency
FROM DUAL;
ELSE -- UPDATE
SELECT l_object_version_id
, l_actn_version_id -- 3651489 changed from l_action_id to l_actn_version_id, as element version id should be passed to oke
, decode(p_action_in_tbl(i_actn).action_name ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , action_name , p_action_in_tbl(i_actn).action_name )
, decode(l_fin_task_id_tbl(i_actn) ,NULL , task_id , l_fin_task_id_tbl(i_actn) ) -- for bug# 3749462
, decode(p_action_in_tbl(i_actn).destination_type_code ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , destination_type_code , p_action_in_tbl(i_actn).destination_type_code )
, decode(p_action_in_tbl(i_actn).receiving_org_id ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , ship_to_org_id , p_action_in_tbl(i_actn).receiving_org_id )
, decode(p_action_in_tbl(i_actn).receiving_location_id ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , ship_to_location_id , p_action_in_tbl(i_actn).receiving_location_id )
-- 3729250 , po_need_by_date should be populated with procurement action due date
-- 3749462 changed from po_need_by_date to l_due_date_tbl(i_actn)
, l_due_date_tbl(i_actn)
, decode(p_action_in_tbl(i_actn).vendor_id ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , ship_from_org_id , p_action_in_tbl(i_actn).vendor_id )
, decode(p_action_in_tbl(i_actn).vendor_site_code ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , ship_from_location_id , p_action_in_tbl(i_actn).vendor_site_code )
, decode(p_action_in_tbl(i_actn).quantity ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , quantity , p_action_in_tbl(i_actn).quantity )
, decode(p_action_in_tbl(i_actn).unit_price ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , unit_price , p_action_in_tbl(i_actn).unit_price )
, decode(p_action_in_tbl(i_actn).exchange_rate_type ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , rate_type , p_action_in_tbl(i_actn).exchange_rate_type )
, decode(p_action_in_tbl(i_actn).exchange_rate_date ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE , rate_date , p_action_in_tbl(i_actn).exchange_rate_date )
, decode(p_action_in_tbl(i_actn).exchange_rate ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , exchange_rate , p_action_in_tbl(i_actn).exchange_rate )
, decode(p_action_in_tbl(i_actn).expenditure_type ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , expenditure_type , p_action_in_tbl(i_actn).expenditure_type )
, decode(p_action_in_tbl(i_actn).expenditure_org_id ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , expenditure_organization_id, p_action_in_tbl(i_actn).expenditure_org_id )
, decode(p_action_in_tbl(i_actn).expenditure_item_date ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE , expenditure_item_date , p_action_in_tbl(i_actn).expenditure_item_date )
, decode(p_action_in_tbl(i_actn).requisition_line_type_id ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , requisition_line_type_id, p_action_in_tbl(i_actn).requisition_line_type_id )
, decode(p_action_in_tbl(i_actn).category_id ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , po_category_id , p_action_in_tbl(i_actn).category_id )
, decode(p_action_in_tbl(i_actn).ready_to_procure_flag ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null , p_action_in_tbl(i_actn).ready_to_procure_flag )
, decode(p_action_in_tbl(i_actn).initiate_procure_flag ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null , p_action_in_tbl(i_actn).initiate_procure_flag )
, decode(p_action_in_tbl(i_actn).uom_code ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , uom_code , p_action_in_tbl(i_actn).uom_code )
, decode(p_action_in_tbl(i_actn).currency ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , currency_code , p_action_in_tbl(i_actn).currency )
INTO
l_dlv_req_action_tbl(i_proc).pa_deliverable_id
, l_dlv_req_action_tbl(i_proc).pa_action_id
, l_dlv_req_action_tbl(i_proc).action_name
, l_dlv_req_action_tbl(i_proc).proc_finnancial_task_id
, l_dlv_req_action_tbl(i_proc).destination_type_code
, l_dlv_req_action_tbl(i_proc).receiving_org_id
, l_dlv_req_action_tbl(i_proc).receiving_location_id
, l_dlv_req_action_tbl(i_proc).po_need_by_date
, l_dlv_req_action_tbl(i_proc).vendor_id
, l_dlv_req_action_tbl(i_proc).vendor_site_id
, l_dlv_req_action_tbl(i_proc).quantity
, l_dlv_req_action_tbl(i_proc).unit_price
, l_dlv_req_action_tbl(i_proc).exchange_rate_type
, l_dlv_req_action_tbl(i_proc).exchange_rate_date
, l_dlv_req_action_tbl(i_proc).exchange_rate
, l_dlv_req_action_tbl(i_proc).expenditure_type
, l_dlv_req_action_tbl(i_proc).expenditure_org_id
, l_dlv_req_action_tbl(i_proc).expenditure_item_date
, l_dlv_req_action_tbl(i_proc).requisition_line_type_id
, l_dlv_req_action_tbl(i_proc).category_id
, l_dlv_req_action_tbl(i_proc).ready_to_procure_flag
, l_dlv_req_action_tbl(i_proc).initiate_procure_flag
, l_dlv_req_action_tbl(i_proc).uom_code
, l_dlv_req_action_tbl(i_proc).currency
FROM oke_deliverable_actions_v
WHERE pa_action_id = l_actn_version_id;
IF l_update_oke_yn = 'Y' THEN -- Bug 7759051 (For OKE Shipping)
-- Populating the OKE Shipping PLSQL table
i_ship := i_ship + 1;
SELECT l_object_version_id
, l_actn_version_id -- 3651489 changed from l_action_id to l_actn_version_id, as element version id should be passed to oke
, decode(p_action_in_tbl(i_actn).action_name ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).action_name )
, decode(l_fin_task_id_tbl(i_actn) ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , null, l_fin_task_id_tbl(i_actn) ) -- for bug# 3749462
, decode(p_action_in_tbl(i_actn).demand_schedule ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).demand_schedule )
, decode(p_action_in_tbl(i_actn).ship_from_organization_id ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , null, p_action_in_tbl(i_actn).ship_from_organization_id )
, decode(p_action_in_tbl(i_actn).ship_from_location_id ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , null, p_action_in_tbl(i_actn).ship_from_location_id )
, decode(p_action_in_tbl(i_actn).ship_to_organization_id ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , null, p_action_in_tbl(i_actn).ship_to_organization_id )
, decode(p_action_in_tbl(i_actn).ship_to_location_id ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , null, p_action_in_tbl(i_actn).ship_to_location_id )
, decode(p_action_in_tbl(i_actn).promised_shipment_date ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE , null, p_action_in_tbl(i_actn).promised_shipment_date )
-- 3729250 , expected_shipment_date should be populated with shipping action due date
-- 3749462 , changed from p_action_in_tbl(i_actn).expected_shipment_date to p_action_in_tbl(i_actn).due_date
, l_due_date_tbl(i_actn) -- 3651542 Using local variable , if defaulting is done p_action_in_tbl(i_actn).due_date will not reflect it
, decode(p_action_in_tbl(i_actn).volume ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , null, p_action_in_tbl(i_actn).volume )
, decode(p_action_in_tbl(i_actn).volume_uom ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).volume_uom )
, decode(p_action_in_tbl(i_actn).weight ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , null, p_action_in_tbl(i_actn).weight )
, decode(p_action_in_tbl(i_actn).weight_uom ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).weight_uom )
, decode(p_action_in_tbl(i_actn).ready_to_ship_flag ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).ready_to_ship_flag )
, decode(p_action_in_tbl(i_actn).initiate_planning_flag ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).initiate_planning_flag )
, decode(p_action_in_tbl(i_actn).initiate_shipping_flag ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).initiate_shipping_flag )
, decode(p_action_in_tbl(i_actn).uom_code ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null, p_action_in_tbl(i_actn).uom_code )
, decode(p_action_in_tbl(i_actn).quantity ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , null, p_action_in_tbl(i_actn).quantity )
INTO
l_dlv_ship_action_tbl(i_ship).pa_deliverable_id
, l_dlv_ship_action_tbl(i_ship).pa_action_id
, l_dlv_ship_action_tbl(i_ship).action_name
, l_dlv_ship_action_tbl(i_ship).ship_finnancial_task_id
, l_dlv_ship_action_tbl(i_ship).demand_schedule
, l_dlv_ship_action_tbl(i_ship).ship_from_organization_id
, l_dlv_ship_action_tbl(i_ship).ship_from_location_id
, l_dlv_ship_action_tbl(i_ship).ship_to_organization_id
, l_dlv_ship_action_tbl(i_ship).ship_to_location_id
, l_dlv_ship_action_tbl(i_ship).promised_shipment_date
, l_dlv_ship_action_tbl(i_ship).expected_shipment_date
, l_dlv_ship_action_tbl(i_ship).volume
, l_dlv_ship_action_tbl(i_ship).volume_uom
, l_dlv_ship_action_tbl(i_ship).weight
, l_dlv_ship_action_tbl(i_ship).weight_uom
, l_dlv_ship_action_tbl(i_ship).ready_to_ship_flag
, l_dlv_ship_action_tbl(i_ship).initiate_planning_flag
, l_dlv_ship_action_tbl(i_ship).initiate_shipping_flag
, l_dlv_ship_action_tbl(i_ship).uom_code
, l_dlv_ship_action_tbl(i_ship).quantity
FROM DUAL;
ELSE -- UPDATE
SELECT l_object_version_id
, l_actn_version_id -- 3651489 changed from l_action_id to l_actn_version_id, as element version id should be passed to oke
, decode(p_action_in_tbl(i_actn).action_name ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , action_name , p_action_in_tbl(i_actn).action_name )
, decode(l_fin_task_id_tbl(i_actn) ,NULL , task_id , l_fin_task_id_tbl(i_actn) ) -- for bug# 3749462
, decode(p_action_in_tbl(i_actn).demand_schedule ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , schedule_designator , p_action_in_tbl(i_actn).demand_schedule )
, decode(p_action_in_tbl(i_actn).ship_from_organization_id ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , ship_from_org_id , p_action_in_tbl(i_actn).ship_from_organization_id )
, decode(p_action_in_tbl(i_actn).ship_from_location_id ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , ship_from_location_id , p_action_in_tbl(i_actn).ship_from_location_id )
, decode(p_action_in_tbl(i_actn).ship_to_organization_id ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , ship_to_org_id , p_action_in_tbl(i_actn).ship_to_organization_id )
, decode(p_action_in_tbl(i_actn).ship_to_location_id ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , ship_to_location_id , p_action_in_tbl(i_actn).ship_to_location_id )
, decode(p_action_in_tbl(i_actn).promised_shipment_date ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE , promised_date , p_action_in_tbl(i_actn).promised_shipment_date )
-- 3729250 , expected_shipment_date should be populated with shipping action due date
-- 3749462 , changed from p_action_in_tbl(i_actn).expected_shipment_date to l_due_date_tbl(i_actn)
, l_due_date_tbl(i_actn)
, decode(p_action_in_tbl(i_actn).volume ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , volume , p_action_in_tbl(i_actn).volume )
, decode(p_action_in_tbl(i_actn).volume_uom ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , volume_uom_code , p_action_in_tbl(i_actn).volume_uom )
, decode(p_action_in_tbl(i_actn).weight ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , weight , p_action_in_tbl(i_actn).weight )
, decode(p_action_in_tbl(i_actn).weight_uom ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , weight_uom_code , p_action_in_tbl(i_actn).weight_uom )
, decode(p_action_in_tbl(i_actn).ready_to_ship_flag ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , ready_flag , p_action_in_tbl(i_actn).ready_to_ship_flag )
, decode(p_action_in_tbl(i_actn).initiate_planning_flag ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null , p_action_in_tbl(i_actn).initiate_planning_flag )
, decode(p_action_in_tbl(i_actn).initiate_shipping_flag ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , null , p_action_in_tbl(i_actn).initiate_shipping_flag )
, decode(p_action_in_tbl(i_actn).uom_code ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR , uom_code , p_action_in_tbl(i_actn).uom_code )
, decode(p_action_in_tbl(i_actn).quantity ,PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , quantity , p_action_in_tbl(i_actn).quantity )
INTO
l_dlv_ship_action_tbl(i_ship).pa_deliverable_id
, l_dlv_ship_action_tbl(i_ship).pa_action_id
, l_dlv_ship_action_tbl(i_ship).action_name
, l_dlv_ship_action_tbl(i_ship).ship_finnancial_task_id
, l_dlv_ship_action_tbl(i_ship).demand_schedule
, l_dlv_ship_action_tbl(i_ship).ship_from_organization_id
, l_dlv_ship_action_tbl(i_ship).ship_from_location_id
, l_dlv_ship_action_tbl(i_ship).ship_to_organization_id
, l_dlv_ship_action_tbl(i_ship).ship_to_location_id
, l_dlv_ship_action_tbl(i_ship).promised_shipment_date
, l_dlv_ship_action_tbl(i_ship).expected_shipment_date
, l_dlv_ship_action_tbl(i_ship).volume
, l_dlv_ship_action_tbl(i_ship).volume_uom
, l_dlv_ship_action_tbl(i_ship).weight
, l_dlv_ship_action_tbl(i_ship).weight_uom
, l_dlv_ship_action_tbl(i_ship).ready_to_ship_flag
, l_dlv_ship_action_tbl(i_ship).initiate_planning_flag
, l_dlv_ship_action_tbl(i_ship).initiate_shipping_flag
, l_dlv_ship_action_tbl(i_ship).uom_code
, l_dlv_ship_action_tbl(i_ship).quantity
FROM oke_deliverable_actions_v
WHERE pa_action_id = l_actn_version_id;
IF p_insert_or_update = g_update AND p_action_in_tbl(i_actn).organization_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM THEN
l_organization_name := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR;
-- In Update context, if none of the billing event related parameters are passed,
-- then it is not required to call pa_event_pub.update_event
NULL;
IF ( p_insert_or_update = g_insert) THEN
Pa_Event_Pub.create_event
( p_api_version_number => p_api_version
,p_commit => p_commit
,p_init_msg_list => FND_API.G_FALSE
,p_pm_product_code => l_pm_source_code
,p_event_in_tbl => l_event_in_tbl
,p_event_out_tbl => l_event_out_tbl
,p_msg_count => x_msg_count
,p_msg_data => x_msg_data
,p_return_status => x_return_status
);
ELSIF ( p_insert_or_update = g_update) THEN
Pa_Event_Pub.Update_Event
( p_api_version_number => p_api_version
, p_commit => p_commit
, p_init_msg_list => FND_API.G_FALSE
, p_pm_product_code => l_pm_source_code
, p_event_in_tbl => l_event_in_tbl
, p_event_out_tbl => l_event_out_tbl
, p_msg_count => x_msg_count
, p_msg_data => x_msg_data
, p_return_status => x_return_status
);
pa_debug.write(g_module_name,'Returned from Pa_Event_Pub.update_event for billing action ['||x_return_status||']',5);
END IF; -- p_insert_or_update values
SELECT proj.project_id
FROM PA_PROJECTS_ALL proj
WHERE segment1 between nvl(p_project_number_from,p_project_number_to)
and nvl(p_project_number_to,p_project_number_from) ;
SELECT proj.project_id
FROM PA_PROJECTS_ALL proj
WHERE segment1 between l_project_number_from and l_project_number_to;
SELECT 'Y'
FROM PA_PROJECTS_ALL
WHERE segment1 = l_project_number;
pa_debug.g_err_stage := 'Selected Option is Initiate Demand(project_id is null)';
pa_debug.g_err_stage := 'Selected Option is Initiate Procurement(project_id is null)';
pa_debug.g_err_stage := 'Selected Option is All(project_id is null)';
,p_insert_or_update IN VARCHAR2 := 'UPDATE'
,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_debug_mode VARCHAR2(10);
pa_debug.write(g_module_name,'p_insert_or_update'||':'||p_insert_or_update,3) ;
,p_insert_or_update => 'UPDATE'
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
) ;
pa_debug.g_err_stage:= 'Update Operation';
pa_debug.g_err_stage:= 'Call UPDATE_DLV_ACTIONS_IN_BULK ';
PA_ACTIONS_PUB.UPDATE_DLV_ACTIONS_IN_BULK
(p_api_version => p_api_version
,p_init_msg_list => FND_API.G_FALSE
,p_commit => p_commit
,p_validate_only => p_validate_only
,p_validation_level => p_validation_level
,p_calling_module => p_calling_module
,p_debug_mode => l_debug_mode
,p_max_msg_count => p_max_msg_count
,p_name_tbl => l_upd_name_tbl
,p_manager_person_id_tbl => l_upd_mgr_person_id_tbl
,p_function_code_tbl => l_upd_function_code_tbl
,p_due_date_tbl => l_upd_due_date_tbl
,p_completed_flag_tbl => l_upd_comp_flag_tbl
,p_completion_date_tbl => l_upd_comp_date_tbl
,p_description_tbl => l_upd_description_tbl
,p_attribute_category_tbl => l_upd_attribute_category_tbl
,p_attribute1_tbl => l_upd_attribute1_tbl
,p_attribute2_tbl => l_upd_attribute2_tbl
,p_attribute3_tbl => l_upd_attribute3_tbl
,p_attribute4_tbl => l_upd_attribute4_tbl
,p_attribute5_tbl => l_upd_attribute5_tbl
,p_attribute6_tbl => l_upd_attribute6_tbl
,p_attribute7_tbl => l_upd_attribute7_tbl
,p_attribute8_tbl => l_upd_attribute8_tbl
,p_attribute9_tbl => l_upd_attribute9_tbl
,p_attribute10_tbl => l_upd_attribute10_tbl
,p_attribute11_tbl => l_upd_attribute11_tbl
,p_attribute12_tbl => l_upd_attribute12_tbl
,p_attribute13_tbl => l_upd_attribute13_tbl
,p_attribute14_tbl => l_upd_attribute14_tbl
,p_attribute15_tbl => l_upd_attribute15_tbl
,p_element_version_id_tbl => l_upd_element_ver_id_tbl
,p_proj_element_id_tbl => l_upd_element_id_tbl
,p_record_version_number_tbl => l_upd_rec_ver_num_id_tbl
,p_project_id => NULL
,p_object_id => NULL
,p_object_version_id => NULL
,p_object_type => p_object_type
,p_pm_source_code => p_pm_source_code
,p_pm_source_reference => p_pm_source_reference
,p_carrying_out_organization_id => NULL
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
) ;
SELECT SEGMENT1
FROM PA_PROJECTS_ALL
WHERE PROJECT_ID = p_project_id ;
SELECT PROJECT_SYSTEM_STATUS_CODE
FROM PA_PROJECT_STATUSES pps,
PA_PROJECTS_ALL pa
WHERE pa.PROJECT_ID = p_project_id
AND pps.PROJECT_STATUS_CODE = pa.PROJECT_STATUS_CODE ;
SELECT segment1
FROM PA_PROJECTS_ALL
WHERE PROJECT_ID = p_project_id;