[Home] [Help]
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: Close cur_old_ref_values;
38: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
39: IGS_GE_MSG_STACK.ADD;
40: App_Exception.Raise_Exception;
41: Return;
42: END IF;
74: (old_references.closed_ind = 'Y' AND new_references.closed_ind = 'N')) THEN
75: IF IGS_AD_VAL_AEQS.admp_val_saeqs_clsd(
76: new_references.s_adm_entry_qual_status,
77: v_message_name) = FALSE THEN
78: Fnd_Message.Set_Name('IGS',v_message_name);
79: IGS_GE_MSG_STACK.ADD;
80: App_Exception.Raise_Exception;
81: END IF;
82: END IF;
80: App_Exception.Raise_Exception;
81: END IF;
82: END IF;
83: IF (new_references.closed_ind = 'Y' AND new_references.system_default_ind = 'Y') THEN
84: Fnd_Message.Set_Name('IGS','IGS_AD_SYS_DFLT_IND_NOTSET_CLS');
85: IGS_GE_MSG_STACK.ADD;
86: App_Exception.Raise_Exception;
87: END IF;
88:
112: END IF ;
113:
114: IF upper(Column_name) = 'SYSTEM_DEFAULT_IND' OR COLUMN_NAME IS NULL THEN
115: IF new_references.SYSTEM_DEFAULT_IND<> upper(new_references.SYSTEM_DEFAULT_IND) then
116: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
117: IGS_GE_MSG_STACK.ADD;
118: App_Exception.Raise_Exception ;
119: END IF;
120:
118: App_Exception.Raise_Exception ;
119: END IF;
120:
121: IF new_references.SYSTEM_DEFAULT_IND not in ('Y','N') then
122: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
123: IGS_GE_MSG_STACK.ADD;
124: App_Exception.Raise_Exception ;
125: END IF;
126:
127: END IF ;
128:
129: IF upper(Column_name) = 'CLOSED_IND' OR COLUMN_NAME IS NULL THEN
130: IF new_references.CLOSED_IND<> upper(new_references.CLOSED_IND) then
131: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
132: IGS_GE_MSG_STACK.ADD;
133: App_Exception.Raise_Exception ;
134: END IF;
135:
133: App_Exception.Raise_Exception ;
134: END IF;
135:
136: IF new_references.CLOSED_IND not in ('Y','N') then
137: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
138: IGS_GE_MSG_STACK.ADD;
139: App_Exception.Raise_Exception ;
140: END IF;
141:
142: END IF ;
143:
144: IF upper(Column_name) = 'ADM_ENTRY_QUAL_STATUS' OR COLUMN_NAME IS NULL THEN
145: IF new_references.ADM_ENTRY_QUAL_STATUS<> upper(new_references.ADM_ENTRY_QUAL_STATUS) then
146: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
147: IGS_GE_MSG_STACK.ADD;
148: App_Exception.Raise_Exception ;
149: END IF;
150:
152:
153:
154: IF upper(Column_name) = 'S_ADM_ENTRY_QUAL_STATUS' OR COLUMN_NAME IS NULL THEN
155: IF new_references.S_ADM_ENTRY_QUAL_STATUS<> upper(new_references.S_ADM_ENTRY_QUAL_STATUS) then
156: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
157: IGS_GE_MSG_STACK.ADD;
158: App_Exception.Raise_Exception ;
159: END IF;
160:
170: ELSE
171: IF NOT IGS_LOOKUPS_VIEW_PKG.Get_PK_For_Validation (
172: 'ADM_ENTRY_QUAL_STATUS',new_references.s_adm_entry_qual_status
173: ) THEN
174: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
175: IGS_GE_MSG_STACK.ADD;
176: App_Exception.Raise_Exception;
177: END IF ;
178: END IF;
233: Open cur_rowid;
234: Fetch cur_rowid INTO lv_rowid;
235: IF (cur_rowid%FOUND) THEN
236: Close cur_rowid;
237: Fnd_Message.Set_Name ('IGS', 'IGS_AD_AEQS_SAEQS_FK');
238: IGS_GE_MSG_STACK.ADD;
239: App_Exception.Raise_Exception;
240: Return;
241: END IF;
279: BeforeRowInsertUpdate1 ( p_inserting => TRUE );
280: IF Get_PK_For_Validation (
281: new_references.adm_entry_qual_status
282: ) THEN
283: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
284: IGS_GE_MSG_STACK.ADD;
285: App_Exception.Raise_Exception;
286: END IF;
287: Check_Constraints;
299: ELSIF (p_action = 'VALIDATE_INSERT') THEN
300: IF Get_PK_For_Validation (
301: new_references.adm_entry_qual_status
302: ) THEN
303: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
304: IGS_GE_MSG_STACK.ADD;
305: App_Exception.Raise_Exception;
306: END IF;
307: Check_Constraints;
352: if X_LAST_UPDATE_LOGIN is NULL then
353: X_LAST_UPDATE_LOGIN := -1;
354: end if;
355: else
356: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
357: IGS_GE_MSG_STACK.ADD;
358: app_exception.raise_exception;
359: end if;
360:
435: open c1;
436: fetch c1 into tlinfo;
437: if (c1%notfound) then
438: close c1;
439: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
440: IGS_GE_MSG_STACK.ADD;
441: app_exception.raise_exception;
442: return;
443: end if;
449: AND (tlinfo.CLOSED_IND = X_CLOSED_IND)
450: ) then
451: null;
452: else
453: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
454: IGS_GE_MSG_STACK.ADD;
455: app_exception.raise_exception;
456: end if;
457: return;
483: if X_LAST_UPDATE_LOGIN is NULL then
484: X_LAST_UPDATE_LOGIN := -1;
485: end if;
486: else
487: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
488: IGS_GE_MSG_STACK.ADD;
489: app_exception.raise_exception;
490: end if;
491: