[Home] [Help]
35: Open cur_old_ref_values;
36: Fetch cur_old_ref_values INTO old_references;
37: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
38: Close cur_old_ref_values;
39: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
40: IGS_GE_MSG_STACK.ADD;
41: App_Exception.Raise_Exception;
42: Return;
43: END IF;
72:
73: IF (p_inserting OR (p_updating AND (old_references.tracking_type <> new_references.tracking_type))) THEN
74: IF NOT IGS_TR_VAL_TRI.TRKP_VAL_TRI_TYPE (new_references.tracking_type,
75: v_message_name) THEN
76: Fnd_Message.Set_Name('IGS', v_message_name);
77: IGS_GE_MSG_STACK.ADD;
78: App_Exception.Raise_Exception;
79: END IF;
80: END IF;
99:
100: IF upper(Column_name) = 'CLOSED_IND' OR column_name is null then
101: IF new_references.closed_ind <> UPPER(new_references.closed_ind ) OR
102: 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;
107: END IF;
108:
109: IF upper(Column_name) = 'RECOMMENDED_PANEL_SIZE' OR column_name is null then
110: IF new_references.recommended_panel_size < 1 OR new_references.recommended_panel_size > 99 then
111: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
112: IGS_GE_MSG_STACK.ADD;
113: App_Exception.Raise_Exception;
114: END IF;
115: END IF;
116:
117:
118: IF upper(Column_name) = 'THESIS_PANEL_TYPE' OR column_name is null then
119: IF new_references.thesis_panel_type <> UPPER(new_references.thesis_panel_type ) then
120: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
121: IGS_GE_MSG_STACK.ADD;
122: App_Exception.Raise_Exception;
123: END IF;
124: END IF;
124: END IF;
125:
126: IF upper(Column_name) = 'TRACKING_TYPE' OR column_name is null then
127: IF new_references.tracking_type <> UPPER(new_references.tracking_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_TR_TYPE_PKG.Get_PK_For_Validation (
144: new_references.tracking_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;
223: -- Call all the procedures related to Before Insert.
224: IF Get_PK_For_Validation(
225: new_references.thesis_panel_type
226: )THEN
227: Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
228: IGS_GE_MSG_STACK.ADD;
229: App_Exception.Raise_Exception;
230: END IF;
231: Check_Constraints;
241: ELSIF (p_action = 'VALIDATE_INSERT') THEN
242: IF Get_PK_For_Validation(
243: new_references.thesis_panel_type
244: )THEN
245: Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
246: IGS_GE_MSG_STACK.ADD;
247: App_Exception.Raise_Exception;
248: END IF;
249: Check_Constraints;
285: if X_LAST_UPDATE_LOGIN is NULL then
286: X_LAST_UPDATE_LOGIN := -1;
287: end if;
288: else
289: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
290: IGS_GE_MSG_STACK.ADD;
291: app_exception.raise_exception;
292: end if;
293:
367: open c1;
368: fetch c1 into tlinfo;
369: if (c1%notfound) then
370: close c1;
371: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
372: app_exception.raise_exception;
373: return;
374: end if;
375: close c1;
387: AND (X_SELECTION_CRITERIA is null)))
388: ) then
389: null;
390: else
391: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
392: app_exception.raise_exception;
393: end if;
394: return;
395: end LOCK_ROW;
421: if X_LAST_UPDATE_LOGIN is NULL then
422: X_LAST_UPDATE_LOGIN := -1;
423: end if;
424: else
425: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
426: IGS_GE_MSG_STACK.ADD;
427: app_exception.raise_exception;
428: end if;
429: