[Home] [Help]
37: Fetch cur_old_ref_values INTO old_references;
38: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
39: Close cur_old_ref_values;
40: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
41: IGS_GE_MSG_STACK.ADD;
42: App_Exception.Raise_Exception;
43: Return;
44: END IF;
45: Close cur_old_ref_values;
83: IF IGS_FI_VAL_CGFT.finp_val_cgft_ins (
84: new_references.fee_type,
85: v_message_name) = FALSE THEN
86: Fnd_Message.Set_Name('IGS',v_message_name);
87: IGS_GE_MSG_STACK.ADD;
88: App_Exception.Raise_Exception;
89: END IF;
90: END IF;
91: IF p_inserting OR p_updating THEN
93: IF IGS_EN_VAL_PCGE.enrp_val_crs_gp_clsd (
94: new_references.course_group_cd,
95: v_message_name) = FALSE THEN
96: Fnd_Message.Set_Name('IGS',v_message_name);
97: IGS_GE_MSG_STACK.ADD;
98: App_Exception.Raise_Exception;
99: END IF;
100: END IF;
101:
129: new_references.course_group_cd,
130: new_references.create_dt,
131: v_message_name) = FALSE THEN
132: Fnd_Message.Set_Name('IGS',v_message_name);
133: IGS_GE_MSG_STACK.ADD;
134: App_Exception.Raise_Exception;
135: END IF;
136: END IF;
137: v_rowid_saved := TRUE;
169: IF upper(column_name) = 'COURSE_GROUP_CD' OR
170: column_name is null Then
171: IF ( new_references.course_group_cd <> UPPER(new_references.course_group_cd) ) Then
172: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
173: IGS_GE_MSG_STACK.ADD;
174: App_Exception.Raise_Exception;
175: END IF;
176: END IF;
177:
178: IF upper(column_name) = 'FEE_CAL_TYPE' OR
179: column_name is null Then
180: IF ( new_references.fee_cal_type <> UPPER(new_references.fee_cal_type) ) Then
181: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
182: IGS_GE_MSG_STACK.ADD;
183: App_Exception.Raise_Exception;
184: END IF;
185: END IF;
186:
187: IF upper(column_name) = 'FEE_CI_SEQUENCE_NUMBER' OR
188: column_name is null Then
189: IF ( new_references.fee_ci_sequence_number < 1 OR new_references.fee_ci_sequence_number > 999999 ) Then
190: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
191: IGS_GE_MSG_STACK.ADD;
192: App_Exception.Raise_Exception;
193: END IF;
194: END IF;
195:
205: IF NOT IGS_PS_GRP_PKG.Get_PK_For_Validation (
206: new_references.course_group_cd
207: ) THEN
208: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
209: IGS_GE_MSG_STACK.ADD;
210: App_Exception.Raise_Exception;
211: END IF;
212: END IF;
213:
227: new_references.fee_ci_sequence_number,
228: new_references.fee_type
229: ) THEN
230: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
231: IGS_GE_MSG_STACK.ADD;
232: App_Exception.Raise_Exception;
233: END IF;
234: END IF;
235:
317: new_references.fee_type,
318: new_references.course_group_cd,
319: new_references.create_dt) THEN
320: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
321: IGS_GE_MSG_STACK.ADD;
322: App_Exception.Raise_Exception;
323: END IF;
324: Check_Constraints;
325: Check_Parent_Existance;
339: new_references.fee_type,
340: new_references.course_group_cd,
341: new_references.create_dt) THEN
342: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
343: IGS_GE_MSG_STACK.ADD;
344: App_Exception.Raise_Exception;
345: END IF;
346: Check_Constraints;
347: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
415: END IF;
416:
417: else
418: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
419: IGS_GE_MSG_STACK.ADD;
420: app_exception.raise_exception;
421: end if;
422:
423: Before_DML (
510: fetch c1 into tlinfo;
511: if (c1%notfound) then
512: close c1;
513: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
514: IGS_GE_MSG_STACK.ADD;
515: app_exception.raise_exception;
516: return;
517: end if;
518: close c1;
523: ) then
524: null;
525: else
526: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
527: IGS_GE_MSG_STACK.ADD;
528: app_exception.raise_exception;
529: end if;
530: return;
531: end LOCK_ROW;
564: X_LAST_UPDATE_LOGIN := -1;
565: end if;
566: else
567: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
568: IGS_GE_MSG_STACK.ADD;
569: app_exception.raise_exception;
570: end if;
571:
572: Before_DML (