The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE INSERT_ROW (
X_RULE_ID IN NUMBER,
X_RULE_TYPE IN VARCHAR2,
X_RULE_NAME IN VARCHAR2
) IS
l_rowid ROWID := NULL;
SELECT ROWID FROM HZ_EXT_DATA_RULES_TL
WHERE RULE_ID = X_RULE_ID
AND LANGUAGE = USERENV('LANG');
INSERT INTO HZ_EXT_DATA_RULES_TL (
CREATION_DATE,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATED_BY,
RULE_NAME,
RULE_ID,
RULE_TYPE,
LANGUAGE,
SOURCE_LANG
) SELECT
SYSDATE,
hz_utility_v2pub.last_update_login,
SYSDATE,
hz_utility_v2pub.last_updated_by,
hz_utility_v2pub.created_by,
X_RULE_NAME,
X_RULE_ID,
X_RULE_TYPE,
L.LANGUAGE_CODE,
USERENV('LANG')
FROM FND_LANGUAGES L
WHERE L.INSTALLED_FLAG IN ('I', 'B')
AND NOT EXISTS
(SELECT NULL
FROM HZ_EXT_DATA_RULES_TL T
WHERE T.RULE_ID = X_RULE_ID
AND T.LANGUAGE = L.LANGUAGE_CODE);
END INSERT_ROW;
SELECT
RULE_TYPE,
RULE_NAME,
DECODE(LANGUAGE, USERENV('LANG'), 'Y', 'N') BASELANG
FROM HZ_EXT_DATA_RULES_TL
WHERE RULE_ID = X_RULE_ID
AND USERENV('LANG') IN (LANGUAGE, SOURCE_LANG)
FOR UPDATE OF RULE_ID NOWAIT;
PROCEDURE UPDATE_ROW (
X_RULE_ID IN NUMBER,
X_RULE_NAME IN VARCHAR2
) IS
BEGIN
UPDATE HZ_EXT_DATA_RULES_TL
SET RULE_NAME = X_RULE_NAME,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATED_BY = hz_utility_v2pub.last_updated_by,
LAST_UPDATE_LOGIN = hz_utility_v2pub.last_update_login,
SOURCE_LANG = USERENV('LANG')
WHERE RULE_ID = X_RULE_ID
AND USERENV('LANG') IN (LANGUAGE, SOURCE_LANG);
END UPDATE_ROW;
PROCEDURE DELETE_ROW (
X_RULE_ID IN NUMBER
) IS
BEGIN
DELETE FROM HZ_EXT_DATA_RULES_TL
WHERE RULE_ID = X_RULE_ID;
END DELETE_ROW;
UPDATE HZ_EXT_DATA_RULES_TL T
SET (
RULE_NAME
) = (SELECT
B.RULE_NAME
FROM HZ_EXT_DATA_RULES_TL B
WHERE B.RULE_ID = T.RULE_ID
AND B.LANGUAGE = T.SOURCE_LANG)
WHERE (
T.RULE_ID,
T.LANGUAGE
) IN (SELECT
SUBT.RULE_ID,
SUBT.LANGUAGE
FROM HZ_EXT_DATA_RULES_TL SUBB, HZ_EXT_DATA_RULES_TL SUBT
WHERE SUBB.RULE_ID = SUBT.RULE_ID
AND SUBB.LANGUAGE = SUBT.SOURCE_LANG
AND (SUBB.RULE_NAME <> SUBT.RULE_NAME
OR (SUBB.RULE_NAME IS NULL AND SUBT.RULE_NAME IS NOT NULL)
OR (SUBB.RULE_NAME is NOT NULL AND SUBT.RULE_NAME IS NULL)
));
INSERT INTO HZ_EXT_DATA_RULES_TL (
CREATION_DATE,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATED_BY,
RULE_NAME,
RULE_ID,
RULE_TYPE,
LANGUAGE,
SOURCE_LANG
) SELECT
B.CREATION_DATE,
B.LAST_UPDATE_LOGIN,
B.LAST_UPDATE_DATE,
B.LAST_UPDATED_BY,
B.CREATED_BY,
B.RULE_NAME,
B.RULE_ID,
B.RULE_TYPE,
L.LANGUAGE_CODE,
B.SOURCE_LANG
FROM HZ_EXT_DATA_RULES_TL B, FND_LANGUAGES L
WHERE L.INSTALLED_FLAG in ('I', 'B')
AND B.LANGUAGE = USERENV('LANG')
AND NOT EXISTS
(SELECT NULL
FROM HZ_EXT_DATA_RULES_TL T
WHERE T.RULE_ID = B.RULE_ID
AND T.LANGUAGE = L.LANGUAGE_CODE);