[Home] [Help]
31: Open cur_old_ref_values;
32: Fetch cur_old_ref_values INTO old_references;
33: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
34: Close cur_old_ref_values;
35: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
36: IGS_GE_MSG_STACK.ADD;
37: App_Exception.Raise_Exception;
38: Return;
39: END IF;
95: new_references.CRS_COMPLETION_CUTOFF_DT_ALIAS := column_value;
96: END IF;
97: IF upper(Column_name) = 'CENSUS_DT_ALIAS' OR column_name is null then
98: IF new_references.census_dt_alias<> UPPER(new_references.census_dt_alias) then
99: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
100: IGS_GE_MSG_STACK.ADD;
101: App_Exception.Raise_Exception;
102: END IF;
103: END IF;
102: END IF;
103: END IF;
104: IF upper(Column_name) = 'CRS_COMPLETION_CUTOFF_DT_ALIAS' OR column_name is null then
105: IF new_references.CRS_COMPLETION_CUTOFF_DT_ALIAS<> UPPER(new_references.CRS_COMPLETION_CUTOFF_DT_ALIAS) then
106: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
107: IGS_GE_MSG_STACK.ADD;
108: App_Exception.Raise_Exception;
109: END IF;
110: END IF;
109: END IF;
110: END IF;
111: IF upper(Column_name) = 'S_CONTROL_NUM' OR column_name is null then
112: IF new_references.s_control_num <> 1 THEN
113: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
114: IGS_GE_MSG_STACK.ADD;
115: App_Exception.Raise_Exception;
116: END IF;
117: END IF;
127: ELSE
128: IF NOT IGS_CA_DA_PKG.Get_PK_For_Validation (
129: new_references.census_dt_alias
130: ) THEN
131: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
132: IGS_GE_MSG_STACK.ADD;
133: App_Exception.Raise_Exception;
134: END IF;
135: END IF;
140: ELSE
141: IF NOT IGS_CA_DA_PKG.Get_PK_For_Validation (
142: new_references.crs_completion_cutoff_dt_alias
143: ) THEN
144: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
145: IGS_GE_MSG_STACK.ADD;
146: App_Exception.Raise_Exception;
147: END IF;
148: END IF;
192: Open cur_rowid;
193: Fetch cur_rowid INTO lv_rowid;
194: IF (cur_rowid%FOUND) THEN
195: Close cur_rowid;
196: Fnd_Message.Set_Name ('IGS', 'IGS_GE_SGCC_DA_CENSUS_FK');
197: IGS_GE_MSG_STACK.ADD;
198: App_Exception.Raise_Exception;
199: Return;
200: END IF;
232: IF (p_action = 'INSERT') THEN
233: -- Call all the procedures related to Before Insert.
234: BeforeRowInsertUpdate1 ( p_inserting => TRUE );
235: IF Get_PK_For_Validation(new_references.s_control_num)THEN
236: Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
237: IGS_GE_MSG_STACK.ADD;
238: App_Exception.Raise_Exception;
239: END IF;
240: Check_Constraints;
248: -- Call all the procedures related to Before Delete.
249: Null;
250: ELSIF (p_action = 'VALIDATE_INSERT') THEN
251: IF Get_PK_For_Validation(new_references.s_control_num)THEN
252: Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
253: IGS_GE_MSG_STACK.ADD;
254: App_Exception.Raise_Exception;
255: END IF;
256: Check_Constraints;
311: if X_LAST_UPDATE_LOGIN is NULL then
312: X_LAST_UPDATE_LOGIN := -1;
313: end if;
314: else
315: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
316: IGS_GE_MSG_STACK.ADD;
317: app_exception.raise_exception;
318: end if;
319: Before_DML (
381: open c1;
382: fetch c1 into tlinfo;
383: if (c1%notfound) then
384: close c1;
385: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
386: IGS_GE_MSG_STACK.ADD;
387: app_exception.raise_exception;
388: return;
389: end if;
395: AND (X_CRS_COMPLETION_CUTOFF_DT_ALI is null)))
396: ) then
397: null;
398: else
399: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
400: IGS_GE_MSG_STACK.ADD;
401: app_exception.raise_exception;
402: end if;
403: return;
427: if X_LAST_UPDATE_LOGIN is NULL then
428: X_LAST_UPDATE_LOGIN := -1;
429: end if;
430: else
431: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
432: IGS_GE_MSG_STACK.ADD;
433: app_exception.raise_exception;
434: end if;
435: Before_DML (