31: IF (cur_old_ref_values%NOTFOUND) AND (p_action not in ('INSERT', 'VALIDATE_INSERT')) THEN
32: Close cur_old_ref_values;
33: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
34: IGS_GE_MSG_STACK.ADD;
35: App_Exception.Raise_Exception;
36: Return;
37: END IF;
38: Close cur_old_ref_values;
39: -- Populate New Values.
72: new_references.closed_ind,
73: v_message_name) = FALSE THEN
74: Fnd_Message.Set_Name('IGS',v_message_name);
75: IGS_GE_MSG_STACK.ADD;
76: App_Exception.Raise_Exception;
77: END IF;
78: END IF;
79:
80: -- Fee Category records can be deleted logically by making closed_ind as 'Y'
82: -- Preventing deletion of the Fee Category records.
83: IF p_deleting = TRUE THEN
84: FND_MESSAGE.SET_NAME('IGS','IGS_FI_DEL_NOT_ALLWD');
85: IGS_GE_MSG_STACK.ADD;
86: APP_EXCEPTION.RAISE_EXCEPTION;
87: END IF;
88:
89: END BeforeRowInsertUpdateDelete1;
90:
115: column_name is NULL THEN
116: IF new_references.closed_ind <> 'N' AND new_references.closed_ind <> 'Y' 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:
123: IF upper(Column_Name) = 'CURRENCY_CD' OR
124: column_name is NULL THEN
125: IF new_references.currency_cd <> UPPER(new_references.currency_cd) THEN
126: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
127: IGS_GE_MSG_STACK.ADD;
128: App_Exception.Raise_Exception;
129: END IF;
130: END IF;
131:
132: END Check_Constraints;
228: );
229: IF Get_PK_For_Validation ( new_references.fee_cat ) THEN
230: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
231: IGS_GE_MSG_STACK.ADD;
232: App_Exception.Raise_Exception;
233: END IF;
234: Check_Constraints;
235:
236: ELSIF (p_action = 'UPDATE') THEN
251: -- Call all the procedures related to Before Insert.
252: IF Get_PK_For_Validation ( new_references.fee_cat ) THEN
253: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
254: IGS_GE_MSG_STACK.ADD;
255: App_Exception.Raise_Exception;
256: END IF;
257: Check_Constraints;
258: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
259: -- Call all the procedures related to Before UPdate.
297: end if;
298: else
299: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
300: IGS_GE_MSG_STACK.ADD;
301: app_exception.raise_exception;
302: end if;
303: Before_DML(
304: p_action=>'INSERT',
305: x_rowid=>X_ROWID,
365: fetch c1 into tlinfo;
366: if (c1%notfound) then
367: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
368: IGS_GE_MSG_STACK.ADD;
369: app_exception.raise_exception;
370: close c1;
371: return;
372: end if;
373: close c1;
380: null;
381: else
382: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
383: IGS_GE_MSG_STACK.ADD;
384: app_exception.raise_exception;
385: end if;
386: return;
387: end LOCK_ROW;
388: procedure UPDATE_ROW (
413: end if;
414: else
415: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
416: IGS_GE_MSG_STACK.ADD;
417: app_exception.raise_exception;
418: end if;
419: Before_DML(
420: p_action=>'UPDATE',
421: x_rowid=>X_ROWID,