[Home] [Help]
37: Open cur_old_ref_values;
38: Fetch cur_old_ref_values INTO old_references;
39: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
40: Close cur_old_ref_values;
41: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
42: IGS_GE_MSG_STACK.ADD;
43: App_Exception.Raise_Exception;
44: Return;
45: END IF;
92: IF IGS_PS_VAL_UNIT.crsp_val_iud_uv_dtl (
93: v_unit_cd,
94: v_version_number,
95: v_message_name) = FALSE THEN
96: FND_MESSAGE.SET_NAME('IGS',v_message_name);
97: IGS_GE_MSG_STACK.ADD;
98: APP_EXCEPTION.RAISE_EXCEPTION;
99: END IF;
100: -- Validate IGS_PS_UNIT level.
102: -- As part of the bug# 1956374 changed to the below call from IGS_PS_VAL_CUL.crsp_val_unit_lvl
103: IF IGS_PS_VAL_UV.crsp_val_unit_lvl (
104: new_references.unit_level,
105: v_message_name) = FALSE THEN
106: FND_MESSAGE.SET_NAME('IGS',v_message_name);
107: IGS_GE_MSG_STACK.ADD;
108: APP_EXCEPTION.RAISE_EXCEPTION;
109: END IF;
110: END IF;
164: BEGIN
165: OPEN cur_rowid;
166: FETCH cur_rowid INTO lv_rowid;
167: IF cur_rowid%FOUND THEN
168: FND_MESSAGE.SET_NAME ('IGS', 'IGS_PR_PRA_CRV_FK');
169: IGS_GE_MSG_STACK.ADD;
170: CLOSE CUR_ROWID;
171: APP_EXCEPTION.RAISE_EXCEPTION;
172: RETURN;
192: IF upper(column_name)= 'UNIT_CD' OR
193: column_name is null THEN
194: IF new_references.unit_cd <> UPPER(new_references.unit_cd)
195: THEN
196: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
197: IGS_GE_MSG_STACK.ADD;
198: App_Exception.Raise_Exception;
199: END IF;
200: END IF;
202: IF upper(column_name)= 'UNIT_LEVEL' OR
203: column_name is null THEN
204: IF new_references.unit_level <> UPPER(new_references.unit_level)
205: THEN
206: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
207: IGS_GE_MSG_STACK.ADD;
208: App_Exception.Raise_Exception;
209: END IF;
210: END IF;
213: column_name is null THEN
214: IF new_references.wam_weighting < 0 OR
215: new_references.wam_weighting > 99999.99
216: THEN
217: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
218: IGS_GE_MSG_STACK.ADD;
219: App_Exception.Raise_Exception;
220: END IF;
221: END IF;
231: ELSE
232: IF NOT IGS_PS_UNIT_LEVEL_PKG.Get_PK_For_Validation (
233: new_references.unit_level
234: )THEN
235: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
236: IGS_GE_MSG_STACK.ADD;
237: App_Exception.Raise_Exception;
238: END IF;
239: END IF;
247: IF NOT IGS_PS_UNIT_VER_PKG.Get_PK_For_Validation (
248: new_references.unit_cd,
249: new_references.version_number
250: )THEN
251: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
252: IGS_GE_MSG_STACK.ADD;
253: App_Exception.Raise_Exception;
254: END IF;
255: END IF;
261: ELSE
262: IF NOT IGS_PS_VER_PKG.Get_PK_For_Validation (
263: new_references.course_cd,
264: new_references.course_version_number) THEN
265: FND_MESSAGE.SET_NAME('FND','FORM_RECORD_DELETED');
266: IGS_GE_MSG_STACK.ADD;
267: APP_EXCEPTION.RAISE_EXCEPTION;
268: END IF;
269: END IF;
319: Open cur_rowid;
320: Fetch cur_rowid INTO lv_rowid;
321: IF (cur_rowid%FOUND) THEN
322: Close cur_rowid;
323: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CUL_UV_FK');
324: IGS_GE_MSG_STACK.ADD;
325: App_Exception.Raise_Exception;
326: Return;
327: END IF;
372: new_references.unit_cd,
373: new_references.version_number,
374: new_references.course_cd,
375: new_references.course_version_number) THEN
376: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
377: IGS_GE_MSG_STACK.ADD;
378: App_Exception.Raise_Exception;
379: END IF;
380: Check_Constraints;
392: new_references.unit_cd,
393: new_references.version_number,
394: new_references.course_cd,
395: new_references.course_version_number) THEN
396: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
397: IGS_GE_MSG_STACK.ADD;
398: App_Exception.Raise_Exception;
399: END IF;
400: Check_Constraints;
451: if X_LAST_UPDATE_LOGIN is NULL then
452: X_LAST_UPDATE_LOGIN := -1;
453: end if;
454: else
455: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
456: IGS_GE_MSG_STACK.ADD;
457: app_exception.raise_exception;
458: end if;
459: Before_DML( p_action => 'INSERT',
536: open c1;
537: fetch c1 into tlinfo;
538: if (c1%notfound) then
539: close c1;
540: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
541: app_exception.raise_exception;
542: return;
543: end if;
544: close c1;
550:
551: ) then
552: null;
553: else
554: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
555: app_exception.raise_exception;
556: end if;
557: return;
558: end LOCK_ROW;
586: if X_LAST_UPDATE_LOGIN is NULL then
587: X_LAST_UPDATE_LOGIN := -1;
588: end if;
589: else
590: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
591: IGS_GE_MSG_STACK.ADD;
592: app_exception.raise_exception;
593: end if;
594: Before_DML( p_action => 'UPDATE',