[Home] [Help]
58: OPEN cur_old_ref_values;
59: FETCH cur_old_ref_values INTO old_references;
60: IF (cur_old_ref_values%NOTFOUND)
61: AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
62: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
63: igs_ge_msg_stack.ADD;
64: CLOSE cur_old_ref_values;
65: app_exception.raise_exception;
66: RETURN;
127: IF igs_as_val_uai.assp_val_ai_exists (
128: new_references.ass_id,
129: v_message_name
130: ) = FALSE THEN
131: fnd_message.set_name ('IGS', v_message_name);
132: igs_ge_msg_stack.ADD;
133: app_exception.raise_exception;
134: END IF;
135: --<
141: new_references.unit_cd,
142: new_references.version_number,
143: v_message_name
144: ) = FALSE THEN
145: fnd_message.set_name ('IGS', v_message_name);
146: igs_ge_msg_stack.ADD;
147: app_exception.raise_exception;
148: END IF;
149: --<
155: new_references.cal_type,
156: new_references.ci_sequence_number,
157: v_message_name
158: ) = FALSE THEN
159: fnd_message.set_name ('IGS', v_message_name);
160: igs_ge_msg_stack.ADD;
161: app_exception.raise_exception;
162: END IF;
163: --<
171: )
172: OR igs_as_gen_002.assp_get_ai_s_type (new_references.ass_id) =
173: 'ASSIGNMENT'
174: ) THEN
175: fnd_message.set_name ('IGS', 'IGS_AS_REF_ASSITEM_EXAM');
176: igs_ge_msg_stack.ADD;
177: app_exception.raise_exception;
178: END IF;
179: --<
187: new_references.cal_type,
188: new_references.ci_sequence_number,
189: v_message_name
190: ) = FALSE THEN
191: fnd_message.set_name ('IGS', v_message_name);
192: igs_ge_msg_stack.ADD;
193: app_exception.raise_exception;
194: END IF;
195: END IF;
200: IF igs_as_val_uai.crsp_val_uo_cal_type (
201: new_references.cal_type,
202: v_message_name
203: ) = FALSE THEN
204: fnd_message.set_name ('IGS', v_message_name);
205: igs_ge_msg_stack.ADD;
206: app_exception.raise_exception;
207: END IF;
208: --<
297: new_references.REFERENCE,
298: new_references.ass_id,
299: v_message_name
300: ) = FALSE THEN
301: fnd_message.set_name ('IGS', v_message_name);
302: igs_ge_msg_stack.ADD;
303: app_exception.raise_exception;
304: END IF;
305: ELSE
320: new_references.ass_id,
321: igs_as_gen_001.assp_get_ai_a_type (new_references.ass_id),
322: v_message_name
323: ) = FALSE THEN
324: fnd_message.set_name ('IGS', v_message_name);
325: igs_ge_msg_stack.ADD;
326: app_exception.raise_exception;
327: END IF;
328: END IF;
341: IF NOT (igs_as_assessmnt_itm_pkg.get_pk_for_validation (
342: new_references.ass_id
343: )
344: ) THEN
345: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
346: igs_ge_msg_stack.ADD;
347: app_exception.raise_exception;
348: END IF;
349: END IF;
355: IF NOT (igs_ca_type_pkg.get_pk_for_validation (
356: new_references.exam_cal_type
357: )
358: ) THEN
359: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
360: igs_ge_msg_stack.ADD;
361: app_exception.raise_exception;
362: END IF;
363: END IF;
376: new_references.exam_cal_type,
377: new_references.exam_ci_sequence_number
378: )
379: ) THEN
380: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
381: igs_ge_msg_stack.ADD;
382: app_exception.raise_exception;
383: END IF;
384: END IF;
400: IF NOT (igs_as_unit_ai_grp_pkg.get_pk_for_validation (
401: new_references.unit_ass_item_group_id
402: )
403: ) THEN
404: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
405: igs_ge_msg_stack.ADD;
406: app_exception.raise_exception;
407: END IF;
408: END IF;
438: IF UPPER (column_name) = 'CI_SEQUENCE_NUMBER'
439: OR column_name IS NULL THEN
440: IF new_references.ci_sequence_number < 1
441: AND new_references.ci_sequence_number > 999999 THEN
442: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
443: igs_ge_msg_stack.ADD;
444: app_exception.raise_exception;
445: END IF;
446: END IF;
447: IF UPPER (column_name) = 'SEQUENCE_NUMBER'
448: OR column_name IS NULL THEN
449: IF new_references.sequence_number < 1
450: AND new_references.sequence_number > 999999 THEN
451: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
452: igs_ge_msg_stack.ADD;
453: app_exception.raise_exception;
454: END IF;
455: END IF;
456: IF UPPER (column_name) = 'EXAM_CI_SEQUENCE_NUMBER'
457: OR column_name IS NULL THEN
458: IF new_references.exam_ci_sequence_number < 1
459: AND new_references.exam_ci_sequence_number > 999999 THEN
460: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
461: igs_ge_msg_stack.ADD;
462: app_exception.raise_exception;
463: END IF;
464: END IF;
465: IF UPPER (column_name) = 'DFLT_ITEM_IND'
466: OR column_name IS NULL THEN
467: IF new_references.dflt_item_ind <> UPPER (new_references.dflt_item_ind)
468: OR new_references.dflt_item_ind NOT IN ('Y', 'N') THEN
469: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
470: igs_ge_msg_stack.ADD;
471: app_exception.raise_exception;
472: END IF;
473: END IF;
473: END IF;
474: IF UPPER (column_name) = 'CAL_TYPE'
475: OR column_name IS NULL THEN
476: IF new_references.cal_type <> UPPER (new_references.cal_type) THEN
477: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
478: igs_ge_msg_stack.ADD;
479: app_exception.raise_exception;
480: END IF;
481: END IF;
481: END IF;
482: IF UPPER (column_name) = 'DFLT_ITEM_IND'
483: OR column_name IS NULL THEN
484: IF new_references.dflt_item_ind <> UPPER (new_references.dflt_item_ind) THEN
485: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
486: igs_ge_msg_stack.ADD;
487: app_exception.raise_exception;
488: END IF;
489: END IF;
489: END IF;
490: IF UPPER (column_name) = 'EXAM_CAL_TYPE'
491: OR column_name IS NULL THEN
492: IF new_references.exam_cal_type <> UPPER (new_references.exam_cal_type) THEN
493: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
494: igs_ge_msg_stack.ADD;
495: app_exception.raise_exception;
496: END IF;
497: END IF;
497: END IF;
498: IF UPPER (column_name) = 'REFERENCE'
499: OR column_name IS NULL THEN
500: IF new_references.REFERENCE <> UPPER (new_references.REFERENCE) THEN
501: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
502: igs_ge_msg_stack.ADD;
503: app_exception.raise_exception;
504: END IF;
505: END IF;
505: END IF;
506: IF UPPER (column_name) = 'UNIT_CD'
507: OR column_name IS NULL THEN
508: IF new_references.unit_cd <> UPPER (new_references.unit_cd) THEN
509: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
510: igs_ge_msg_stack.ADD;
511: app_exception.raise_exception;
512: END IF;
513: END IF;
576: x_ci_sequence_number => new_references.ci_sequence_number,
577: x_ass_id => new_references.ass_id,
578: x_sequence_number => new_references.sequence_number
579: ) THEN
580: fnd_message.set_name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
581: igs_ge_msg_stack.ADD;
582: app_exception.raise_exception;
583: END IF;
584: END check_uniqueness;
592: BEGIN
593: OPEN cur_rowid;
594: FETCH cur_rowid INTO lv_rowid;
595: IF (cur_rowid%FOUND) THEN
596: fnd_message.set_name ('IGS', 'IGS_AS_UAI_AI_FK');
597: igs_ge_msg_stack.ADD;
598: CLOSE cur_rowid;
599: app_exception.raise_exception;
600: RETURN;
611: BEGIN
612: OPEN cur_rowid;
613: FETCH cur_rowid INTO lv_rowid;
614: IF (cur_rowid%FOUND) THEN
615: fnd_message.set_name ('IGS', 'IGS_AS_UAI_CAT_FK');
616: igs_ge_msg_stack.ADD;
617: CLOSE cur_rowid;
618: app_exception.raise_exception;
619: RETURN;
635: BEGIN
636: OPEN cur_rowid;
637: FETCH cur_rowid INTO lv_rowid;
638: IF (cur_rowid%FOUND) THEN
639: fnd_message.set_name ('IGS', 'IGS_AS_UAI_GS_FK');
640: igs_ge_msg_stack.ADD;
641: CLOSE cur_rowid;
642: app_exception.raise_exception;
643: RETURN;
658: BEGIN
659: OPEN cur_rowid;
660: FETCH cur_rowid INTO lv_rowid;
661: IF (cur_rowid%FOUND) THEN
662: fnd_message.set_name ('IGS', 'IGS_AS_UAI_CI_FK');
663: igs_ge_msg_stack.ADD;
664: CLOSE cur_rowid;
665: app_exception.raise_exception;
666: RETURN;
706: BEGIN
707: OPEN cur_rowid;
708: FETCH cur_rowid INTO lv_rowid;
709: IF (cur_rowid%FOUND) THEN
710: fnd_message.set_name ('IGS', 'IGS_AS_UAI_UOP_FK');
711: igs_ge_msg_stack.ADD;
712: CLOSE cur_rowid;
713: app_exception.raise_exception;
714: RETURN;
727: BEGIN
728: OPEN cur_rowid;
729: FETCH cur_rowid INTO lv_rowid;
730: IF (cur_rowid%FOUND) THEN
731: fnd_message.set_name ('IGS', 'IGS_AS_UAI_UAIG_FK');
732: igs_ge_msg_stack.ADD;
733: CLOSE cur_rowid;
734: app_exception.raise_exception;
735: RETURN;
818: -- Call all the procedures related to Before Insert.
819: beforerowinsertupdate1 (p_inserting => TRUE);
820: beforerowinsertupdate2 (p_inserting => TRUE);
821: IF get_pk_for_validation (new_references.unit_ass_item_id) THEN
822: fnd_message.set_name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
823: igs_ge_msg_stack.ADD;
824: app_exception.raise_exception;
825: END IF;
826: check_uniqueness;
837: -- Call all the procedures related to Before Delete.
838: NULL;
839: ELSIF (p_action = 'VALIDATE_INSERT') THEN
840: IF get_pk_for_validation (new_references.unit_ass_item_id) THEN
841: fnd_message.set_name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
842: igs_ge_msg_stack.ADD;
843: app_exception.raise_exception;
844: END IF;
845: check_constraints;
938: ELSE
939: x_program_update_date := SYSDATE;
940: END IF;
941: ELSE
942: fnd_message.set_name ('FND', 'SYSTEM-INVALID ARGS');
943: igs_ge_msg_stack.ADD;
944: app_exception.raise_exception;
945: END IF;
946: before_dml (
1096: BEGIN
1097: OPEN c1;
1098: FETCH c1 INTO tlinfo;
1099: IF (c1%NOTFOUND) THEN
1100: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
1101: igs_ge_msg_stack.ADD;
1102: CLOSE c1;
1103: app_exception.raise_exception;
1104: RETURN;
1183: )
1184: ) THEN
1185: NULL;
1186: ELSE
1187: fnd_message.set_name ('FND', 'FORM_RECORD_CHANGED');
1188: igs_ge_msg_stack.ADD;
1189: app_exception.raise_exception;
1190: END IF;
1191:
1245: IF x_last_update_login IS NULL THEN
1246: x_last_update_login := -1;
1247: END IF;
1248: ELSE
1249: fnd_message.set_name ('FND', 'SYSTEM-INVALID ARGS');
1250: igs_ge_msg_stack.ADD;
1251: app_exception.raise_exception;
1252: END IF;
1253: before_dml (