[Home] [Help]
34: Open cur_old_ref_values;
35: Fetch cur_old_ref_values INTO old_references;
36: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
37: Close cur_old_ref_values;
38: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
39: IGS_GE_MSG_STACK.ADD;
40: App_Exception.Raise_Exception;
41: Return;
42: END IF;
81: IF IGS_EN_VAL_DLA.stap_val_ci_status (
82: v_cal_type,
83: v_ci_sequence_number,
84: v_message_name) = FALSE THEN
85: Fnd_Message.Set_Name('IGS',v_message_name);
86: IGS_GE_MSG_STACK.ADD;
87: App_Exception.Raise_Exception;
88: END IF;
89: -- Validate that inserts/updates are allowed
89: -- Validate that inserts/updates are allowed
90: IF p_inserting OR p_updating THEN
91: IF IGS_EN_VAL_DLA.ENRP_VAL_DLA_CAT_LD(new_references.cal_type
92: ,v_message_name) = FALSE THEN
93: Fnd_Message.Set_Name('IGS',v_message_name);
94: IGS_GE_MSG_STACK.ADD;
95: App_Exception.Raise_Exception;
96: END IF;
97: IF IGS_EN_VAL_DLA.ENRP_VAL_DLA_CAT(new_references.teach_cal_type
95: App_Exception.Raise_Exception;
96: END IF;
97: IF IGS_EN_VAL_DLA.ENRP_VAL_DLA_CAT(new_references.teach_cal_type
98: ,v_message_name) = FALSE THEN
99: Fnd_Message.Set_Name('IGS',v_message_name);
100: IGS_GE_MSG_STACK.ADD;
101: App_Exception.Raise_Exception;
102: END IF;
103: END IF;
127: END IF ;
128:
129: IF upper(Column_name) = 'CAL_TYPE' OR COLUMN_NAME IS NULL THEN
130: IF new_references.CAL_TYPE<> upper(new_references.CAL_TYPE) then
131: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
132: IGS_GE_MSG_STACK.ADD;
133: App_Exception.Raise_Exception ;
134: END IF;
135:
136: END IF ;
137:
138: IF upper(Column_name) = 'TEACH_CAL_TYPE' OR COLUMN_NAME IS NULL THEN
139: IF new_references.TEACH_CAL_TYPE<> upper(new_references.TEACH_CAL_TYPE) then
140: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
141: IGS_GE_MSG_STACK.ADD;
142: App_Exception.Raise_Exception ;
143: END IF;
144:
145: END IF ;
146:
147: IF upper(Column_name) = 'PERCENTAGE' OR COLUMN_NAME IS NULL THEN
148: IF new_references.PERCENTAGE < 0 or new_references.PERCENTAGE > 100 then
149: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
150: IGS_GE_MSG_STACK.ADD;
151: App_Exception.Raise_Exception ;
152: END IF;
153:
154: END IF ;
155:
156: IF upper(Column_name) = 'SECOND_PERCENTAGE' OR COLUMN_NAME IS NULL THEN
157: IF new_references.SECOND_PERCENTAGE < 0 or new_references.SECOND_PERCENTAGE > 100 then
158: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
159: IGS_GE_MSG_STACK.ADD;
160: App_Exception.Raise_Exception ;
161: END IF;
162:
175: ELSE
176: IF NOT IGS_CA_TYPE_PKG.Get_PK_For_Validation (
177: new_references.cal_type
178: ) THEN
179: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
180: IGS_GE_MSG_STACK.ADD;
181: App_Exception.Raise_Exception;
182: END IF;
183:
190: IF NOT IGS_CA_INST_PKG.Get_PK_For_Validation (
191: new_references.cal_type,
192: new_references.ci_sequence_number
193: ) THEN
194: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
195: IGS_GE_MSG_STACK.ADD;
196: App_Exception.Raise_Exception;
197: END IF;
198: END IF;
269: Open cur_rowid;
270: Fetch cur_rowid INTO lv_rowid;
271: IF (cur_rowid%FOUND) THEN
272: Close cur_rowid;
273: Fnd_Message.Set_Name ('IGS', 'IGS_ST_DLA_CAT_FK');
274: IGS_GE_MSG_STACK.ADD;
275: App_Exception.Raise_Exception;
276: Return;
277: END IF;
297: Open cur_rowid;
298: Fetch cur_rowid INTO lv_rowid;
299: IF (cur_rowid%FOUND) THEN
300: Close cur_rowid;
301: Fnd_Message.Set_Name ('IGS', 'IGS_ST_DLA_CI_FK');
302: IGS_GE_MSG_STACK.ADD;
303: App_Exception.Raise_Exception;
304: Return;
305: END IF;
345: new_references.cal_type ,
346: new_references.ci_sequence_number ,
347: new_references.teach_cal_type
348: ) THEN
349: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
350: IGS_GE_MSG_STACK.ADD;
351: App_Exception.Raise_Exception;
352: END IF;
353: Check_Constraints;
366: new_references.cal_type ,
367: new_references.ci_sequence_number ,
368: new_references.teach_cal_type
369: ) THEN
370: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
371: IGS_GE_MSG_STACK.ADD;
372: App_Exception.Raise_Exception;
373: END IF;
374: Check_Constraints;
425: if X_LAST_UPDATE_LOGIN is NULL then
426: X_LAST_UPDATE_LOGIN := -1;
427: end if;
428: else
429: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
430: IGS_GE_MSG_STACK.ADD;
431: app_exception.raise_exception;
432: end if;
433:
505: open c1;
506: fetch c1 into tlinfo;
507: if (c1%notfound) then
508: close c1;
509: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
510: IGS_GE_MSG_STACK.ADD;
511: app_exception.raise_exception;
512: return;
513: end if;
519: AND (X_SECOND_PERCENTAGE is null)))
520: ) then
521: null;
522: else
523: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
524: IGS_GE_MSG_STACK.ADD;
525: app_exception.raise_exception;
526: end if;
527: return;
553: if X_LAST_UPDATE_LOGIN is NULL then
554: X_LAST_UPDATE_LOGIN := -1;
555: end if;
556: else
557: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
558: IGS_GE_MSG_STACK.ADD;
559: app_exception.raise_exception;
560: end if;
561: