The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE NAME: insert_row
PURPOSE: Inserts a record into VEA_EXCEPTIONS table
========================================================================*/
PROCEDURE
insert_row
(
p_exception_id IN VEA_EXCEPTIONS.exception_id%TYPE,
p_release_id IN VEA_EXCEPTIONS.release_id%TYPE,
p_layer_provider_code IN VEA_EXCEPTIONS.layer_provider_code%TYPE,
p_message_name IN VEA_EXCEPTIONS.message_name%TYPE,
p_exception_level IN VEA_EXCEPTIONS.exception_level%TYPE,
p_message_text IN VEA_EXCEPTIONS.message_text%TYPE,
p_description IN VEA_EXCEPTIONS.description%TYPE
)
IS
--{
l_api_name CONSTANT VARCHAR2(30) := 'insert_row';
INSERT INTO vea_EXCEPTIONS
(
exception_id, release_id, layer_provider_code,
message_name, exception_level,
message_text, description,
created_by, creation_date,
last_updated_by, last_update_date,
last_update_login
)
VALUES
(
p_exception_id, p_release_id, p_layer_provider_code,
p_message_name, p_exception_level,
p_message_text, p_description,
l_user_id, SYSDATE,
l_user_id, SYSDATE,
l_login_id
);
END insert_row;
PROCEDURE NAME: update_row
PURPOSE: Updates a record into VEA_EXCEPTIONS table
========================================================================*/
PROCEDURE
update_row
(
p_exception_id IN VEA_EXCEPTIONS.exception_id%TYPE,
p_release_id IN VEA_EXCEPTIONS.release_id%TYPE,
p_layer_provider_code IN VEA_EXCEPTIONS.layer_provider_code%TYPE,
p_message_name IN VEA_EXCEPTIONS.message_name%TYPE,
p_exception_level IN VEA_EXCEPTIONS.exception_level%TYPE,
p_message_text IN VEA_EXCEPTIONS.message_text%TYPE,
p_description IN VEA_EXCEPTIONS.description%TYPE
)
IS
--{
l_api_name CONSTANT VARCHAR2(30) := 'update_row';
UPDATE vea_EXCEPTIONS
SET release_id = p_release_id,
message_name = p_message_name,
exception_level = p_exception_level,
message_text = p_message_text,
description = p_description,
last_updated_by = l_user_id,
last_update_date = SYSDATE,
last_update_login = l_login_id
WHERE layer_provider_code = p_layer_provider_code
AND exception_id = p_exception_id;
END update_row;
It inserts/updates a record in VEA_EXCEPTIONS table.
========================================================================*/
PROCEDURE
process
(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
x_id OUT NOCOPY vea_EXCEPTIONS.exception_id%TYPE,
p_release_id IN VEA_EXCEPTIONS.release_id%TYPE,
p_layer_provider_code IN VEA_EXCEPTIONS.layer_provider_code%TYPE,
p_message_name IN VEA_EXCEPTIONS.message_name%TYPE,
p_exception_level IN VEA_EXCEPTIONS.exception_level%TYPE,
p_message_text IN VEA_EXCEPTIONS.message_text%TYPE,
p_description IN VEA_EXCEPTIONS.description%TYPE,
p_id IN VEA_EXCEPTIONS.exception_id%TYPE := NULL
)
IS
--{
l_api_name CONSTANT VARCHAR2(30) := 'process';
SELECT NVL( x_id, vea_EXCEPTIONS_s.NEXTVAL )
INTO x_id
FROM DUAL;
insert_row
(
p_exception_id => x_id,
p_release_id => p_release_id,
p_layer_provider_code => p_layer_provider_code,
p_message_name => p_message_name,
p_exception_level => p_exception_level,
p_message_text => p_message_text,
p_description => p_description
);
update_row
(
p_exception_id => x_id,
p_release_id => p_release_id,
p_layer_provider_code => p_layer_provider_code,
p_message_name => p_message_name,
p_exception_level => p_exception_level,
p_message_text => p_message_text,
p_description => p_description
);