[Home] [Help]
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: Close cur_old_ref_values;
37: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
38: IGS_GE_MSG_STACK.ADD;
39: App_Exception.Raise_Exception;
40: Return;
41: END IF;
73: (old_references.closed_ind = 'Y' AND new_references.closed_ind = 'N')) THEN
74: IF IGS_AD_VAL_ADS.admp_val_sads_clsd(
75: new_references.s_adm_doc_status,
76: v_message_name) = FALSE THEN
77: Fnd_Message.Set_Name('IGS',v_message_name);
78: IGS_GE_MSG_STACK.ADD;
79: App_Exception.Raise_Exception;
80: END IF;
81: END IF;
79: App_Exception.Raise_Exception;
80: END IF;
81: END IF;
82: IF (new_references.closed_ind = 'Y' AND new_references.system_default_ind = 'Y') THEN
83: Fnd_Message.Set_Name('IGS','IGS_AD_SYS_DFLT_IND_NOTSET_CLS');
84: IGS_GE_MSG_STACK.ADD;
85: App_Exception.Raise_Exception;
86: END IF;
87:
111: END IF ;
112:
113: IF upper(Column_name) = 'ADM_DOC_STATUS' OR COLUMN_NAME IS NULL THEN
114: IF new_references.ADM_DOC_STATUS<> upper(new_references.ADM_DOC_STATUS) then
115: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
116: IGS_GE_MSG_STACK.ADD;
117: App_Exception.Raise_Exception ;
118: END IF;
119:
120: END IF ;
121:
122: IF upper(Column_name) = 'CLOSED_IND' OR COLUMN_NAME IS NULL THEN
123: IF new_references.CLOSED_IND<> upper(new_references.CLOSED_IND) then
124: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
125: IGS_GE_MSG_STACK.ADD;
126: App_Exception.Raise_Exception ;
127: END IF;
128: IF new_references.CLOSED_IND NOT IN ('Y','N') then
125: IGS_GE_MSG_STACK.ADD;
126: App_Exception.Raise_Exception ;
127: END IF;
128: IF new_references.CLOSED_IND NOT IN ('Y','N') then
129: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
130: IGS_GE_MSG_STACK.ADD;
131: App_Exception.Raise_Exception ;
132: END IF;
133:
135:
136:
137: IF upper(Column_name) = 'SYSTEM_DEFAULT_IND' OR COLUMN_NAME IS NULL THEN
138: IF new_references.SYSTEM_DEFAULT_IND<> upper(new_references.SYSTEM_DEFAULT_IND) then
139: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
140: IGS_GE_MSG_STACK.ADD;
141: App_Exception.Raise_Exception ;
142: END IF;
143: IF new_references.SYSTEM_DEFAULT_IND not in ('Y','N') then
140: IGS_GE_MSG_STACK.ADD;
141: App_Exception.Raise_Exception ;
142: END IF;
143: IF new_references.SYSTEM_DEFAULT_IND not in ('Y','N') then
144: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
145: IGS_GE_MSG_STACK.ADD;
146: App_Exception.Raise_Exception ;
147: END IF;
148: END IF;
148: END IF;
149:
150: IF upper(Column_name) = 'S_ADM_DOC_STATUS' OR COLUMN_NAME IS NULL THEN
151: IF new_references.S_ADM_DOC_STATUS<> upper(new_references.S_ADM_DOC_STATUS) then
152: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
153: IGS_GE_MSG_STACK.ADD;
154: App_Exception.Raise_Exception ;
155: END IF;
156: END IF ;
167: IF NOT IGS_LOOKUPS_VIEW_PKG.Get_PK_For_Validation (
168: 'ADM_DOC_STATUS',
169: new_references.s_adm_doc_status
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: END IF;
229: Open cur_rowid;
230: Fetch cur_rowid INTO lv_rowid;
231: IF (cur_rowid%FOUND) THEN
232: Close cur_rowid;
233: Fnd_Message.Set_Name ('IGS', 'IGS_AD_ADS_SADS_FK');
234: IGS_GE_MSG_STACK.ADD;
235: App_Exception.Raise_Exception;
236: Return;
237: END IF;
275: BeforeRowInsertUpdate1 ( p_inserting => TRUE );
276: IF Get_PK_For_Validation (
277: new_references.adm_doc_status
278: ) THEN
279: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
280: IGS_GE_MSG_STACK.ADD;
281: App_Exception.Raise_Exception;
282: END IF;
283: Check_constraints;
293: ELSIF (p_action = 'VALIDATE_INSERT') THEN
294: IF Get_PK_For_Validation (
295: new_references.adm_doc_status
296: ) THEN
297: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
298: IGS_GE_MSG_STACK.ADD;
299: App_Exception.Raise_Exception;
300: END IF;
301: Check_Constraints;
348: if X_LAST_UPDATE_LOGIN is NULL then
349: X_LAST_UPDATE_LOGIN := -1;
350: end if;
351: else
352: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
353: IGS_GE_MSG_STACK.ADD;
354: app_exception.raise_exception;
355: end if;
356:
430: open c1;
431: fetch c1 into tlinfo;
432: if (c1%notfound) then
433: close c1;
434: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
435: IGS_GE_MSG_STACK.ADD;
436: app_exception.raise_exception;
437: return;
438: end if;
444: AND (tlinfo.CLOSED_IND = X_CLOSED_IND)
445: ) then
446: null;
447: else
448: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
449: IGS_GE_MSG_STACK.ADD;
450: app_exception.raise_exception;
451: end if;
452: return;
478: if X_LAST_UPDATE_LOGIN is NULL then
479: X_LAST_UPDATE_LOGIN := -1;
480: end if;
481: else
482: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
483: IGS_GE_MSG_STACK.ADD;
484: app_exception.raise_exception;
485: end if;
486: