[Home] [Help]
40: Open cur_old_ref_values;
41: Fetch cur_old_ref_values INTO old_references;
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;
90: IF p_inserting THEN
91: IF IGS_GR_VAL_CRD.grdp_val_ci_grad(
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;
121: IF NOT IGS_CA_INST_PKG.Get_PK_For_Validation (
122: new_references.grd_cal_type,
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:
144: new_references.end_dai_sequence_number,
145: new_references.grd_cal_type,
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:
167: new_references.start_dai_sequence_number,
168: new_references.grd_cal_type,
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:
206: END IF ;
207:
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:
330: Open cur_rowid;
331: Fetch cur_rowid INTO lv_rowid;
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;
365: Open cur_rowid;
366: Fetch cur_rowid INTO lv_rowid;
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;
423: IF Get_PK_For_Validation (
424: NEW_REFERENCES.grd_cal_type,
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:
444: IF GET_PK_FOR_VALIDATION(
445: NEW_REFERENCES.grd_cal_type,
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:
493: if X_LAST_UPDATE_LOGIN is NULL then
494: X_LAST_UPDATE_LOGIN := -1;
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:
592: open c1;
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;
605: AND (tlinfo.END_DAI_SEQUENCE_NUMBER = X_END_DAI_SEQUENCE_NUMBER)
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;
643: if X_LAST_UPDATE_LOGIN is NULL then
644: X_LAST_UPDATE_LOGIN := -1;
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: