[Home] [Help]
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: Close cur_old_ref_values;
37: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
38: IGS_GE_MSG_STACK.ADD;
39: App_Exception.Raise_Exception;
40: Return;
41: END IF;
42: Close cur_old_ref_values;
75: column_name is null THEN
76: IF new_references.course_cd <> UPPER(new_references.course_cd)
77: THEN
78: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
79: IGS_GE_MSG_STACK.ADD;
80: App_Exception.Raise_Exception;
81: END IF;
82: END IF;
83: IF upper(column_name)= 'CRS_NOTE_TYPE' OR
84: column_name is null THEN
85: IF new_references.crs_note_type <> UPPER(new_references.crs_note_type)
86: THEN
87: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
88: IGS_GE_MSG_STACK.ADD;
89: App_Exception.Raise_Exception;
90: END IF;
91: END IF;
92: END Check_Constraints;
102: IF NOT IGS_PS_NOTE_TYPE_PKG.Get_PK_For_Validation (
103: new_references.crs_note_type
104: )THEN
105: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
106: IGS_GE_MSG_STACK.ADD;
107: App_Exception.Raise_Exception;
108: END IF;
109: END IF;
110:
118: new_references.course_cd,
119: new_references.version_number
120: )THEN
121: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
122: IGS_GE_MSG_STACK.ADD;
123: App_Exception.Raise_Exception;
124: END IF;
125:
126: END IF;
132: IF NOT IGS_GE_NOTE_PKG.Get_PK_For_Validation (
133: new_references.reference_number
134: )THEN
135: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
136: IGS_GE_MSG_STACK.ADD;
137: App_Exception.Raise_Exception;
138: END IF;
139:
140: END IF;
186: Fetch cur_rowid INTO lv_rowid;
187: IF (cur_rowid%FOUND) THEN
188: Close cur_rowid;
189: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CVN_CNT_FK');
190: IGS_GE_MSG_STACK.ADD;
191: App_Exception.Raise_Exception;
192: Return;
193: END IF;
194: Close cur_rowid;
214: Fetch cur_rowid INTO lv_rowid;
215: IF (cur_rowid%FOUND) THEN
216: Close cur_rowid;
217: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CVN_CRV_FK');
218: IGS_GE_MSG_STACK.ADD;
219: App_Exception.Raise_Exception;
220: Return;
221: END IF;
222: Close cur_rowid;
240: Fetch cur_rowid INTO lv_rowid;
241: IF (cur_rowid%FOUND) THEN
242: Close cur_rowid;
243: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CVN_NOTE_FK');
244: IGS_GE_MSG_STACK.ADD;
245: App_Exception.Raise_Exception;
246: Return;
247: END IF;
248: Close cur_rowid;
286: new_references.version_number,
287: new_references.reference_number
288: ) THEN
289: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
290: IGS_GE_MSG_STACK.ADD;
291: App_Exception.Raise_Exception;
292: END IF;
293: Check_Constraints;
294: Check_Parent_Existance;
304: new_references.version_number,
305: new_references.reference_number
306: ) THEN
307: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
308: IGS_GE_MSG_STACK.ADD;
309: App_Exception.Raise_Exception;
310: END IF;
311: Check_Constraints;
312: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
356: X_LAST_UPDATE_LOGIN := -1;
357: end if;
358: else
359: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
360: IGS_GE_MSG_STACK.ADD;
361: app_exception.raise_exception;
362: end if;
363:
364: Before_DML( p_action => 'INSERT',
427: fetch c1 into tlinfo;
428: if (c1%notfound) then
429: close c1;
430: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
431: IGS_GE_MSG_STACK.ADD;
432: app_exception.raise_exception;
433: return;
434: end if;
435: close c1;
438: ) then
439: null;
440: else
441: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
442: IGS_GE_MSG_STACK.ADD;
443: app_exception.raise_exception;
444: end if;
445: return;
446: end LOCK_ROW;
471: X_LAST_UPDATE_LOGIN := -1;
472: end if;
473: else
474: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
475: IGS_GE_MSG_STACK.ADD;
476: app_exception.raise_exception;
477: end if;
478:
479: Before_DML( p_action => 'UPDATE',