[Home] [Help]
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: App_Exception.Raise_Exception;
39: Close cur_old_ref_values;
40: Return;
72: IF NOT IGS_LOOKUPS_VIEW_PKG.Get_PK_For_Validation (
73: 'MILESTONE_STATUS',
74: new_references.s_milestone_status
75: ) THEN
76: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
77: IGS_GE_MSG_STACK.ADD;
78: App_Exception.Raise_Exception;
79: END IF;
80: END IF;
131:
132: Open cur_rowid;
133: Fetch cur_rowid INTO lv_rowid;
134: IF (cur_rowid%FOUND) THEN
135: Fnd_Message.Set_Name ('IGS', 'IGS_PR_MST_SMST_FK');
136: IGS_GE_MSG_STACK.ADD;
137: App_Exception.Raise_Exception;
138: Close cur_rowid;
139: Return;
177: -- Call all the procedures related to Before Insert.
178: IF Get_PK_For_Validation (
179: new_references.milestone_status
180: ) THEN
181: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
182: IGS_GE_MSG_STACK.ADD;
183: App_Exception.Raise_Exception;
184: END IF;
185: Check_Constraints;
195: -- Call all the procedures related to Before Insert.
196: IF Get_PK_For_Validation (
197: new_references.milestone_status
198: ) THEN
199: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
200: IGS_GE_MSG_STACK.ADD;
201: App_Exception.Raise_Exception;
202: END IF;
203: Check_Constraints;
261: if X_LAST_UPDATE_LOGIN is NULL then
262: X_LAST_UPDATE_LOGIN := -1;
263: end if;
264: else
265: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
266: IGS_GE_MSG_STACK.ADD;
267: app_exception.raise_exception;
268: end if;
269:
337: begin
338: open c1;
339: fetch c1 into tlinfo;
340: if (c1%notfound) then
341: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
342: IGS_GE_MSG_STACK.ADD;
343: app_exception.raise_exception;
344: close c1;
345: return;
351: AND (tlinfo.CLOSED_IND = X_CLOSED_IND)
352: ) then
353: null;
354: else
355: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
356: IGS_GE_MSG_STACK.ADD;
357: app_exception.raise_exception;
358: end if;
359: return;
384: if X_LAST_UPDATE_LOGIN is NULL then
385: X_LAST_UPDATE_LOGIN := -1;
386: end if;
387: else
388: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
389: IGS_GE_MSG_STACK.ADD;
390: app_exception.raise_exception;
391: end if;
392: Before_DML (
501: END IF ;
502:
503: IF upper(Column_name) = 'CLOSED_IND' OR COLUMN_NAME IS NULL THEN
504: IF new_references.CLOSED_IND<> upper(new_references.CLOSED_IND) then
505: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
506: IGS_GE_MSG_STACK.ADD;
507: App_Exception.Raise_Exception ;
508: END IF;
509:
507: App_Exception.Raise_Exception ;
508: END IF;
509:
510: IF new_references.CLOSED_IND not in ('Y','N') then
511: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
512: IGS_GE_MSG_STACK.ADD;
513: App_Exception.Raise_Exception ;
514: END IF;
515:
518:
519:
520: IF upper(Column_name) = 'MILESTONE_STATUS' OR COLUMN_NAME IS NULL THEN
521: IF new_references.MILESTONE_STATUS<> upper(new_references.MILESTONE_STATUS) then
522: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
523: IGS_GE_MSG_STACK.ADD;
524: App_Exception.Raise_Exception ;
525: END IF;
526:
527: END IF ;
528:
529: IF upper(Column_name) = 'S_MILESTONE_STATUS' OR COLUMN_NAME IS NULL THEN
530: IF new_references.S_MILESTONE_STATUS<> upper(new_references.S_MILESTONE_STATUS) then
531: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
532: IGS_GE_MSG_STACK.ADD;
533: App_Exception.Raise_Exception ;
534: END IF;
535: