[Home] [Help]
86: FROM IGS_PS_UNIT_RU ur
87: WHERE ur.unit_cd = p_unit_cd AND
88: ur.s_rule_call_cd = p_s_rule_call_cd;
89:
90: CURSOR C_IGS_RU_RULE_SEQ_NUM_S IS
91: SELECT IGS_RU_RULE_SEQ_NUM_S.NEXTVAL
92: FROM DUAL;
93:
94: CURSOR cur_max_plus_one IS
87: WHERE ur.unit_cd = p_unit_cd AND
88: ur.s_rule_call_cd = p_s_rule_call_cd;
89:
90: CURSOR C_IGS_RU_RULE_SEQ_NUM_S IS
91: SELECT IGS_RU_RULE_SEQ_NUM_S.NEXTVAL
92: FROM DUAL;
93:
94: CURSOR cur_max_plus_one IS
95: SELECT MAX (sequence_number) + 1 sequence_number
123: OPEN cur_max_plus_one;
124: FETCH cur_max_plus_one INTO s_n_next;
125: CLOSE cur_max_plus_one;
126: ELSE
127: OPEN C_IGS_RU_RULE_SEQ_NUM_S;
128: FETCH C_IGS_RU_RULE_SEQ_NUM_S INTO s_n_next;
129: IF C_IGS_RU_RULE_SEQ_NUM_S%NOTFOUND THEN
130: RAISE NO_DATA_FOUND;
131: END IF;
124: FETCH cur_max_plus_one INTO s_n_next;
125: CLOSE cur_max_plus_one;
126: ELSE
127: OPEN C_IGS_RU_RULE_SEQ_NUM_S;
128: FETCH C_IGS_RU_RULE_SEQ_NUM_S INTO s_n_next;
129: IF C_IGS_RU_RULE_SEQ_NUM_S%NOTFOUND THEN
130: RAISE NO_DATA_FOUND;
131: END IF;
132: CLOSE C_IGS_RU_RULE_SEQ_NUM_S;
125: CLOSE cur_max_plus_one;
126: ELSE
127: OPEN C_IGS_RU_RULE_SEQ_NUM_S;
128: FETCH C_IGS_RU_RULE_SEQ_NUM_S INTO s_n_next;
129: IF C_IGS_RU_RULE_SEQ_NUM_S%NOTFOUND THEN
130: RAISE NO_DATA_FOUND;
131: END IF;
132: CLOSE C_IGS_RU_RULE_SEQ_NUM_S;
133: END IF;
128: FETCH C_IGS_RU_RULE_SEQ_NUM_S INTO s_n_next;
129: IF C_IGS_RU_RULE_SEQ_NUM_S%NOTFOUND THEN
130: RAISE NO_DATA_FOUND;
131: END IF;
132: CLOSE C_IGS_RU_RULE_SEQ_NUM_S;
133: END IF;
134:
135: -- Create IGS_PS_UNIT_RU and associated records.
136: