[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;
81: ***************************************************************/
82: BEGIN
83: IF p_inserting OR p_updating THEN
84: IF (new_references.from_code_id = new_references.to_code_id) THEN
85: FND_MESSAGE.SET_NAME('IGS','IGS_AD_FROMTO_GRADE_SAME');
86: IGS_GE_MSG_STACK.ADD;
87: APP_EXCEPTION.RAISE_EXCEPTION;
88: END IF;
89: END IF;
104: IF Get_Uk_For_Validation (
105: new_references.from_code_id
106: ,new_references.to_code_id
107: ) THEN
108: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
109: IGS_GE_MSG_STACK.ADD;
110: app_exception.raise_exception;
111: END IF;
112: END Check_Uniqueness ;
130: new_references.to_code_id,
131: 'GRADING_SCALE_TYPES',
132: 'N'
133: ) THEN
134: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
135: IGS_GE_MSG_STACK.ADD;
136: App_Exception.Raise_Exception;
137: END IF;
138:
143: new_references.from_code_id,
144: 'GRADING_SCALE_TYPES',
145: 'N'
146: ) THEN
147: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
148: IGS_GE_MSG_STACK.ADD;
149: App_Exception.Raise_Exception;
150: END IF;
151:
262: Open cur_rowid1;
263: Fetch cur_rowid1 INTO lv_rowid1;
264: IF (cur_rowid1%FOUND) THEN
265: Close cur_rowid1;
266: Fnd_Message.Set_Name ('IGS', 'IGS_AD_ACGT_ACDC_FK2');
267: IGS_GE_MSG_STACK.ADD;
268: App_Exception.Raise_Exception;
269: Return;
270: END IF;
273: Open cur_rowid2;
274: Fetch cur_rowid2 INTO lv_rowid2;
275: IF (cur_rowid2%FOUND) THEN
276: Close cur_rowid2;
277: Fnd_Message.Set_Name ('IGS', 'IGS_AD_ACGT_ACDC_FK1');
278: IGS_GE_MSG_STACK.ADD;
279: App_Exception.Raise_Exception;
280: Return;
281: END IF;
324: BeforeRowInsertUpdate ( p_inserting => TRUE );
325: IF Get_Pk_For_Validation(
326: new_references.conv_gs_types_id
327: ) THEN
328: Fnd_Message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
329: IGS_GE_MSG_STACK.ADD;
330: App_Exception.Raise_Exception;
331: END IF;
332: Check_Uniqueness;
343: -- Call all the procedures related to Before Insert.
344: IF Get_PK_For_Validation (
345: new_references.conv_gs_types_id
346: ) THEN
347: Fnd_Message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
348: IGS_GE_MSG_STACK.ADD;
349: App_Exception.Raise_Exception;
350: END IF;
351: Check_Uniqueness;
395: if X_LAST_UPDATE_LOGIN is NULL then
396: X_LAST_UPDATE_LOGIN := -1;
397: end if;
398: else
399: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
400: IGS_GE_MSG_STACK.ADD;
401: app_exception.raise_exception;
402: end if;
403:
468: begin
469: open c1;
470: fetch c1 into tlinfo;
471: if (c1%notfound) then
472: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
473: IGS_GE_MSG_STACK.ADD;
474: close c1;
475: app_exception.raise_exception;
476: return;
479: if (( tlinfo.FROM_CODE_ID = X_FROM_CODE_ID)
480: AND (tlinfo.TO_CODE_ID = X_TO_CODE_ID)) then
481: null;
482: else
483: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
484: IGS_GE_MSG_STACK.ADD;
485: app_exception.raise_exception;
486: end if;
487: return;
521: if X_LAST_UPDATE_LOGIN is NULL then
522: X_LAST_UPDATE_LOGIN := -1;
523: end if;
524: else
525: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
526: IGS_GE_MSG_STACK.ADD;
527: app_exception.raise_exception;
528: end if;
529: Before_DML(