[Home] [Help]
32: -- Populate Old Values.
33: Open cur_old_ref_values;
34: Fetch cur_old_ref_values INTO old_references;
35: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
36: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
37: IGS_GE_MSG_STACK.ADD;
38: App_Exception.Raise_Exception;
39: Close cur_old_ref_values;
40: Return;
79: (old_references.closed_ind = 'Y' AND new_references.closed_ind = 'N'))) THEN
80: IF IGS_PS_VAL_CGT.crsp_val_cgt_sys_cgt (
81: new_references.s_course_group_type,
82: v_message_name) = FALSE THEN
83: Fnd_Message.Set_Name('IGS',v_message_name);
84: IGS_GE_MSG_STACK.ADD;
85: App_Exception.Raise_Exception;
86: END IF;
87: END IF;
107:
108: IF upper(column_name) = 'COURSE_GROUP_TYPE' OR
109: column_name is null Then
110: IF ( new_references.course_group_type <> UPPER(new_references.course_group_type) ) Then
111: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
112: IGS_GE_MSG_STACK.ADD;
113: App_Exception.Raise_Exception;
114: END IF;
115: END IF;
116:
117: IF upper(column_name) = 'S_COURSE_GROUP_TYPE' OR
118: column_name is null Then
119: IF ( new_references.s_course_group_type <> UPPER(new_references.s_course_group_type) ) Then
120: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
121: IGS_GE_MSG_STACK.ADD;
122: App_Exception.Raise_Exception;
123: END IF;
124: END IF;
125:
126: IF upper(column_name) = 'CLOSED_IND' OR
127: column_name is null Then
128: IF ( new_references.closed_ind NOT IN ( 'Y' , 'N' ) ) Then
129: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
130: IGS_GE_MSG_STACK.ADD;
131: App_Exception.Raise_Exception;
132: END IF;
133: END IF;
144: IF NOT IGS_LOOKUPS_VIEW_PKG.Get_PK_For_Validation (
145: 'COURSE_GROUP_TYPE',
146: new_references.s_course_group_type
147: ) THEN
148: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
149: IGS_GE_MSG_STACK.ADD;
150: App_Exception.Raise_Exception;
151: END IF;
152: END IF;
204:
205: Open cur_rowid;
206: Fetch cur_rowid INTO lv_rowid;
207: IF (cur_rowid%FOUND) THEN
208: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CGT_LOOKUPS_FK');
209: IGS_GE_MSG_STACK.ADD;
210: App_Exception.Raise_Exception;
211: Close cur_rowid;
212: Return;
248: -- Call all the procedures related to Before Insert.
249: BeforeRowInsertUpdate1 ( p_inserting => TRUE );
250: IF Get_PK_For_Validation (
251: new_references.course_group_type ) THEN
252: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
253: IGS_GE_MSG_STACK.ADD;
254: App_Exception.Raise_Exception;
255: END IF;
256: Check_Constraints;
265: Check_Child_Existance;
266: ELSIF (p_action = 'VALIDATE_INSERT') THEN
267: IF Get_PK_For_Validation (
268: new_references.course_group_type ) THEN
269: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
270: IGS_GE_MSG_STACK.ADD;
271: App_Exception.Raise_Exception;
272: END IF;
273: Check_Constraints;
318: if X_LAST_UPDATE_LOGIN is NULL then
319: X_LAST_UPDATE_LOGIN := -1;
320: end if;
321: else
322: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
323: IGS_GE_MSG_STACK.ADD;
324: app_exception.raise_exception;
325: end if;
326: Before_DML (
391: begin
392: open c1;
393: fetch c1 into tlinfo;
394: if (c1%notfound) then
395: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
396: IGS_GE_MSG_STACK.ADD;
397: app_exception.raise_exception;
398: close c1;
399: return;
405: AND (tlinfo.CLOSED_IND = X_CLOSED_IND)
406: ) then
407: null;
408: else
409: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
410: IGS_GE_MSG_STACK.ADD;
411: app_exception.raise_exception;
412: end if;
413: return;
438: if X_LAST_UPDATE_LOGIN is NULL then
439: X_LAST_UPDATE_LOGIN := -1;
440: end if;
441: else
442: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
443: IGS_GE_MSG_STACK.ADD;
444: app_exception.raise_exception;
445: end if;
446: Before_DML (