[Home] [Help]
54: Open cur_old_ref_values;
55: Fetch cur_old_ref_values INTO old_references;
56: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
57: Close cur_old_ref_values;
58: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
59: IGS_GE_MSG_STACK.ADD;
60: App_Exception.Raise_Exception;
61: Return;
62: END IF;
148: IF IGS_PS_VAL_CRS.CRSP_VAL_IUD_CRV_DTL(
149: v_course_cd,
150: v_version_number,
151: v_message_name) = FALSE THEN
152: Fnd_Message.Set_Name('IGS',v_message_name);
153: IGS_GE_MSG_STACK.ADD;
154: App_Exception.Raise_Exception;
155: END IF;
156: -- Validate calendar instance is active
157: IF igs_as_val_uai.crsp_val_crs_ci (
158: v_cal_type,
159: v_ci_sequence_number,
160: v_message_name) = FALSE THEN
161: Fnd_Message.Set_Name('IGS',v_message_name);
162: IGS_GE_MSG_STACK.ADD;
163: App_Exception.Raise_Exception;
164: END IF;
165: -- Validate that inserts are allowed
173: new_references.location_cd,
174: new_references.attendance_mode,
175: new_references.attendance_type,
176: v_message_name) = FALSE THEN
177: Fnd_Message.Set_Name('IGS',v_message_name);
178: IGS_GE_MSG_STACK.ADD;
179: App_Exception.Raise_Exception;
180: END IF;
181: END IF;
184: IF IGS_PS_VAL_COI.crsp_val_ent_ass_scr(
185: new_references.min_entry_ass_score,
186: new_references.guaranteed_entry_ass_scr,
187: v_message_name) = FALSE THEN
188: Fnd_Message.Set_Name('IGS',v_message_name);
189: IGS_GE_MSG_STACK.ADD;
190: App_Exception.Raise_Exception;
191: END IF;
192: END IF;
199: BEGIN
200: IF Get_UK_For_Validation(
201: new_references.cop_id
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: END Check_Uniqueness;
254: IF upper(column_name) = 'ATTENDANCE_MODE' OR
255: column_name is null THEN
256: IF new_references.attendance_mode <> UPPER(new_references.attendance_mode)
257: THEN
258: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
259: IGS_GE_MSG_STACK.ADD;
260: App_Exception.Raise_Exception;
261: END IF;
262: END IF;
264: IF upper(column_name)= 'ATTENDANCE_TYPE' OR
265: column_name is null THEN
266: IF new_references.attendance_type <> UPPER(new_references.attendance_type)
267: THEN
268: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
269: IGS_GE_MSG_STACK.ADD;
270: App_Exception.Raise_Exception;
271: END IF;
272: END IF;
274: IF upper(column_name)= 'CAL_TYPE' OR
275: column_name is null THEN
276: IF new_references.cal_type <> UPPER(new_references.cal_type)
277: THEN
278: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
279: IGS_GE_MSG_STACK.ADD;
280: App_Exception.Raise_Exception;
281: END IF;
282: END IF;
284: IF upper(column_name)= 'COURSE_CD' OR
285: column_name is null THEN
286: IF new_references.course_cd <> UPPER(new_references.course_cd)
287: THEN
288: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
289: IGS_GE_MSG_STACK.ADD;
290: App_Exception.Raise_Exception;
291: END IF;
292: END IF;
294: IF upper(column_name)= 'GRADING_SCHEMA_CD' OR
295: column_name is null THEN
296: IF new_references.grading_schema_cd <> UPPER(new_references.grading_schema_cd)
297: THEN
298: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
299: IGS_GE_MSG_STACK.ADD;
300: App_Exception.Raise_Exception;
301: END IF;
302: END IF;
304: IF upper(column_name)= 'LOCATION_CD' OR
305: column_name is null THEN
306: IF new_references.location_cd <> UPPER(new_references.location_cd)
307: THEN
308: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
309: IGS_GE_MSG_STACK.ADD;
310: App_Exception.Raise_Exception;
311: END IF;
312: END IF;
314: IF upper(column_name)= 'PRE_ENROL_UNITS_IND' OR
315: column_name is null THEN
316: IF new_references.pre_enrol_units_ind NOT IN ( 'Y' , 'N' )
317: THEN
318: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
319: IGS_GE_MSG_STACK.ADD;
320: App_Exception.Raise_Exception;
321: END IF;
322: END IF;
325: IF upper(column_name)= 'ENROLLABLE_IND' OR
326: column_name is null THEN
327: IF new_references.enrollable_ind NOT IN ( 'Y' , 'N' )
328: THEN
329: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
330: IGS_GE_MSG_STACK.ADD;
331: App_Exception.Raise_Exception;
332: END IF;
333: END IF;
335: IF upper(column_name)= 'IVRS_AVAILABLE_IND' OR
336: column_name is null THEN
337: IF new_references.ivrs_available_ind NOT IN ( 'Y' , 'N' )
338: THEN
339: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
340: IGS_GE_MSG_STACK.ADD;
341: App_Exception.Raise_Exception;
342: END IF;
343: END IF;
346: column_name is null THEN
347: IF new_references.min_entry_ass_score < 1 OR
348: new_references.min_entry_ass_score > 999
349: THEN
350: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
351: IGS_GE_MSG_STACK.ADD;
352: App_Exception.Raise_Exception;
353: END IF;
354: END IF;
356:
357: IF column_name is null THEN
358: IF new_references.min_entry_ass_score > new_references.guaranteed_entry_ass_scr
359: THEN
360: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
361: IGS_GE_MSG_STACK.ADD;
362: App_Exception.Raise_Exception;
363: END IF;
364: END IF;
367: column_name is null THEN
368: IF new_references.guaranteed_entry_ass_scr <1 OR
369: new_references.guaranteed_entry_ass_scr > 999
370: THEN
371: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
372: IGS_GE_MSG_STACK.ADD;
373: App_Exception.Raise_Exception;
374: END IF;
375: END IF;
378: column_name is null THEN
379: IF new_references.max_cross_faculty_cp <0.001 OR --Changes as per Bug# 2022150
380: new_references.max_cross_faculty_cp > 999.999
381: THEN
382: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
383: IGS_GE_MSG_STACK.ADD;
384: App_Exception.Raise_Exception;
385: END IF;
386: END IF;
389: column_name is null THEN
390: IF new_references.max_cross_location_cp <0.001 OR
391: new_references.max_cross_location_cp > 999.999
392: THEN
393: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
394: IGS_GE_MSG_STACK.ADD;
395: App_Exception.Raise_Exception;
396: END IF;
397: END IF;
400: column_name is null THEN
401: IF new_references.max_cross_mode_cp < 0.001 OR
402: new_references.max_cross_mode_cp > 999.999
403: THEN
404: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
405: IGS_GE_MSG_STACK.ADD;
406: App_Exception.Raise_Exception;
407: END IF;
408: END IF;
411: column_name is null THEN
412: IF new_references.max_hist_cross_faculty_cp < 0.001 OR
413: new_references.max_hist_cross_faculty_cp > 999.999
414: THEN
415: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
416: IGS_GE_MSG_STACK.ADD;
417: App_Exception.Raise_Exception;
418: END IF;
419: END IF;
421: IF upper(column_name)= 'OFFERED_IND' OR
422: column_name is null THEN
423: IF new_references.offered_ind NOT IN ( 'Y' , 'N' )
424: THEN
425: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
426: IGS_GE_MSG_STACK.ADD;
427: App_Exception.Raise_Exception;
428: END IF;
429: END IF;
431: IF upper(column_name)= 'CONFIRMED_OFFERING_IND' OR
432: column_name is null THEN
433: IF new_references.confirmed_offering_ind NOT IN ( 'Y' , 'N' )
434: THEN
435: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
436: IGS_GE_MSG_STACK.ADD;
437: App_Exception.Raise_Exception;
438: END IF;
439: END IF;
441: IF upper(column_name)= 'ENTRY_POINT_IND' OR
442: column_name is null THEN
443: IF new_references.entry_point_ind NOT IN ( 'Y' , 'N' )
444: THEN
445: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
446: IGS_GE_MSG_STACK.ADD;
447: App_Exception.Raise_Exception;
448: END IF;
449: END IF;
468: new_references.version_number,
469: new_references.cal_type,
470: new_references.ci_sequence_number
471: )THEN
472: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
473: IGS_GE_MSG_STACK.ADD;
474: App_Exception.Raise_Exception;
475: END IF;
476: END IF;
496: new_references.location_cd,
497: new_references.attendance_mode,
498: new_references.attendance_type
499: )THEN
500: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
501: IGS_GE_MSG_STACK.ADD;
502: App_Exception.Raise_Exception;
503: END IF;
504: END IF;
509: ELSE
510: IF NOT IGS_PS_OFR_OPT_PKG.Get_UK_For_Validation (
511: new_references.coo_id
512: )THEN
513: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
514: IGS_GE_MSG_STACK.ADD;
515: App_Exception.Raise_Exception;
516: END IF;
517: END IF;
525: IF NOT IGS_AS_GRD_SCHEMA_PKG.Get_PK_For_Validation (
526: new_references.grading_schema_cd,
527: new_references.gs_version_number
528: )THEN
529: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
530: IGS_GE_MSG_STACK.ADD;
531: App_Exception.Raise_Exception;
532: END IF;
533: END IF;
538: ELSE
539: IF NOT IGS_PE_PERSON_PKG.Get_PK_For_Validation (
540: new_references.adm_ass_officer_person_id
541: )THEN
542: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
543: IGS_GE_MSG_STACK.ADD;
544: App_Exception.Raise_Exception;
545: END IF;
546: END IF;
551: ELSE
552: IF NOT IGS_PE_PERSON_PKG.Get_PK_For_Validation (
553: new_references.adm_contact_person_id
554: )THEN
555: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
556: IGS_GE_MSG_STACK.ADD;
557: App_Exception.Raise_Exception;
558: END IF;
559: END IF;
678: Open cur_rowid;
679: Fetch cur_rowid INTO lv_rowid;
680: IF (cur_rowid%FOUND) THEN
681: Close cur_rowid;
682: Fnd_Message.Set_Name ('IGS', 'IGS_PS_COP_COI_FK');
683: IGS_GE_MSG_STACK.ADD;
684: App_Exception.Raise_Exception;
685: Return;
686: END IF;
714: Open cur_rowid;
715: Fetch cur_rowid INTO lv_rowid;
716: IF (cur_rowid%FOUND) THEN
717: Close cur_rowid;
718: Fnd_Message.Set_Name ('IGS', 'IGS_PS_COP_COO_FK');
719: IGS_GE_MSG_STACK.ADD;
720: App_Exception.Raise_Exception;
721: Return;
722: END IF;
740: Open cur_rowid;
741: Fetch cur_rowid INTO lv_rowid;
742: IF (cur_rowid%FOUND) THEN
743: Close cur_rowid;
744: Fnd_Message.Set_Name ('IGS', 'IGS_PS_COP_COO_FK');
745: IGS_GE_MSG_STACK.ADD;
746: App_Exception.Raise_Exception;
747: Return;
748: END IF;
768: Open cur_rowid;
769: Fetch cur_rowid INTO lv_rowid;
770: IF (cur_rowid%FOUND) THEN
771: Close cur_rowid;
772: Fnd_Message.Set_Name ('IGS', 'IGS_PS_COP_GS_FK');
773: IGS_GE_MSG_STACK.ADD;
774: App_Exception.Raise_Exception;
775: Return;
776: END IF;
795: Open cur_rowid;
796: Fetch cur_rowid INTO lv_rowid;
797: IF (cur_rowid%FOUND) THEN
798: Close cur_rowid;
799: Fnd_Message.Set_Name ('IGS', 'IGS_PS_COP_PE_AAO_FK');
800: IGS_GE_MSG_STACK.ADD;
801: App_Exception.Raise_Exception;
802: Return;
803: END IF;
887: new_references.location_cd ,
888: new_references.attendance_mode ,
889: new_references.attendance_type
890: ) THEN
891: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
892: IGS_GE_MSG_STACK.ADD;
893: App_Exception.Raise_Exception;
894: END IF;
895: Check_Uniqueness;
915: new_references.location_cd ,
916: new_references.attendance_mode ,
917: new_references.attendance_type
918: ) THEN
919: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
920: IGS_GE_MSG_STACK.ADD;
921: App_Exception.Raise_Exception;
922: END IF;
923: Check_Uniqueness;
1012: ELSE
1013: X_PROGRAM_UPDATE_DATE := SYSDATE;
1014: END IF;
1015: else
1016: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
1017: IGS_GE_MSG_STACK.ADD;
1018: app_exception.raise_exception;
1019: end if;
1020: Before_DML (
1193: open c1;
1194: fetch c1 into tlinfo;
1195: if (c1%notfound) then
1196: close c1;
1197: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
1198: IGS_GE_MSG_STACK.ADD;
1199: app_exception.raise_exception;
1200: return;
1201: end if;
1241: AND (X_GS_VERSION_NUMBER is null)))
1242: ) then
1243: null;
1244: else
1245: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
1246: IGS_GE_MSG_STACK.ADD;
1247: app_exception.raise_exception;
1248: end if;
1249: return;
1299: if X_LAST_UPDATE_LOGIN is NULL then
1300: X_LAST_UPDATE_LOGIN := -1;
1301: end if;
1302: else
1303: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
1304: IGS_GE_MSG_STACK.ADD;
1305: app_exception.raise_exception;
1306: end if;
1307: