[Home] [Help]
43: Fetch cur_old_ref_values INTO old_references;
44: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
45: Close cur_old_ref_values;
46: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
47: IGS_GE_MSG_STACK.ADD;
48: App_Exception.Raise_Exception;
49: Return;
50: END IF;
51: Close cur_old_ref_values;
105: IF IGS_PS_VAL_CTY.crsp_val_cty_govt (
106: new_references.govt_course_type,
107: v_message_name) = FALSE THEN
108: Fnd_Message.Set_Name('IGS',v_message_name);
109: IGS_GE_MSG_STACK.ADD;
110: App_Exception.Raise_Exception;
111: END IF;
112: END IF;
113: -- Validate IGS_PS_COURSE type group code.
120: IF IGS_PS_VAL_CTY.crsp_val_cty_group (
121: new_references.course_type_group_cd,
122: v_message_name) = FALSE THEN
123: Fnd_Message.Set_Name('IGS',v_message_name);
124: IGS_GE_MSG_STACK.ADD;
125: App_Exception.Raise_Exception;
126: END IF;
127: END IF;
128: -- Validate the IGS_PS_AWD IGS_PS_COURSE indicator.
132: new_references.course_type,
133: new_references.award_course_ind,
134: v_message_name) = FALSE THEN
135: Fnd_Message.Set_Name('IGS',v_message_name);
136: IGS_GE_MSG_STACK.ADD;
137: App_Exception.Raise_Exception;
138: END IF;
139: END IF;
140: -- Create history record.
242: column_name is null THEN
243: IF new_references.course_type <> UPPER(new_references.course_type )
244: THEN
245: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
246: IGS_GE_MSG_STACK.ADD;
247: App_Exception.Raise_Exception;
248: END IF;
249: END IF;
250:
252: column_name is null THEN
253: IF new_references.course_type_group_cd <> UPPER(new_references.course_type_group_cd )
254: THEN
255: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
256: IGS_GE_MSG_STACK.ADD;
257: App_Exception.Raise_Exception;
258: END IF;
259: END IF;
260:
262: column_name is null THEN
263: IF new_references.tac_course_level <> UPPER(new_references.tac_course_level)
264: THEN
265: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
266: IGS_GE_MSG_STACK.ADD;
267: App_Exception.Raise_Exception;
268: END IF;
269: END IF;
270:
272: column_name is null THEN
273: IF new_references.research_type_ind NOT IN ( 'Y' , 'N' )
274: THEN
275: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
276: IGS_GE_MSG_STACK.ADD;
277: App_Exception.Raise_Exception;
278: END IF;
279: END IF;
280:
282: column_name is null THEN
283: IF new_references.closed_ind NOT IN ( 'Y' , 'N' )
284: THEN
285: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
286: IGS_GE_MSG_STACK.ADD;
287: App_Exception.Raise_Exception;
288: END IF;
289: END IF;
290:
292: column_name is null THEN
293: IF new_references.award_course_ind NOT IN ( 'Y' , 'N' )
294: THEN
295: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
296: IGS_GE_MSG_STACK.ADD;
297: App_Exception.Raise_Exception;
298: END IF;
299: END IF;
300: END Check_Constraints;
309: IF NOT IGS_PS_TYPE_GRP_PKG.Get_PK_For_Validation (
310: new_references.course_type_group_cd
311: )THEN
312: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
313: IGS_GE_MSG_STACK.ADD;
314: App_Exception.Raise_Exception;
315: END IF;
316: END IF;
317:
322: IF NOT IGS_PS_GOVT_TYPE_PKG.Get_PK_For_Validation (
323: new_references.govt_course_type
324: )THEN
325: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
326: IGS_GE_MSG_STACK.ADD;
327: App_Exception.Raise_Exception;
328: END IF;
329: END IF;
330: --Added new foreign key column enrolment_cat as a part of self service setup build enh bug #2043044
335: IF NOT IGS_EN_ENROLMENT_CAT_PKG.Get_PK_For_Validation (
336: new_references.enrolment_cat
337: )THEN
338: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
339: IGS_GE_MSG_STACK.ADD;
340: App_Exception.Raise_Exception;
341: END IF;
342: END IF;
343:
386: Fetch cur_rowid INTO lv_rowid;
387: IF (cur_rowid%FOUND) THEN
388: Close cur_rowid;
389: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CTY_CTG_FK');
390: IGS_GE_MSG_STACK.ADD;
391: App_Exception.Raise_Exception;
392: Return;
393: END IF;
394: Close cur_rowid;
412: Fetch cur_rowid INTO lv_rowid;
413: IF (cur_rowid%FOUND) THEN
414: Close cur_rowid;
415: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CTY_GCT_FK');
416: IGS_GE_MSG_STACK.ADD;
417: App_Exception.Raise_Exception;
418: Return;
419: END IF;
420: Close cur_rowid;
437: Fetch cur_rowid INTO lv_rowid;
438: IF (cur_rowid%FOUND) THEN
439: Close cur_rowid;
440: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CTY_CTG_FK');
441: IGS_GE_MSG_STACK.ADD;
442: App_Exception.Raise_Exception;
443: Return;
444: END IF;
445: Close cur_rowid;
499: IF Get_PK_For_Validation(
500: new_references.course_type
501: ) THEN
502: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
503: IGS_GE_MSG_STACK.ADD;
504: App_Exception.Raise_Exception;
505: END IF;
506: Check_Constraints;
507: Check_Parent_Existance;
514: IF Get_PK_For_Validation(
515: new_references.course_type
516: ) THEN
517: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
518: IGS_GE_MSG_STACK.ADD;
519: App_Exception.Raise_Exception;
520: END IF;
521: Check_Constraints;
522: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
572: X_LAST_UPDATE_LOGIN := -1;
573: end if;
574: else
575: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
576: IGS_GE_MSG_STACK.ADD;
577: app_exception.raise_exception;
578: end if;
579: Before_DML( p_action => 'INSERT',
580: x_rowid => X_ROWID,
683: fetch c1 into tlinfo;
684: if (c1%notfound) then
685: close c1;
686: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
687: IGS_GE_MSG_STACK.ADD;
688: app_exception.raise_exception;
689: return;
690: end if;
691: close c1;
713: ) then
714: null;
715: else
716: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
717: IGS_GE_MSG_STACK.ADD;
718: app_exception.raise_exception;
719: end if;
720: return;
721: end LOCK_ROW;
752: X_LAST_UPDATE_LOGIN := -1;
753: end if;
754: else
755: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
756: IGS_GE_MSG_STACK.ADD;
757: app_exception.raise_exception;
758: end if;
759: Before_DML( p_action => 'UPDATE',
760: x_rowid => X_ROWID,