34: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
35: Close cur_old_ref_values;
36: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
37: IGS_GE_MSG_STACK.ADD;
38: App_Exception.Raise_Exception;
39: Return;
40: END IF;
41: Close cur_old_ref_values;
42: -- Populate New Values.
83: new_references.restricted_ind <> 'N'
84: THEN
85: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
86: IGS_GE_MSG_STACK.ADD;
87: App_Exception.Raise_Exception;
88: END IF;
89: END IF;
90:
91: IF upper(Column_Name) = 'DFLT_IND' OR column_name is NULL THEN
93: new_references.dflt_ind <> 'N'
94: THEN
95: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
96: IGS_GE_MSG_STACK.ADD;
97: App_Exception.Raise_Exception;
98: END IF;
99: END IF;
100: IF upper(Column_Name) = 'COURSE_CD' OR
101: column_name is NULL THEN
101: column_name is NULL THEN
102: IF new_references.course_cd <> UPPER(new_references.course_cd) 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;
108: IF upper(Column_Name) = 'FUNDING_SOURCE' OR
109: column_name is NULL THEN
109: column_name is NULL THEN
110: IF new_references.funding_source <> UPPER(new_references.funding_source) 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: END Check_Constraints;
128: new_references.version_number
129: ) THEN
130: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
131: IGS_GE_MSG_STACK.ADD;
132: App_Exception.Raise_Exception;
133: END IF;
134: IF (((old_references.funding_source = new_references.funding_source)) OR
135: ((new_references.funding_source IS NULL))) THEN
136: NULL;
138: new_references.funding_source
139: ) THEN
140: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
141: IGS_GE_MSG_STACK.ADD;
142: App_Exception.Raise_Exception;
143: END IF;
144: END Check_Parent_Existance;
145: FUNCTION Get_PK_For_Validation (
146: x_course_cd IN VARCHAR2,
184: IF (cur_rowid%FOUND) THEN
185: Close cur_rowid;
186: Fnd_Message.Set_Name ('IGS', 'IGS_FI_FSRH_CV_FK');
187: IGS_GE_MSG_STACK.ADD;
188: App_Exception.Raise_Exception;
189: Return;
190: END IF;
191: Close cur_rowid;
192: END GET_FK_IGS_PS_VER;
204: IF (cur_rowid%FOUND) THEN
205: Close cur_rowid;
206: Fnd_Message.Set_Name ('IGS', 'IGS_FI_FSRH_FS_FK');
207: IGS_GE_MSG_STACK.ADD;
208: App_Exception.Raise_Exception;
209: Return;
210: END IF;
211: Close cur_rowid;
212: END GET_FK_IGS_FI_FUND_SRC;
252: IF Get_PK_For_Validation ( new_references.course_cd, new_references.version_number,
253: new_references.funding_source, new_references.hist_start_dt) THEN
254: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
255: IGS_GE_MSG_STACK.ADD;
256: App_Exception.Raise_Exception;
257: END IF;
258: Check_Constraints;
259: Check_Parent_Existance;
260: ELSIF (p_action = 'UPDATE') THEN
266: IF Get_PK_For_Validation ( new_references.course_cd, new_references.version_number,
267: new_references.funding_source, new_references.hist_start_dt) THEN
268: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
269: IGS_GE_MSG_STACK.ADD;
270: App_Exception.Raise_Exception;
271: END IF;
272: Check_Constraints;
273: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
274: Check_Constraints;
311: end if;
312: else
313: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
314: IGS_GE_MSG_STACK.ADD;
315: app_exception.raise_exception;
316: end if;
317: Before_DML(
318: p_action=>'INSERT',
319: x_rowid=>X_ROWID,
397: if (c1%notfound) then
398: close c1;
399: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
400: IGS_GE_MSG_STACK.ADD;
401: app_exception.raise_exception;
402: return;
403: end if;
404: close c1;
405: if ( (tlinfo.HIST_END_DT = X_HIST_END_DT)
414: null;
415: else
416: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
417: IGS_GE_MSG_STACK.ADD;
418: app_exception.raise_exception;
419: end if;
420: return;
421: end LOCK_ROW;
422: procedure UPDATE_ROW (
450: end if;
451: else
452: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
453: IGS_GE_MSG_STACK.ADD;
454: app_exception.raise_exception;
455: end if;
456: Before_DML(
457: p_action=>'UPDATE',
458: x_rowid=>X_ROWID,