[Home] [Help]
31: l_error_flag := 'N';
32:
33: --Validating the mandatory parameters.
34: IF p_sca_re_rec.person_number IS NULL THEN
35: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PER_NUM_NULL');
36: FND_MSG_PUB.ADD;
37: l_error_flag := 'Y';
38: END IF;
39:
37: l_error_flag := 'Y';
38: END IF;
39:
40: IF p_sca_re_rec.program_cd IS NULL THEN
41: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRGM_CD_NULL');
42: FND_MSG_PUB.ADD;
43: l_error_flag := 'Y';
44: END IF;
45:
43: l_error_flag := 'Y';
44: END IF;
45:
46: IF p_sca_re_rec.version_number IS NULL THEN
47: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_VER_NULL');
48: FND_MSG_PUB.ADD;
49: l_error_flag := 'Y';
50: END IF;
51:
49: l_error_flag := 'Y';
50: END IF;
51:
52: IF p_sca_re_rec.location_cd IS NULL THEN
53: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_LOC_NULL');
54: FND_MSG_PUB.ADD;
55: l_error_flag := 'Y';
56: END IF;
57:
55: l_error_flag := 'Y';
56: END IF;
57:
58: IF p_sca_re_rec.attendance_mode IS NULL THEN
59: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_ATT_MOD_NULL');
60: FND_MSG_PUB.ADD;
61: l_error_flag := 'Y';
62: END IF;
63:
61: l_error_flag := 'Y';
62: END IF;
63:
64: IF p_sca_re_rec.attendance_type IS NULL THEN
65: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_ATT_TYPE_NULL');
66: FND_MSG_PUB.ADD;
67: l_error_flag := 'Y';
68: END IF;
69:
99: p_attribute19 => p_sca_re_rec.attribute19 ,
100: p_attribute20 => p_sca_re_rec.attribute20 ,
101: p_desc_flex_name => 'IGS_EN_STDNT_ATT_FLEX'
102: ) THEN
103: FND_MESSAGE.SET_NAME( 'IGS','IGS_AD_INVALID_DESC_FLEX' );
104: FND_MSG_PUB.ADD;
105: l_error_flag := 'Y';
106: END IF ;
107: END IF;
114: EXCEPTION
115: WHEN OTHERS THEN
116: l_message_count := FND_MSG_PUB.COUNT_MSG;
117: FND_MSG_PUB.DELETE_MSG(l_message_count);
118: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_CD_UPPCASE');
119: FND_MSG_PUB.ADD;
120: l_error_flag := 'Y';
121: END;
122: END IF;
128: EXCEPTION
129: WHEN OTHERS THEN
130: l_message_count := FND_MSG_PUB.COUNT_MSG;
131: FND_MSG_PUB.DELETE_MSG(l_message_count);
132: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ACAD_CAL_UPPCASE');
133: FND_MSG_PUB.ADD;
134: l_error_flag := 'Y';
135: END;
136: END IF;
142: EXCEPTION
143: WHEN OTHERS THEN
144: l_message_count := FND_MSG_PUB.COUNT_MSG;
145: FND_MSG_PUB.DELETE_MSG(l_message_count);
146: FND_MESSAGE.SET_NAME('IGS','IGS_EN_LOC_CD_UCASE');
147: FND_MSG_PUB.ADD;
148: l_error_flag := 'Y';
149: END;
150: END IF;
156: EXCEPTION
157: WHEN OTHERS THEN
158: l_message_count := FND_MSG_PUB.COUNT_MSG;
159: FND_MSG_PUB.DELETE_MSG(l_message_count);
160: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_ATT_MODE_UCASE');
161: FND_MSG_PUB.ADD;
162: l_error_flag := 'Y';
163: END;
164: END IF;
170: EXCEPTION
171: WHEN OTHERS THEN
172: l_message_count := FND_MSG_PUB.COUNT_MSG;
173: FND_MSG_PUB.DELETE_MSG(l_message_count);
174: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_ATT_TYPE_UCASE');
175: FND_MSG_PUB.ADD;
176: l_error_flag := 'Y';
177: END;
178: END IF;
184: EXCEPTION
185: WHEN OTHERS THEN
186: l_message_count := FND_MSG_PUB.COUNT_MSG;
187: FND_MSG_PUB.DELETE_MSG(l_message_count);
188: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_CONF_IND_INVALID');
189: FND_MSG_PUB.ADD;
190: l_error_flag := 'Y';
191: END;
192: END IF;
199: EXCEPTION
200: WHEN OTHERS THEN
201: l_message_count := FND_MSG_PUB.COUNT_MSG;
202: FND_MSG_PUB.DELETE_MSG(l_message_count);
203: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_PRI_PRG_INVALID');
204: FND_MSG_PUB.ADD;
205: l_error_flag := 'Y';
206: END;
207: END IF;
212: EXCEPTION
213: WHEN OTHERS THEN
214: l_message_count := FND_MSG_PUB.COUNT_MSG;
215: FND_MSG_PUB.DELETE_MSG(l_message_count);
216: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_SRC_PRI_TYP_INVALID');
217: FND_MSG_PUB.ADD;
218: l_error_flag := 'Y';
219: END;
220: END IF;
226: EXCEPTION
227: WHEN OTHERS THEN
228: l_message_count := FND_MSG_PUB.COUNT_MSG;
229: FND_MSG_PUB.DELETE_MSG(l_message_count);
230: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_KEY_INVALID');
231: FND_MSG_PUB.ADD;
232: l_error_flag := 'Y';
233: END;
234: END IF;
240: EXCEPTION
241: WHEN OTHERS THEN
242: l_message_count := FND_MSG_PUB.COUNT_MSG;
243: FND_MSG_PUB.DELETE_MSG(l_message_count);
244: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_PROV_IND_INVALID');
245: FND_MSG_PUB.ADD;
246: l_error_flag := 'Y';
247: END;
248: END IF;
254: EXCEPTION
255: WHEN OTHERS THEN
256: l_message_count := FND_MSG_PUB.COUNT_MSG;
257: FND_MSG_PUB.DELETE_MSG(l_message_count);
258: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_DIS_REAS_INVALID');
259: FND_MSG_PUB.ADD;
260: l_error_flag := 'Y';
261: END;
262: END IF;
268: EXCEPTION
269: WHEN OTHERS THEN
270: l_message_count := FND_MSG_PUB.COUNT_MSG;
271: FND_MSG_PUB.DELETE_MSG(l_message_count);
272: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_FUND_UPPCASE');
273: FND_MSG_PUB.ADD;
274: l_error_flag := 'Y';
275: END;
276: END IF;
282: EXCEPTION
283: WHEN OTHERS THEN
284: l_message_count := FND_MSG_PUB.COUNT_MSG;
285: FND_MSG_PUB.DELETE_MSG(l_message_count);
286: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_EXM_LOC_UPPCASE');
287: FND_MSG_PUB.ADD;
288: l_error_flag := 'Y';
289: END;
290: END IF;
296: EXCEPTION
297: WHEN OTHERS THEN
298: l_message_count := FND_MSG_PUB.COUNT_MSG;
299: FND_MSG_PUB.DELETE_MSG(l_message_count);
300: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_NOM_YR_INVALID');
301: FND_MSG_PUB.ADD;
302: l_error_flag := 'Y';
303: END;
304: END IF;
310: EXCEPTION
311: WHEN OTHERS THEN
312: l_message_count := FND_MSG_PUB.COUNT_MSG;
313: FND_MSG_PUB.DELETE_MSG(l_message_count);
314: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_NOM_PER_UPPCASE');
315: FND_MSG_PUB.ADD;
316: l_error_flag := 'Y';
317: END;
318: END IF;
324: EXCEPTION
325: WHEN OTHERS THEN
326: l_message_count := FND_MSG_PUB.COUNT_MSG;
327: FND_MSG_PUB.DELETE_MSG(l_message_count);
328: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_RUL_IND_INVALID');
329: FND_MSG_PUB.ADD;
330: l_error_flag := 'Y';
331: END;
332: END IF;
338: EXCEPTION
339: WHEN OTHERS THEN
340: l_message_count := FND_MSG_PUB.COUNT_MSG;
341: FND_MSG_PUB.DELETE_MSG(l_message_count);
342: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_WAV_IND_INVALID');
343: FND_MSG_PUB.ADD;
344: l_error_flag := 'Y';
345: END;
346: END IF;
352: EXCEPTION
353: WHEN OTHERS THEN
354: l_message_count := FND_MSG_PUB.COUNT_MSG;
355: FND_MSG_PUB.DELETE_MSG(l_message_count);
356: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_PUB_OUT_INVALID');
357: FND_MSG_PUB.ADD;
358: l_error_flag := 'Y';
359: END;
360: END IF;
366: EXCEPTION
367: WHEN OTHERS THEN
368: l_message_count := FND_MSG_PUB.COUNT_MSG;
369: FND_MSG_PUB.DELETE_MSG(l_message_count);
370: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_CRS_RQR_CMP_IND_INVALID');
371: FND_MSG_PUB.ADD;
372: l_error_flag := 'Y';
373: END;
374: END IF;
380: EXCEPTION
381: WHEN OTHERS THEN
382: l_message_count := FND_MSG_PUB.COUNT_MSG;
383: FND_MSG_PUB.DELETE_MSG(l_message_count);
384: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_SYS_COMP_INVALID');
385: FND_MSG_PUB.ADD;
386: l_error_flag := 'Y';
387: END;
388: END IF;
394: EXCEPTION
395: WHEN OTHERS THEN
396: l_message_count := FND_MSG_PUB.COUNT_MSG;
397: FND_MSG_PUB.DELETE_MSG(l_message_count);
398: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_CORR_CAT_INALID');
399: FND_MSG_PUB.ADD;
400: l_error_flag := 'Y';
401: END;
402: END IF;
408: EXCEPTION
409: WHEN OTHERS THEN
410: l_message_count := FND_MSG_PUB.COUNT_MSG;
411: FND_MSG_PUB.DELETE_MSG(l_message_count);
412: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_HLP_GRP_IND_INVALID');
413: FND_MSG_PUB.ADD;
414: l_error_flag := 'Y';
415: END;
416: END IF;
422: EXCEPTION
423: WHEN OTHERS THEN
424: l_message_count := FND_MSG_PUB.COUNT_MSG;
425: FND_MSG_PUB.DELETE_MSG(l_message_count);
426: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_ADM_NOM_PG_INVALID');
427: FND_MSG_PUB.ADD;
428: l_error_flag := 'Y';
429: END;
430: END IF;
436: EXCEPTION
437: WHEN OTHERS THEN
438: l_message_count := FND_MSG_PUB.COUNT_MSG;
439: FND_MSG_PUB.DELETE_MSG(l_message_count);
440: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRG_MAN_OVR_IND_INVALID');
441: FND_MSG_PUB.ADD;
442: l_error_flag := 'Y';
443: END;
444: END IF;
450: EXCEPTION
451: WHEN OTHERS THEN
452: l_message_count := FND_MSG_PUB.COUNT_MSG;
453: FND_MSG_PUB.DELETE_MSG(l_message_count);
454: FND_MESSAGE.SET_NAME('IGS','IGS_RE_ATT_PER_INVALID');
455: FND_MSG_PUB.ADD;
456: l_error_flag := 'Y';
457: END;
458: END IF;
464: EXCEPTION
465: WHEN OTHERS THEN
466: l_message_count := FND_MSG_PUB.COUNT_MSG;
467: FND_MSG_PUB.DELETE_MSG(l_message_count);
468: FND_MESSAGE.SET_NAME('IGS','IGS_RE_GOVT_CD_UPPCASE');
469: FND_MSG_PUB.ADD;
470: l_error_flag := 'Y';
471: END;
472: END IF;
500: --Check whether student program attemt record is already exist in the database or not.
501: --If exist set the warning message and terminate the function
502: IF igs_en_stdnt_ps_att_pkg.get_pk_for_validation(x_person_id =>p_person_id,
503: x_course_cd =>p_sca_re_rec.program_cd) THEN
504: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PS_ATT_EXISTS');
505: FND_MSG_PUB.ADD;
506: RETURN 'P';
507: ELSE
508: --Check whether parent record is exist for the relative child record in student program attempt
512: IF NOT igs_ad_ps_appl_inst_pkg.get_pk_for_validation(x_person_id => p_person_id,
513: x_admission_appl_number => p_sca_re_rec.adm_admission_appl_number,
514: x_nominated_course_cd => p_sca_re_rec.adm_nominated_course_cd,
515: x_sequence_number => p_sca_re_rec.adm_sequence_number) THEN
516: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ADM_APP_DET_NOT_FOUND');
517: FND_MSG_PUB.ADD;
518: l_result_flag := 'E';
519: END IF;
520: END IF;
519: END IF;
520: END IF;
521: IF p_sca_re_rec.discontinuation_reason_cd IS NOT NULL THEN
522: IF NOT igs_en_dcnt_reasoncd_pkg.get_pk_for_validation(x_dcnt_reason_cd => p_sca_re_rec.discontinuation_reason_cd) THEN
523: FND_MESSAGE.SET_NAME('IGS','IGS_EN_DCNT_REAS_NOT_FOUND');
524: FND_MSG_PUB.ADD;
525: l_result_flag := 'E';
526: END IF;
527: END IF;
526: END IF;
527: END IF;
528: IF p_sca_re_rec.fee_cat IS NOT NULL THEN
529: IF NOT igs_fi_fee_cat_pkg.get_pk_for_validation(x_fee_cat => p_sca_re_rec.fee_cat) THEN
530: FND_MESSAGE.SET_NAME('IGS','IGS_EN_FEE_CAT_NOT_FOUND');
531: FND_MSG_PUB.ADD;
532: l_result_flag := 'E';
533: END IF;
534: END IF;
533: END IF;
534: END IF;
535: IF p_sca_re_rec.funding_source IS NOT NULL THEN
536: IF NOT igs_fi_fund_src_pkg.get_pk_for_validation(x_funding_source => p_sca_re_rec.funding_source) THEN
537: FND_MESSAGE.SET_NAME('IGS','IGS_EN_FUND_SRC_NOT_FOUND');
538: FND_MSG_PUB.ADD;
539: l_result_flag := 'E';
540: END IF;
541: END IF;
540: END IF;
541: END IF;
542: IF p_sca_re_rec.exam_location_cd IS NOT NULL THEN
543: IF NOT igs_ad_location_pkg.get_pk_for_validation(x_location_cd => p_sca_re_rec.exam_location_cd) THEN
544: FND_MESSAGE.SET_NAME('IGS','IGS_EN_EXAM_LOC_NOT_FOUND');
545: FND_MSG_PUB.ADD;
546: l_result_flag := 'E';
547: END IF;
548: END IF;
548: END IF;
549:
550: IF p_sca_re_rec.NOMINATED_COMPLETION_PERD IS NOT NULL THEN
551: IF NOT igs_en_nom_cmpl_prd_pkg.get_pk_for_validation(x_completion_perd => p_sca_re_rec.NOMINATED_COMPLETION_PERD ) THEN
552: FND_MESSAGE.SET_NAME('IGS','IGS_EN_NOM_CMPL_PRD_NOT_FOUND');
553: FND_MSG_PUB.ADD;
554: l_result_flag := 'E';
555: END IF;
556: END IF;
556: END IF;
557:
558: IF p_sca_re_rec.CORRESPONDENCE_CAT IS NOT NULL THEN
559: IF NOT IGS_CO_CAT_PKG.get_pk_for_validation(x_correspondence_cat => p_sca_re_rec.CORRESPONDENCE_CAT ) THEN
560: FND_MESSAGE.SET_NAME('IGS','IGS_EN_CO_CAT_NOT_FOUND');
561: FND_MSG_PUB.ADD;
562: l_result_flag := 'E';
563: END IF;
564: END IF;
564: END IF;
565:
566: IF p_sca_re_rec.primary_prog_type_source IS NOT NULL THEN
567: IF NOT igs_lookups_view_pkg.get_pk_for_validation('IGS_EN_PP_SOURCE',p_sca_re_rec.primary_prog_type_source) THEN
568: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PRI_PRG_TYP_NOT_FOUND');
569: FND_MSG_PUB.ADD;
570: l_result_flag := 'E';
571: END IF;
572: END IF;
606: END IF;
607: IF NOT igs_en_gen_legacy.val_sca_start_dt(p_student_confirmed_ind => p_sca_re_rec.student_confirmed_ind,
608: p_commencement_dt => p_sca_re_rec.commencement_dt) THEN
609: l_validation_success := FALSE;
610: FND_MESSAGE.SET_NAME('IGS','IGS_EN_SCA_COMM_DT_INVALID');
611: FND_MSG_PUB.ADD;
612: END IF;
613:
614: --Validates the discontinuation of student program attempt.
644: END IF;
645: IF p_sca_re_rec.discontinued_dt IS NOT NULL THEN
646: IF NOT igs_en_gen_legacy.val_sca_disc_date(p_discontinued_dt => p_sca_re_rec.discontinued_dt) THEN
647: l_validation_success := FALSE;
648: FND_MESSAGE.SET_NAME('IGS','IGS_EN_SCA_DISC_DT_NOT_FUTURE');
649: FND_MSG_PUB.ADD;
650: END IF;
651: END IF;
652:
652:
653: IF NOT igs_en_gen_legacy.val_sca_comp_flag(p_course_attempt_status => p_course_att_status,
654: p_course_rqrmnt_complete_ind => p_sca_re_rec.course_rqrmnt_complete_ind) THEN
655: l_validation_success := FALSE;
656: FND_MESSAGE.SET_NAME('IGS','IGS_PR_CANNOT_SET_COMPL_IND');
657: FND_MSG_PUB.ADD;
658: END IF;
659:
660: --Validating the Discountinue date aganist Requirement completion indicatory.
660: --Validating the Discountinue date aganist Requirement completion indicatory.
661: IF p_sca_re_rec.discontinued_dt IS NOT NULL AND p_sca_re_rec.course_rqrmnt_complete_ind IS NOT NULL THEN
662: IF p_sca_re_rec.course_rqrmnt_complete_ind ='Y' THEN
663: l_validation_success := FALSE;
664: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ONLY_SPA_ST_ENROLLED');
665: FND_MSG_PUB.ADD;
666: END IF;
667: END IF;
668:
678: p_legacy => 'Y');
679: IF l_message IS NOT NULL THEN
680: l_validation_success := FALSE;
681: IF INSTR(l_message,'*') = 0 THEN
682: FND_MESSAGE.SET_NAME('IGS',l_message);
683: FND_MSG_PUB.ADD;
684: ELSE
685: l_start := 1;
686: LOOP
685: l_start := 1;
686: LOOP
687: l_end:= INSTR(l_message,'*',l_start);
688: IF l_end = 0 THEN
689: FND_MESSAGE.SET_NAME('IGS',SUBSTR(l_message,l_start,LENGTH(l_message)-l_start+1));
690: FND_MSG_PUB.ADD;
691: EXIT;
692: ELSE
693: FND_MESSAGE.SET_NAME('IGS',SUBSTR(l_message,l_start,l_end-l_start));
689: FND_MESSAGE.SET_NAME('IGS',SUBSTR(l_message,l_start,LENGTH(l_message)-l_start+1));
690: FND_MSG_PUB.ADD;
691: EXIT;
692: ELSE
693: FND_MESSAGE.SET_NAME('IGS',SUBSTR(l_message,l_start,l_end-l_start));
694: FND_MSG_PUB.ADD;
695: END IF;
696: l_start :=l_end +1;
697: END LOOP;
703: IF NOT igs_en_gen_legacy.val_sca_reqcmpl_dt(p_course_rqrmnt_comp_ind => p_sca_re_rec.course_rqrmnt_complete_ind,
704: p_course_rqrmnts_comp_dt => p_sca_re_rec.course_rqrmnts_complete_dt,
705: p_message_name => l_message) THEN
706: l_validation_success := FALSE;
707: FND_MESSAGE.SET_NAME('IGS',l_message);
708: FND_MSG_PUB.ADD;
709: END IF;
710:
711: --In career mode, validating the primary program of the student program attempt.
753: EXCEPTION
754: WHEN OTHERS THEN
755: l_count :=FND_MSG_PUB.COUNT_MSG;
756: FND_MSG_PUB.DELETE_MSG(l_count);
757: FND_MESSAGE.SET_NAME('IGS','IGS_RE_CAND_EXIST');
758: FND_MSG_PUB.ADD;
759: RETURN 'P';
760: END;
761: --Check whether parent record is exist for the relative child record in student program attempt
765: IF NOT igs_ad_ps_appl_inst_pkg.get_pk_for_validation(x_person_id => p_person_id,
766: x_admission_appl_number => p_sca_re_rec.adm_admission_appl_number,
767: x_nominated_course_cd => p_sca_re_rec.adm_nominated_course_cd,
768: x_sequence_number => p_sca_re_rec.adm_sequence_number) THEN
769: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ADM_APP_DET_NOT_FOUND');
770: FND_MSG_PUB.ADD;
771: l_result_flag := 'E';
772: END IF;
773: END IF;
772: END IF;
773: END IF;
774: IF p_sca_re_rec.re_govt_type_of_activity_cd IS NOT NULL THEN
775: IF NOT igs_re_gv_toa_cls_cd_pkg.get_pk_for_validation(x_govt_toa_class_cd => p_sca_re_rec.re_govt_type_of_activity_cd) THEN
776: FND_MESSAGE.SET_NAME('IGS','IGS_RE_GOV_ACT_CD_NOT_FOUND');
777: FND_MSG_PUB.ADD;
778: l_result_flag := 'E';
779: END IF;
780: END IF;
1001: ---Derive the required values, to do futher validations.
1002: --deriving the person identifier value.
1003: l_person_id :=igs_ge_gen_003.get_person_id(l_sca_re_rec.person_number);
1004: IF l_person_id IS NULL THEN
1005: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_PERSON_NUMBER');
1006: FND_MSG_PUB.ADD;
1007: l_err_flag := 'Y';
1008: END IF;
1009:
1009:
1010: --deriving the course type.
1011: l_course_type:=igs_en_gen_legacy.get_sca_prog_type(l_sca_re_rec.program_cd,l_sca_re_rec.version_number);
1012: IF l_course_type IS NULL THEN
1013: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PROG_TYPE_NOT_FOUND');
1014: FND_MSG_PUB.ADD;
1015: l_err_flag := 'Y';
1016: END IF;
1017:
1022: p_location_cd =>l_sca_re_rec.location_cd,
1023: p_attendance_mode =>l_sca_re_rec.attendance_mode,
1024: p_attendance_type =>l_sca_re_rec.attendance_type);
1025: IF l_coo_id IS NULL THEN
1026: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PS_OFR_OPT_NOT_FOUND');
1027: FND_MSG_PUB.ADD;
1028: l_err_flag := 'Y';
1029: END IF;
1030:
1039: p_primary_prog_type_source =>l_sca_re_rec.primary_prog_type_source,
1040: p_course_type =>l_course_type,
1041: p_career_flag =>l_career_flag);
1042: IF l_course_att_status IS NULL THEN
1043: FND_MESSAGE.SET_NAME('IGS','IGS_EN_COURSE_ATT_NOT_FOUND');
1044: FND_MSG_PUB.ADD;
1045: l_err_flag := 'Y';
1046: END IF;
1047: --deriving the class standing identifier.
1047: --deriving the class standing identifier.
1048: IF l_sca_re_rec.class_standing_override IS NOT NULL THEN
1049: l_igs_pr_class_std_id:=igs_en_gen_legacy.get_class_std_id(p_class_standing =>l_sca_re_rec.class_standing_override );
1050: IF l_igs_pr_class_std_id IS NULL THEN
1051: FND_MESSAGE.SET_NAME('IGS','IGS_EN_CLASS_STD_ID_NOT_FOUND');
1052: FND_MSG_PUB.ADD;
1053: l_err_flag := 'Y';
1054: END IF;
1055: END IF;
1056:
1057: --deriving the staff person to populate the dropped column.
1058: l_dropped_by:=igs_en_gen_legacy.get_sca_dropped_by();
1059: IF l_dropped_by IS NULL THEN
1060: FND_MESSAGE.SET_NAME('IGS','IGS_EN_DROPPED_BY_NOT_FOUND');
1061: FND_MSG_PUB.ADD;
1062: END IF;
1063: IF l_sca_re_rec.catalog_cal_alternate_code IS NOT NULL THEN
1064: --deriving the catalog calendar details for a given catalog alternate code.
1069: p_start_dt =>l_catalog_start_dt,
1070: p_end_dt =>l_catalog_end_dt,
1071: p_return_status =>l_status);
1072: IF l_status = 'MULTIPLE' THEN
1073: FND_MESSAGE.SET_NAME('IGS','IGS_EN_MORE_CAL_FOUND');
1074: FND_MSG_PUB.ADD;
1075: l_err_flag := 'Y';
1076: ELSIF l_status = 'INVALID' THEN
1077: FND_MESSAGE.SET_NAME('IGS','IGS_EN_NO_ACAD_TERM_CAL');
1073: FND_MESSAGE.SET_NAME('IGS','IGS_EN_MORE_CAL_FOUND');
1074: FND_MSG_PUB.ADD;
1075: l_err_flag := 'Y';
1076: ELSIF l_status = 'INVALID' THEN
1077: FND_MESSAGE.SET_NAME('IGS','IGS_EN_NO_ACAD_TERM_CAL');
1078: FND_MSG_PUB.ADD;
1079: l_err_flag := 'Y';
1080: END IF;
1081: END IF;