The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT 1
INTO VN_NO_RECORD_FLAG
FROM BNE_CONTENT_COLS_B
WHERE APPLICATION_ID = P_APPLICATION_ID
AND CONTENT_CODE = P_CONTENT_CODE
AND SEQUENCE_NUM = P_SEQUENCE_NUM;
INSERT INTO BNE_CONTENT_COLS_B
(APPLICATION_ID, CONTENT_CODE, SEQUENCE_NUM, OBJECT_VERSION_NUMBER, COL_NAME,
CREATED_BY, CREATION_DATE, LAST_UPDATED_BY, LAST_UPDATE_DATE, LAST_UPDATE_LOGIN,
READ_ONLY_FLAG)
VALUES
(P_APPLICATION_ID, P_CONTENT_CODE, P_SEQUENCE_NUM, 1, P_COL_NAME,
P_USER_ID, SYSDATE, P_USER_ID, SYSDATE, P_USER_ID,
P_READ_ONLY_FLAG);
INSERT INTO BNE_CONTENT_COLS_TL
(APPLICATION_ID, CONTENT_CODE, SEQUENCE_NUM, LANGUAGE, SOURCE_LANG, USER_NAME,
CREATED_BY, CREATION_DATE, LAST_UPDATED_BY, LAST_UPDATE_DATE, LAST_UPDATE_LOGIN)
VALUES
(P_APPLICATION_ID, P_CONTENT_CODE, P_SEQUENCE_NUM, P_LANGUAGE, P_SOURCE_LANGUAGE, P_DESCRIPTION,
P_USER_ID, SYSDATE, P_USER_ID, SYSDATE, P_USER_ID);
UPDATE BNE_CONTENT_COLS_B
SET OBJECT_VERSION_NUMBER = (OBJECT_VERSION_NUMBER + 1),
COL_NAME = P_COL_NAME,
LAST_UPDATED_BY = P_USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = P_USER_ID,
READ_ONLY_FLAG = P_READ_ONLY_FLAG
WHERE APPLICATION_ID = P_APPLICATION_ID
AND CONTENT_CODE = P_CONTENT_CODE
AND SEQUENCE_NUM = P_SEQUENCE_NUM;
UPDATE BNE_CONTENT_COLS_TL
SET USER_NAME = P_DESCRIPTION,
LAST_UPDATED_BY = P_USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = P_USER_ID
WHERE APPLICATION_ID = P_APPLICATION_ID
AND CONTENT_CODE = P_CONTENT_CODE
AND SEQUENCE_NUM = P_SEQUENCE_NUM
AND LANGUAGE = P_LANGUAGE
AND SOURCE_LANG = P_SOURCE_LANGUAGE;
SELECT CONTENT_CODE
INTO VV_CONTENT_CODE
FROM BNE_CONTENTS_B
WHERE APPLICATION_ID = P_APPLICATION_ID
AND CONTENT_CODE = P_CONTENT_CODE
AND INTEGRATOR_APP_ID = P_APPLICATION_ID
AND INTEGRATOR_CODE = P_INTEGRATOR_CODE;
INSERT INTO BNE_CONTENTS_B
(APPLICATION_ID, CONTENT_CODE, INTEGRATOR_APP_ID, INTEGRATOR_CODE, OBJECT_VERSION_NUMBER,
CONTENT_CLASS, CREATED_BY, CREATION_DATE, LAST_UPDATED_BY, LAST_UPDATE_DATE, ONCE_ONLY_DOWNLOAD_FLAG)
VALUES
(P_APPLICATION_ID, P_CONTENT_CODE, P_APPLICATION_ID, P_INTEGRATOR_CODE, 1,
P_CONTENT_CLASS, P_USER_ID, SYSDATE, P_USER_ID, SYSDATE, P_ONCE_ONLY_DOWNLOAD_FLAG);
INSERT INTO BNE_CONTENTS_TL
(APPLICATION_ID, CONTENT_CODE, LANGUAGE, SOURCE_LANG, USER_NAME, CREATED_BY, CREATION_DATE,
LAST_UPDATED_BY, LAST_UPDATE_DATE)
VALUES
(P_APPLICATION_ID, P_CONTENT_CODE, P_LANGUAGE, P_SOURCE_LANGUAGE, P_DESCRIPTION, P_USER_ID, SYSDATE,
P_USER_ID, SYSDATE);
UPDATE BNE_CONTENTS_B
SET OBJECT_VERSION_NUMBER = (OBJECT_VERSION_NUMBER + 1),
CONTENT_CLASS = P_CONTENT_CLASS,
LAST_UPDATED_BY = P_USER_ID,
LAST_UPDATE_DATE = SYSDATE
WHERE APPLICATION_ID = P_APPLICATION_ID
AND CONTENT_CODE = P_CONTENT_CODE;
UPDATE BNE_CONTENTS_TL
SET LANGUAGE = P_LANGUAGE,
SOURCE_LANG = P_SOURCE_LANGUAGE,
USER_NAME = P_DESCRIPTION,
LAST_UPDATED_BY = P_USER_ID,
LAST_UPDATE_DATE = SYSDATE
WHERE APPLICATION_ID = P_APPLICATION_ID
AND CONTENT_CODE = P_CONTENT_CODE;
SELECT DISTINCT A.CONTENT_CODE
INTO VV_CONTENT_CODE
FROM BNE_CONTENT_COLS_B A, BNE_CONTENT_COLS_TL B
WHERE A.APPLICATION_ID = B.APPLICATION_ID
AND A.CONTENT_CODE = B.CONTENT_CODE
AND A.APPLICATION_ID = P_APPLICATION_ID
AND A.CONTENT_CODE = P_CONTENT_CODE
AND B.LANGUAGE = P_LANGUAGE;
SELECT DISTINCT A.CONTENT_CODE
INTO VV_CONTENT_CODE
FROM BNE_CONTENT_COLS_B A, BNE_CONTENT_COLS_TL B
WHERE A.APPLICATION_ID = B.APPLICATION_ID
AND A.CONTENT_CODE = B.CONTENT_CODE
AND A.APPLICATION_ID = P_APPLICATION_ID
AND A.CONTENT_CODE = P_CONTENT_CODE
AND B.LANGUAGE = P_LANGUAGE;
SELECT LENGTH(P_COL_LIST)
INTO VN_LIST_LENGTH
FROM SYS.DUAL;
SELECT INSTR(P_COL_LIST, ',', VN_START_POS)
INTO VN_CURR_POS
FROM SYS.DUAL;
SELECT TRIM(' ' FROM (SUBSTR(P_COL_LIST, VN_START_POS, (VN_CURR_POS - VN_PREV_POS - 1))))
INTO VV_COL_NAME
FROM SYS.DUAL;
SELECT DISTINCT A.CONTENT_CODE
INTO VV_CONTENT_CODE
FROM BNE_CONTENT_COLS_B A, BNE_CONTENT_COLS_TL B
WHERE A.APPLICATION_ID = B.APPLICATION_ID
AND A.CONTENT_CODE = B.CONTENT_CODE
AND A.SEQUENCE_NUM = B.SEQUENCE_NUM
AND A.APPLICATION_ID = P_APPLICATION_ID
AND A.CONTENT_CODE = P_CONTENT_CODE
AND B.LANGUAGE = P_LANGUAGE;
SELECT ORACLE_USERNAME
INTO VV_ORACLE_USER
FROM FND_ORACLE_USERID
WHERE ORACLE_ID = 900;
INSERT INTO BNE_CONTENT_COLS_B
(APPLICATION_ID, CONTENT_CODE, OBJECT_VERSION_NUMBER, SEQUENCE_NUM, COL_NAME,
CREATED_BY, CREATION_DATE, LAST_UPDATED_BY, LAST_UPDATE_DATE)
SELECT P_APPLICATION_ID APPLICATION_ID,
P_CONTENT_CODE CONTENT_CODE,
1 OBJECT_VERSION_NUMBER,
ROW_NUMBER() over (order by ATC.COLUMN_SEQUENCE) SEQUENCE_NUM,
ATC.COLUMN_NAME COL_NAME,
P_USER_ID CREATED_BY,
SYSDATE CREATION_DATE,
P_USER_ID LAST_UPDATED_BY,
SYSDATE LAST_UPDATE_DATE
FROM FND_COLUMNS ATC, FND_TABLES TAB
WHERE ATC.TABLE_ID=TAB.TABLE_ID
AND TAB.TABLE_NAME=P_VIEW_NAME
UNION
SELECT P_APPLICATION_ID APPLICATION_ID,
P_CONTENT_CODE CONTENT_CODE,
1 OBJECT_VERSION_NUMBER,
ROW_NUMBER() over (order by ATC.COLUMN_SEQUENCE) SEQUENCE_NUM,
ATC.COLUMN_NAME COL_NAME,
P_USER_ID CREATED_BY,
SYSDATE CREATION_DATE,
P_USER_ID LAST_UPDATED_BY,
SYSDATE LAST_UPDATE_DATE
FROM FND_VIEW_COLUMNS ATC, FND_VIEWS TAB
WHERE ATC.VIEW_ID=TAB.VIEW_ID
AND TAB.VIEW_NAME=P_VIEW_NAME;
INSERT INTO BNE_CONTENT_COLS_TL
(APPLICATION_ID, CONTENT_CODE, SEQUENCE_NUM, LANGUAGE, SOURCE_LANG, USER_NAME,
CREATED_BY, CREATION_DATE, LAST_UPDATED_BY, LAST_UPDATE_DATE)
SELECT P_APPLICATION_ID APPLICATION_ID,
P_CONTENT_CODE CONTENT_CODE,
ROW_NUMBER() over (order by ATC.COLUMN_SEQUENCE) SEQUENCE_NUM,
P_LANGUAGE LANGUAGE,
P_SOURCE_LANGUAGE SOURCE_LANG,
UPPER(REPLACE(ATC.COLUMN_NAME,'_',' ')) USER_NAME,
P_USER_ID CREATED_BY,
SYSDATE CREATION_DATE,
P_USER_ID LAST_UPDATED_BY,
SYSDATE LAST_UPDATE_DATE
FROM FND_COLUMNS ATC, FND_TABLES TAB
WHERE ATC.TABLE_ID=TAB.TABLE_ID
AND TAB.TABLE_NAME=P_VIEW_NAME
UNION
SELECT P_APPLICATION_ID APPLICATION_ID,
P_CONTENT_CODE CONTENT_CODE,
ROW_NUMBER() over (order by ATC.COLUMN_SEQUENCE) SEQUENCE_NUM,
P_LANGUAGE LANGUAGE,
P_SOURCE_LANGUAGE SOURCE_LANG,
UPPER(REPLACE(ATC.COLUMN_NAME,'_',' ')) USER_NAME,
P_USER_ID CREATED_BY,
SYSDATE CREATION_DATE,
P_USER_ID LAST_UPDATED_BY,
SYSDATE LAST_UPDATE_DATE
FROM FND_VIEW_COLUMNS ATC, FND_VIEWS TAB
WHERE ATC.VIEW_ID=TAB.VIEW_ID
AND TAB.VIEW_NAME=P_VIEW_NAME;
SELECT 1
INTO VN_NO_RECORD_FLAG
FROM BNE_STORED_SQL
WHERE APPLICATION_ID = P_APPLICATION_ID
AND CONTENT_CODE = P_CONTENT_CODE;
INSERT INTO BNE_STORED_SQL
(APPLICATION_ID, CONTENT_CODE, OBJECT_VERSION_NUMBER, QUERY, CREATED_BY, CREATION_DATE,
LAST_UPDATED_BY, LAST_UPDATE_DATE)
VALUES
(P_APPLICATION_ID, P_CONTENT_CODE, 1, P_QUERY, P_USER_ID, SYSDATE,
P_USER_ID, SYSDATE);
UPDATE BNE_STORED_SQL
SET OBJECT_VERSION_NUMBER = (OBJECT_VERSION_NUMBER + 1),
QUERY = P_QUERY,
LAST_UPDATED_BY = P_USER_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_LOGIN = P_USER_ID
WHERE APPLICATION_ID = P_APPLICATION_ID
AND CONTENT_CODE = P_CONTENT_CODE;
SELECT CONTENT_CODE
INTO VV_CONTENT_CODE
FROM BNE_CONTENTS_B
WHERE APPLICATION_ID = P_APPLICATION_ID
AND CONTENT_CODE = P_CONTENT_CODE
AND INTEGRATOR_APP_ID = P_APPLICATION_ID
AND INTEGRATOR_CODE = P_INTEGRATOR_CODE;
SELECT CC.APPLICATION_ID CONTENT_APP_ID,
CC.CONTENT_CODE,
CC.SEQUENCE_NUM CONTENT_SEQ_NUM,
IC.APPLICATION_ID INTERFACE_APP_ID,
IC.INTERFACE_CODE,
IC.SEQUENCE_NUM INTERFACE_SEQ_NUM
FROM BNE_CONTENT_COLS_B CC,
BNE_INTERFACE_COLS_B IC
WHERE CC.APPLICATION_ID = IC.APPLICATION_ID
AND CC.APPLICATION_ID = CP_APPLICATION_ID
AND CC.COL_NAME = IC.INTERFACE_COL_NAME
AND CC.CONTENT_CODE = CP_CONTENT_CODE
AND IC.INTERFACE_CODE = CP_INTERFACE_CODE
ORDER BY CC.SEQUENCE_NUM ASC;
SELECT MAPPING_CODE
INTO VV_MAPPING_CODE
FROM BNE_MAPPINGS_B
WHERE APPLICATION_ID = P_APPLICATION_ID
AND MAPPING_CODE = P_MAPPING_CODE;
SELECT USER_NAME||' '||'Mapping'
INTO VV_MAPPING_USER_NAME
FROM BNE_CONTENTS_TL
WHERE APPLICATION_ID = P_APPLICATION_ID
AND CONTENT_CODE = P_CONTENT_CODE
AND LANGUAGE = P_LANGUAGE;
INSERT INTO BNE_MAPPINGS_B
(APPLICATION_ID, MAPPING_CODE, OBJECT_VERSION_NUMBER, INTEGRATOR_APP_ID, INTEGRATOR_CODE,
REPORTING_FLAG, REPORTING_INTERFACE_APP_ID, REPORTING_INTERFACE_CODE,
CREATED_BY, CREATION_DATE, LAST_UPDATED_BY, LAST_UPDATE_DATE)
VALUES
(P_APPLICATION_ID, P_MAPPING_CODE, 1, P_APPLICATION_ID, P_INTEGRATOR_CODE,
'Y', P_APPLICATION_ID, P_INTERFACE_CODE,
P_USER_ID, SYSDATE, P_USER_ID, SYSDATE);
INSERT INTO BNE_MAPPINGS_TL
(APPLICATION_ID, MAPPING_CODE, LANGUAGE, SOURCE_LANG, USER_NAME,
CREATED_BY, CREATION_DATE, LAST_UPDATED_BY, LAST_UPDATE_DATE)
VALUES
(P_APPLICATION_ID, P_MAPPING_CODE, P_LANGUAGE, P_SOURCE_LANGUAGE, VV_MAPPING_USER_NAME,
P_USER_ID, SYSDATE, P_USER_ID, SYSDATE);
INSERT INTO BNE_MAPPING_LINES
(APPLICATION_ID, MAPPING_CODE, SEQUENCE_NUM, CONTENT_APP_ID, CONTENT_CODE, CONTENT_SEQ_NUM,
INTERFACE_APP_ID, INTERFACE_CODE, INTERFACE_SEQ_NUM, OBJECT_VERSION_NUMBER,
CREATED_BY, CREATION_DATE, LAST_UPDATED_BY, LAST_UPDATE_DATE)
VALUES
(P_APPLICATION_ID,
P_MAPPING_CODE,
VN_SEQUENCE,
MAPPING_COLS_REC.CONTENT_APP_ID,
MAPPING_COLS_REC.CONTENT_CODE,
MAPPING_COLS_REC.CONTENT_SEQ_NUM,
MAPPING_COLS_REC.INTERFACE_APP_ID,
MAPPING_COLS_REC.INTERFACE_CODE,
MAPPING_COLS_REC.INTERFACE_SEQ_NUM,
1,
P_USER_ID,
SYSDATE,
P_USER_ID,
SYSDATE);
SELECT CC.APPLICATION_ID CONTENT_APP_ID,
CC.CONTENT_CODE,
CC.SEQUENCE_NUM CONTENT_SEQ_NUM,
IC.APPLICATION_ID INTERFACE_APP_ID,
IC.INTERFACE_CODE,
IC.SEQUENCE_NUM INTERFACE_SEQ_NUM
FROM BNE_CONTENT_COLS_B CC,
BNE_INTERFACE_COLS_B IC
WHERE CC.APPLICATION_ID = IC.APPLICATION_ID
AND CC.APPLICATION_ID = CP_APPLICATION_ID
AND ( CC.COL_NAME = IC.INTERFACE_COL_NAME
OR CC.COL_NAME = SUBSTR(IC.INTERFACE_COL_NAME,3))
AND CC.CONTENT_CODE = CP_CONTENT_CODE
AND IC.INTERFACE_CODE = CP_INTERFACE_CODE
ORDER BY CC.SEQUENCE_NUM ASC;
SELECT MAPPING_CODE
INTO VV_MAPPING_CODE
FROM BNE_MAPPINGS_B
WHERE APPLICATION_ID = P_APPLICATION_ID
AND MAPPING_CODE = P_MAPPING_CODE;
SELECT USER_NAME||' '||'Mapping'
INTO VV_MAPPING_USER_NAME
FROM BNE_CONTENTS_TL
WHERE APPLICATION_ID = P_APPLICATION_ID
AND CONTENT_CODE = P_CONTENT_CODE
AND LANGUAGE = P_LANGUAGE;
INSERT INTO BNE_MAPPINGS_B
(APPLICATION_ID, MAPPING_CODE, OBJECT_VERSION_NUMBER, INTEGRATOR_APP_ID, INTEGRATOR_CODE,
REPORTING_FLAG, REPORTING_INTERFACE_APP_ID, REPORTING_INTERFACE_CODE,
CREATED_BY, CREATION_DATE, LAST_UPDATED_BY, LAST_UPDATE_DATE)
VALUES
(P_APPLICATION_ID, P_MAPPING_CODE, 1, P_APPLICATION_ID, P_INTEGRATOR_CODE,
'N', NULL, NULL, P_USER_ID, SYSDATE, P_USER_ID, SYSDATE);
INSERT INTO BNE_MAPPINGS_TL
(APPLICATION_ID, MAPPING_CODE, LANGUAGE, SOURCE_LANG, USER_NAME,
CREATED_BY, CREATION_DATE, LAST_UPDATED_BY, LAST_UPDATE_DATE)
VALUES
(P_APPLICATION_ID, P_MAPPING_CODE, P_LANGUAGE, P_SOURCE_LANGUAGE, VV_MAPPING_USER_NAME,
P_USER_ID, SYSDATE, P_USER_ID, SYSDATE);
INSERT INTO BNE_MAPPING_LINES
(APPLICATION_ID, MAPPING_CODE, SEQUENCE_NUM, CONTENT_APP_ID, CONTENT_CODE, CONTENT_SEQ_NUM,
INTERFACE_APP_ID, INTERFACE_CODE, INTERFACE_SEQ_NUM, OBJECT_VERSION_NUMBER,
CREATED_BY, CREATION_DATE, LAST_UPDATED_BY, LAST_UPDATE_DATE)
VALUES
(P_APPLICATION_ID,
P_MAPPING_CODE,
VN_SEQUENCE,
MAPPING_COLS_REC.CONTENT_APP_ID,
MAPPING_COLS_REC.CONTENT_CODE,
MAPPING_COLS_REC.CONTENT_SEQ_NUM,
MAPPING_COLS_REC.INTERFACE_APP_ID,
MAPPING_COLS_REC.INTERFACE_CODE,
MAPPING_COLS_REC.INTERFACE_SEQ_NUM,
1,
P_USER_ID,
SYSDATE,
P_USER_ID,
SYSDATE);
SELECT CONTENT_CODE
INTO VV_CONTENT_CODE
FROM BNE_CONTENTS_B
WHERE APPLICATION_ID = P_CONTENT_APP_ID
AND CONTENT_CODE = P_CONTENT_CODE;
SELECT PARAM_LIST_CODE
INTO VV_PARAM_LIST_CODE
FROM BNE_PARAM_LISTS_B
WHERE APPLICATION_ID = P_PARAM_LIST_APP_ID
AND PARAM_LIST_CODE = P_PARAM_LIST_CODE;
UPDATE BNE_CONTENTS_B
SET PARAM_LIST_APP_ID = P_PARAM_LIST_APP_ID,
PARAM_LIST_CODE = P_PARAM_LIST_CODE,
OBJECT_VERSION_NUMBER = OBJECT_VERSION_NUMBER + 1
WHERE APPLICATION_ID = P_CONTENT_APP_ID
AND CONTENT_CODE = P_CONTENT_CODE;