[Home] [Help]
6: /* Major Functionality of the followIng procedure includes: */
7: /* Reads the amw_risk-ctrl_interface table */
8: /* following tables: */
9: /* INSERTS OR UPDATES ARE DONE AGAINIST THE FOLLOWING TABLES */
10: /* Insert into ENG_CHANGE_SUBJECTS */
11: /* Insert into ENG_CHANGE_LINES_B and ENG_CHANGE_LINES_TL */
12: /* */
13: /*****************************************************************************/
14: --
32: ,PK2_VALUE
33: ,PK3_VALUE
34: ,PK4_VALUE
35: ,PK5_VALUE
36: FROM ENG_CHANGE_SUBJECTS
37: WHERE CHANGE_LINE_ID IS NULL
38: AND SUBJECT_LEVEL=1
39: AND CHANGE_ID=P_CHANGE_ID;
40:
59: ---02.16.2005 npanandi: need to delete existing lines for this changeRequest
60: ---and re-create rows with new process / risk / control associations
61: delete from eng_change_lines_tl where change_line_id in (select change_line_id from eng_change_lines where change_id=p_change_id);
62: delete from eng_change_lines where change_id=p_change_id;
63: delete from eng_change_subjects where change_line_id is not null and change_id=p_change_id;
64:
65: OPEN C_ENTITY_NAME;
66: FETCH C_ENTITY_NAME INTO L_ENTITY_NAME;
67: CLOSE C_ENTITY_NAME;
1285: ,P_SUBJECT_LEVEL IN NUMBER)
1286: IS
1287: L_CHANGE_SUBJECT_ID NUMBER;
1288: BEGIN
1289: --Insert into Eng_Change_Subjects
1290: SELECT ENG_CHANGE_SUBJECTS_S.NEXTVAL
1291: INTO L_CHANGE_SUBJECT_ID
1292: FROM DUAL;
1293:
1286: IS
1287: L_CHANGE_SUBJECT_ID NUMBER;
1288: BEGIN
1289: --Insert into Eng_Change_Subjects
1290: SELECT ENG_CHANGE_SUBJECTS_S.NEXTVAL
1291: INTO L_CHANGE_SUBJECT_ID
1292: FROM DUAL;
1293:
1294: INSERT INTO ENG_CHANGE_SUBJECTS (
1290: SELECT ENG_CHANGE_SUBJECTS_S.NEXTVAL
1291: INTO L_CHANGE_SUBJECT_ID
1292: FROM DUAL;
1293:
1294: INSERT INTO ENG_CHANGE_SUBJECTS (
1295: CHANGE_SUBJECT_ID
1296: ,CHANGE_ID
1297: ,CHANGE_LINE_ID
1298: ,ENTITY_NAME