42: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
43: Close cur_old_ref_values;
44: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
45: IGS_GE_MSG_STACK.ADD;
46: App_Exception.Raise_Exception;
47: Return;
48: END IF;
49: Close cur_old_ref_values;
50:
92: new_references.grd_cal_type,
93: v_message_name) = FALSE THEN
94: Fnd_Message.Set_Name('IGS', v_message_name);
95: IGS_GE_MSG_STACK.ADD;
96: App_Exception.Raise_Exception;
97: END IF;
98:
99: IF IGS_AS_VAL_EVSA.assp_val_ci_status(
100: new_references.grd_cal_type,
101: new_references.grd_ci_sequence_number,
102: v_message_name) = FALSE THEN
103: Fnd_Message.Set_Name('IGS', v_message_name);
104: IGS_GE_MSG_STACK.ADD;
105: App_Exception.Raise_Exception;
106: END IF;
107: END IF;
108:
109:
123: new_references.grd_ci_sequence_number
124: ) THEN
125: FND_MESSAGE.SET_NAME ('FND', 'FORM_RECORD_DELETED');
126: IGS_GE_MSG_STACK.ADD;
127: APP_EXCEPTION.RAISE_EXCEPTION;
128: END IF;
129:
130: END IF;
131:
146: new_references.grd_ci_sequence_number
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:
153: END IF;
154:
169: new_references.grd_ci_sequence_number
170: ) THEN
171: FND_MESSAGE.SET_NAME ('FND', 'FORM_RECORD_DELETED');
172: IGS_GE_MSG_STACK.ADD;
173: APP_EXCEPTION.RAISE_EXCEPTION;
174: END IF;
175:
176: END IF;
177:
208: IF upper(Column_name) = 'START_DAI_SEQUENCE_NUMBER' OR COLUMN_NAME IS NULL THEN
209: IF new_references.START_DAI_SEQUENCE_NUMBER < 1 OR new_references.START_DAI_SEQUENCE_NUMBER > 999999 then
210: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
211: IGS_GE_MSG_STACK.ADD;
212: App_Exception.Raise_Exception ;
213: END IF;
214:
215: END IF ;
216:
217: IF upper(Column_name) = 'END_DAI_SEQUENCE_NUMBER' OR COLUMN_NAME IS NULL THEN
218: IF new_references.END_DAI_SEQUENCE_NUMBER < 1 OR new_references.END_DAI_SEQUENCE_NUMBER > 999999 then
219: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
220: IGS_GE_MSG_STACK.ADD;
221: App_Exception.Raise_Exception ;
222: END IF;
223:
224: END IF ;
225:
226: IF upper(Column_name) = 'GRD_CI_SEQUENCE_NUMBER' OR COLUMN_NAME IS NULL THEN
227: IF new_references.GRD_CI_SEQUENCE_NUMBER < 1 OR new_references.GRD_CI_SEQUENCE_NUMBER > 999999 then
228: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
229: IGS_GE_MSG_STACK.ADD;
230: App_Exception.Raise_Exception ;
231: END IF;
232:
233: END IF ;
234:
235: IF upper(Column_name) = 'END_DT_ALIAS' OR COLUMN_NAME IS NULL THEN
236: IF new_references.END_DT_ALIAS<> upper(NEW_REFERENCES.END_DT_ALIAS) then
237: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
238: IGS_GE_MSG_STACK.ADD;
239: App_Exception.Raise_Exception ;
240: END IF;
241:
242: END IF ;
243:
244: IF upper(Column_name) = 'GRD_CAL_TYPE' OR COLUMN_NAME IS NULL THEN
245: IF new_references.GRD_CAL_TYPE<> upper(NEW_REFERENCES.GRD_CAL_TYPE) then
246: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
247: IGS_GE_MSG_STACK.ADD;
248: App_Exception.Raise_Exception ;
249: END IF;
250:
251: END IF ;
252:
253: IF upper(Column_name) = 'START_DT_ALIAS' OR COLUMN_NAME IS NULL THEN
254: IF new_references.START_DT_ALIAS<> upper(NEW_REFERENCES.START_DT_ALIAS) then
255: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
256: IGS_GE_MSG_STACK.ADD;
257: App_Exception.Raise_Exception ;
258: END IF;
259:
260: END IF ;
261:
332: IF (cur_rowid%FOUND) THEN
333: Close cur_rowid;
334: Fnd_Message.Set_Name ('IGS', 'IGS_GR_CRD_CI_FK');
335: IGS_GE_MSG_STACK.ADD;
336: App_Exception.Raise_Exception;
337: Return;
338: END IF;
339: Close cur_rowid;
340:
367: IF (cur_rowid%FOUND) THEN
368: Close cur_rowid;
369: Fnd_Message.Set_Name ('IGS', 'IGS_GR_CRD_END_DAIV_FK');
370: IGS_GE_MSG_STACK.ADD;
371: App_Exception.Raise_Exception;
372: Return;
373: END IF;
374: Close cur_rowid;
375:
425: NEW_REFERENCES.grd_ci_sequence_number
426: ) THEN
427: Fnd_Message.Set_Name('IGS','IGS_GE_MULTI_ORG_DUP_REC');
428: IGS_GE_MSG_STACK.ADD;
429: App_Exception.Raise_Exception;
430: END IF;
431:
432: Check_Constraints;
433: Check_Parent_Existance;
446: NEW_REFERENCES.grd_ci_sequence_number
447: ) THEN
448: Fnd_Message.Set_Name('IGS','IGS_GE_MULTI_ORG_DUP_REC');
449: IGS_GE_MSG_STACK.ADD;
450: App_Exception.Raise_Exception;
451: END IF;
452:
453: check_constraints;
454: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
495: end if;
496: else
497: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
498: IGS_GE_MSG_STACK.ADD;
499: app_exception.raise_exception;
500: end if;
501:
502: Before_DML (
503: p_action => 'INSERT',
593: fetch c1 into tlinfo;
594: if (c1%notfound) then
595: close c1;
596: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
597: app_exception.raise_exception;
598: return;
599: end if;
600: close c1;
601:
606: ) then
607: null;
608: else
609: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
610: app_exception.raise_exception;
611: end if;
612: return;
613: end LOCK_ROW;
614:
645: end if;
646: else
647: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
648: IGS_GE_MSG_STACK.ADD;
649: app_exception.raise_exception;
650: end if;
651:
652: Before_DML (
653: p_action => 'UPDATE',