The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row (
x_rowid IN OUT NOCOPY VARCHAR2,
x_dss_group_code IN VARCHAR2,
x_entity_id IN NUMBER,
x_status IN VARCHAR2,
x_dss_instance_set_id IN NUMBER,
x_object_version_number IN NUMBER
) IS
l_success VARCHAR2(1) := 'N';
INSERT INTO HZ_DSS_SECURED_ENTITIES (
dss_group_code,
entity_id,
status,
dss_instance_set_id,
last_update_date,
last_updated_by,
creation_date,
created_by,
last_update_login,
object_version_number
)
VALUES (
DECODE(x_dss_group_code,
FND_API.G_MISS_CHAR, NULL, x_dss_group_code),
DECODE(x_entity_id,
FND_API.G_MISS_NUM, NULL,
x_entity_id),
DECODE(x_status,
FND_API.G_MISS_CHAR, 'A',
NULL, 'A',
x_status),
DECODE(x_dss_instance_set_id,
FND_API.G_MISS_NUM, NULL,
x_dss_instance_set_id),
hz_utility_v2pub.last_update_date,
hz_utility_v2pub.last_updated_by,
hz_utility_v2pub.creation_date,
hz_utility_v2pub.created_by,
hz_utility_v2pub.last_update_login,
DECODE(x_object_version_number,
FND_API.G_MISS_NUM, NULL,
x_object_version_number)
) RETURNING
rowid
INTO
x_rowid;
END Insert_Row;
PROCEDURE Update_Row (
x_rowid IN OUT NOCOPY VARCHAR2,
-- x_dss_group_code IN VARCHAR2,
-- x_entity_id IN NUMBER,
x_status IN VARCHAR2,
x_dss_instance_set_id IN NUMBER,
x_object_version_number IN NUMBER
) IS
BEGIN
UPDATE HZ_DSS_SECURED_ENTITIES
SET
status =
DECODE(x_status,
NULL, status,
FND_API.G_MISS_CHAR, NULL,
x_status),
/*
dss_instance_set_id =
DECODE(x_dss_instance_set_id,
NULL, dss_instance_set_id,
FND_API.G_MISS_NUM, NULL,
x_dss_instance_set_id),
*/
last_update_date = hz_utility_v2pub.last_update_date,
last_updated_by = hz_utility_v2pub.last_updated_by,
creation_date = creation_date,
created_by = created_by,
last_update_login = hz_utility_v2pub.last_update_login,
object_version_number =
DECODE(x_object_version_number,
NULL, object_version_number,
FND_API.G_MISS_NUM, NULL,
x_object_version_number)
WHERE rowid = x_rowid;
END Update_Row;
x_last_update_date IN DATE,
x_last_updated_by IN NUMBER,
x_creation_date IN DATE,
x_created_by IN NUMBER,
x_last_update_login IN NUMBER,
x_object_version_number IN NUMBER
) IS
CURSOR c IS
SELECT * FROM HZ_DSS_SECURED_entities
WHERE rowid = x_rowid
FOR UPDATE NOWAIT;
FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
AND ( ( Recinfo.last_update_date = x_last_update_date )
OR ( ( Recinfo.last_update_date IS NULL )
AND ( x_last_update_date IS NULL ) ) )
AND ( ( Recinfo.last_updated_by = x_last_updated_by )
OR ( ( Recinfo.last_updated_by IS NULL )
AND ( x_last_updated_by IS NULL ) ) )
AND ( ( Recinfo.creation_date = x_creation_date )
OR ( ( Recinfo.creation_date IS NULL )
AND ( x_creation_date IS NULL ) ) )
AND ( ( Recinfo.created_by = x_created_by )
OR ( ( Recinfo.created_by IS NULL )
AND ( x_created_by IS NULL ) ) )
AND ( ( Recinfo.last_update_login = x_last_update_login )
OR ( ( Recinfo.last_update_login IS NULL )
AND ( x_last_update_login IS NULL ) ) )
AND ( ( Recinfo.object_version_number = x_object_version_number )
OR ( ( Recinfo.object_version_number IS NULL )
AND ( x_object_version_number IS NULL ) ) )
) THEN
RETURN;
FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
PROCEDURE Select_Row (
x_dss_group_code IN VARCHAR2,
x_entity_id IN NUMBER,
x_status OUT NOCOPY VARCHAR2,
x_dss_instance_set_id OUT NOCOPY NUMBER,
x_object_version_number OUT NOCOPY NUMBER
) IS
BEGIN
SELECT
NVL(status, FND_API.G_MISS_CHAR),
NVL(dss_instance_set_id, FND_API.G_MISS_NUM)
INTO
x_status,
x_dss_instance_set_id
FROM HZ_DSS_SECURED_ENTITIES
WHERE dss_group_code = x_dss_group_code
AND entity_id = x_entity_id ;
END Select_Row;
PROCEDURE Delete_Row (
x_dss_group_code IN VARCHAR2,
x_entity_id IN NUMBER
) IS
BEGIN
DELETE FROM HZ_DSS_SECURED_ENTITIES
WHERE dss_group_code = x_dss_group_code
AND entity_id = x_entity_id ;
END Delete_Row;