[Home] [Help]
28: Open cur_old_ref_values;
29: Fetch cur_old_ref_values INTO old_references;
30: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
31: Close cur_old_ref_values;
32: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
33: IGS_GE_MSG_STACK.ADD;
34: App_Exception.Raise_Exception;
35: Return;
36: END IF;
71: new_references.hecs_payment_option := column_value;
72: END IF;
73: IF ((UPPER (column_name) = 'CLOSED_IND') OR (column_name IS NULL)) THEN
74: IF (new_references.closed_ind NOT IN ('Y', 'N')) THEN
75: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
76: IGS_GE_MSG_STACK.ADD;
77: App_Exception.Raise_Exception;
78: END IF;
79: END IF;
78: END IF;
79: END IF;
80: IF ((UPPER (column_name) = 'EXPIRE_AFTR_ACDMC_PERD_IND') OR (column_name IS NULL)) THEN
81: IF (new_references.expire_aftr_acdmc_perd_ind NOT IN ('Y', 'N')) THEN
82: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
83: IGS_GE_MSG_STACK.ADD;
84: App_Exception.Raise_Exception;
85: END IF;
86: END IF;
85: END IF;
86: END IF;
87: IF ((UPPER (column_name) = 'GOVT_HECS_PAYMENT_OPTION') OR (column_name IS NULL)) THEN
88: IF (new_references.govt_hecs_payment_option <> UPPER (new_references.govt_hecs_payment_option)) THEN
89: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
90: IGS_GE_MSG_STACK.ADD;
91: App_Exception.Raise_Exception;
92: END IF;
93: END IF;
92: END IF;
93: END IF;
94: IF ((UPPER (column_name) = 'HECS_PAYMENT_OPTION') OR (column_name IS NULL)) THEN
95: IF (new_references.hecs_payment_option <> UPPER (new_references.hecs_payment_option)) THEN
96: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
97: IGS_GE_MSG_STACK.ADD;
98: App_Exception.Raise_Exception;
99: END IF;
100: END IF;
107: ELSE
108: IF NOT IGS_FI_GOV_HEC_PA_OP_PKG.Get_PK_For_Validation (
109: new_references.govt_hecs_payment_option
110: ) THEN
111: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
112: IGS_GE_MSG_STACK.ADD;
113: App_Exception.Raise_Exception;
114: END IF;
115: END IF;
158: Open cur_rowid;
159: Fetch cur_rowid INTO lv_rowid;
160: IF (cur_rowid%FOUND) THEN
161: Close cur_rowid;
162: Fnd_Message.Set_Name ('IGS', 'IGS_FI_HPO_GHPO_FK');
163: IGS_GE_MSG_STACK.ADD;
164: App_Exception.Raise_Exception;
165: Return;
166: END IF;
199: -- Call all the procedures related to Before Insert.
200: IF (Get_PK_For_Validation (
201: new_references.hecs_payment_option
202: )) THEN
203: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
204: IGS_GE_MSG_STACK.ADD;
205: App_Exception.Raise_Exception;
206: END IF;
207: Check_Constraints;
216: ELSIF (p_action = 'VALIDATE_INSERT') THEN
217: IF (Get_PK_For_Validation (
218: new_references.hecs_payment_option
219: )) THEN
220: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
221: IGS_GE_MSG_STACK.ADD;
222: App_Exception.Raise_Exception;
223: END IF;
224: Check_Constraints;
256: if X_LAST_UPDATE_LOGIN is NULL then
257: X_LAST_UPDATE_LOGIN := -1;
258: end if;
259: else
260: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
261: IGS_GE_MSG_STACK.ADD;
262: app_exception.raise_exception;
263: end if;
264: Before_DML(
327: open c1;
328: fetch c1 into tlinfo;
329: if (c1%notfound) then
330: close c1;
331: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
332: IGS_GE_MSG_STACK.ADD;
333: app_exception.raise_exception;
334: return;
335: end if;
342: AND (tlinfo.CLOSED_IND = X_CLOSED_IND)
343: ) then
344: null;
345: else
346: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
347: IGS_GE_MSG_STACK.ADD;
348: app_exception.raise_exception;
349: end if;
350: return;
375: if X_LAST_UPDATE_LOGIN is NULL then
376: X_LAST_UPDATE_LOGIN := -1;
377: end if;
378: else
379: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
380: IGS_GE_MSG_STACK.ADD;
381: app_exception.raise_exception;
382: end if;
383: Before_DML(