The following lines contain the word 'select', 'insert', 'update' or 'delete':
l_delete_task_type_error EXCEPTION;
l_delete_delv_type_error EXCEPTION; -- Added for bug 4775641
PROCEDURE Update_Task_Type
( p_task_type_id IN pa_task_types.task_type_id%TYPE
,p_task_type IN pa_task_types.task_type%TYPE
,p_start_date_active IN pa_task_types.start_date_active%TYPE
,p_end_date_active IN pa_task_types.end_date_active%TYPE := NULL
,p_description IN pa_task_types.description%TYPE := NULL
,p_task_type_class_code IN pa_task_types.task_type_class_code%TYPE
,p_initial_status_code IN pa_task_types.initial_status_code%TYPE := NULL
,p_prog_entry_enable_flag IN pa_task_types.prog_entry_enable_flag%TYPE := NULL
,p_prog_entry_req_flag IN pa_task_types.prog_entry_req_flag%TYPE := NULL
,p_initial_progress_status_code IN pa_task_types.initial_progress_status_code%TYPE := NULL
,p_task_prog_entry_page_id IN pa_task_types.task_progress_entry_page_id%TYPE := NULL
,p_task_prog_entry_page_name IN pa_page_layouts.page_name%TYPE := NULL
,p_wq_enable_flag IN pa_task_types.wq_enable_flag%TYPE := NULL
,p_work_item_code IN pa_task_types.work_item_code%TYPE := NULL
,p_uom_code IN pa_task_types.uom_code%TYPE := NULL
,p_actual_wq_entry_code IN pa_task_types.actual_wq_entry_code%TYPE := NULL
,p_percent_comp_enable_flag IN pa_task_types.percent_comp_enable_flag%TYPE := NULL
,p_base_percent_comp_deriv_code IN pa_task_types.base_percent_comp_deriv_code%TYPE := NULL
,p_task_weighting_deriv_code IN pa_task_types.task_weighting_deriv_code%TYPE := NULL
,p_remain_effort_enable_flag IN pa_task_types.remain_effort_enable_flag%TYPE := NULL
,p_attribute_category IN pa_task_types.attribute_category%TYPE := NULL
,p_attribute1 IN pa_task_types.attribute1%TYPE := NULL
,p_attribute2 IN pa_task_types.attribute2%TYPE := NULL
,p_attribute3 IN pa_task_types.attribute3%TYPE := NULL
,p_attribute4 IN pa_task_types.attribute4%TYPE := NULL
,p_attribute5 IN pa_task_types.attribute5%TYPE := NULL
,p_attribute6 IN pa_task_types.attribute6%TYPE := NULL
,p_attribute7 IN pa_task_types.attribute7%TYPE := NULL
,p_attribute8 IN pa_task_types.attribute8%TYPE := NULL
,p_attribute9 IN pa_task_types.attribute9%TYPE := NULL
,p_attribute10 IN pa_task_types.attribute10%TYPE := NULL
,p_attribute11 IN pa_task_types.attribute11%TYPE := NULL
,p_attribute12 IN pa_task_types.attribute12%TYPE := NULL
,p_attribute13 IN pa_task_types.attribute13%TYPE := NULL
,p_attribute14 IN pa_task_types.attribute14%TYPE := NULL
,p_attribute15 IN pa_task_types.attribute15%TYPE := NULL
,p_object_type IN pa_task_types.object_type%TYPE := 'PA_TASKS' -- 3279978 : Added Object Type and Progress Rollup Method
,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_wf_item_type IN pa_task_types.wf_item_type%TYPE :=NULL
,p_wf_process IN pa_task_types.wf_process%TYPE :=NULL
,p_wf_lead_days IN pa_task_types.wf_start_lead_days%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_msg_index_out NUMBER;
SELECT prog_entry_enable_flag, prog_entry_req_flag, wq_enable_flag, remain_effort_enable_flag, percent_comp_enable_flag, end_date_active
FROM pa_task_types
WHERE task_type_id = p_task_type_id;
PA_DEBUG.init_err_stack('PA_TASK_TYPES_PUB.Update_Task_Type');
SAVEPOINT UPDATE_TASK_TYPE_PUB;
PA_DEBUG.write_log (x_module => 'pa.plsql.PA_TASK_TYPES_PUB.Update_Task_Type.begin'
,x_msg => 'Beginning of Update_Task_Type pub'
,x_log_level => 5);
PA_DEBUG.write_log (x_module => 'pa.plsql.PA_TASK_TYPES_PUB.Update_Task_Type.begin'
,x_msg => 'calling Update_Task_Type pvt'
,x_log_level => 5);
PA_TASK_TYPE_PVT.Update_Task_Type
(p_task_type_id => p_task_type_id
,p_task_type => p_task_type
,p_start_date_active => p_start_date_active
,p_end_date_active => p_end_date_active
,p_description => p_description
,p_task_type_class_code => l_task_type_class_code
,p_initial_status_code => p_initial_status_code
,p_prog_entry_enable_flag => p_prog_entry_enable_flag
,p_prog_entry_req_flag => p_prog_entry_req_flag
,p_initial_progress_status_code => p_initial_progress_status_code
,p_task_prog_entry_page_id => l_task_prog_entry_page_id
,p_wq_enable_flag => p_wq_enable_flag
,p_work_item_code => p_work_item_code
,p_uom_code => p_uom_code
,p_actual_wq_entry_code => p_actual_wq_entry_code
,p_percent_comp_enable_flag => p_percent_comp_enable_flag
,p_base_percent_comp_deriv_code => p_base_percent_comp_deriv_code
,p_task_weighting_deriv_code => l_task_weighting_deriv_code
,p_remain_effort_enable_flag => p_remain_effort_enable_flag
,p_attribute_category => p_attribute_category
,p_attribute1 => p_attribute1
,p_attribute2 => p_attribute2
,p_attribute3 => p_attribute3
,p_attribute4 => p_attribute4
,p_attribute5 => p_attribute5
,p_attribute6 => p_attribute6
,p_attribute7 => p_attribute7
,p_attribute8 => p_attribute8
,p_attribute9 => p_attribute9
,p_attribute10 => p_attribute10
,p_attribute11 => p_attribute11
,p_attribute12 => p_attribute12
,p_attribute13 => p_attribute13
,p_attribute14 => p_attribute14
,p_attribute15 => p_attribute15
,p_object_type => p_object_type -- 3279978 : Added Object Type and Progress Rollup Method
,p_wf_item_type => p_wf_item_type
,p_wf_process => p_wf_process
,p_wf_lead_days => p_wf_lead_days
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data);
ROLLBACK TO UPDATE_TASK_TYPE_PUB;
FND_MSG_PUB.add_exc_msg ( p_pkg_name => 'PA_TASK_TYPES_PUB.Update_Task_Type'
,p_procedure_name => PA_DEBUG.G_Err_Stack );
END Update_Task_Type;
PROCEDURE Delete_Task_Type
(p_Task_Type_id IN pa_task_types.Task_Type_id%TYPE := NULL
,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
,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_msg_index_out NUMBER;
PA_DEBUG.init_err_stack('PA_task_types_PUB.Delete_Task_Type');
SAVEPOINT DELETE_TASK_TYPE_PUB;
PA_DEBUG.write_log (x_module => 'pa.plsql.PA_task_types_PUB.Delete_Task_Type.begin'
,x_msg => 'Beginning of Delete_Task_Type pub'
,x_log_level => 5);
PA_DEBUG.write_log (x_module => 'pa.plsql.PA_TASK_TYPES_PUB.Delete_Task_Type.begin'
,x_msg => 'calling Delete_Task_Type pvt'
,x_log_level => 5);
RAISE l_delete_task_type_error;
PA_TASK_TYPE_PVT.Delete_Task_Type
(p_task_type_id => p_task_type_id
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data);
x_msg_data := 'PA_DELETE_TASK_TYPE_ERROR';
WHEN l_delete_task_type_error THEN
PA_UTILS.add_message('PA','PA_DELETE_TASK_TYPE_ERROR');
x_msg_data := 'PA_DELETE_TASK_TYPE_ERROR';
ROLLBACK TO Delete_TASK_TYPE_PUB;
FND_MSG_PUB.add_exc_msg ( p_pkg_name => 'PA_TASK_TYPES_PUB.Delete_Task_Type'
,p_procedure_name => PA_DEBUG.G_Err_Stack );
END Delete_Task_Type;
PROCEDURE UPDATE_DELIVERABLE_TYPE
(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_deliverable_type_name IN PA_TASK_TYPES.TASK_TYPE%TYPE
,p_prog_entry_enable_flag IN PA_TASK_TYPES.PROG_ENTRY_ENABLE_FLAG%TYPE := 'N'
,p_initial_deliverable_status IN PA_TASK_TYPES.INITIAL_STATUS_CODE%TYPE := 'DLVR_NOT_STARTED'
,p_deliverable_type_class IN PA_TASK_TYPES.TASK_TYPE_CLASS_CODE%TYPE := 'ITEM'
,p_enable_dlvr_actions_flag IN PA_TASK_TYPES.ENABLE_DLVR_ACTIONS_FLAG%TYPE := 'N'
,p_effective_from IN PA_TASK_TYPES.START_DATE_ACTIVE%TYPE
,p_effective_to IN PA_TASK_TYPES. END_DATE_ACTIVE %TYPE := NULL
,p_description IN PA_TASK_TYPES.DESCRIPTION%TYPE := NULL
,p_deliverable_type_id IN PA_TASK_TYPES.TASK_TYPE_ID%TYPE
,p_record_version_number IN PA_TASK_TYPES.RECORD_VERSION_NUMBER%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_msg_count NUMBER := 0;
PA_DEBUG.set_curr_function( p_function => 'UPDATE_DELIVERABLE_TYPE',
p_debug_mode => l_debug_mode );
PA_DEBUG.g_err_stage:= 'UPDATE_DELIVERABLE_TYPE : Printing Input parameters';
savepoint UPDATE_DELIVERABLE_TYPE_PUB;
select 'x' into l_dummy
FROM PA_TASK_TYPES
WHERE TASK_TYPE_ID = p_deliverable_type_id
AND OBJECT_TYPE = 'PA_DLVR_TYPES'
AND record_version_number = p_record_version_number
for UPDATE of record_version_number NOWAIT;
ROLLBACK TO UPDATE_DELIVERABLE_TYPE_PUB;
ROLLBACK TO UPDATE_DELIVERABLE_TYPE_PUB;
ROLLBACK TO UPDATE_DELIVERABLE_TYPE_PUB;
Pa_Debug.g_err_stage:= 'Calling PA_TASK_TYPE_PVT.UPDATE_DELIVERABLE_TYPE';
PA_TASK_TYPE_PVT.UPDATE_DELIVERABLE_TYPE
(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_deliverable_type_name => p_deliverable_type_name
,p_prog_entry_enable_flag => p_prog_entry_enable_flag
,p_initial_deliverable_status => p_initial_deliverable_status
,p_deliverable_type_class => p_deliverable_type_class
,p_enable_dlvr_actions_flag => p_enable_dlvr_actions_flag
,p_effective_from => p_effective_from
,p_effective_to => p_effective_to
,p_description => p_description
,p_deliverable_type_id => p_deliverable_type_id
,p_record_version_number => p_record_version_number
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
);
Pa_Debug.g_err_stage:= 'After Calling PA_TASK_TYPE_PVT.UPDATE_DELIVERABLE_TYPE';
Pa_Debug.g_err_stage:= 'Successful Commit Done(In PATTPUBB.pls UPDATE DlvType)!';
ROLLBACK TO UPDATE_DELIVERABLE_TYPE_PUB;
ROLLBACK TO UPDATE_DELIVERABLE_TYPE_PUB;
, p_procedure_name => 'UPDATE_DELIVERABLE_TYPE'
, p_error_text => x_msg_data);
ROLLBACK TO UPDATE_DELIVERABLE_TYPE_PUB;
, p_procedure_name => 'UPDATE_DELIVERABLE_TYPE'
, p_error_text => x_msg_data);
END UPDATE_DELIVERABLE_TYPE ;
PROCEDURE DELETE_DELIVERABLE_TYPE
(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_deliverable_type_id IN PA_TASK_TYPES.TASK_TYPE_ID%TYPE
,p_record_version_number IN PA_TASK_TYPES.RECORD_VERSION_NUMBER%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_msg_count NUMBER := 0;
PA_DEBUG.set_curr_function( p_function => 'DELETE_DELIVERABLE_TYPE',
p_debug_mode => l_debug_mode );
PA_DEBUG.g_err_stage:= 'DELETE_DELIVERABLE_TYPE : Printing Input parameters';
savepoint DELETE_DELIVERABLE_TYPE_PUB;
RAISE l_delete_delv_type_error;
Pa_Debug.g_err_stage:= 'Calling PA_TASK_TYPE_PVT.DELETE_DELIVERABLE_TYPE';
PA_TASK_TYPE_PVT.DELETE_DELIVERABLE_TYPE
(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_deliverable_type_id => p_deliverable_type_id
,p_record_version_number => p_record_version_number
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
);
Pa_Debug.g_err_stage:= 'After coming from PA_TASK_TYPE_PVT.DELETE_DELIVERABLE_TYPE';
Pa_Debug.g_err_stage:= 'Successful Commit Done(In PATTPUBB.pls Deleted the DlvType)!';
WHEN l_delete_delv_type_error THEN -- Added for bug 4775641
PA_UTILS.add_message('PA','PA_DELETE_DELIV_TYPE_ERROR');
x_msg_data := 'PA_DELETE_DELIV_TYPE_ERROR';
ROLLBACK TO DELETE_DELIVERABLE_TYPE_PUB;
ROLLBACK TO DELETE_DELIVERABLE_TYPE_PUB;
, p_procedure_name => 'DELETE_DELIVERABLE_TYPE'
, p_error_text => x_msg_data);
ROLLBACK TO DELETE_DELIVERABLE_TYPE_PUB;
, p_procedure_name => 'DELETE_DELIVERABLE_TYPE'
, p_error_text => x_msg_data);
END DELETE_DELIVERABLE_TYPE ;
,p_insert_or_update IN VARCHAR2 := 'INSERT'
,p_record_version_number IN PA_TASK_TYPES.RECORD_VERSION_NUMBER%TYPE := 1
,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_msg_count NUMBER := 0;
PA_DEBUG.WRITE(g_module_name,'p_insert_or_update'||':'||p_insert_or_update,
l_debug_level3);
Pa_Debug.g_err_stage:= 'Calling insert/update';
IF (p_insert_or_update = 'INSERT')
THEN
PA_TASK_TYPE_PUB.CREATE_DELIVERABLE_TYPE
(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_deliverable_type_name => p_deliverable_type_name
,p_prog_entry_enable_flag => p_prog_entry_enable_flag
,p_initial_deliverable_status => p_initial_deliverable_status
,p_deliverable_type_class => p_deliverable_type_class
,p_enable_dlvr_actions_flag => p_enable_dlvr_actions_flag
,p_effective_from => p_effective_from
,p_effective_to => p_effective_to
,p_description => p_description
,p_deliverable_type_id => p_deliverable_type_id
,p_record_version_number => p_record_version_number
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
);
PA_TASK_TYPE_PUB.UPDATE_DELIVERABLE_TYPE
(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_deliverable_type_name => p_deliverable_type_name
,p_prog_entry_enable_flag => p_prog_entry_enable_flag
,p_initial_deliverable_status => p_initial_deliverable_status
,p_deliverable_type_class => p_deliverable_type_class
,p_enable_dlvr_actions_flag => p_enable_dlvr_actions_flag
,p_effective_from => p_effective_from
,p_effective_to => p_effective_to
,p_description => p_description
,p_deliverable_type_id => p_deliverable_type_id
,p_record_version_number => p_record_version_number
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
);