[Home] [Help]
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;
42: Close cur_old_ref_values;
72: IF IGS_AD_VAL_TELOC.admp_val_tloc_closed(
73: new_references.tac_level_of_comp,
74: v_message_name) = FALSE THEN
75: Fnd_Message.Set_Name('IGS', v_message_name);
76: IGS_GE_MSG_STACK.ADD;
77: App_Exception.Raise_Exception;
78: END IF;
79: END IF;
80:
100:
101: IF upper(Column_Name) = 'CLOSED_IND' OR Column_Name IS NULL THEN
102: IF new_references.closed_ind NOT IN ('Y','N') THEN
103: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
104: IGS_GE_MSG_STACK.ADD;
105: App_Exception.Raise_Exception;
106: END IF;
107: END IF;
108: IF upper(Column_Name) = 'TAC_LEVEL_OF_COMP' OR Column_Name IS NULL THEN
107: END IF;
108: IF upper(Column_Name) = 'TAC_LEVEL_OF_COMP' OR Column_Name IS NULL THEN
109: IF new_references.tac_level_of_comp <> UPPER(new_references.tac_level_of_comp) THEN
110: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
111: IGS_GE_MSG_STACK.ADD;
112: App_Exception.Raise_Exception;
113: END IF;
114: END IF;
115: IF upper(Column_Name) = 'TERTIARY_EDU_LVL_COMP' OR Column_Name IS NULL THEN
114: END IF;
115: IF upper(Column_Name) = 'TERTIARY_EDU_LVL_COMP' OR Column_Name IS NULL THEN
116: IF new_references.tertiary_edu_lvl_comp <> UPPER(new_references.tertiary_edu_lvl_comp) THEN
117: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
118: IGS_GE_MSG_STACK.ADD;
119: App_Exception.Raise_Exception;
120: END IF;
121: END IF;
122: END Check_Constraints;
131: IF NOT IGS_AD_TAC_LV_OF_COM_PKG.Get_PK_For_Validation (
132: new_references.tac_level_of_comp ,
133: 'N' ) THEN
134: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
135: IGS_GE_MSG_STACK.ADD;
136: App_Exception.Raise_Exception;
137: END IF;
138: END IF;
139:
193: Fetch cur_rowid INTO lv_rowid;
194: IF (cur_rowid%FOUND) THEN
195: Close cur_rowid;
196: Fnd_Message.Set_Name ('IGS', 'IGS_AD_TELOC_TLOC_FK');
197: IGS_GE_MSG_STACK.ADD;
198: App_Exception.Raise_Exception;
199: Return;
200: END IF;
201: Close cur_rowid;
236: IF Get_PK_For_Validation (
237: new_references.tertiary_edu_lvl_comp
238: ) THEN
239: Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
240: IGS_GE_MSG_STACK.ADD;
241: App_Exception.Raise_Exception;
242: END IF;
243: Check_Constraints;
244: Check_Parent_Existance;
253: IF Get_PK_For_Validation (
254: new_references.tertiary_edu_lvl_comp
255: ) THEN
256: Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
257: IGS_GE_MSG_STACK.ADD;
258: App_Exception.Raise_Exception;
259: END IF;
260: Check_Constraints;
261: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
302: X_LAST_UPDATE_LOGIN := -1;
303: end if;
304: else
305: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
306: IGS_GE_MSG_STACK.ADD;
307: app_exception.raise_exception;
308: end if;
309: Before_DML (
310: p_action => 'INSERT',
376: fetch c1 into tlinfo;
377: if (c1%notfound) then
378: close c1;
379: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
380: IGS_GE_MSG_STACK.ADD;
381: app_exception.raise_exception;
382: return;
383: end if;
384: close c1;
391: ) then
392: null;
393: else
394: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
395: IGS_GE_MSG_STACK.ADD;
396: app_exception.raise_exception;
397: end if;
398: return;
399: end LOCK_ROW;
424: X_LAST_UPDATE_LOGIN := -1;
425: end if;
426: else
427: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
428: IGS_GE_MSG_STACK.ADD;
429: app_exception.raise_exception;
430: end if;
431: Before_DML (
432: p_action => 'UPDATE',