[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;
73: IF NVL(old_references.s_location_type, '-1') <> NVL(new_references.s_location_type, '-1') THEN
74: IF IGS_OR_VAL_LOT.assp_val_lot_loc (
75: new_references.location_type,
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;
103: END IF;
104:
105: IF upper(Column_Name) = 'CLOSED_IND' OR Column_Name IS NULL THEN
106: IF new_references.closed_ind NOT IN ('Y','N') THEN
107: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
108: IGS_GE_MSG_STACK.ADD;
109: App_Exception.Raise_Exception;
110: END IF;
111: END IF;
110: END IF;
111: END IF;
112: IF Column_Name = 'DESCRIPTION' OR Column_Name IS NULL THEN
113: IF new_references.description <> new_references.description THEN
114: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
115: IGS_GE_MSG_STACK.ADD;
116: App_Exception.Raise_Exception;
117: END IF;
118: END IF;
117: END IF;
118: END IF;
119: IF upper(Column_Name) = 'LOCATION_TYPE' OR Column_Name IS NULL THEN
120: IF new_references.location_type <> UPPER(new_references.location_type) THEN
121: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
122: IGS_GE_MSG_STACK.ADD;
123: App_Exception.Raise_Exception;
124: END IF;
125: END IF;
124: END IF;
125: END IF;
126: IF upper(Column_Name) = 'S_LOCATION_TYPE' OR Column_Name IS NULL THEN
127: IF new_references.s_location_type <> UPPER(new_references.s_location_type) THEN
128: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
129: IGS_GE_MSG_STACK.ADD;
130: App_Exception.Raise_Exception;
131: END IF;
132: END IF;
142: ELSE
143: IF NOT IGS_LOOKUPS_VIEW_PKG.Get_PK_For_Validation (
144: 'LOCATION_TYPE',new_references.s_location_type
145: ) THEN
146: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
147: IGS_GE_MSG_STACK.ADD;
148: App_Exception.Raise_Exception;
149: END IF;
150: END IF;
204: Open cur_rowid;
205: Fetch cur_rowid INTO lv_rowid;
206: IF (cur_rowid%FOUND) THEN
207: Close cur_rowid;
208: Fnd_Message.Set_Name ('IGS', 'IGS_AD_LOT_SLV_FK');
209: IGS_GE_MSG_STACK.ADD;
210: App_Exception.Raise_Exception;
211: Return;
212: END IF;
250: BeforeRowInsertUpdate1 ( p_inserting => TRUE );
251: IF Get_PK_For_Validation (
252: new_references.location_type
253: ) THEN
254: Fnd_Message.Set_Name('IGS','IGS_GE_MULTI_ORG_DUP_REC');
255: IGS_GE_MSG_STACK.ADD;
256: App_Exception.Raise_Exception;
257: END IF;
258: Check_Constraints;
266: ELSIF (p_action = 'VALIDATE_INSERT') THEN
267: IF Get_PK_For_Validation (
268: new_references.location_type
269: ) THEN
270: Fnd_Message.Set_Name('IGS','IGS_GE_MULTI_ORG_DUP_REC');
271: IGS_GE_MSG_STACK.ADD;
272: App_Exception.Raise_Exception;
273: END IF;
274: Check_Constraints;
319: if X_LAST_UPDATE_LOGIN is NULL then
320: X_LAST_UPDATE_LOGIN := -1;
321: end if;
322: else
323: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
324: IGS_GE_MSG_STACK.ADD;
325: app_exception.raise_exception;
326: end if;
327:
400: open c1;
401: fetch c1 into tlinfo;
402: if (c1%notfound) then
403: close c1;
404: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
405: IGS_GE_MSG_STACK.ADD;
406: app_exception.raise_exception;
407: return;
408: end if;
415: AND (tlinfo.CLOSED_IND = X_CLOSED_IND)
416: ) then
417: null;
418: else
419: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
420: IGS_GE_MSG_STACK.ADD;
421: app_exception.raise_exception;
422: end if;
423: return;
448: if X_LAST_UPDATE_LOGIN is NULL then
449: X_LAST_UPDATE_LOGIN := -1;
450: end if;
451: else
452: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
453: IGS_GE_MSG_STACK.ADD;
454: app_exception.raise_exception;
455: end if;
456: