The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row(
px_resale_log_id IN OUT NOCOPY NUMBER,
p_resale_id NUMBER,
p_resale_id_type VARCHAR,
p_error_code VARCHAR2,
p_error_message VARCHAR2,
p_column_name VARCHAR2,
p_column_value VARCHAR2,
px_org_id IN OUT NOCOPY NUMBER)
IS
x_rowid VARCHAR2(30);
SELECT NVL(SUBSTRB(USERENV('CLIENT_INFO'),1,10),-99)
INTO px_org_id
FROM DUAL;
INSERT INTO OZF_RESALE_LOGS_ALL(
resale_log_id,
resale_id,
resale_id_type,
error_code,
error_message,
column_name,
column_value,
org_id
) VALUES (
px_resale_log_id,
p_resale_id,
p_resale_id_type,
p_error_code,
p_error_message,
p_column_name,
p_column_value,
px_org_id);
END Insert_Row;
PROCEDURE Update_Row(
p_resale_log_id NUMBER,
p_resale_id NUMBER,
p_resale_id_type VARCHAR,
p_error_code VARCHAR2,
p_error_message VARCHAR2,
p_column_name VARCHAR2,
p_column_value VARCHAR2,
p_org_id NUMBER)
IS
BEGIN
Update OZF_RESALE_LOGS_ALL
SET
resale_log_id = p_resale_log_id,
resale_id = p_resale_id,
resale_id_type = p_resale_id_type,
error_code = p_error_code,
error_message = p_error_message,
column_name = p_column_name,
column_value = p_column_value,
org_id = p_org_id
WHERE RESALE_LOG_ID = p_RESALE_LOG_ID;
END Update_Row;
PROCEDURE Delete_Row(
p_RESALE_LOG_ID NUMBER)
IS
BEGIN
DELETE FROM OZF_RESALE_LOGS_ALL
WHERE RESALE_LOG_ID = p_RESALE_LOG_ID;
END Delete_Row ;
SELECT *
FROM OZF_RESALE_LOGS_ALL
WHERE RESALE_LOG_ID = p_RESALE_LOG_ID
FOR UPDATE of RESALE_LOG_ID NOWAIT;
FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');