DBA Data[Home] [Help]

APPS.IGS_RU_GEN_004 dependencies on IGS_RU_RULE

Line 57: -- Creating IGS_PS_UNIT_RU IGS_RU_RULE and associated records (IGS_RU_RULE) when the

53: --Date created: 12-Mar-2002
54: --
55: --Purpose:
56: -- This module inserts a IGS_PS_UNIT_RU asscoaited with a IGS_PS_UNIT. This involves:
57: -- Creating IGS_PS_UNIT_RU IGS_RU_RULE and associated records (IGS_RU_RULE) when the
58: -- IGS_PS_UNIT_RU does not already exist.
59: -- Set the default message number
60: --
61: --Known limitations/enhancements and/or remarks:

Line 78: s_n_next IGS_RU_RULE.sequence_number%TYPE;

74: v_rowid VARCHAR2(25);
75: v_rowid_pur VARCHAR2(25);
76: v_count NUMBER(6);
77: v_ur_sequence_number IGS_PS_UNIT_RU.rul_sequence_number%TYPE;
78: s_n_next IGS_RU_RULE.sequence_number%TYPE;
79: CURSOR c_ur IS
80: SELECT ur.rul_sequence_number
81: FROM IGS_PS_UNIT_RU ur
82: WHERE ur.unit_cd = p_unit_cd AND

Line 90: CURSOR C_IGS_RU_RULE_SEQ_NUM_S IS

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

Line 91: SELECT IGS_RU_RULE_SEQ_NUM_S.NEXTVAL

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

Line 96: FROM IGS_RU_RULE

92: FROM DUAL;
93:
94: CURSOR cur_max_plus_one IS
95: SELECT MAX (sequence_number) + 1 sequence_number
96: FROM IGS_RU_RULE
97: WHERE sequence_number < 499999;
98:
99: BEGIN
100: p_message_name := Null;

Line 127: OPEN C_IGS_RU_RULE_SEQ_NUM_S;

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;

Line 128: FETCH C_IGS_RU_RULE_SEQ_NUM_S INTO s_n_next;

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;

Line 129: IF C_IGS_RU_RULE_SEQ_NUM_S%NOTFOUND THEN

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;

Line 132: CLOSE 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;
134:
135: -- Create IGS_PS_UNIT_RU and associated records.
136:

Line 137: IGS_RU_RULE_PKG.Insert_Row(

133: END IF;
134:
135: -- Create IGS_PS_UNIT_RU and associated records.
136:
137: IGS_RU_RULE_PKG.Insert_Row(
138: x_rowid => v_rowid,
139: x_sequence_number => s_n_next
140: );
141:

Line 390: Execute the IGS_RU_RULE determined using it return type and name

386: p_person_id IN NUMBER )
387: RETURN VARCHAR2 IS
388: /*
389:
390: Execute the IGS_RU_RULE determined using it return type and name
391:
392: */
393: v_rule_number NUMBER;
394: v_message_text VARCHAR2(2000);