[Home] [Help]
The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT layer_provider_code
FROM vea_layer_providers
WHERE layer_provider_code = p_layer_provider_code;
PROCEDURE NAME: insert_row
PURPOSE: Inserts a record into VEA_LAYER_PROVIDER table
========================================================================*/
PROCEDURE
insert_row
(
p_layer_provider_id IN vea_layer_providers.layer_provider_id%TYPE,
p_layer_provider_code IN vea_layer_providers.layer_provider_code%TYPE,
p_layer_provider_name IN vea_layer_providers.layer_provider_name%TYPE,
p_description IN vea_layer_providers.description%TYPE
)
IS
--{
l_api_name CONSTANT VARCHAR2(30) := 'insert_row';
INSERT INTO vea_layer_providers
(
layer_provider_id,
layer_provider_code,
layer_provider_name,
description,
created_by, creation_date,
last_updated_by, last_update_date,
last_update_login
)
VALUES
(
p_layer_provider_id,
p_layer_provider_code,
p_layer_provider_name,
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_LAYER_PROVIDER table
========================================================================*/
PROCEDURE
update_row
(
p_layer_provider_id IN vea_layer_providers.layer_provider_id%TYPE,
p_layer_provider_code IN vea_layer_providers.layer_provider_code%TYPE,
p_layer_provider_name IN vea_layer_providers.layer_provider_name%TYPE,
p_description IN vea_layer_providers.description%TYPE
)
IS
--{
l_api_name CONSTANT VARCHAR2(30) := 'update_row';
UPDATE vea_layer_providers
SET layer_provider_code = p_layer_provider_code,
layer_provider_name = p_layer_provider_name,
description = p_description,
last_updated_by = l_user_id,
last_update_date = SYSDATE,
last_update_login = l_login_id
WHERE layer_provider_id = p_layer_provider_id;
END update_row;
PROCEDURE NAME: delete_rows
PURPOSE: Deletes the layer provider from the VEA_LAYER_PROVIDER table
if no layers have been developed using this layer provider code.
========================================================================*/
PROCEDURE
delete_rows
(
p_layer_provider_code IN vea_layer_providers.layer_provider_code%TYPE,
p_layer_provider_name IN vea_layer_providers.layer_provider_name%TYPE
)
IS
--{
l_api_name CONSTANT VARCHAR2(30) := 'delete_rows';
SELECT count(tp_layer_id)
INTO l_layer_count
FROM vea_tp_layers
WHERE layer_provider_code = p_layer_provider_code;
DELETE vea_layer_providers
WHERE layer_provider_code = p_layer_provider_code;
END delete_rows;
SELECT layer_provider_code
FROM vea_layer_providers
WHERE layer_provider_name = p_layer_provider_name;
SELECT layer_provider_name
FROM vea_layer_providers
WHERE layer_provider_code = p_layer_provider_code;
It inserts/updates a record in VEA_LAYER_PROVIDER 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,
p_layer_provider_code IN vea_layer_providers.layer_provider_code%TYPE,
p_layer_provider_name IN vea_layer_providers.layer_provider_name%TYPE,
p_description IN vea_layer_providers.description%TYPE
)
IS
--{
l_api_name CONSTANT VARCHAR2(30) := 'process';
l_insert BOOLEAN := TRUE;
l_insert := TRUE;
'select layer_provider_id,
layer_provider_code, layer_provider_name
from vea_layer_providers
where layer_provider_code = :lp_code'
using p_layer_provider_code;
select layer_provider_id,
layer_provider_code, layer_provider_name
from vea_layer_providers
where layer_provider_code is not null;
l_insert := FALSE;
SELECT count(tp_layer_id)
INTO l_layer_count
FROM vea_tp_layers
WHERE layer_provider_code = layer_rec.layer_provider_code;
update_row
(
p_layer_provider_id => layer_rec.layer_provider_id,
p_layer_provider_code => p_layer_provider_code,
p_layer_provider_name => p_layer_provider_name,
p_description => p_description
);
update_row
(
p_layer_provider_id => layer_rec.layer_provider_id,
p_layer_provider_code => p_layer_provider_code,
p_layer_provider_name => p_layer_provider_name,
p_description => p_description
);
vea_tpa_util_pvt.update_lookup_values
(
p_lookup_type => 'VEA_LAYER_PROVIDERS',
p_new_lookup_code => p_layer_provider_code,
p_current_lookup_code => layer_rec.layer_provider_code,
p_meaning => p_layer_provider_name,
p_description => p_layer_provider_name
);
IF l_insert = TRUE THEN
--{
l_location := '0110';
SELECT vea_layer_providers_s.NEXTVAL
INTO l_layer_provider_id
FROM DUAL;
insert_row
(
p_layer_provider_id => l_layer_provider_id,
p_layer_provider_code => p_layer_provider_code,
p_layer_provider_name => p_layer_provider_name,
p_description => p_description
);
vea_tpa_util_pvt.insert_lookup_values
(
p_lookup_type => 'VEA_LAYER_PROVIDERS',
p_lookup_code => p_layer_provider_code,
p_meaning => p_layer_provider_name,
p_description => p_layer_provider_name
);