The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row (
x_rowid IN OUT NOCOPY VARCHAR2,
x_usage_id IN OUT NOCOPY NUMBER,
x_map_id IN NUMBER,
x_usage_code IN VARCHAR2,
x_status_flag IN VARCHAR2,
x_object_version_number IN NUMBER,
x_created_by_module IN VARCHAR2,
x_application_id IN NUMBER
) IS
l_success VARCHAR2(1) := 'N';
INSERT INTO HZ_ADDRESS_USAGES (
usage_id,
map_id,
usage_code,
status_flag,
created_by,
creation_date,
last_updated_by,
last_update_date,
last_update_login,
object_version_number,
created_by_module,
application_id
)
VALUES (
DECODE(x_usage_id,
FND_API.G_MISS_NUM, HZ_ADDRESS_USAGES_S.NEXTVAL,
NULL, HZ_ADDRESS_USAGES_S.NEXTVAL,
x_usage_id),
DECODE(x_map_id,
FND_API.G_MISS_NUM, NULL,
x_map_id),
DECODE(x_usage_code,
FND_API.G_MISS_CHAR, NULL,
x_usage_code),
DECODE(x_status_flag,
FND_API.G_MISS_CHAR, NULL,
x_status_flag),
hz_utility_v2pub.created_by,
hz_utility_v2pub.creation_date,
hz_utility_v2pub.last_updated_by,
hz_utility_v2pub.last_update_date,
hz_utility_v2pub.last_update_login,
DECODE(x_object_version_number,
FND_API.G_MISS_NUM, NULL,
x_object_version_number),
DECODE(x_created_by_module,
FND_API.G_MISS_CHAR, NULL,
x_created_by_module),
DECODE(x_application_id,
FND_API.G_MISS_NUM, NULL,
x_application_id)
) RETURNING
rowid,
usage_id
INTO
x_rowid,
x_usage_id;
SELECT HZ_ADDRESS_USAGES_S.NEXTVAL
INTO x_usage_id FROM dual;
SELECT 'Y' INTO l_dummy
FROM HZ_ADDRESS_USAGES
WHERE usage_id = x_usage_id;
END Insert_Row;
PROCEDURE Update_Row (
x_rowid IN OUT NOCOPY VARCHAR2,
x_usage_id IN NUMBER,
x_map_id IN NUMBER,
x_usage_code IN VARCHAR2,
x_status_flag IN VARCHAR2,
x_object_version_number IN NUMBER,
x_created_by_module IN VARCHAR2,
x_application_id IN NUMBER
) IS
BEGIN
UPDATE HZ_ADDRESS_USAGES
SET
usage_id =
DECODE(x_usage_id,
NULL, usage_id,
FND_API.G_MISS_NUM, NULL,
x_usage_id),
map_id =
DECODE(x_map_id,
NULL, map_id,
FND_API.G_MISS_NUM, NULL,
x_map_id),
usage_code =
DECODE(x_usage_code,
NULL, usage_code,
FND_API.G_MISS_CHAR, NULL,
x_usage_code),
status_flag =
DECODE(x_status_flag,
NULL, status_flag,
FND_API.G_MISS_CHAR, NULL,
x_status_flag),
created_by = created_by,
creation_date = creation_date,
last_updated_by = hz_utility_v2pub.last_updated_by,
last_update_date = hz_utility_v2pub.last_update_date,
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),
created_by_module =
DECODE(x_created_by_module,
NULL, created_by_module,
FND_API.G_MISS_CHAR, NULL,
x_created_by_module),
application_id =
DECODE(x_application_id,
NULL, application_id,
FND_API.G_MISS_NUM, NULL,
x_application_id)
WHERE rowid = x_rowid;
END Update_Row;
x_last_updated_by IN NUMBER,
x_last_update_date IN DATE,
x_last_update_login IN NUMBER,
x_object_version_number IN NUMBER,
x_created_by_module IN VARCHAR2,
x_application_id IN NUMBER
) IS
CURSOR c IS
SELECT * FROM hz_address_usages
WHERE rowid = x_rowid
FOR UPDATE NOWAIT;
FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
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.last_update_date = x_last_update_date )
OR ( ( Recinfo.last_update_date IS NULL )
AND ( x_last_update_date 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 ) ) )
AND ( ( Recinfo.created_by_module = x_created_by_module )
OR ( ( Recinfo.created_by_module IS NULL )
AND ( x_created_by_module IS NULL ) ) )
AND ( ( Recinfo.application_id = x_application_id )
OR ( ( Recinfo.application_id IS NULL )
AND ( x_application_id IS NULL ) ) )
) THEN
RETURN;
FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
PROCEDURE Select_Row (
x_usage_id IN OUT NOCOPY NUMBER,
x_map_id OUT NOCOPY NUMBER,
x_usage_code OUT NOCOPY VARCHAR2,
x_status_flag OUT NOCOPY VARCHAR2,
x_object_version_number OUT NOCOPY NUMBER,
x_created_by_module OUT NOCOPY VARCHAR2,
x_application_id OUT NOCOPY NUMBER
) IS
BEGIN
SELECT
NVL(usage_id, FND_API.G_MISS_NUM),
NVL(map_id, FND_API.G_MISS_NUM),
NVL(usage_code, FND_API.G_MISS_CHAR),
NVL(status_flag, FND_API.G_MISS_CHAR),
NVL(created_by_module, FND_API.G_MISS_CHAR),
NVL(application_id, FND_API.G_MISS_NUM)
INTO
x_usage_id,
x_map_id,
x_usage_code,
x_status_flag,
x_created_by_module,
x_application_id
FROM HZ_ADDRESS_USAGES
WHERE usage_id = x_usage_id;
END Select_Row;
PROCEDURE Delete_Row (
x_usage_id IN NUMBER
) IS
BEGIN
DELETE FROM HZ_ADDRESS_USAGES
WHERE usage_id = x_usage_id;
END Delete_Row;