[Home] [Help]
33: -- Populate Old Values.
34: Open cur_old_ref_values;
35: Fetch cur_old_ref_values INTO old_references;
36: IF (cur_old_ref_values%NOTFOUND) AND (p_action not in ('INSERT','VALIDATE_INSERT')) THEN
37: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
38: IGS_GE_MSG_STACK.ADD;
39: Close cur_old_ref_values;
40: App_Exception.Raise_Exception;
41: Return;
83: IF IGS_RE_VAL_MTY.resp_val_mty_days(
84: new_references.ntfctn_reminder_days,
85: new_references.ntfctn_re_reminder_days,
86: v_message_name) = FALSE THEN
87: Fnd_Message.Set_Name('IGS',v_message_name);
88: IGS_GE_MSG_STACK.ADD;
89: App_Exception.Raise_Exception;
90: END IF;
91: END IF;
170: BeforeRowInsertUpdate1 ( p_inserting => TRUE );
171: IF Get_PK_For_Validation (
172: new_references.milestone_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: Check_Constraints;
187: -- Call all the procedures related to Before Insert.
188: IF Get_PK_For_Validation (
189: new_references.milestone_type
190: ) THEN
191: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
192: IGS_GE_MSG_STACK.ADD;
193: App_Exception.Raise_Exception;
194: END IF;
195: Check_Constraints;
240: if X_LAST_UPDATE_LOGIN is NULL then
241: X_LAST_UPDATE_LOGIN := -1;
242: end if;
243: else
244: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
245: IGS_GE_MSG_STACK.ADD;
246: app_exception.raise_exception;
247: end if;
248:
320: begin
321: open c1;
322: fetch c1 into tlinfo;
323: if (c1%notfound) then
324: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
325: IGS_GE_MSG_STACK.ADD;
326: close c1;
327: app_exception.raise_exception;
328: return;
342: AND (tlinfo.CLOSED_IND = X_CLOSED_IND)
343: ) then
344: null;
345: else
346: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
347: IGS_GE_MSG_STACK.ADD;
348: app_exception.raise_exception;
349: end if;
350: return;
377: if X_LAST_UPDATE_LOGIN is NULL then
378: X_LAST_UPDATE_LOGIN := -1;
379: end if;
380: else
381: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
382: IGS_GE_MSG_STACK.ADD;
383: app_exception.raise_exception;
384: end if;
385:
504: END IF ;
505:
506: IF upper(Column_name) = 'CLOSED_IND' OR COLUMN_NAME IS NULL THEN
507: IF new_references.CLOSED_IND<> upper(new_references.CLOSED_IND) then
508: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
509: IGS_GE_MSG_STACK.ADD;
510: App_Exception.Raise_Exception ;
511: END IF;
512:
510: App_Exception.Raise_Exception ;
511: END IF;
512:
513: IF new_references.CLOSED_IND not in ('Y','N') then
514: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
515: IGS_GE_MSG_STACK.ADD;
516: App_Exception.Raise_Exception ;
517: END IF;
518:
521:
522:
523: IF upper(Column_name) = 'MILESTONE_TYPE' OR COLUMN_NAME IS NULL THEN
524: IF new_references.MILESTONE_TYPE<> upper(new_references.MILESTONE_TYPE) then
525: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
526: IGS_GE_MSG_STACK.ADD;
527: App_Exception.Raise_Exception ;
528: END IF;
529:
530: END IF ;
531:
532: IF upper(Column_name) = 'NTFCTN_IMMINENT_DAYS' OR COLUMN_NAME IS NULL THEN
533: IF new_references.NTFCTN_IMMINENT_DAYS < 0 or new_references.NTFCTN_IMMINENT_DAYS > 999 then
534: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
535: IGS_GE_MSG_STACK.ADD;
536: App_Exception.Raise_Exception ;
537: END IF;
538:
539: END IF ;
540:
541: IF upper(Column_name) = 'NTFCTN_REMINDER_DAYS' OR COLUMN_NAME IS NULL THEN
542: IF new_references.NTFCTN_REMINDER_DAYS < 0 or new_references.NTFCTN_REMINDER_DAYS > 999 then
543: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
544: IGS_GE_MSG_STACK.ADD;
545: App_Exception.Raise_Exception ;
546: END IF;
547:
548: END IF ;
549:
550: IF upper(Column_name) = 'NTFCTN_RE_REMINDER_DAYS' OR COLUMN_NAME IS NULL THEN
551: IF new_references.NTFCTN_RE_REMINDER_DAYS < 0 or new_references.NTFCTN_RE_REMINDER_DAYS > 999 then
552: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
553: IGS_GE_MSG_STACK.ADD;
554: App_Exception.Raise_Exception ;
555: END IF;
556: