The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Update_Project_Template(
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_project_id IN NUMBER,
p_project_number IN VARCHAR2 := 'JUNK_CHARS',
p_project_name IN VARCHAR2 := 'JUNK_CHARS',
p_project_type IN VARCHAR2 := 'JUNK_CHARS',
p_organization_id IN NUMBER := -9999,
p_organization_name IN VARCHAR2 := 'JUNK_CHARS',
p_effective_from_date IN DATE := TO_DATE( '01-01-1000', 'DD-MM-YYYY' ),
p_effective_to_date IN DATE := TO_DATE( '01-01-1000', 'DD-MM-YYYY' ),
p_description IN VARCHAR2 := 'JUNK_CHARS',
p_security_level IN NUMBER := 0,
-- anlee
-- Project Long Name changes
p_long_name IN VARCHAR2 DEFAULT NULL,
-- End of changes
p_record_version_number IN NUMBER,
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 VARCHAR(30) := 'Update_Project_Template';
pa_debug.init_err_stack ('PA_PROJ_TEMPLATE_SETUP_PUB.Update_Project_Template');
pa_debug.debug('PA_PROJ_TEMPLATE_SETUP_PUB.Update_Project_Template begin');
savepoint Update_Project_Template;
SELECT 'x' INTO l_dummy_char
FROM pa_projects_all
WHERE project_id = p_project_id
AND record_version_number = p_record_version_number
FOR UPDATE OF record_version_number NOWAIT;
SELECT 'x' INTO l_dummy_char
FROM pa_projects_all
WHERE project_id = p_project_id
AND record_version_number = p_record_version_number;
PA_PROJ_TEMPLATE_SETUP_PVT.Update_Project_Template(
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 => p_debug_mode
,p_max_msg_count => p_max_msg_count
,p_project_id => p_project_id
,p_project_number => p_project_number
,p_project_name => p_project_name
,p_project_type => p_project_type
,p_organization_id => l_organization_id
,p_effective_from_date => p_effective_from_date
,p_effective_to_date => p_effective_to_date
,p_description => p_description
,p_security_level => p_security_level
-- anlee
-- Project Long Name changes
,p_long_name => p_long_name
-- End of changes
,p_record_version_number => p_record_version_number
,x_return_status => l_return_status
,x_msg_count => l_msg_count
,x_msg_data => l_msg_data );
pa_debug.debug('PA_PROJ_TEMPLATE_SETUP_PUB.Update_Project_Template END');
rollback to Update_Project_Template;
rollback to Update_Project_Template;
p_procedure_name => 'Update_Project_Template',
p_error_text => SUBSTRB(SQLERRM,1,240));
rollback to Update_Project_Template;
p_procedure_name => 'Update_Project_Template',
p_error_text => SUBSTRB(SQLERRM,1,240));
END Update_Project_Template;
PROCEDURE Delete_Project_Template(
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_project_id IN NUMBER,
p_record_version_number IN NUMBER,
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 VARCHAR(30) := 'Delete_Project_Template';
pa_debug.init_err_stack ('PA_PROJ_TEMPLATE_SETUP_PUB.Delete_Project_Template');
pa_debug.debug('PA_PROJ_TEMPLATE_SETUP_PUB.Delete_Project_Template begin');
savepoint Delete_Project_Template;
SELECT 'x' INTO l_dummy_char
FROM pa_projects_all
WHERE project_id = p_project_id
AND record_version_number = p_record_version_number
FOR UPDATE OF record_version_number NOWAIT;
SELECT 'x' INTO l_dummy_char
FROM pa_projects_all
WHERE project_id = p_project_id
AND record_version_number = p_record_version_number;
PA_PROJ_TEMPLATE_SETUP_PVT.Delete_Project_Template(
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 => p_debug_mode
,p_max_msg_count => p_max_msg_count
,p_project_id => p_project_id
,p_record_version_number => p_record_version_number
,x_return_status => l_return_status
,x_msg_count => l_msg_count
,x_msg_data => l_msg_data );
pa_debug.debug('PA_PROJ_TEMPLATE_SETUP_PUB.Delete_Project_Template END');
rollback to Delete_Project_Template;
rollback to Delete_Project_Template;
p_procedure_name => 'Delete_Project_Template',
p_error_text => SUBSTRB(SQLERRM,1,240));
rollback to Delete_Project_Template;
p_procedure_name => 'Delete_Project_Template',
p_error_text => SUBSTRB(SQLERRM,1,240));
END Delete_Project_Template;
PROCEDURE Delete_Project_Options(
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_project_id IN NUMBER,
p_option_code IN VARCHAR2,
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 VARCHAR(30) := 'Delete_Project_Options';
pa_debug.init_err_stack ('PA_PROJ_TEMPLATE_SETUP_PUB.Delete_Project_Options');
pa_debug.debug('PA_PROJ_TEMPLATE_SETUP_PUB.Delete_Project_Options');
savepoint Delete_Project_Options;
PA_PROJ_TEMPLATE_SETUP_PVT.Delete_Project_Options(
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 => p_debug_mode
,p_max_msg_count => p_max_msg_count
,p_project_id => p_project_id
,p_option_code => p_option_code
,x_return_status => l_return_status
,x_msg_count => l_msg_count
,x_msg_data => l_msg_data );
pa_debug.debug('PA_PROJ_TEMPLATE_SETUP_PUB.Delete_Project_Options END');
rollback to Delete_Project_Options;
rollback to Delete_Project_Options;
p_procedure_name => 'Delete_Project_Options',
p_error_text => SUBSTRB(SQLERRM,1,240));
rollback to Delete_Project_Options;
p_procedure_name => 'Delete_Project_Options',
p_error_text => SUBSTRB(SQLERRM,1,240));
END Delete_Project_Options;
PROCEDURE Update_Quick_Entry_Field(
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_project_id IN NUMBER ,
p_row_id IN VARCHAR2 ,
p_sort_order IN NUMBER ,
p_field_name IN VARCHAR2 := 'JUNK_CHARS',
p_field_meaning IN VARCHAR2 := 'JUNK_CHARS',
p_specification IN VARCHAR2 := 'JUNK_CHARS',
p_limiting_value IN VARCHAR2 := 'JUNK_CHARS',
p_prompt IN VARCHAR2 ,
p_required_flag IN VARCHAR2 := 'N',
p_record_version_number IN NUMBER,
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 VARCHAR(30) := 'Update_Quick_Entry_Field';
SELECT field_name
FROM pa_project_copy_overrides
WHERE rowid = p_row_id;
pa_debug.init_err_stack ('PA_PROJ_TEMPLATE_SETUP_PUB.Update_Quick_Entry_Field');
pa_debug.debug('PA_PROJ_TEMPLATE_SETUP_PUB.Update_Quick_Entry_Field');
savepoint Update_Quick_Entry_Field;
SELECT 'x' INTO l_dummy_char
FROM pa_project_copy_overrides
WHERE project_id = p_project_id
AND record_version_number = p_record_version_number
AND rowid = p_row_id
FOR UPDATE OF record_version_number NOWAIT;
SELECT 'x' INTO l_dummy_char
FROM pa_project_copy_overrides
WHERE project_id = p_project_id
AND rowid = p_row_id
AND record_version_number = p_record_version_number;
PA_PROJ_TEMPLATE_SETUP_PVT.Update_Quick_Entry_Field(
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 => p_debug_mode
,p_max_msg_count => p_max_msg_count
,p_project_id => p_project_id
,p_row_id => p_row_id
,p_sort_order => p_sort_order
,p_field_name => l_field_name
,p_limiting_value => l_limiting_value
,p_prompt => p_prompt
,p_required_flag => p_required_flag
,p_record_version_number => p_record_version_number
,x_return_status => l_return_status
,x_msg_count => l_msg_count
,x_msg_data => l_msg_data );
pa_debug.debug('PA_PROJ_TEMPLATE_SETUP_PUB.Update_Quick_Entry_Field END');
rollback to Update_Quick_Entry_Field;
rollback to Update_Quick_Entry_Field;
p_procedure_name => 'Update_Quick_Entry_Field',
p_error_text => SUBSTRB(SQLERRM,1,240));
rollback to Update_Quick_Entry_Field;
p_procedure_name => 'Update_Quick_Entry_Field',
p_error_text => SUBSTRB(SQLERRM,1,240));
END Update_Quick_Entry_Field;
PROCEDURE Delete_Quick_Entry_Field(
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_project_id IN NUMBER,
p_row_id IN VARCHAR2,
p_record_version_number IN NUMBER,
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 VARCHAR(30) := 'Delete_Quick_Entry_Field';
pa_debug.init_err_stack ('PA_PROJ_TEMPLATE_SETUP_PUB.Delete_Quick_Entry_Field');
pa_debug.debug('PA_PROJ_TEMPLATE_SETUP_PUB.Delete_Quick_Entry_Field');
savepoint Delete_Quick_Entry_Field;
SELECT 'x' INTO l_dummy_char
FROM pa_project_copy_overrides
WHERE project_id = p_project_id
AND record_version_number = p_record_version_number
AND rowid = p_row_id
FOR UPDATE OF record_version_number NOWAIT;
SELECT 'x' INTO l_dummy_char
FROM pa_project_copy_overrides
WHERE project_id = p_project_id
AND rowid = p_row_id
AND record_version_number = p_record_version_number;
PA_PROJ_TEMPLATE_SETUP_PVT.Delete_Quick_Entry_Field(
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 => p_debug_mode
,p_max_msg_count => p_max_msg_count
,p_project_id => p_project_id
,p_row_id => p_row_id
,p_record_version_number => p_record_version_number
,x_return_status => l_return_status
,x_msg_count => l_msg_count
,x_msg_data => l_msg_data );
pa_debug.debug('PA_PROJ_TEMPLATE_SETUP_PUB.Delete_Quick_Entry_Field END');
rollback to Delete_Quick_Entry_Field;
rollback to Delete_Quick_Entry_Field;
p_procedure_name => 'Delete_Quick_Entry_Field',
p_error_text => SUBSTRB(SQLERRM,1,240));
rollback to Delete_Quick_Entry_Field;
p_procedure_name => 'Delete_Quick_Entry_Field',
p_error_text => SUBSTRB(SQLERRM,1,240));
END Delete_Quick_Entry_Field;