The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure update_article_var_values(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 ,
p_validate_commit IN VARCHAR2,
p_validation_string IN VARCHAR2,
p_commit IN VARCHAR2,
p_mode IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_doc_type IN VARCHAR2,
p_doc_id IN NUMBER,
p_cat_id IN NUMBER,
p_amendment_description IN VARCHAR2,
p_print_text_yn IN VARCHAR2,
p_variable_code IN VARCHAR2,
p_variable_value_id IN VARCHAR2,
p_variable_value IN VARCHAR2
) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'g_update_article_var_values';
SELECT object_version_number
FROM OKC_K_ART_VARIABLES
WHERE cat_id=p_cat_id
AND variable_code=p_variable_code;
okc_debug.log('100: Entered update_article_var_values', 2);
OKC_K_ARTICLES_GRP.update_article(
p_api_version =>1,
p_init_msg_list => FND_API.G_FALSE,
p_validation_level => FND_API.G_VALID_LEVEL_FULL,
p_validate_commit => FND_API.G_FALSE,
p_validation_string => NULL,
p_commit => FND_API.G_FALSE,
p_mode => p_mode,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_id => p_cat_id,
p_amendment_description => p_amendment_description,
p_print_text_yn =>p_print_text_yn,
p_object_version_number => NULL
);
OKC_K_ART_VARIABLES_PVT.update_row(
p_validation_level => FND_API.G_VALID_LEVEL_FULL,
x_return_status => x_return_status,
p_cat_id => p_cat_id,
p_variable_code => p_variable_code,
p_variable_value_id => p_variable_value_id,
p_variable_value => p_variable_value,
p_object_version_number=>l_ovn
);
okc_debug.log('800: updated article variable record ', 2);
okc_debug.log('900: Leaving update_article_var_values', 2);
okc_debug.log('300: Leaving update_article_var_values: OKC_API.G_EXCEPTION_ERROR Exception', 2);
okc_debug.log('400: Leavingupdate_article_var_values: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
okc_debug.log('500: Leaving update_article_var_values because of EXCEPTION: '||sqlerrm, 2);
END update_article_var_values;
Procedure update_global_var_values(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 ,
p_validate_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_string IN VARCHAR2,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_mode IN VARCHAR2 :='NORMAL', -- Other value 'AMEND'
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_doc_type IN VARCHAR2,
p_doc_id IN NUMBER,
p_variable_code IN VARCHAR2,
p_global_variable_value_id IN VARCHAR2,
p_global_variable_value IN VARCHAR2
) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'g_update_global_var_values';
SELECT DISTINCT k.id
FROM okc_k_art_variables v,
okc_k_articles_b k
WHERE k.id = v.cat_id
AND NVL(v.override_global_yn,'N') <> 'Y'
AND v.variable_code = p_variable_code
AND k.document_type = p_doc_type
AND k.document_id = p_doc_id;
okc_debug.log('100: Entered update_global_var_values', 2);
SAVEPOINT g_update_global_var_values_GRP;
UPDATE okc_k_art_variables
SET variable_value = p_global_variable_value,
variable_value_id = p_global_variable_value_id,
global_variable_value = p_global_variable_value,
global_variable_value_id = p_global_variable_value_id,
object_version_number = object_version_number + 1
WHERE variable_code = p_variable_code
AND NVL(override_global_yn,'N') <> 'Y'
AND cat_id IN
(SELECT id FROM okc_k_articles_b WHERE document_type = p_doc_type AND document_id = p_doc_id);
UPDATE okc_k_art_variables
SET global_variable_value = p_global_variable_value,
global_variable_value_id = p_global_variable_value_id,
object_version_number = object_version_number + 1
WHERE variable_code = p_variable_code
AND NVL(override_global_yn,'N') ='Y'
AND cat_id IN
(SELECT id FROM okc_k_articles_b WHERE document_type = p_doc_type AND document_id = p_doc_id);
OKC_K_ARTICLES_GRP.update_article(
p_api_version =>1,
p_init_msg_list => FND_API.G_FALSE,
p_validation_level => FND_API.G_VALID_LEVEL_FULL,
p_validate_commit => FND_API.G_FALSE,
p_validation_string => NULL,
p_commit => FND_API.G_FALSE,
p_mode => p_mode,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_id => l_cat_rec.id,
p_amendment_description => NULL,
p_print_text_yn =>NULL,
p_object_version_number => NULL
);
okc_debug.log('900: Leaving update_global_var_values', 2);
okc_debug.log('300: Leaving update_article_var_values: OKC_API.G_EXCEPTION_ERROR Exception', 2);
okc_debug.log('400: Leaving update_article_var_values: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2
);
okc_debug.log('500: Leaving update_article_var_values because of EXCEPTION: '||sqlerrm, 2);
END update_global_var_values;
Procedure update_local_var_values(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 ,
p_validate_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_string IN VARCHAR2,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_mode IN VARCHAR2 :='NORMAL', -- Other value 'AMEND'
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_doc_type IN VARCHAR2,
p_doc_id IN NUMBER,
p_cat_id IN NUMBER,
p_amendment_description IN VARCHAR2 := NULL,
p_print_text_yn IN VARCHAR2 := NULL,
p_variable_code IN VARCHAR2,
p_variable_value_id IN VARCHAR2,
p_variable_value IN VARCHAR2,
p_override_global_yn IN VARCHAR2) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'g_update_local_var_values';
okc_debug.log('100: Entered update_local_var_values', 2);
SAVEPOINT g_update_local_var_values_GRP;
OKC_K_ARTICLES_GRP.update_article(
p_api_version =>1,
p_init_msg_list => FND_API.G_FALSE,
p_validation_level => FND_API.G_VALID_LEVEL_FULL,
p_validate_commit => FND_API.G_FALSE,
p_validation_string => NULL,
p_commit => FND_API.G_FALSE,
p_mode => p_mode,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_id => p_cat_id,
p_amendment_description => NULL,
p_print_text_yn =>NULL,
p_object_version_number => NULL
);
UPDATE okc_k_art_variables
SET variable_value = NVL(global_variable_value,p_variable_value),
variable_value_id = NVL(global_variable_value_id,p_variable_value_id),
override_global_yn = 'N',
object_version_number = object_version_number + 1
WHERE variable_code = p_variable_code
AND cat_id = p_cat_id ;
UPDATE okc_k_art_variables
SET variable_value = p_variable_value,
variable_value_id = p_variable_value_id,
override_global_yn = 'Y',
object_version_number = object_version_number + 1
WHERE variable_code = p_variable_code
AND cat_id = p_cat_id ;
okc_debug.log('900: Leaving update_local_var_values', 2);
okc_debug.log('300: Leaving update_article_var_values: OKC_API.G_EXCEPTION_ERROR Exception', 2);
okc_debug.log('400: Leaving update_article_var_values: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2
);
okc_debug.log('500: Leaving update_article_var_values because of EXCEPTION: '||sqlerrm, 2);
END update_local_var_values;
Procedure update_response_var_values(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 ,
p_validate_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_string IN VARCHAR2,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_mode IN VARCHAR2 :='NORMAL', -- Other value 'AMEND'
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_doc_type IN VARCHAR2,
p_doc_id IN NUMBER,
p_old_cat_id IN NUMBER,
p_amendment_description IN VARCHAR2 := NULL,
p_print_text_yn IN VARCHAR2 := NULL,
p_variable_code IN VARCHAR2,
p_variable_value_id IN VARCHAR2,
p_variable_value IN VARCHAR2,
p_override_global_yn IN VARCHAR2) IS
l_api_version CONSTANT NUMBER := 1;
l_api_name CONSTANT VARCHAR2(30) := 'g_update_response_var_values';
SELECT id
FROM okc_k_articles_b
WHERE orig_system_reference_code = 'COPY'
AND orig_system_reference_id1 = p_old_cat_id
AND document_type = p_doc_type
AND document_id = p_doc_id;
okc_debug.log('100: Entered update_response_var_values', 2);
update_local_var_values
(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
p_validate_commit => p_validate_commit,
p_validation_string => p_validation_string,
p_commit => p_commit,
p_mode => p_mode,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_doc_type => p_doc_type,
p_doc_id => p_doc_id,
p_cat_id => l_cat_id,
p_amendment_description => p_amendment_description,
p_print_text_yn => p_print_text_yn,
p_variable_code => p_variable_code,
p_variable_value_id => p_variable_value_id,
p_variable_value => p_variable_value,
p_override_global_yn => p_override_global_yn
);
okc_debug.log('900: Leaving update_response_var_values', 2);
okc_debug.log('500: Leaving update_response_var_values because of EXCEPTION: '||sqlerrm, 2);
END update_response_var_values;