[Home] [Help]
38: Open cur_old_ref_values;
39: Fetch cur_old_ref_values INTO old_references;
40: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
41: Close cur_old_ref_values;
42: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
43: IGS_GE_MSG_STACK.ADD;
44: App_Exception.Raise_Exception;
45: Return;
46: END IF;
89: IF upper(column_name)= 'COURSE_CD' OR
90: column_name is null THEN
91: IF new_references.course_cd <> UPPER(new_references.course_cd)
92: THEN
93: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
94: IGS_GE_MSG_STACK.ADD;
95: App_Exception.Raise_Exception;
96: END IF;
97: END IF;
99: IF upper(column_name)= 'REFERENCE_CD' OR
100: column_name is null THEN
101: IF new_references.reference_cd <> UPPER(new_references.reference_cd)
102: THEN
103: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
104: IGS_GE_MSG_STACK.ADD;
105: App_Exception.Raise_Exception;
106: END IF;
107: END IF;
109: IF upper(column_name)= 'REFERENCE_CD_TYPE' OR
110: column_name is null THEN
111: IF new_references.reference_cd_type <> UPPER(new_references.reference_cd_type)
112: THEN
113: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
114: IGS_GE_MSG_STACK.ADD;
115: App_Exception.Raise_Exception;
116: END IF;
117: END IF;
131: IF NOT IGS_PS_VER_PKG.Get_PK_For_Validation (
132: new_references.course_cd,
133: new_references.version_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: END IF;
144: ELSE
145: IF NOT IGS_GE_REF_CD_TYPE_PKG.Get_PK_For_Validation (
146: new_references.reference_cd_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;
203: Open cur_rowid;
204: Fetch cur_rowid INTO lv_rowid;
205: IF (cur_rowid%FOUND) THEN
206: Close cur_rowid;
207: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CRCH_CV_FK');
208: IGS_GE_MSG_STACK.ADD;
209: App_Exception.Raise_Exception;
210: Return;
211: END IF;
229: Open cur_rowid;
230: Fetch cur_rowid INTO lv_rowid;
231: IF (cur_rowid%FOUND) THEN
232: Close cur_rowid;
233: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CRCH_RCT_FK');
234: IGS_GE_MSG_STACK.ADD;
235: App_Exception.Raise_Exception;
236: Return;
237: END IF;
286: new_references.reference_cd_type ,
287: new_references.reference_cd,
288: new_references.hist_start_dt
289: ) THEN
290: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
291: IGS_GE_MSG_STACK.ADD;
292: App_Exception.Raise_Exception;
293: END IF;
294: Check_Constraints;
308: new_references.reference_cd_type ,
309: new_references.reference_cd,
310: new_references.hist_start_dt
311: ) THEN
312: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
313: IGS_GE_MSG_STACK.ADD;
314: App_Exception.Raise_Exception;
315: END IF;
316: Check_Constraints;
366: if X_LAST_UPDATE_LOGIN is NULL then
367: X_LAST_UPDATE_LOGIN := -1;
368: end if;
369: else
370: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
371: IGS_GE_MSG_STACK.ADD;
372: app_exception.raise_exception;
373: end if;
374: Before_DML (
459: open c1;
460: fetch c1 into tlinfo;
461: if (c1%notfound) then
462: close c1;
463: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
464: IGS_GE_MSG_STACK.ADD;
465: app_exception.raise_exception;
466: return;
467: end if;
474: AND (X_DESCRIPTION is null)))
475: ) then
476: null;
477: else
478: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
479: IGS_GE_MSG_STACK.ADD;
480: app_exception.raise_exception;
481: end if;
482: return;
511: if X_LAST_UPDATE_LOGIN is NULL then
512: X_LAST_UPDATE_LOGIN := -1;
513: end if;
514: else
515: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
516: IGS_GE_MSG_STACK.ADD;
517: app_exception.raise_exception;
518: end if;
519: Before_DML (