[Home] [Help]
The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Rows (
X_Copy_Values NUMBER,
X_Copy_Actions NUMBER,
X_Plan_Id NUMBER,
X_Char_Id NUMBER,
X_Last_Update_Date DATE,
X_Last_Updated_By NUMBER,
X_Creation_Date DATE,
X_Created_By NUMBER,
X_Last_Update_Login NUMBER DEFAULT NULL,
X_values_found IN OUT NOCOPY NUMBER,
X_actions_found IN OUT NOCOPY NUMBER
) IS
X_qa_app_id NUMBER := 250;
SELECT
CHAR_ACTION_TRIGGER_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
TRIGGER_SEQUENCE,
CHAR_ID,
OPERATOR,
LOW_VALUE_LOOKUP,
HIGH_VALUE_LOOKUP,
LOW_VALUE_OTHER,
HIGH_VALUE_OTHER,
LOW_VALUE_OTHER_ID,
HIGH_VALUE_OTHER_ID
FROM QA_CHAR_ACTION_TRIGGERS
WHERE CHAR_ID = X_Char_Id
ORDER BY TRIGGER_SEQUENCE,
CHAR_ACTION_TRIGGER_ID;
SELECT QA_PLAN_CHAR_ACTION_TRIGGERS_S.NEXTVAL FROM DUAL;
SELECT
CHAR_ACTION_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
CHAR_ACTION_TRIGGER_ID,
ACTION_ID,
CAR_NAME_PREFIX,
CAR_TYPE_ID,
CAR_OWNER,
MESSAGE,
STATUS_CODE,
STATUS_ID,
ALR_ACTION_ID,
ALR_ACTION_SET_ID
FROM QA_CHAR_ACTIONS
WHERE CHAR_ACTION_TRIGGER_ID = QCAT.CHAR_ACTION_TRIGGER_ID;
SELECT QA_PLAN_CHAR_ACTIONS_S.NEXTVAL FROM DUAL;
SELECT
APPLICATION_ID,
ACTION_ID,
NAME,
ALERT_ID,
ACTION_TYPE,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
END_DATE_ACTIVE,
ENABLED_FLAG,
DESCRIPTION,
ACTION_LEVEL_TYPE,
DATE_LAST_EXECUTED,
FILE_NAME,
ARGUMENT_STRING,
PROGRAM_APPLICATION_ID,
CONCURRENT_PROGRAM_ID,
LIST_APPLICATION_ID,
LIST_ID,
TO_RECIPIENTS,
CC_RECIPIENTS,
BCC_RECIPIENTS,
PRINT_RECIPIENTS,
PRINTER,
SUBJECT,
REPLY_TO,
RESPONSE_SET_ID,
FOLLOW_UP_AFTER_DAYS,
COLUMN_WRAP_FLAG,
MAXIMUM_SUMMARY_MESSAGE_WIDTH,
BODY,
VERSION_NUMBER
FROM ALR_ACTIONS
WHERE APPLICATION_ID = X_qa_app_id
AND ACTION_ID = QCA.ALR_ACTION_ID;
SELECT
ALR_ACTIONS_S.NEXTVAL,
ALR_ACTION_SETS_S.NEXTVAL,
ALR_ACTION_SET_MEMBERS_S.NEXTVAL,
QA_ALR_ACTION_NAME_S.NEXTVAL,
QA_ALR_ACTION_SET_NAME_S.NEXTVAL
FROM DUAL;
SELECT
CHAR_ACTION_ID,
CHAR_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
TOKEN_NAME
FROM QA_CHAR_ACTION_OUTPUTS
WHERE CHAR_ACTION_ID = QCA.CHAR_ACTION_ID;
DELETE FROM qa_plan_char_value_lookups
WHERE plan_id = X_Plan_Id and
char_id = X_Char_Id;
INSERT INTO qa_plan_char_value_lookups
(
PLAN_ID,
CHAR_ID,
SHORT_CODE,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
DESCRIPTION
)
SELECT X_Plan_Id,
char_id,
short_code,
X_Last_Update_Date,
X_Last_Updated_By,
X_Creation_Date,
X_Created_By,
X_Last_Update_Login,
description
FROM qa_char_value_lookups
WHERE char_id = X_Char_Id;
DELETE FROM ALR_ACTIONS aa
WHERE aa.application_id = X_qa_app_id
AND aa.alert_id = X_qa_alert_id
AND aa.action_id in
(SELECT qpcav.alr_action_id
FROM qa_plan_char_actions_v qpcav
WHERE PLAN_ID = X_PLAN_ID
AND CHAR_ID = X_CHAR_ID);
DELETE FROM ALR_ACTION_SETS aas
WHERE aas.application_id = X_qa_app_id
AND aas.alert_id = X_qa_alert_id
AND aas.action_set_id in
(SELECT qpcav.alr_action_set_id
FROM qa_plan_char_actions_v qpcav
WHERE PLAN_ID = X_PLAN_ID
AND CHAR_ID = X_CHAR_ID);
DELETE FROM ALR_ACTION_SET_MEMBERS aasm
WHERE aasm.application_id = X_qa_app_id
AND aasm.alert_id = X_qa_alert_id
AND aasm.action_set_id in
(SELECT qpcav.alr_action_set_id
FROM qa_plan_char_actions_v qpcav
WHERE PLAN_ID = X_PLAN_ID
AND CHAR_ID = X_CHAR_ID);
DELETE FROM qa_plan_char_action_triggers
WHERE plan_id = X_Plan_Id and
char_id = X_Char_Id;
DELETE FROM qa_plan_char_actions
WHERE plan_char_action_trigger_id IN
(SELECT plan_char_action_trigger_id
FROM qa_plan_char_action_triggers
WHERE plan_id = X_Plan_Id
and char_id = X_Char_Id);
INSERT INTO QA_PLAN_CHAR_ACTION_TRIGGERS (
PLAN_CHAR_ACTION_TRIGGER_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
TRIGGER_SEQUENCE,
PLAN_ID,
CHAR_ID,
OPERATOR,
LOW_VALUE_LOOKUP,
HIGH_VALUE_LOOKUP,
LOW_VALUE_OTHER,
HIGH_VALUE_OTHER,
LOW_VALUE_OTHER_ID,
HIGH_VALUE_OTHER_ID)
VALUES (
ACTION_TRIGGER_ID,
X_Last_Update_Date,
X_Last_Updated_By,
X_Creation_Date,
X_Created_By,
QCAT.TRIGGER_SEQUENCE,
X_Plan_Id,
QCAT.CHAR_ID,
QCAT.OPERATOR,
QCAT.LOW_VALUE_LOOKUP,
QCAT.HIGH_VALUE_LOOKUP,
QCAT.LOW_VALUE_OTHER,
QCAT.HIGH_VALUE_OTHER,
QCAT.LOW_VALUE_OTHER_ID,
QCAT.HIGH_VALUE_OTHER_ID);
INSERT INTO QA_PLAN_CHAR_ACTIONS (
PLAN_CHAR_ACTION_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
PLAN_CHAR_ACTION_TRIGGER_ID,
ACTION_ID,
CAR_NAME_PREFIX,
CAR_TYPE_ID,
CAR_OWNER,
MESSAGE,
STATUS_CODE,
STATUS_ID,
ALR_ACTION_ID,
ALR_ACTION_SET_ID)
VALUES (
QPC_ACTION_ID,
X_Last_Update_Date,
X_Last_Updated_By,
X_Creation_Date,
X_Created_By,
ACTION_TRIGGER_ID,
QCA.ACTION_ID,
QCA.CAR_NAME_PREFIX,
QCA.CAR_TYPE_ID,
QCA.CAR_OWNER,
QCA.MESSAGE,
QCA.STATUS_CODE,
QCA.STATUS_ID,
DECODE (QCA.ACTION_ID,
10, NEW_ACTION_ID,
11, NEW_ACTION_ID,
12, NEW_ACTION_ID,
13, NEW_ACTION_ID,
NULL),
DECODE (QCA.ACTION_ID,
10, NEW_ACTION_SET_ID,
11, NEW_ACTION_SET_ID,
12, NEW_ACTION_SET_ID,
13, NEW_ACTION_SET_ID,
NULL)
);
INSERT INTO ALR_ACTIONS (
APPLICATION_ID,
ACTION_ID,
NAME,
ALERT_ID,
ACTION_TYPE,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
END_DATE_ACTIVE,
ENABLED_FLAG,
DESCRIPTION,
ACTION_LEVEL_TYPE,
DATE_LAST_EXECUTED,
FILE_NAME,
ARGUMENT_STRING,
PROGRAM_APPLICATION_ID,
CONCURRENT_PROGRAM_ID,
LIST_APPLICATION_ID,
LIST_ID,
TO_RECIPIENTS,
CC_RECIPIENTS,
BCC_RECIPIENTS,
PRINT_RECIPIENTS,
PRINTER,
SUBJECT,
REPLY_TO,
RESPONSE_SET_ID,
FOLLOW_UP_AFTER_DAYS,
COLUMN_WRAP_FLAG,
MAXIMUM_SUMMARY_MESSAGE_WIDTH,
BODY,
VERSION_NUMBER)
VALUES (
ALRA.APPLICATION_ID,
NEW_ACTION_ID,
NEW_ACTION_NAME,
ALRA.ALERT_ID,
ALRA.ACTION_TYPE,
X_Last_Update_Date,
X_Last_Updated_By,
X_Creation_Date,
X_Created_By,
ALRA.END_DATE_ACTIVE,
ALRA.ENABLED_FLAG,
ALRA.DESCRIPTION,
ALRA.ACTION_LEVEL_TYPE,
ALRA.DATE_LAST_EXECUTED,
ALRA.FILE_NAME,
ALRA.ARGUMENT_STRING,
ALRA.PROGRAM_APPLICATION_ID,
ALRA.CONCURRENT_PROGRAM_ID,
ALRA.LIST_APPLICATION_ID,
ALRA.LIST_ID,
ALRA.TO_RECIPIENTS,
ALRA.CC_RECIPIENTS,
ALRA.BCC_RECIPIENTS,
ALRA.PRINT_RECIPIENTS,
ALRA.PRINTER,
ALRA.SUBJECT,
ALRA.REPLY_TO,
ALRA.RESPONSE_SET_ID,
ALRA.FOLLOW_UP_AFTER_DAYS,
ALRA.COLUMN_WRAP_FLAG,
ALRA.MAXIMUM_SUMMARY_MESSAGE_WIDTH,
ALRA.BODY,
ALRA.VERSION_NUMBER
);
SELECT NVL(MAX(SEQUENCE),0)+1
INTO ACTION_SET_SEQUENCE
FROM ALR_ACTION_SETS
WHERE APPLICATION_ID = 250
AND ALERT_ID = 10177;
INSERT INTO ALR_ACTION_SETS (
APPLICATION_ID,
ACTION_SET_ID,
NAME,
ALERT_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
END_DATE_ACTIVE,
ENABLED_FLAG,
RECIPIENTS_VIEW_ONLY_FLAG,
DESCRIPTION,
SUPPRESS_FLAG,
SUPPRESS_DAYS,
SEQUENCE)
VALUES (
250,
NEW_ACTION_SET_ID,
NEW_ACTION_SET_NAME,
10177,
X_Last_Update_Date,
X_Last_Updated_By,
X_Creation_Date,
X_Created_By,
NULL,
'Y',
'N',
NEW_ACTION_SET_NAME,
'N',
NULL,
ACTION_SET_SEQUENCE
);
SELECT NVL(MAX(SEQUENCE),0)+1
INTO ACTION_SET_MEMBERS_SEQUENCE
FROM ALR_ACTION_SET_MEMBERS
WHERE APPLICATION_ID = 250
AND ALERT_ID = 10177
AND ACTION_SET_ID = NEW_ACTION_SET_ID;
INSERT INTO ALR_ACTION_SET_MEMBERS (
APPLICATION_ID,
ACTION_SET_MEMBER_ID,
ACTION_SET_ID,
ACTION_ID,
ACTION_GROUP_ID,
ALERT_ID,
SEQUENCE,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
END_DATE_ACTIVE,
ENABLED_FLAG,
SUMMARY_THRESHOLD,
ABORT_FLAG,
ERROR_ACTION_SEQUENCE)
VALUES (
250,
NEW_ACTION_SET_MEMBER_ID,
NEW_ACTION_SET_ID,
NEW_ACTION_ID,
NULL,
10177,
ACTION_SET_MEMBERS_SEQUENCE,
X_Last_Update_Date,
X_Last_Updated_By,
X_Creation_Date,
X_Created_By,
NULL,
'Y',
NULL,
'A',
NULL
);
INSERT INTO QA_PLAN_CHAR_ACTION_OUTPUTS (
PLAN_CHAR_ACTION_ID,
CHAR_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
TOKEN_NAME)
VALUES (
QPC_ACTION_ID,
QCAO.CHAR_ID,
X_Last_Update_Date,
X_Last_Updated_By,
X_Creation_Date,
X_Created_By,
QCAO.TOKEN_NAME
);
END Insert_Rows;