The following lines contain the word 'select', 'insert', 'update' or 'delete':
NEW_STRING := 'SELECT CODE FROM (' ||
'SELECT ''1'' CODE, ''1'' DESCRIPTION ' ||
'FROM SYS.DUAL WHERE 1=2 ' ||
'UNION ALL (' ||
NEW_STRING ||
') )';
X_LAST_UPDATE_LOGIN NUMBER,
X_REQUEST_ID NUMBER,
X_PROGRAM_APPLICATION_ID NUMBER,
X_PROGRAM_ID NUMBER) IS
SQL_STATEMENT VARCHAR2(2000);
'INSERT INTO QA_INTERFACE_ERRORS (TRANSACTION_INTERFACE_ID, ' ||
'ERROR_COLUMN, ERROR_MESSAGE, LAST_UPDATE_DATE, LAST_UPDATED_BY, ' ||
'CREATION_DATE, CREATED_BY, LAST_UPDATE_LOGIN, REQUEST_ID, ' ||
'PROGRAM_APPLICATION_ID, PROGRAM_ID, PROGRAM_UPDATE_DATE) ' ||
'SELECT QRI.TRANSACTION_INTERFACE_ID, :ERROR_COL_NAME, :ERROR_MESSAGE, ' ||
'SYSDATE, :USER_ID, SYSDATE, :USER_ID2 , :LAST_UPDATE_LOGIN , ' ||
':REQUEST_ID, :PROGRAM_APPLICATION_ID , :PROGRAM_ID, SYSDATE ' ||
'FROM QA_RESULTS_INTERFACE QRI ' ||
'WHERE QRI.GROUP_ID = :GROUP_ID ' ||
' AND QRI.PROCESS_STATUS = 2 ' ||
'AND NOT EXISTS
(SELECT ''X'' ' ||
'FROM QA_INTERFACE_ERRORS QIE ' ||
'WHERE QIE.TRANSACTION_INTERFACE_ID = ' ||
'QRI.TRANSACTION_INTERFACE_ID ' ||
'AND QIE.ERROR_COLUMN IN (' ||
QUOTED_COL_NAME || ', NULL)) ' ||
'AND EXISTS ' ||
'(SELECT ''X'' FROM QA_RESULTS_INTERFACE ' ||
'WHERE QRI.' || COL_NAME || ' IS NOT NULL)';
X_LAST_UPDATE_LOGIN,
X_REQUEST_ID,
X_PROGRAM_APPLICATION_ID,
X_PROGRAM_ID,
X_GROUP_ID;
X_LAST_UPDATE_LOGIN NUMBER,
X_REQUEST_ID NUMBER,
X_PROGRAM_APPLICATION_ID NUMBER,
X_PROGRAM_ID NUMBER,
PARENT_COL_NAME VARCHAR2,
ERROR_COL_LIST VARCHAR2) IS
SQL_STATEMENT VARCHAR2(2000);
'INSERT INTO QA_INTERFACE_ERRORS (TRANSACTION_INTERFACE_ID, ' ||
'ERROR_COLUMN, ERROR_MESSAGE, LAST_UPDATE_DATE, LAST_UPDATED_BY, ' ||
'CREATION_DATE, CREATED_BY, LAST_UPDATE_LOGIN, REQUEST_ID, ' ||
'PROGRAM_APPLICATION_ID, PROGRAM_ID, PROGRAM_UPDATE_DATE) ' ||
'SELECT QRI.TRANSACTION_INTERFACE_ID, :ERROR_COL_NAME, :ERROR_MESSAGE, '||
'SYSDATE, :USER_ID, SYSDATE, :USER_ID2, :LAST_UPDATE_LOGIN, ' ||
':REQUEST_ID, :PROGRAM_APPLICATION_ID, :PROGRAM_ID, SYSDATE ' ||
'FROM QA_RESULTS_INTERFACE QRI ' ||
'WHERE QRI.GROUP_ID = :GROUP_ID ' ||
' AND QRI.PROCESS_STATUS = 2 ';
(SELECT ''X'' ' ||
'FROM QA_INTERFACE_ERRORS QIE ' ||
'WHERE QIE.TRANSACTION_INTERFACE_ID = ' ||
'QRI.TRANSACTION_INTERFACE_ID ' ||
'AND QIE.ERROR_COLUMN IN (:c1,:c2,:c3,:c4,:c5)) ' ||
'AND EXISTS ' ||
'(SELECT ''X'' FROM QA_RESULTS_INTERFACE ' ||
'WHERE QRI.' || COL_NAME || ' IS NULL)';
X_LAST_UPDATE_LOGIN,
X_REQUEST_ID,
X_PROGRAM_APPLICATION_ID,
X_PROGRAM_ID,
X_GROUP_ID,
l_col1, l_col2, l_col3, l_col4, l_col5;
X_LAST_UPDATE_LOGIN NUMBER,
X_REQUEST_ID NUMBER,
X_PROGRAM_APPLICATION_ID NUMBER,
X_PROGRAM_ID NUMBER,
X_CHAR_ID NUMBER,
X_PLAN_ID NUMBER,
ERROR_COL_LIST VARCHAR2) IS
SQL_STATEMENT VARCHAR2(2000);
'INSERT INTO QA_INTERFACE_ERRORS (TRANSACTION_INTERFACE_ID, ' ||
'ERROR_COLUMN, ERROR_MESSAGE, LAST_UPDATE_DATE, LAST_UPDATED_BY, ' ||
'CREATION_DATE, CREATED_BY, LAST_UPDATE_LOGIN, REQUEST_ID, ' ||
'PROGRAM_APPLICATION_ID, PROGRAM_ID, PROGRAM_UPDATE_DATE) ' ||
'SELECT QRI.TRANSACTION_INTERFACE_ID, :ERROR_COL_NAME, :ERROR_MESSAGE, '||
'SYSDATE, :USER_ID, SYSDATE, :USER_ID2, :LAST_UPDATE_LOGIN, ' ||
':REQUEST_ID, :PROGRAM_APPLICATION_ID, :PROGRAM_ID, SYSDATE ' ||
'FROM QA_RESULTS_INTERFACE QRI ' ||
'WHERE QRI.GROUP_ID = :GROUP_ID ' ||
' AND QRI.PROCESS_STATUS = 2 ' ||
'AND NOT EXISTS
(SELECT ''X'' ' ||
'FROM QA_INTERFACE_ERRORS QIE ' ||
'WHERE QIE.TRANSACTION_INTERFACE_ID = ' ||
'QRI.TRANSACTION_INTERFACE_ID ' ||
'AND QIE.ERROR_COLUMN IN (:c1,:c2,:c3,:c4,:c5)) ' ||
'AND QRI.' || COL_NAME || ' NOT IN ' ||
'(SELECT SHORT_CODE FROM QA_PLAN_CHAR_VALUE_LOOKUPS ' ||
'WHERE PLAN_ID = :PLAN_ID ' ||
' AND CHAR_ID = :CHAR_ID ' || ')';
X_LAST_UPDATE_LOGIN,
X_REQUEST_ID,
X_PROGRAM_APPLICATION_ID,
X_PROGRAM_ID,
X_GROUP_ID,
l_col1, l_col2, l_col3, l_col4, l_col5,
X_PLAN_ID,
X_CHAR_ID;
X_LAST_UPDATE_LOGIN NUMBER,
X_REQUEST_ID NUMBER,
X_PROGRAM_APPLICATION_ID NUMBER,
X_PROGRAM_ID NUMBER,
PARENT_COL_NAME VARCHAR2,
ERROR_COL_LIST VARCHAR2) IS
SQL_STATEMENT VARCHAR2(2000);
'INSERT INTO QA_INTERFACE_ERRORS (TRANSACTION_INTERFACE_ID, ' ||
'ERROR_COLUMN, ERROR_MESSAGE, LAST_UPDATE_DATE, LAST_UPDATED_BY, ' ||
'CREATION_DATE, CREATED_BY, LAST_UPDATE_LOGIN, REQUEST_ID, ' ||
'PROGRAM_APPLICATION_ID, PROGRAM_ID, PROGRAM_UPDATE_DATE) ' ||
'SELECT QRI.TRANSACTION_INTERFACE_ID,:ERROR_COL_NAME, :ERROR_MESSAGE,' ||
'SYSDATE, :USER_ID, SYSDATE, :USER_ID2, :LAST_UPDATE_LOGIN, ' ||
':REQUEST_ID, :PROGRAM_APPLICATION_ID, :PROGRAM_ID, SYSDATE ' ||
'FROM QA_RESULTS_INTERFACE QRI ' ||
'WHERE QRI.GROUP_ID = :GROUP_ID ' ||
' AND QRI.PROCESS_STATUS = 2 ' ||
'AND NOT EXISTS
(SELECT ''X'' ' ||
'FROM QA_INTERFACE_ERRORS QIE ' ||
'WHERE QIE.TRANSACTION_INTERFACE_ID = ' ||
'QRI.TRANSACTION_INTERFACE_ID ' ||
'AND QIE.ERROR_COLUMN IN (:c1,:c2,:c3,:c4,:c5)) ' ||
'AND EXISTS ' ||
'(SELECT ''X'' FROM QA_RESULTS_INTERFACE ' ||
'WHERE QRI.' || COL_NAME || ' IS NOT NULL ' ||
'AND QRI.' || PARENT_COL_NAME || ' IS NULL)';
X_LAST_UPDATE_LOGIN,
X_REQUEST_ID,
X_PROGRAM_APPLICATION_ID,
X_PROGRAM_ID,
X_GROUP_ID,
l_col1, l_col2, l_col3, l_col4, l_col5;
P_LAST_UPDATE_LOGIN NUMBER,
P_REQUEST_ID NUMBER,
P_PROGRAM_APPLICATION_ID NUMBER,
P_PROGRAM_ID NUMBER,
P_PARENT_COL_NAME VARCHAR2,
P_ERROR_COL_LIST VARCHAR2) IS
SQL_STATEMENT VARCHAR2(2000);
'INSERT INTO QA_INTERFACE_ERRORS (TRANSACTION_INTERFACE_ID, ' ||
'ERROR_COLUMN, ERROR_MESSAGE, LAST_UPDATE_DATE, LAST_UPDATED_BY, ' ||
'CREATION_DATE, CREATED_BY, LAST_UPDATE_LOGIN, REQUEST_ID, ' ||
'PROGRAM_APPLICATION_ID, PROGRAM_ID, PROGRAM_UPDATE_DATE) ' ||
'SELECT QRI.TRANSACTION_INTERFACE_ID, :ERROR_COL_NAME, :ERROR_MESSAGE,' ||
'SYSDATE, :USER_ID, SYSDATE, :USER_ID2, :LAST_UPDATE_LOGIN, ' ||
':REQUEST_ID, :PROGRAM_APPLICATION_ID, :PROGRAM_ID, SYSDATE ' ||
'FROM QA_RESULTS_INTERFACE QRI ' ||
'WHERE QRI.GROUP_ID = :GROUP_ID ' ||
' AND QRI.PROCESS_STATUS = 2 ';
(SELECT ''X'' ' ||
'FROM QA_INTERFACE_ERRORS QIE ' ||
'WHERE QIE.TRANSACTION_INTERFACE_ID = ' ||
'QRI.TRANSACTION_INTERFACE_ID ' ||
'AND QIE.ERROR_COLUMN IN (:c1,:c2,:c3,:c4,:c5)) ' ||
'AND EXISTS ' ||
'(SELECT ''X'' FROM QA_RESULTS_INTERFACE ' ||
'WHERE QRI.' || P_COL_NAME || ' IS NOT NULL)';
P_LAST_UPDATE_LOGIN,
P_REQUEST_ID,
P_PROGRAM_APPLICATION_ID,
P_PROGRAM_ID,
P_GROUP_ID,
l_col1, l_col2, l_col3, l_col4, l_col5;