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: Close cur_old_ref_values;
39: App_Exception.Raise_Exception;
40: Return;
110: END IF;
111: IF upper(column_name) = 'ASS_ASSESSOR_TYPE' OR
112: column_name is null Then
113: IF new_references.ass_assessor_type <> UPPER(new_references.ass_assessor_type) Then
114: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
115: Igs_Ge_Msg_Stack.Add;
116: App_Exception.Raise_Exception;
117: END IF;
118: END IF;
119:
120: IF upper(column_name) = 'CLOSED_IND' OR
121: column_name is null Then
122: IF new_references.closed_ind <> UPPER(new_references.closed_ind) OR new_references.closed_ind NOT IN ( 'Y' , 'N' ) Then
123: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
124: Igs_Ge_Msg_Stack.Add;
125: App_Exception.Raise_Exception;
126: END IF;
127: END IF;
127: END IF;
128: IF upper(column_name) = 'DFLT_IND' OR
129: column_name is null Then
130: IF new_references.dflt_ind NOT IN ( 'Y' , 'N' )Then
131: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
132: Igs_Ge_Msg_Stack.Add;
133: App_Exception.Raise_Exception;
134: END IF;
135: END IF;
170: Null;
171: IF Get_PK_For_Validation (
172: new_references.ass_assessor_type
173: ) THEN
174: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
175: Igs_Ge_Msg_Stack.Add;
176: App_Exception.Raise_Exception;
177: END IF;
178:
188: ELSIF (p_action = 'VALIDATE_INSERT') THEN
189: IF Get_PK_For_Validation (
190: new_references.ass_assessor_type
191: ) THEN
192: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
193: Igs_Ge_Msg_Stack.Add;
194: App_Exception.Raise_Exception;
195: END IF;
196:
239: if X_LAST_UPDATE_LOGIN is NULL then
240: X_LAST_UPDATE_LOGIN := -1;
241: end if;
242: else
243: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
244: Igs_Ge_Msg_Stack.Add;
245: app_exception.raise_exception;
246: end if;
247: Before_DML(
308: begin
309: open c1;
310: fetch c1 into tlinfo;
311: if (c1%notfound) then
312: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
313: Igs_Ge_Msg_Stack.Add;
314: close c1;
315: app_exception.raise_exception;
316: return;
322: AND (tlinfo.CLOSED_IND = X_CLOSED_IND)
323: ) then
324: null;
325: else
326: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
327: Igs_Ge_Msg_Stack.Add;
328: app_exception.raise_exception;
329: end if;
330: return;
355: if X_LAST_UPDATE_LOGIN is NULL 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: Before_DML(