[Home] [Help]
88: PROCEDURE validate_parameters ( p_usec_rsv_rec IN OUT NOCOPY igs_ps_generic_pub.usec_res_seat_rec_type ) AS
89: BEGIN
90:
91: /* Check for Mandatory Parameters */
92: IF p_usec_rsv_rec.unit_cd IS NULL OR p_usec_rsv_rec.unit_cd = FND_API.G_MISS_CHAR THEN
93: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CD', 'LEGACY_TOKENS', FALSE);
94: p_usec_rsv_rec.status := 'E';
95: END IF;
96:
93: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CD', 'LEGACY_TOKENS', FALSE);
94: p_usec_rsv_rec.status := 'E';
95: END IF;
96:
97: IF p_usec_rsv_rec.version_number IS NULL OR p_usec_rsv_rec.version_number = FND_API.G_MISS_NUM THEN
98: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_VER_NUM', 'LEGACY_TOKENS', FALSE);
99: p_usec_rsv_rec.status := 'E';
100: END IF;
101:
98: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_VER_NUM', 'LEGACY_TOKENS', FALSE);
99: p_usec_rsv_rec.status := 'E';
100: END IF;
101:
102: IF p_usec_rsv_rec.teach_cal_alternate_code IS NULL OR p_usec_rsv_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
103: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
104: p_usec_rsv_rec.status := 'E';
105: END IF;
106:
103: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
104: p_usec_rsv_rec.status := 'E';
105: END IF;
106:
107: IF p_usec_rsv_rec.location_cd IS NULL OR p_usec_rsv_rec.location_cd = FND_API.G_MISS_CHAR THEN
108: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD', 'LEGACY_TOKENS', FALSE);
109: p_usec_rsv_rec.status := 'E';
110: END IF;
111:
108: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD', 'LEGACY_TOKENS', FALSE);
109: p_usec_rsv_rec.status := 'E';
110: END IF;
111:
112: IF p_usec_rsv_rec.unit_class IS NULL OR p_usec_rsv_rec.unit_class = FND_API.G_MISS_CHAR THEN
113: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CLASS', 'LEGACY_TOKENS', FALSE);
114: p_usec_rsv_rec.status := 'E';
115: END IF;
116:
113: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CLASS', 'LEGACY_TOKENS', FALSE);
114: p_usec_rsv_rec.status := 'E';
115: END IF;
116:
117: IF p_usec_rsv_rec.priority_value IS NULL OR p_usec_rsv_rec.priority_value = FND_API.G_MISS_CHAR THEN
118: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'PRIORITY_VALUE', 'LEGACY_TOKENS', FALSE);
119: p_usec_rsv_rec.status := 'E';
120: END IF;
121:
196: CLOSE c_usprv;
197:
198: IF p_usec_rsv_rec.priority_order IS NULL THEN
199: p_usec_rsv_rec.priority_order:= rec_usprv.priority_order;
200: ELSIF p_usec_rsv_rec.priority_order = FND_API.G_MISS_NUM THEN
201: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'PRIORITY_ORDER', 'LEGACY_TOKENS', FALSE);
202: p_usec_rsv_rec.status := 'E';
203: END IF;
204:
412: PROCEDURE validate_parameters_prf ( p_usec_rsv_rec IN OUT NOCOPY igs_ps_generic_pub.usec_res_seat_rec_type ) AS
413: BEGIN
414:
415: /* Check for Mandatory Parameters */
416: IF p_usec_rsv_rec.preference_order IS NULL OR p_usec_rsv_rec.preference_order = FND_API.G_MISS_NUM THEN
417: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'PREFERENCE_ORDER', 'LEGACY_TOKENS', FALSE);
418: p_usec_rsv_rec.status := 'E';
419: END IF;
420:
417: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'PREFERENCE_ORDER', 'LEGACY_TOKENS', FALSE);
418: p_usec_rsv_rec.status := 'E';
419: END IF;
420:
421: IF p_usec_rsv_rec.preference_code IS NULL OR p_usec_rsv_rec.preference_code = FND_API.G_MISS_CHAR THEN
422: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'PREFERENCE_CODE', 'LEGACY_TOKENS', FALSE);
423: p_usec_rsv_rec.status := 'E';
424: END IF;
425:
422: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'PREFERENCE_CODE', 'LEGACY_TOKENS', FALSE);
423: p_usec_rsv_rec.status := 'E';
424: END IF;
425:
426: IF p_usec_rsv_rec.percentage_reserved IS NULL OR p_usec_rsv_rec.percentage_reserved = FND_API.G_MISS_NUM THEN
427: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'PERCENTAGE_RESERVED', 'LEGACY_TOKENS', FALSE);
428: p_usec_rsv_rec.status := 'E';
429: END IF;
430:
428: p_usec_rsv_rec.status := 'E';
429: END IF;
430:
431: IF p_usec_rsv_rec.priority_value IS NOT NULL AND p_usec_rsv_rec.priority_value IN ('PROGRAM','UNIT_SET') THEN
432: IF p_usec_rsv_rec.preference_version IS NULL OR p_usec_rsv_rec.preference_version = FND_API.G_MISS_NUM THEN
433: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'PREFERENCE_VERSION', 'LEGACY_TOKENS', FALSE);
434: p_usec_rsv_rec.status := 'E';
435: END IF;
436: ELSIF p_usec_rsv_rec.priority_value IS NOT NULL AND p_usec_rsv_rec.priority_value NOT IN ('PROGRAM','UNIT_SET') THEN
855: -- validate parameters passed.
856: PROCEDURE validate_parameters (p_uso_fclt_rec IN OUT NOCOPY igs_ps_generic_pub.usec_occurs_facility_rec_type ) AS
857: BEGIN
858: /* Check for Mandatory Parameters */
859: IF p_uso_fclt_rec.unit_cd IS NULL OR p_uso_fclt_rec.unit_cd = FND_API.G_MISS_CHAR THEN
860: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CD', 'LEGACY_TOKENS', FALSE);
861: p_uso_fclt_rec.status := 'E';
862: END IF;
863: IF p_uso_fclt_rec.version_number IS NULL OR p_uso_fclt_rec.version_number = FND_API.G_MISS_NUM THEN
859: IF p_uso_fclt_rec.unit_cd IS NULL OR p_uso_fclt_rec.unit_cd = FND_API.G_MISS_CHAR THEN
860: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CD', 'LEGACY_TOKENS', FALSE);
861: p_uso_fclt_rec.status := 'E';
862: END IF;
863: IF p_uso_fclt_rec.version_number IS NULL OR p_uso_fclt_rec.version_number = FND_API.G_MISS_NUM THEN
864: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_VER_NUM', 'LEGACY_TOKENS', FALSE);
865: p_uso_fclt_rec.status := 'E';
866: END IF;
867: IF p_uso_fclt_rec.teach_cal_alternate_code IS NULL OR p_uso_fclt_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
863: IF p_uso_fclt_rec.version_number IS NULL OR p_uso_fclt_rec.version_number = FND_API.G_MISS_NUM THEN
864: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_VER_NUM', 'LEGACY_TOKENS', FALSE);
865: p_uso_fclt_rec.status := 'E';
866: END IF;
867: IF p_uso_fclt_rec.teach_cal_alternate_code IS NULL OR p_uso_fclt_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
868: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
869: p_uso_fclt_rec.status := 'E';
870: END IF;
871: IF p_uso_fclt_rec.location_cd IS NULL OR p_uso_fclt_rec.location_cd = FND_API.G_MISS_CHAR THEN
867: IF p_uso_fclt_rec.teach_cal_alternate_code IS NULL OR p_uso_fclt_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
868: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
869: p_uso_fclt_rec.status := 'E';
870: END IF;
871: IF p_uso_fclt_rec.location_cd IS NULL OR p_uso_fclt_rec.location_cd = FND_API.G_MISS_CHAR THEN
872: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD', 'LEGACY_TOKENS', FALSE);
873: p_uso_fclt_rec.status := 'E';
874: END IF;
875: IF p_uso_fclt_rec.unit_class IS NULL OR p_uso_fclt_rec.unit_class = FND_API.G_MISS_CHAR THEN
871: IF p_uso_fclt_rec.location_cd IS NULL OR p_uso_fclt_rec.location_cd = FND_API.G_MISS_CHAR THEN
872: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD', 'LEGACY_TOKENS', FALSE);
873: p_uso_fclt_rec.status := 'E';
874: END IF;
875: IF p_uso_fclt_rec.unit_class IS NULL OR p_uso_fclt_rec.unit_class = FND_API.G_MISS_CHAR THEN
876: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CLASS', 'LEGACY_TOKENS', FALSE);
877: p_uso_fclt_rec.status := 'E';
878: END IF;
879: IF (p_uso_fclt_rec.production_uso_id IS NULL OR p_uso_fclt_rec.production_uso_id = FND_API.G_MISS_NUM) AND (p_uso_fclt_rec.occurrence_identifier IS NULL OR p_uso_fclt_rec.occurrence_identifier = FND_API.G_MISS_CHAR) THEN
875: IF p_uso_fclt_rec.unit_class IS NULL OR p_uso_fclt_rec.unit_class = FND_API.G_MISS_CHAR THEN
876: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CLASS', 'LEGACY_TOKENS', FALSE);
877: p_uso_fclt_rec.status := 'E';
878: END IF;
879: IF (p_uso_fclt_rec.production_uso_id IS NULL OR p_uso_fclt_rec.production_uso_id = FND_API.G_MISS_NUM) AND (p_uso_fclt_rec.occurrence_identifier IS NULL OR p_uso_fclt_rec.occurrence_identifier = FND_API.G_MISS_CHAR) THEN
880: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'USEC_OCCRS_ID', 'IGS_PS_LOG_PARAMETERS', FALSE);
881: p_uso_fclt_rec.status := 'E';
882: END IF;
883: IF p_uso_fclt_rec.facility_code IS NULL OR p_uso_fclt_rec.facility_code = FND_API.G_MISS_CHAR THEN
879: IF (p_uso_fclt_rec.production_uso_id IS NULL OR p_uso_fclt_rec.production_uso_id = FND_API.G_MISS_NUM) AND (p_uso_fclt_rec.occurrence_identifier IS NULL OR p_uso_fclt_rec.occurrence_identifier = FND_API.G_MISS_CHAR) THEN
880: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'USEC_OCCRS_ID', 'IGS_PS_LOG_PARAMETERS', FALSE);
881: p_uso_fclt_rec.status := 'E';
882: END IF;
883: IF p_uso_fclt_rec.facility_code IS NULL OR p_uso_fclt_rec.facility_code = FND_API.G_MISS_CHAR THEN
884: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'FACILITY_CODE', 'LEGACY_TOKENS', FALSE);
885: p_uso_fclt_rec.status := 'E';
886: END IF;
887:
1148: -- validate parameters passed.
1149: PROCEDURE validate_parameters (p_usec_cat_rec IN OUT NOCOPY igs_ps_generic_pub.usec_cat_rec_type ) AS
1150: BEGIN
1151: /* Check for Mandatory Parameters */
1152: IF p_usec_cat_rec.unit_cd IS NULL OR p_usec_cat_rec.unit_cd = FND_API.G_MISS_CHAR THEN
1153: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CD', 'LEGACY_TOKENS', FALSE);
1154: p_usec_cat_rec.status := 'E';
1155: END IF;
1156: IF p_usec_cat_rec.version_number IS NULL OR p_usec_cat_rec.version_number = FND_API.G_MISS_NUM THEN
1152: IF p_usec_cat_rec.unit_cd IS NULL OR p_usec_cat_rec.unit_cd = FND_API.G_MISS_CHAR THEN
1153: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CD', 'LEGACY_TOKENS', FALSE);
1154: p_usec_cat_rec.status := 'E';
1155: END IF;
1156: IF p_usec_cat_rec.version_number IS NULL OR p_usec_cat_rec.version_number = FND_API.G_MISS_NUM THEN
1157: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_VER_NUM', 'LEGACY_TOKENS', FALSE);
1158: p_usec_cat_rec.status := 'E';
1159: END IF;
1160: IF p_usec_cat_rec.teach_cal_alternate_code IS NULL OR p_usec_cat_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
1156: IF p_usec_cat_rec.version_number IS NULL OR p_usec_cat_rec.version_number = FND_API.G_MISS_NUM THEN
1157: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_VER_NUM', 'LEGACY_TOKENS', FALSE);
1158: p_usec_cat_rec.status := 'E';
1159: END IF;
1160: IF p_usec_cat_rec.teach_cal_alternate_code IS NULL OR p_usec_cat_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
1161: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
1162: p_usec_cat_rec.status := 'E';
1163: END IF;
1164: IF p_usec_cat_rec.location_cd IS NULL OR p_usec_cat_rec.location_cd = FND_API.G_MISS_CHAR THEN
1160: IF p_usec_cat_rec.teach_cal_alternate_code IS NULL OR p_usec_cat_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
1161: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
1162: p_usec_cat_rec.status := 'E';
1163: END IF;
1164: IF p_usec_cat_rec.location_cd IS NULL OR p_usec_cat_rec.location_cd = FND_API.G_MISS_CHAR THEN
1165: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD', 'LEGACY_TOKENS', FALSE);
1166: p_usec_cat_rec.status := 'E';
1167: END IF;
1168: IF p_usec_cat_rec.unit_class IS NULL OR p_usec_cat_rec.unit_class = FND_API.G_MISS_CHAR THEN
1164: IF p_usec_cat_rec.location_cd IS NULL OR p_usec_cat_rec.location_cd = FND_API.G_MISS_CHAR THEN
1165: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD', 'LEGACY_TOKENS', FALSE);
1166: p_usec_cat_rec.status := 'E';
1167: END IF;
1168: IF p_usec_cat_rec.unit_class IS NULL OR p_usec_cat_rec.unit_class = FND_API.G_MISS_CHAR THEN
1169: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CLASS', 'LEGACY_TOKENS', FALSE);
1170: p_usec_cat_rec.status := 'E';
1171: END IF;
1172: IF p_usec_cat_rec.unit_cat IS NULL OR p_usec_cat_rec.unit_cat = FND_API.G_MISS_CHAR THEN
1168: IF p_usec_cat_rec.unit_class IS NULL OR p_usec_cat_rec.unit_class = FND_API.G_MISS_CHAR THEN
1169: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CLASS', 'LEGACY_TOKENS', FALSE);
1170: p_usec_cat_rec.status := 'E';
1171: END IF;
1172: IF p_usec_cat_rec.unit_cat IS NULL OR p_usec_cat_rec.unit_cat = FND_API.G_MISS_CHAR THEN
1173: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'CATEGORY', 'LEGACY_TOKENS', FALSE);
1174: p_usec_cat_rec.status := 'E';
1175: END IF;
1176:
1443: PROCEDURE validate_parameters ( p_tch_rsp_ovrd_rec IN OUT NOCOPY igs_ps_generic_pub.usec_teach_resp_ovrd_rec_type ) AS
1444: BEGIN
1445:
1446: /* Check for Mandatory Parameters */
1447: IF p_tch_rsp_ovrd_rec.unit_cd IS NULL OR p_tch_rsp_ovrd_rec.unit_cd = FND_API.G_MISS_CHAR THEN
1448: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CD', 'LEGACY_TOKENS', FALSE);
1449: p_tch_rsp_ovrd_rec.status := 'E';
1450: END IF;
1451: IF p_tch_rsp_ovrd_rec.version_number IS NULL OR p_tch_rsp_ovrd_rec.version_number = FND_API.G_MISS_NUM THEN
1447: IF p_tch_rsp_ovrd_rec.unit_cd IS NULL OR p_tch_rsp_ovrd_rec.unit_cd = FND_API.G_MISS_CHAR THEN
1448: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CD', 'LEGACY_TOKENS', FALSE);
1449: p_tch_rsp_ovrd_rec.status := 'E';
1450: END IF;
1451: IF p_tch_rsp_ovrd_rec.version_number IS NULL OR p_tch_rsp_ovrd_rec.version_number = FND_API.G_MISS_NUM THEN
1452: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_VER_NUM', 'LEGACY_TOKENS', FALSE);
1453: p_tch_rsp_ovrd_rec.status := 'E';
1454: END IF;
1455: IF p_tch_rsp_ovrd_rec.teach_cal_alternate_code IS NULL OR p_tch_rsp_ovrd_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
1451: IF p_tch_rsp_ovrd_rec.version_number IS NULL OR p_tch_rsp_ovrd_rec.version_number = FND_API.G_MISS_NUM THEN
1452: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_VER_NUM', 'LEGACY_TOKENS', FALSE);
1453: p_tch_rsp_ovrd_rec.status := 'E';
1454: END IF;
1455: IF p_tch_rsp_ovrd_rec.teach_cal_alternate_code IS NULL OR p_tch_rsp_ovrd_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
1456: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
1457: p_tch_rsp_ovrd_rec.status := 'E';
1458: END IF;
1459: IF p_tch_rsp_ovrd_rec.location_cd IS NULL OR p_tch_rsp_ovrd_rec.location_cd = FND_API.G_MISS_CHAR THEN
1455: IF p_tch_rsp_ovrd_rec.teach_cal_alternate_code IS NULL OR p_tch_rsp_ovrd_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
1456: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
1457: p_tch_rsp_ovrd_rec.status := 'E';
1458: END IF;
1459: IF p_tch_rsp_ovrd_rec.location_cd IS NULL OR p_tch_rsp_ovrd_rec.location_cd = FND_API.G_MISS_CHAR THEN
1460: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD', 'LEGACY_TOKENS', FALSE);
1461: p_tch_rsp_ovrd_rec.status := 'E';
1462: END IF;
1463: IF p_tch_rsp_ovrd_rec.unit_class IS NULL OR p_tch_rsp_ovrd_rec.unit_class = FND_API.G_MISS_CHAR THEN
1459: IF p_tch_rsp_ovrd_rec.location_cd IS NULL OR p_tch_rsp_ovrd_rec.location_cd = FND_API.G_MISS_CHAR THEN
1460: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD', 'LEGACY_TOKENS', FALSE);
1461: p_tch_rsp_ovrd_rec.status := 'E';
1462: END IF;
1463: IF p_tch_rsp_ovrd_rec.unit_class IS NULL OR p_tch_rsp_ovrd_rec.unit_class = FND_API.G_MISS_CHAR THEN
1464: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CLASS', 'LEGACY_TOKENS', FALSE);
1465: p_tch_rsp_ovrd_rec.status := 'E';
1466: END IF;
1467: IF p_tch_rsp_ovrd_rec.org_unit_cd IS NULL OR p_tch_rsp_ovrd_rec.org_unit_cd = FND_API.G_MISS_CHAR THEN
1463: IF p_tch_rsp_ovrd_rec.unit_class IS NULL OR p_tch_rsp_ovrd_rec.unit_class = FND_API.G_MISS_CHAR THEN
1464: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CLASS', 'LEGACY_TOKENS', FALSE);
1465: p_tch_rsp_ovrd_rec.status := 'E';
1466: END IF;
1467: IF p_tch_rsp_ovrd_rec.org_unit_cd IS NULL OR p_tch_rsp_ovrd_rec.org_unit_cd = FND_API.G_MISS_CHAR THEN
1468: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'ORG_UNIT_CD', 'LEGACY_TOKENS', FALSE);
1469: p_tch_rsp_ovrd_rec.status := 'E';
1470: END IF;
1471: IF p_tch_rsp_ovrd_rec.ou_start_dt IS NULL OR p_tch_rsp_ovrd_rec.ou_start_dt = FND_API.G_MISS_DATE THEN
1467: IF p_tch_rsp_ovrd_rec.org_unit_cd IS NULL OR p_tch_rsp_ovrd_rec.org_unit_cd = FND_API.G_MISS_CHAR THEN
1468: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'ORG_UNIT_CD', 'LEGACY_TOKENS', FALSE);
1469: p_tch_rsp_ovrd_rec.status := 'E';
1470: END IF;
1471: IF p_tch_rsp_ovrd_rec.ou_start_dt IS NULL OR p_tch_rsp_ovrd_rec.ou_start_dt = FND_API.G_MISS_DATE THEN
1472: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'OU_START_DT', 'LEGACY_TOKENS', FALSE);
1473: p_tch_rsp_ovrd_rec.status := 'E';
1474: END IF;
1475: IF p_tch_rsp_ovrd_rec.percentage IS NULL OR p_tch_rsp_ovrd_rec.percentage = FND_API.G_MISS_NUM THEN
1471: IF p_tch_rsp_ovrd_rec.ou_start_dt IS NULL OR p_tch_rsp_ovrd_rec.ou_start_dt = FND_API.G_MISS_DATE THEN
1472: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'OU_START_DT', 'LEGACY_TOKENS', FALSE);
1473: p_tch_rsp_ovrd_rec.status := 'E';
1474: END IF;
1475: IF p_tch_rsp_ovrd_rec.percentage IS NULL OR p_tch_rsp_ovrd_rec.percentage = FND_API.G_MISS_NUM THEN
1476: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'PERCENTAGE', 'LEGACY_TOKENS', FALSE);
1477: p_tch_rsp_ovrd_rec.status := 'E';
1478: END IF;
1479: END validate_parameters;
1950: PROCEDURE validate_parameters ( p_as_us_ai_group_rec IN OUT NOCOPY igs_ps_generic_pub.usec_ass_item_grp_rec_type ) AS
1951: BEGIN
1952:
1953: /* Check for Mandatory Parameters */
1954: IF p_as_us_ai_group_rec.unit_cd IS NULL OR p_as_us_ai_group_rec.unit_cd = FND_API.G_MISS_CHAR THEN
1955: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CD', 'LEGACY_TOKENS', FALSE);
1956: p_as_us_ai_group_rec.status := 'E';
1957: END IF;
1958: IF p_as_us_ai_group_rec.version_number IS NULL OR p_as_us_ai_group_rec.version_number = FND_API.G_MISS_NUM THEN
1954: IF p_as_us_ai_group_rec.unit_cd IS NULL OR p_as_us_ai_group_rec.unit_cd = FND_API.G_MISS_CHAR THEN
1955: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CD', 'LEGACY_TOKENS', FALSE);
1956: p_as_us_ai_group_rec.status := 'E';
1957: END IF;
1958: IF p_as_us_ai_group_rec.version_number IS NULL OR p_as_us_ai_group_rec.version_number = FND_API.G_MISS_NUM THEN
1959: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_VER_NUM', 'LEGACY_TOKENS', FALSE);
1960: p_as_us_ai_group_rec.status := 'E';
1961: END IF;
1962: IF p_as_us_ai_group_rec.teach_cal_alternate_code IS NULL OR p_as_us_ai_group_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
1958: IF p_as_us_ai_group_rec.version_number IS NULL OR p_as_us_ai_group_rec.version_number = FND_API.G_MISS_NUM THEN
1959: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_VER_NUM', 'LEGACY_TOKENS', FALSE);
1960: p_as_us_ai_group_rec.status := 'E';
1961: END IF;
1962: IF p_as_us_ai_group_rec.teach_cal_alternate_code IS NULL OR p_as_us_ai_group_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
1963: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
1964: p_as_us_ai_group_rec.status := 'E';
1965: END IF;
1966: IF p_as_us_ai_group_rec.location_cd IS NULL OR p_as_us_ai_group_rec.location_cd = FND_API.G_MISS_CHAR THEN
1962: IF p_as_us_ai_group_rec.teach_cal_alternate_code IS NULL OR p_as_us_ai_group_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
1963: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
1964: p_as_us_ai_group_rec.status := 'E';
1965: END IF;
1966: IF p_as_us_ai_group_rec.location_cd IS NULL OR p_as_us_ai_group_rec.location_cd = FND_API.G_MISS_CHAR THEN
1967: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD', 'LEGACY_TOKENS', FALSE);
1968: p_as_us_ai_group_rec.status := 'E';
1969: END IF;
1970: IF p_as_us_ai_group_rec.unit_class IS NULL OR p_as_us_ai_group_rec.unit_class = FND_API.G_MISS_CHAR THEN
1966: IF p_as_us_ai_group_rec.location_cd IS NULL OR p_as_us_ai_group_rec.location_cd = FND_API.G_MISS_CHAR THEN
1967: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD', 'LEGACY_TOKENS', FALSE);
1968: p_as_us_ai_group_rec.status := 'E';
1969: END IF;
1970: IF p_as_us_ai_group_rec.unit_class IS NULL OR p_as_us_ai_group_rec.unit_class = FND_API.G_MISS_CHAR THEN
1971: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CLASS', 'LEGACY_TOKENS', FALSE);
1972: p_as_us_ai_group_rec.status := 'E';
1973: END IF;
1974: IF p_as_us_ai_group_rec.group_name IS NULL OR p_as_us_ai_group_rec.group_name = FND_API.G_MISS_CHAR THEN
1970: IF p_as_us_ai_group_rec.unit_class IS NULL OR p_as_us_ai_group_rec.unit_class = FND_API.G_MISS_CHAR THEN
1971: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CLASS', 'LEGACY_TOKENS', FALSE);
1972: p_as_us_ai_group_rec.status := 'E';
1973: END IF;
1974: IF p_as_us_ai_group_rec.group_name IS NULL OR p_as_us_ai_group_rec.group_name = FND_API.G_MISS_CHAR THEN
1975: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'GROUP_NAME', 'LEGACY_TOKENS', FALSE);
1976: p_as_us_ai_group_rec.status := 'E';
1977: END IF;
1978:
2075: CLOSE c_us_ai_group;
2076:
2077: IF p_as_us_ai_group_rec.midterm_formula_code IS NULL THEN
2078: p_as_us_ai_group_rec.midterm_formula_code := c_us_ai_group_rec.midterm_formula_code;
2079: ELSIF p_as_us_ai_group_rec.midterm_formula_code = FND_API.G_MISS_CHAR THEN
2080: p_as_us_ai_group_rec.midterm_formula_code :=NULL;
2081: END IF;
2082:
2083: IF p_as_us_ai_group_rec.midterm_formula_qty IS NULL THEN
2081: END IF;
2082:
2083: IF p_as_us_ai_group_rec.midterm_formula_qty IS NULL THEN
2084: p_as_us_ai_group_rec.midterm_formula_qty := c_us_ai_group_rec.midterm_formula_qty;
2085: ELSIF p_as_us_ai_group_rec.midterm_formula_qty = FND_API.G_MISS_NUM THEN
2086: p_as_us_ai_group_rec.midterm_formula_qty :=NULL;
2087: END IF;
2088:
2089: IF p_as_us_ai_group_rec.midterm_weight_qty IS NULL THEN
2087: END IF;
2088:
2089: IF p_as_us_ai_group_rec.midterm_weight_qty IS NULL THEN
2090: p_as_us_ai_group_rec.midterm_weight_qty :=c_us_ai_group_rec.midterm_weight_qty;
2091: ELSIF p_as_us_ai_group_rec.midterm_weight_qty = FND_API.G_MISS_NUM THEN
2092: p_as_us_ai_group_rec.midterm_weight_qty :=NULL;
2093: END IF;
2094:
2095: IF p_as_us_ai_group_rec.final_formula_code IS NULL THEN
2093: END IF;
2094:
2095: IF p_as_us_ai_group_rec.final_formula_code IS NULL THEN
2096: p_as_us_ai_group_rec.final_formula_code :=c_us_ai_group_rec.final_formula_code;
2097: ELSIF p_as_us_ai_group_rec.final_formula_code = FND_API.G_MISS_CHAR THEN
2098: p_as_us_ai_group_rec.final_formula_code :=NULL;
2099: END IF;
2100:
2101: IF p_as_us_ai_group_rec.final_formula_qty IS NULL THEN
2099: END IF;
2100:
2101: IF p_as_us_ai_group_rec.final_formula_qty IS NULL THEN
2102: p_as_us_ai_group_rec.final_formula_qty := c_us_ai_group_rec.final_formula_qty;
2103: ELSIF p_as_us_ai_group_rec.final_formula_qty = FND_API.G_MISS_NUM THEN
2104: p_as_us_ai_group_rec.final_formula_qty :=NULL;
2105: END IF;
2106:
2107: IF p_as_us_ai_group_rec.final_weight_qty IS NULL THEN
2105: END IF;
2106:
2107: IF p_as_us_ai_group_rec.final_weight_qty IS NULL THEN
2108: p_as_us_ai_group_rec.final_weight_qty := c_us_ai_group_rec.final_weight_qty;
2109: ELSIF p_as_us_ai_group_rec.final_weight_qty = FND_API.G_MISS_NUM THEN
2110: p_as_us_ai_group_rec.final_weight_qty :=NULL;
2111: END IF;
2112:
2113: END IF;
2400: PROCEDURE validate_parameters_item ( p_unitass_item_rec IN OUT NOCOPY igs_ps_generic_pub.usec_ass_item_grp_rec_type ) AS
2401: BEGIN
2402:
2403: /* Check for Mandatory Parameters */
2404: IF p_unitass_item_rec.assessment_id IS NULL OR p_unitass_item_rec.assessment_id = FND_API.G_MISS_NUM THEN
2405: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'ASSESSMENT_ID', 'LEGACY_TOKENS', FALSE);
2406: p_unitass_item_rec.status := 'E';
2407: END IF;
2408: IF p_unitass_item_rec.grading_schema_cd IS NULL OR p_unitass_item_rec.grading_schema_cd = FND_API.G_MISS_CHAR THEN
2404: IF p_unitass_item_rec.assessment_id IS NULL OR p_unitass_item_rec.assessment_id = FND_API.G_MISS_NUM THEN
2405: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'ASSESSMENT_ID', 'LEGACY_TOKENS', FALSE);
2406: p_unitass_item_rec.status := 'E';
2407: END IF;
2408: IF p_unitass_item_rec.grading_schema_cd IS NULL OR p_unitass_item_rec.grading_schema_cd = FND_API.G_MISS_CHAR THEN
2409: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'GRADINGS_SCHEMA_CD', 'LEGACY_TOKENS', FALSE);
2410: p_unitass_item_rec.status := 'E';
2411: END IF;
2412: IF p_unitass_item_rec.gs_version_number IS NULL OR p_unitass_item_rec.gs_version_number = FND_API.G_MISS_NUM THEN
2408: IF p_unitass_item_rec.grading_schema_cd IS NULL OR p_unitass_item_rec.grading_schema_cd = FND_API.G_MISS_CHAR THEN
2409: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'GRADINGS_SCHEMA_CD', 'LEGACY_TOKENS', FALSE);
2410: p_unitass_item_rec.status := 'E';
2411: END IF;
2412: IF p_unitass_item_rec.gs_version_number IS NULL OR p_unitass_item_rec.gs_version_number = FND_API.G_MISS_NUM THEN
2413: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'GS_VERSION_NUMBER', 'LEGACY_TOKENS', FALSE);
2414: p_unitass_item_rec.status := 'E';
2415: END IF;
2416:
2514: BEGIN
2515: IF p_insert_update = 'I' THEN
2516: IF p_unitass_item_rec.dflt_item_ind IS NULL THEN
2517: p_unitass_item_rec.dflt_item_ind :='Y';
2518: ELSIF p_unitass_item_rec.dflt_item_ind = FND_API.G_MISS_CHAR THEN
2519: p_unitass_item_rec.dflt_item_ind :='Y';
2520: END IF;
2521:
2522: IF p_unitass_item_rec.due_dt = FND_API.G_MISS_DATE THEN
2518: ELSIF p_unitass_item_rec.dflt_item_ind = FND_API.G_MISS_CHAR THEN
2519: p_unitass_item_rec.dflt_item_ind :='Y';
2520: END IF;
2521:
2522: IF p_unitass_item_rec.due_dt = FND_API.G_MISS_DATE THEN
2523: p_unitass_item_rec.due_dt :=NULL;
2524: END IF;
2525:
2526: IF p_unitass_item_rec.reference = FND_API.G_MISS_CHAR THEN
2522: IF p_unitass_item_rec.due_dt = FND_API.G_MISS_DATE THEN
2523: p_unitass_item_rec.due_dt :=NULL;
2524: END IF;
2525:
2526: IF p_unitass_item_rec.reference = FND_API.G_MISS_CHAR THEN
2527: p_unitass_item_rec.reference :=NULL;
2528: END IF;
2529:
2530:
2527: p_unitass_item_rec.reference :=NULL;
2528: END IF;
2529:
2530:
2531: IF p_unitass_item_rec.midterm_mandatory_type_code = FND_API.G_MISS_CHAR THEN
2532: p_unitass_item_rec.midterm_mandatory_type_code :=NULL;
2533: END IF;
2534:
2535: IF p_unitass_item_rec.midterm_weight_qty_item = FND_API.G_MISS_NUM THEN
2531: IF p_unitass_item_rec.midterm_mandatory_type_code = FND_API.G_MISS_CHAR THEN
2532: p_unitass_item_rec.midterm_mandatory_type_code :=NULL;
2533: END IF;
2534:
2535: IF p_unitass_item_rec.midterm_weight_qty_item = FND_API.G_MISS_NUM THEN
2536: p_unitass_item_rec.midterm_weight_qty_item :=NULL;
2537: END IF;
2538:
2539: IF p_unitass_item_rec.final_mandatory_type_code = FND_API.G_MISS_CHAR THEN
2535: IF p_unitass_item_rec.midterm_weight_qty_item = FND_API.G_MISS_NUM THEN
2536: p_unitass_item_rec.midterm_weight_qty_item :=NULL;
2537: END IF;
2538:
2539: IF p_unitass_item_rec.final_mandatory_type_code = FND_API.G_MISS_CHAR THEN
2540: p_unitass_item_rec.final_mandatory_type_code :=NULL;
2541: END IF;
2542:
2543: IF p_unitass_item_rec.final_weight_qty_item = FND_API.G_MISS_NUM THEN
2539: IF p_unitass_item_rec.final_mandatory_type_code = FND_API.G_MISS_CHAR THEN
2540: p_unitass_item_rec.final_mandatory_type_code :=NULL;
2541: END IF;
2542:
2543: IF p_unitass_item_rec.final_weight_qty_item = FND_API.G_MISS_NUM THEN
2544: p_unitass_item_rec.final_weight_qty_item :=NULL;
2545: END IF;
2546:
2547: IF p_unitass_item_rec.release_date = FND_API.G_MISS_DATE THEN
2543: IF p_unitass_item_rec.final_weight_qty_item = FND_API.G_MISS_NUM THEN
2544: p_unitass_item_rec.final_weight_qty_item :=NULL;
2545: END IF;
2546:
2547: IF p_unitass_item_rec.release_date = FND_API.G_MISS_DATE THEN
2548: p_unitass_item_rec.release_date :=NULL;
2549: END IF;
2550:
2551: IF p_unitass_item_rec.logical_delete_dt IS NOT NULL THEN
2559: CLOSE cur_ass_desc;
2560: IF l_cur_ass_desc.description = p_unitass_item_rec.description THEN
2561: p_unitass_item_rec.description:=NULL;
2562: END IF;
2563: ELSIF p_unitass_item_rec.description = FND_API.G_MISS_CHAR THEN
2564: p_unitass_item_rec.description :=NULL;
2565: END IF;
2566:
2567: IF p_unitass_item_rec.exam_cal_alternate_code IS NULL THEN
2594: CLOSE c_unitass_item;
2595:
2596: IF p_unitass_item_rec.due_dt IS NULL THEN
2597: p_unitass_item_rec.due_dt := c_unitass_item_rec.due_dt ;
2598: ELSIF p_unitass_item_rec.due_dt = FND_API.G_MISS_DATE THEN
2599: p_unitass_item_rec.due_dt :=NULL;
2600: END IF;
2601:
2602: IF p_unitass_item_rec.dflt_item_ind IS NULL THEN
2600: END IF;
2601:
2602: IF p_unitass_item_rec.dflt_item_ind IS NULL THEN
2603: p_unitass_item_rec.dflt_item_ind :=c_unitass_item_rec.dflt_item_ind;
2604: ELSIF p_unitass_item_rec.dflt_item_ind = FND_API.G_MISS_CHAR THEN
2605: p_unitass_item_rec.dflt_item_ind :='N';
2606: END IF;
2607:
2608: IF p_unitass_item_rec.reference IS NULL THEN
2606: END IF;
2607:
2608: IF p_unitass_item_rec.reference IS NULL THEN
2609: p_unitass_item_rec.reference := c_unitass_item_rec.reference;
2610: ELSIF p_unitass_item_rec.reference = FND_API.G_MISS_CHAR THEN
2611: p_unitass_item_rec.reference :=NULL;
2612: END IF;
2613:
2614: IF p_unitass_item_rec.logical_delete_dt IS NULL THEN
2612: END IF;
2613:
2614: IF p_unitass_item_rec.logical_delete_dt IS NULL THEN
2615: p_unitass_item_rec.logical_delete_dt := c_unitass_item_rec.logical_delete_dt;
2616: ELSIF p_unitass_item_rec.logical_delete_dt = FND_API.G_MISS_DATE THEN
2617: p_unitass_item_rec.logical_delete_dt :=NULL;
2618: END IF;
2619:
2620:
2619:
2620:
2621: IF p_unitass_item_rec.description IS NULL THEN
2622: p_unitass_item_rec.description := c_unitass_item_rec.description;
2623: ELSIF p_unitass_item_rec.description = FND_API.G_MISS_CHAR THEN
2624: p_unitass_item_rec.description :=NULL;
2625: ELSIF p_unitass_item_rec.description IS NOT NULL THEN
2626: OPEN cur_ass_desc(p_unitass_item_rec.assessment_id);
2627: FETCH cur_ass_desc INTO l_cur_ass_desc;
2636:
2637: IF p_unitass_item_rec.exam_cal_alternate_code IS NULL THEN
2638: l_c_exam_cal_type := c_unitass_item_rec.exam_cal_type;
2639: l_n_exam_seq_num := c_unitass_item_rec.exam_ci_sequence_number;
2640: ELSIF p_unitass_item_rec.exam_cal_alternate_code = FND_API.G_MISS_CHAR THEN
2641: l_c_exam_cal_type := NULL;
2642: l_n_exam_seq_num := NULL;
2643: ELSE
2644: OPEN cal_type(p_unitass_item_rec.exam_cal_alternate_code);
2661: END IF;
2662:
2663: IF p_unitass_item_rec.release_date IS NULL THEN
2664: p_unitass_item_rec.release_date := c_unitass_item_rec.release_date ;
2665: ELSIF p_unitass_item_rec.release_date = FND_API.G_MISS_DATE THEN
2666: p_unitass_item_rec.release_date :=NULL;
2667: END IF;
2668:
2669: IF p_unitass_item_rec.midterm_mandatory_type_code IS NULL THEN
2667: END IF;
2668:
2669: IF p_unitass_item_rec.midterm_mandatory_type_code IS NULL THEN
2670: p_unitass_item_rec.midterm_mandatory_type_code := c_unitass_item_rec.midterm_mandatory_type_code;
2671: ELSIF p_unitass_item_rec.midterm_mandatory_type_code = FND_API.G_MISS_CHAR THEN
2672: p_unitass_item_rec.midterm_mandatory_type_code :=NULL;
2673: END IF;
2674:
2675: IF p_unitass_item_rec.midterm_weight_qty_item IS NULL THEN
2673: END IF;
2674:
2675: IF p_unitass_item_rec.midterm_weight_qty_item IS NULL THEN
2676: p_unitass_item_rec.midterm_weight_qty_item := c_unitass_item_rec.midterm_weight_qty;
2677: ELSIF p_unitass_item_rec.midterm_weight_qty_item = FND_API.G_MISS_NUM THEN
2678: p_unitass_item_rec.midterm_weight_qty_item :=NULL;
2679: END IF;
2680:
2681: IF p_unitass_item_rec.final_mandatory_type_code IS NULL THEN
2679: END IF;
2680:
2681: IF p_unitass_item_rec.final_mandatory_type_code IS NULL THEN
2682: p_unitass_item_rec.final_mandatory_type_code := c_unitass_item_rec.final_mandatory_type_code;
2683: ELSIF p_unitass_item_rec.final_mandatory_type_code = FND_API.G_MISS_CHAR THEN
2684: p_unitass_item_rec.final_mandatory_type_code :=NULL;
2685: END IF;
2686:
2687: IF p_unitass_item_rec.final_weight_qty_item IS NULL THEN
2685: END IF;
2686:
2687: IF p_unitass_item_rec.final_weight_qty_item IS NULL THEN
2688: p_unitass_item_rec.final_weight_qty_item := c_unitass_item_rec.final_weight_qty;
2689: ELSIF p_unitass_item_rec.final_weight_qty_item = FND_API.G_MISS_NUM THEN
2690: p_unitass_item_rec.final_weight_qty_item :=NULL;
2691: END IF;
2692:
2693:
3120: PROCEDURE validate_parameters ( p_uso_cm_grp_rec IN OUT NOCOPY igs_ps_generic_pub.usec_meet_with_rec_type ) AS
3121: BEGIN
3122:
3123: /* Check for Mandatory Parameters */
3124: IF p_uso_cm_grp_rec.teach_cal_alternate_code IS NULL OR p_uso_cm_grp_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
3125: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
3126: p_uso_cm_grp_rec.status := 'E';
3127: END IF;
3128: IF p_uso_cm_grp_rec.class_meet_group_name IS NULL OR p_uso_cm_grp_rec.class_meet_group_name = FND_API.G_MISS_CHAR THEN
3124: IF p_uso_cm_grp_rec.teach_cal_alternate_code IS NULL OR p_uso_cm_grp_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
3125: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
3126: p_uso_cm_grp_rec.status := 'E';
3127: END IF;
3128: IF p_uso_cm_grp_rec.class_meet_group_name IS NULL OR p_uso_cm_grp_rec.class_meet_group_name = FND_API.G_MISS_CHAR THEN
3129: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'GROUP_NAME', 'LEGACY_TOKENS', FALSE);
3130: p_uso_cm_grp_rec.status := 'E';
3131: END IF;
3132:
3201: l_n_class_meet_group_id := c_uso_cm_grp_rec.class_meet_group_id;
3202:
3203: IF p_uso_cm_grp_rec.max_enr_group IS NULL THEN
3204: p_uso_cm_grp_rec.max_enr_group := c_uso_cm_grp_rec.max_enr_group;
3205: ELSIF p_uso_cm_grp_rec.max_enr_group = FND_API.G_MISS_NUM THEN
3206: p_uso_cm_grp_rec.max_enr_group :=NULL;
3207: END IF;
3208:
3209: IF p_uso_cm_grp_rec.max_ovr_group IS NULL THEN
3207: END IF;
3208:
3209: IF p_uso_cm_grp_rec.max_ovr_group IS NULL THEN
3210: p_uso_cm_grp_rec.max_ovr_group := c_uso_cm_grp_rec.max_ovr_group;
3211: ELSIF p_uso_cm_grp_rec.max_ovr_group = FND_API.G_MISS_NUM THEN
3212: p_uso_cm_grp_rec.max_ovr_group :=NULL;
3213: END IF;
3214:
3215: END IF;
3469: PROCEDURE validate_parameters_item ( p_uso_clas_meet_rec IN OUT NOCOPY igs_ps_generic_pub.usec_meet_with_rec_type ) AS
3470: BEGIN
3471:
3472: /* Check for Mandatory Parameters */
3473: IF p_uso_clas_meet_rec.unit_cd IS NULL OR p_uso_clas_meet_rec.unit_cd = FND_API.G_MISS_CHAR THEN
3474: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CD', 'LEGACY_TOKENS', FALSE);
3475: p_uso_clas_meet_rec.status := 'E';
3476: END IF;
3477: IF p_uso_clas_meet_rec.version_number IS NULL OR p_uso_clas_meet_rec.version_number = FND_API.G_MISS_NUM THEN
3473: IF p_uso_clas_meet_rec.unit_cd IS NULL OR p_uso_clas_meet_rec.unit_cd = FND_API.G_MISS_CHAR THEN
3474: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CD', 'LEGACY_TOKENS', FALSE);
3475: p_uso_clas_meet_rec.status := 'E';
3476: END IF;
3477: IF p_uso_clas_meet_rec.version_number IS NULL OR p_uso_clas_meet_rec.version_number = FND_API.G_MISS_NUM THEN
3478: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_VER_NUM', 'LEGACY_TOKENS', FALSE);
3479: p_uso_clas_meet_rec.status := 'E';
3480: END IF;
3481: IF p_uso_clas_meet_rec.teach_cal_alternate_code IS NULL OR p_uso_clas_meet_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
3477: IF p_uso_clas_meet_rec.version_number IS NULL OR p_uso_clas_meet_rec.version_number = FND_API.G_MISS_NUM THEN
3478: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_VER_NUM', 'LEGACY_TOKENS', FALSE);
3479: p_uso_clas_meet_rec.status := 'E';
3480: END IF;
3481: IF p_uso_clas_meet_rec.teach_cal_alternate_code IS NULL OR p_uso_clas_meet_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
3482: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
3483: p_uso_clas_meet_rec.status := 'E';
3484: END IF;
3485: IF p_uso_clas_meet_rec.location_cd IS NULL OR p_uso_clas_meet_rec.location_cd = FND_API.G_MISS_CHAR THEN
3481: IF p_uso_clas_meet_rec.teach_cal_alternate_code IS NULL OR p_uso_clas_meet_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
3482: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
3483: p_uso_clas_meet_rec.status := 'E';
3484: END IF;
3485: IF p_uso_clas_meet_rec.location_cd IS NULL OR p_uso_clas_meet_rec.location_cd = FND_API.G_MISS_CHAR THEN
3486: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD', 'LEGACY_TOKENS', FALSE);
3487: p_uso_clas_meet_rec.status := 'E';
3488: END IF;
3489: IF p_uso_clas_meet_rec.unit_class IS NULL OR p_uso_clas_meet_rec.unit_class = FND_API.G_MISS_CHAR THEN
3485: IF p_uso_clas_meet_rec.location_cd IS NULL OR p_uso_clas_meet_rec.location_cd = FND_API.G_MISS_CHAR THEN
3486: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD', 'LEGACY_TOKENS', FALSE);
3487: p_uso_clas_meet_rec.status := 'E';
3488: END IF;
3489: IF p_uso_clas_meet_rec.unit_class IS NULL OR p_uso_clas_meet_rec.unit_class = FND_API.G_MISS_CHAR THEN
3490: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CLASS', 'LEGACY_TOKENS', FALSE);
3491: p_uso_clas_meet_rec.status := 'E';
3492: END IF;
3493: IF p_uso_clas_meet_rec.host IS NULL OR p_uso_clas_meet_rec.host = FND_API.G_MISS_CHAR THEN
3489: IF p_uso_clas_meet_rec.unit_class IS NULL OR p_uso_clas_meet_rec.unit_class = FND_API.G_MISS_CHAR THEN
3490: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CLASS', 'LEGACY_TOKENS', FALSE);
3491: p_uso_clas_meet_rec.status := 'E';
3492: END IF;
3493: IF p_uso_clas_meet_rec.host IS NULL OR p_uso_clas_meet_rec.host = FND_API.G_MISS_CHAR THEN
3494: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'HOST', 'LEGACY_TOKENS', FALSE);
3495: p_uso_clas_meet_rec.status := 'E';
3496: END IF;
3497:
3870: PROCEDURE validate_parameters ( p_usec_x_grp_rec IN OUT NOCOPY igs_ps_generic_pub.usec_cross_group_rec_type ) AS
3871: BEGIN
3872:
3873: /* Check for Mandatory Parameters */
3874: IF p_usec_x_grp_rec.teach_cal_alternate_code IS NULL OR p_usec_x_grp_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
3875: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
3876: p_usec_x_grp_rec.status := 'E';
3877: END IF;
3878:
3875: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
3876: p_usec_x_grp_rec.status := 'E';
3877: END IF;
3878:
3879: IF p_usec_x_grp_rec.usec_x_listed_group_name IS NULL OR p_usec_x_grp_rec.usec_x_listed_group_name = FND_API.G_MISS_CHAR THEN
3880: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'GROUP_NAME', 'LEGACY_TOKENS', FALSE);
3881: p_usec_x_grp_rec.status := 'E';
3882: END IF;
3883:
3946: l_n_usec_x_listed_group_id:= c_usec_x_grp_rec.usec_x_listed_group_id;
3947:
3948: IF p_usec_x_grp_rec.max_enr_group IS NULL THEN
3949: p_usec_x_grp_rec.max_enr_group := c_usec_x_grp_rec.max_enr_group;
3950: ELSIF p_usec_x_grp_rec.max_enr_group = FND_API.G_MISS_NUM THEN
3951: p_usec_x_grp_rec.max_enr_group :=NULL;
3952: END IF;
3953:
3954: IF p_usec_x_grp_rec.max_ovr_group IS NULL THEN
3952: END IF;
3953:
3954: IF p_usec_x_grp_rec.max_ovr_group IS NULL THEN
3955: p_usec_x_grp_rec.max_ovr_group := c_usec_x_grp_rec.max_ovr_group;
3956: ELSIF p_usec_x_grp_rec.max_ovr_group = FND_API.G_MISS_NUM THEN
3957: p_usec_x_grp_rec.max_ovr_group :=NULL;
3958: END IF;
3959:
3960: IF p_usec_x_grp_rec.location_inheritance IS NULL THEN
3958: END IF;
3959:
3960: IF p_usec_x_grp_rec.location_inheritance IS NULL THEN
3961: p_usec_x_grp_rec.location_inheritance := c_usec_x_grp_rec.location_inheritance;
3962: ELSIF p_usec_x_grp_rec.location_inheritance = FND_API.G_MISS_CHAR THEN
3963: p_usec_x_grp_rec.location_inheritance :='N';
3964: END IF;
3965: END IF;
3966:
4223: PROCEDURE validate_parameters_item ( p_usec_x_grpmem IN OUT NOCOPY igs_ps_generic_pub.usec_cross_group_rec_type ) AS
4224: BEGIN
4225:
4226: /* Check for Mandatory Parameters */
4227: IF p_usec_x_grpmem.unit_cd IS NULL OR p_usec_x_grpmem.unit_cd = FND_API.G_MISS_CHAR THEN
4228: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CD', 'LEGACY_TOKENS', FALSE);
4229: p_usec_x_grpmem.status := 'E';
4230: END IF;
4231: IF p_usec_x_grpmem.version_number IS NULL OR p_usec_x_grpmem.version_number = FND_API.G_MISS_NUM THEN
4227: IF p_usec_x_grpmem.unit_cd IS NULL OR p_usec_x_grpmem.unit_cd = FND_API.G_MISS_CHAR THEN
4228: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CD', 'LEGACY_TOKENS', FALSE);
4229: p_usec_x_grpmem.status := 'E';
4230: END IF;
4231: IF p_usec_x_grpmem.version_number IS NULL OR p_usec_x_grpmem.version_number = FND_API.G_MISS_NUM THEN
4232: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_VER_NUM', 'LEGACY_TOKENS', FALSE);
4233: p_usec_x_grpmem.status := 'E';
4234: END IF;
4235: IF p_usec_x_grpmem.teach_cal_alternate_code IS NULL OR p_usec_x_grpmem.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
4231: IF p_usec_x_grpmem.version_number IS NULL OR p_usec_x_grpmem.version_number = FND_API.G_MISS_NUM THEN
4232: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_VER_NUM', 'LEGACY_TOKENS', FALSE);
4233: p_usec_x_grpmem.status := 'E';
4234: END IF;
4235: IF p_usec_x_grpmem.teach_cal_alternate_code IS NULL OR p_usec_x_grpmem.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
4236: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
4237: p_usec_x_grpmem.status := 'E';
4238: END IF;
4239: IF p_usec_x_grpmem.location_cd IS NULL OR p_usec_x_grpmem.location_cd = FND_API.G_MISS_CHAR THEN
4235: IF p_usec_x_grpmem.teach_cal_alternate_code IS NULL OR p_usec_x_grpmem.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
4236: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
4237: p_usec_x_grpmem.status := 'E';
4238: END IF;
4239: IF p_usec_x_grpmem.location_cd IS NULL OR p_usec_x_grpmem.location_cd = FND_API.G_MISS_CHAR THEN
4240: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD', 'LEGACY_TOKENS', FALSE);
4241: p_usec_x_grpmem.status := 'E';
4242: END IF;
4243: IF p_usec_x_grpmem.unit_class IS NULL OR p_usec_x_grpmem.unit_class = FND_API.G_MISS_CHAR THEN
4239: IF p_usec_x_grpmem.location_cd IS NULL OR p_usec_x_grpmem.location_cd = FND_API.G_MISS_CHAR THEN
4240: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD', 'LEGACY_TOKENS', FALSE);
4241: p_usec_x_grpmem.status := 'E';
4242: END IF;
4243: IF p_usec_x_grpmem.unit_class IS NULL OR p_usec_x_grpmem.unit_class = FND_API.G_MISS_CHAR THEN
4244: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CLASS', 'LEGACY_TOKENS', FALSE);
4245: p_usec_x_grpmem.status := 'E';
4246: END IF;
4247: IF p_usec_x_grpmem.parent IS NULL OR p_usec_x_grpmem.parent = FND_API.G_MISS_CHAR THEN
4243: IF p_usec_x_grpmem.unit_class IS NULL OR p_usec_x_grpmem.unit_class = FND_API.G_MISS_CHAR THEN
4244: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CLASS', 'LEGACY_TOKENS', FALSE);
4245: p_usec_x_grpmem.status := 'E';
4246: END IF;
4247: IF p_usec_x_grpmem.parent IS NULL OR p_usec_x_grpmem.parent = FND_API.G_MISS_CHAR THEN
4248: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'PARENT', 'LEGACY_TOKENS', FALSE);
4249: p_usec_x_grpmem.status := 'E';
4250: END IF;
4251:
4615: PROCEDURE validate_parameters( p_usec_wlst_rec IN OUT NOCOPY igs_ps_generic_pub.usec_waitlist_rec_type ) AS
4616: BEGIN
4617:
4618: /* Check for Mandatory Parameters */
4619: IF p_usec_wlst_rec.unit_cd IS NULL OR p_usec_wlst_rec.unit_cd = FND_API.G_MISS_CHAR THEN
4620: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CD', 'LEGACY_TOKENS', FALSE);
4621: p_usec_wlst_rec.status := 'E';
4622: END IF;
4623: IF p_usec_wlst_rec.version_number IS NULL OR p_usec_wlst_rec.version_number = FND_API.G_MISS_NUM THEN
4619: IF p_usec_wlst_rec.unit_cd IS NULL OR p_usec_wlst_rec.unit_cd = FND_API.G_MISS_CHAR THEN
4620: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CD', 'LEGACY_TOKENS', FALSE);
4621: p_usec_wlst_rec.status := 'E';
4622: END IF;
4623: IF p_usec_wlst_rec.version_number IS NULL OR p_usec_wlst_rec.version_number = FND_API.G_MISS_NUM THEN
4624: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_VER_NUM', 'LEGACY_TOKENS', FALSE);
4625: p_usec_wlst_rec.status := 'E';
4626: END IF;
4627: IF p_usec_wlst_rec.teach_cal_alternate_code IS NULL OR p_usec_wlst_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
4623: IF p_usec_wlst_rec.version_number IS NULL OR p_usec_wlst_rec.version_number = FND_API.G_MISS_NUM THEN
4624: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_VER_NUM', 'LEGACY_TOKENS', FALSE);
4625: p_usec_wlst_rec.status := 'E';
4626: END IF;
4627: IF p_usec_wlst_rec.teach_cal_alternate_code IS NULL OR p_usec_wlst_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
4628: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
4629: p_usec_wlst_rec.status := 'E';
4630: END IF;
4631: IF p_usec_wlst_rec.location_cd IS NULL OR p_usec_wlst_rec.location_cd = FND_API.G_MISS_CHAR THEN
4627: IF p_usec_wlst_rec.teach_cal_alternate_code IS NULL OR p_usec_wlst_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
4628: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
4629: p_usec_wlst_rec.status := 'E';
4630: END IF;
4631: IF p_usec_wlst_rec.location_cd IS NULL OR p_usec_wlst_rec.location_cd = FND_API.G_MISS_CHAR THEN
4632: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD', 'LEGACY_TOKENS', FALSE);
4633: p_usec_wlst_rec.status := 'E';
4634: END IF;
4635: IF p_usec_wlst_rec.unit_class IS NULL OR p_usec_wlst_rec.unit_class = FND_API.G_MISS_CHAR THEN
4631: IF p_usec_wlst_rec.location_cd IS NULL OR p_usec_wlst_rec.location_cd = FND_API.G_MISS_CHAR THEN
4632: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD', 'LEGACY_TOKENS', FALSE);
4633: p_usec_wlst_rec.status := 'E';
4634: END IF;
4635: IF p_usec_wlst_rec.unit_class IS NULL OR p_usec_wlst_rec.unit_class = FND_API.G_MISS_CHAR THEN
4636: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CLASS', 'LEGACY_TOKENS', FALSE);
4637: p_usec_wlst_rec.status := 'E';
4638: END IF;
4639: IF p_usec_wlst_rec.priority_value IS NULL OR p_usec_wlst_rec.priority_value = FND_API.G_MISS_CHAR THEN
4635: IF p_usec_wlst_rec.unit_class IS NULL OR p_usec_wlst_rec.unit_class = FND_API.G_MISS_CHAR THEN
4636: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CLASS', 'LEGACY_TOKENS', FALSE);
4637: p_usec_wlst_rec.status := 'E';
4638: END IF;
4639: IF p_usec_wlst_rec.priority_value IS NULL OR p_usec_wlst_rec.priority_value = FND_API.G_MISS_CHAR THEN
4640: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'PRIORITY_VALUE', 'LEGACY_TOKENS', FALSE);
4641: p_usec_wlst_rec.status := 'E';
4642: END IF;
4643:
4720: CLOSE c_usprv;
4721:
4722: IF p_usec_wlst_rec.priority_number IS NULL THEN
4723: p_usec_wlst_rec.priority_number:= rec_usprv.priority_number;
4724: ELSIF p_usec_wlst_rec.priority_number = FND_API.G_MISS_NUM THEN
4725: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'PRIORITY_NUMBER', 'LEGACY_TOKENS', FALSE);
4726: p_usec_wlst_rec.status := 'E';
4727: END IF;
4728:
4912: PROCEDURE validate_parameters( p_usec_wlst_rec IN OUT NOCOPY igs_ps_generic_pub.usec_waitlist_rec_type ) AS
4913: BEGIN
4914:
4915: /* Check for Mandatory Parameters */
4916: IF p_usec_wlst_rec.preference_order IS NULL OR p_usec_wlst_rec.preference_order = FND_API.G_MISS_NUM THEN
4917: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'PREFERENCE_ORDER', 'LEGACY_TOKENS', FALSE);
4918: p_usec_wlst_rec.status := 'E';
4919: END IF;
4920: IF p_usec_wlst_rec.preference_code IS NULL OR p_usec_wlst_rec.preference_code = FND_API.G_MISS_CHAR THEN
4916: IF p_usec_wlst_rec.preference_order IS NULL OR p_usec_wlst_rec.preference_order = FND_API.G_MISS_NUM THEN
4917: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'PREFERENCE_ORDER', 'LEGACY_TOKENS', FALSE);
4918: p_usec_wlst_rec.status := 'E';
4919: END IF;
4920: IF p_usec_wlst_rec.preference_code IS NULL OR p_usec_wlst_rec.preference_code = FND_API.G_MISS_CHAR THEN
4921: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'PREFERENCE_CODE', 'LEGACY_TOKENS', FALSE);
4922: p_usec_wlst_rec.status := 'E';
4923: END IF;
4924:
4922: p_usec_wlst_rec.status := 'E';
4923: END IF;
4924:
4925: IF p_usec_wlst_rec.priority_value IS NOT NULL AND p_usec_wlst_rec.priority_value IN ('PROGRAM','UNIT_SET') THEN
4926: IF p_usec_wlst_rec.preference_version IS NULL OR p_usec_wlst_rec.preference_version = FND_API.G_MISS_NUM THEN
4927: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'PREFERENCE_VERSION', 'LEGACY_TOKENS', FALSE);
4928: p_usec_wlst_rec.status := 'E';
4929: END IF;
4930: ELSIF p_usec_wlst_rec.priority_value IS NOT NULL AND p_usec_wlst_rec.priority_value NOT IN ('PROGRAM','UNIT_SET') THEN
5329: PROCEDURE validate_parameters ( p_usec_notes_rec IN OUT NOCOPY igs_ps_generic_pub.usec_notes_rec_type ) AS
5330: BEGIN
5331:
5332: /* Check for Mandatory Parameters */
5333: IF p_usec_notes_rec.unit_cd IS NULL OR p_usec_notes_rec.unit_cd = FND_API.G_MISS_CHAR THEN
5334: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CD', 'LEGACY_TOKENS', FALSE);
5335: p_usec_notes_rec.status := 'E';
5336: END IF;
5337: IF p_usec_notes_rec.version_number IS NULL OR p_usec_notes_rec.version_number = FND_API.G_MISS_NUM THEN
5333: IF p_usec_notes_rec.unit_cd IS NULL OR p_usec_notes_rec.unit_cd = FND_API.G_MISS_CHAR THEN
5334: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CD', 'LEGACY_TOKENS', FALSE);
5335: p_usec_notes_rec.status := 'E';
5336: END IF;
5337: IF p_usec_notes_rec.version_number IS NULL OR p_usec_notes_rec.version_number = FND_API.G_MISS_NUM THEN
5338: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_VER_NUM', 'LEGACY_TOKENS', FALSE);
5339: p_usec_notes_rec.status := 'E';
5340: END IF;
5341: IF p_usec_notes_rec.teach_cal_alternate_code IS NULL OR p_usec_notes_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
5337: IF p_usec_notes_rec.version_number IS NULL OR p_usec_notes_rec.version_number = FND_API.G_MISS_NUM THEN
5338: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_VER_NUM', 'LEGACY_TOKENS', FALSE);
5339: p_usec_notes_rec.status := 'E';
5340: END IF;
5341: IF p_usec_notes_rec.teach_cal_alternate_code IS NULL OR p_usec_notes_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
5342: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
5343: p_usec_notes_rec.status := 'E';
5344: END IF;
5345: IF p_usec_notes_rec.location_cd IS NULL OR p_usec_notes_rec.location_cd= FND_API.G_MISS_CHAR THEN
5341: IF p_usec_notes_rec.teach_cal_alternate_code IS NULL OR p_usec_notes_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
5342: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
5343: p_usec_notes_rec.status := 'E';
5344: END IF;
5345: IF p_usec_notes_rec.location_cd IS NULL OR p_usec_notes_rec.location_cd= FND_API.G_MISS_CHAR THEN
5346: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD', 'LEGACY_TOKENS', FALSE);
5347: p_usec_notes_rec.status := 'E';
5348: END IF;
5349: IF p_usec_notes_rec.unit_class IS NULL OR p_usec_notes_rec.unit_class = FND_API.G_MISS_CHAR THEN
5345: IF p_usec_notes_rec.location_cd IS NULL OR p_usec_notes_rec.location_cd= FND_API.G_MISS_CHAR THEN
5346: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD', 'LEGACY_TOKENS', FALSE);
5347: p_usec_notes_rec.status := 'E';
5348: END IF;
5349: IF p_usec_notes_rec.unit_class IS NULL OR p_usec_notes_rec.unit_class = FND_API.G_MISS_CHAR THEN
5350: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CLASS', 'LEGACY_TOKENS', FALSE);
5351: p_usec_notes_rec.status := 'E';
5352: END IF;
5353: IF p_usec_notes_rec.crs_note_type IS NULL OR p_usec_notes_rec.crs_note_type = FND_API.G_MISS_CHAR THEN
5349: IF p_usec_notes_rec.unit_class IS NULL OR p_usec_notes_rec.unit_class = FND_API.G_MISS_CHAR THEN
5350: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CLASS', 'LEGACY_TOKENS', FALSE);
5351: p_usec_notes_rec.status := 'E';
5352: END IF;
5353: IF p_usec_notes_rec.crs_note_type IS NULL OR p_usec_notes_rec.crs_note_type = FND_API.G_MISS_CHAR THEN
5354: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'CRS_NOTE_TYPE', 'LEGACY_TOKENS', FALSE);
5355: p_usec_notes_rec.status := 'E';
5356: END IF;
5357:
5429: IF cur_ref_num%NOTFOUND THEN
5430: igs_ps_validate_lgcy_pkg.set_msg('IGS_EN_INV', 'REFERENCE_NUMBER', 'LEGACY_TOKENS', FALSE);
5431: p_usec_notes_rec.status := 'E';
5432: ELSE
5433: IF p_usec_notes_rec.note_text = FND_API.G_MISS_CHAR THEN
5434: p_usec_notes_rec.note_text :=NULL;
5435: ELSIF p_usec_notes_rec.note_text IS NULL THEN
5436: p_usec_notes_rec.note_text :=l_cur_ref_num.note_text;
5437: END IF;
5716: PROCEDURE validate_parameters ( p_usec_assmnt_rec IN OUT NOCOPY igs_ps_generic_pub.usec_assmnt_rec_type ) AS
5717: BEGIN
5718:
5719: /* Check for Mandatory Parameters */
5720: IF p_usec_assmnt_rec.unit_cd IS NULL OR p_usec_assmnt_rec.unit_cd = FND_API.G_MISS_CHAR THEN
5721: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CD', 'LEGACY_TOKENS', FALSE);
5722: p_usec_assmnt_rec.status := 'E';
5723: END IF;
5724: IF p_usec_assmnt_rec.version_number IS NULL OR p_usec_assmnt_rec.version_number = FND_API.G_MISS_NUM THEN
5720: IF p_usec_assmnt_rec.unit_cd IS NULL OR p_usec_assmnt_rec.unit_cd = FND_API.G_MISS_CHAR THEN
5721: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CD', 'LEGACY_TOKENS', FALSE);
5722: p_usec_assmnt_rec.status := 'E';
5723: END IF;
5724: IF p_usec_assmnt_rec.version_number IS NULL OR p_usec_assmnt_rec.version_number = FND_API.G_MISS_NUM THEN
5725: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_VER_NUM', 'LEGACY_TOKENS', FALSE);
5726: p_usec_assmnt_rec.status := 'E';
5727: END IF;
5728: IF p_usec_assmnt_rec.teach_cal_alternate_code IS NULL OR p_usec_assmnt_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
5724: IF p_usec_assmnt_rec.version_number IS NULL OR p_usec_assmnt_rec.version_number = FND_API.G_MISS_NUM THEN
5725: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_VER_NUM', 'LEGACY_TOKENS', FALSE);
5726: p_usec_assmnt_rec.status := 'E';
5727: END IF;
5728: IF p_usec_assmnt_rec.teach_cal_alternate_code IS NULL OR p_usec_assmnt_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
5729: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
5730: p_usec_assmnt_rec.status := 'E';
5731: END IF;
5732: IF p_usec_assmnt_rec.location_cd IS NULL OR p_usec_assmnt_rec.location_cd= FND_API.G_MISS_CHAR THEN
5728: IF p_usec_assmnt_rec.teach_cal_alternate_code IS NULL OR p_usec_assmnt_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
5729: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'TEACH_CAL_ALTERNATE_CD', 'LEGACY_TOKENS', FALSE);
5730: p_usec_assmnt_rec.status := 'E';
5731: END IF;
5732: IF p_usec_assmnt_rec.location_cd IS NULL OR p_usec_assmnt_rec.location_cd= FND_API.G_MISS_CHAR THEN
5733: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD', 'LEGACY_TOKENS', FALSE);
5734: p_usec_assmnt_rec.status := 'E';
5735: END IF;
5736: IF p_usec_assmnt_rec.unit_class IS NULL OR p_usec_assmnt_rec.unit_class = FND_API.G_MISS_CHAR THEN
5732: IF p_usec_assmnt_rec.location_cd IS NULL OR p_usec_assmnt_rec.location_cd= FND_API.G_MISS_CHAR THEN
5733: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD', 'LEGACY_TOKENS', FALSE);
5734: p_usec_assmnt_rec.status := 'E';
5735: END IF;
5736: IF p_usec_assmnt_rec.unit_class IS NULL OR p_usec_assmnt_rec.unit_class = FND_API.G_MISS_CHAR THEN
5737: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CLASS', 'LEGACY_TOKENS', FALSE);
5738: p_usec_assmnt_rec.status := 'E';
5739: END IF;
5740: IF p_usec_assmnt_rec.final_exam_date IS NULL OR p_usec_assmnt_rec.final_exam_date = FND_API.G_MISS_DATE THEN
5736: IF p_usec_assmnt_rec.unit_class IS NULL OR p_usec_assmnt_rec.unit_class = FND_API.G_MISS_CHAR THEN
5737: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'UNIT_CLASS', 'LEGACY_TOKENS', FALSE);
5738: p_usec_assmnt_rec.status := 'E';
5739: END IF;
5740: IF p_usec_assmnt_rec.final_exam_date IS NULL OR p_usec_assmnt_rec.final_exam_date = FND_API.G_MISS_DATE THEN
5741: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'FINAL_EXAM_DATE', 'LEGACY_TOKENS', FALSE);
5742: p_usec_assmnt_rec.status := 'E';
5743: END IF;
5744: IF p_usec_assmnt_rec.exam_start_time IS NULL OR p_usec_assmnt_rec.exam_start_time = FND_API.G_MISS_CHAR THEN
5740: IF p_usec_assmnt_rec.final_exam_date IS NULL OR p_usec_assmnt_rec.final_exam_date = FND_API.G_MISS_DATE THEN
5741: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'FINAL_EXAM_DATE', 'LEGACY_TOKENS', FALSE);
5742: p_usec_assmnt_rec.status := 'E';
5743: END IF;
5744: IF p_usec_assmnt_rec.exam_start_time IS NULL OR p_usec_assmnt_rec.exam_start_time = FND_API.G_MISS_CHAR THEN
5745: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'EXAM_START_TIME', 'LEGACY_TOKENS', FALSE);
5746: p_usec_assmnt_rec.status := 'E';
5747: END IF;
5748: IF p_usec_assmnt_rec.exam_end_time IS NULL OR p_usec_assmnt_rec.exam_end_time = FND_API.G_MISS_CHAR THEN
5744: IF p_usec_assmnt_rec.exam_start_time IS NULL OR p_usec_assmnt_rec.exam_start_time = FND_API.G_MISS_CHAR THEN
5745: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'EXAM_START_TIME', 'LEGACY_TOKENS', FALSE);
5746: p_usec_assmnt_rec.status := 'E';
5747: END IF;
5748: IF p_usec_assmnt_rec.exam_end_time IS NULL OR p_usec_assmnt_rec.exam_end_time = FND_API.G_MISS_CHAR THEN
5749: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'EXAM_END_TIME', 'LEGACY_TOKENS', FALSE);
5750: p_usec_assmnt_rec.status := 'E';
5751: END IF;
5752: IF p_usec_assmnt_rec.exam_location_cd IS NULL OR p_usec_assmnt_rec.exam_location_cd = FND_API.G_MISS_CHAR THEN
5748: IF p_usec_assmnt_rec.exam_end_time IS NULL OR p_usec_assmnt_rec.exam_end_time = FND_API.G_MISS_CHAR THEN
5749: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'EXAM_END_TIME', 'LEGACY_TOKENS', FALSE);
5750: p_usec_assmnt_rec.status := 'E';
5751: END IF;
5752: IF p_usec_assmnt_rec.exam_location_cd IS NULL OR p_usec_assmnt_rec.exam_location_cd = FND_API.G_MISS_CHAR THEN
5753: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'EXAM_LOCATION_CD', 'LEGACY_TOKENS', FALSE);
5754: p_usec_assmnt_rec.status := 'E';
5755: END IF;
5756:
5832: END IF;
5833:
5834:
5835: -- Derive Building Identifier and associated Room Identifier.
5836: IF p_usec_assmnt_rec.building_code IS NOT NULL AND p_usec_assmnt_rec.building_code <> FND_API.G_MISS_CHAR THEN
5837: OPEN c_bld_id ( p_usec_assmnt_rec.building_code, p_usec_assmnt_rec.exam_location_cd );
5838: FETCH c_bld_id INTO l_n_building_id;
5839: IF ( c_bld_id%NOTFOUND ) THEN
5840: igs_ps_validate_lgcy_pkg.set_msg('IGS_EN_INV', 'BUILDING_CODE', 'LEGACY_TOKENS', FALSE);
5842: END IF;
5843: CLOSE c_bld_id;
5844:
5845: -- Derive Room Identifier
5846: IF p_usec_assmnt_rec.room_code IS NOT NULL AND p_usec_assmnt_rec.room_code <> FND_API.G_MISS_CHAR THEN
5847: OPEN c_room_id ( l_n_building_id, p_usec_assmnt_rec.room_code );
5848: FETCH c_room_id INTO l_n_room_id;
5849: IF ( c_room_id%NOTFOUND ) THEN
5850: igs_ps_validate_lgcy_pkg.set_msg('IGS_EN_INV', 'ROOM_CODE', 'LEGACY_TOKENS', FALSE);
5909: CLOSE cur_usec_exam;
5910:
5911: IF p_usec_assmnt_rec.building_code IS NULL THEN
5912: l_n_building_id := l_cur_usec_exam.building_code;
5913: ELSIF p_usec_assmnt_rec.building_code = FND_API.G_MISS_CHAR THEN
5914: l_n_building_id := NULL;
5915: END IF;
5916:
5917: IF p_usec_assmnt_rec.room_code IS NULL THEN
5915: END IF;
5916:
5917: IF p_usec_assmnt_rec.room_code IS NULL THEN
5918: l_n_room_id := l_cur_usec_exam.room_code;
5919: ELSIF p_usec_assmnt_rec.room_code = FND_API.G_MISS_CHAR THEN
5920: l_n_room_id := NULL;
5921: ELSIF p_usec_assmnt_rec.room_code IS NOT NULL THEN
5922: OPEN cur_room(l_n_building_id,p_usec_assmnt_rec.room_code);
5923: FETCH cur_room INTO l_n_room_id;
6254: BEGIN
6255: p_uso_ins_rec.status:='S';
6256:
6257: -- Checking for the mandatory existence of Unit Code, verison number, instructor person number parameter in the record.
6258: IF p_uso_ins_rec.instructor_person_number IS NULL OR p_uso_ins_rec.instructor_person_number = FND_API.G_MISS_CHAR THEN
6259: fnd_message.set_name('IGS','IGS_PS_INS_PERSON_NUMBER');
6260: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY',fnd_message.get,NULL,FALSE);
6261: p_uso_ins_rec.status := 'E';
6262: END IF;
6260: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY',fnd_message.get,NULL,FALSE);
6261: p_uso_ins_rec.status := 'E';
6262: END IF;
6263:
6264: IF p_uso_ins_rec.unit_cd IS NULL OR p_uso_ins_rec.unit_cd = FND_API.G_MISS_CHAR THEN
6265: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CD','LEGACY_TOKENS',FALSE);
6266: p_uso_ins_rec.status := 'E';
6267: END IF;
6268:
6265: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CD','LEGACY_TOKENS',FALSE);
6266: p_uso_ins_rec.status := 'E';
6267: END IF;
6268:
6269: IF p_uso_ins_rec.version_number IS NULL OR p_uso_ins_rec.version_number = FND_API.G_MISS_NUM THEN
6270: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_VER_NUM','LEGACY_TOKENS',FALSE);
6271: p_uso_ins_rec.status := 'E';
6272: END IF;
6273:
6272: END IF;
6273:
6274: -- if the production USO id is not provided then Teching calendar alternate code, location code and
6275: -- unit class are required.
6276: IF p_uso_ins_rec.production_uso_id IS NULL OR p_uso_ins_rec.production_uso_id = FND_API.G_MISS_NUM THEN
6277: IF p_uso_ins_rec.teach_cal_alternate_code IS NULL OR p_uso_ins_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
6278: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','TEACH_CAL_ALTERNATE_CD','LEGACY_TOKENS',FALSE);
6279: p_uso_ins_rec.status := 'E';
6280: END IF;
6273:
6274: -- if the production USO id is not provided then Teching calendar alternate code, location code and
6275: -- unit class are required.
6276: IF p_uso_ins_rec.production_uso_id IS NULL OR p_uso_ins_rec.production_uso_id = FND_API.G_MISS_NUM THEN
6277: IF p_uso_ins_rec.teach_cal_alternate_code IS NULL OR p_uso_ins_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
6278: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','TEACH_CAL_ALTERNATE_CD','LEGACY_TOKENS',FALSE);
6279: p_uso_ins_rec.status := 'E';
6280: END IF;
6281: IF p_uso_ins_rec.location_cd IS NULL OR p_uso_ins_rec.location_cd = FND_API.G_MISS_CHAR THEN
6277: IF p_uso_ins_rec.teach_cal_alternate_code IS NULL OR p_uso_ins_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
6278: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','TEACH_CAL_ALTERNATE_CD','LEGACY_TOKENS',FALSE);
6279: p_uso_ins_rec.status := 'E';
6280: END IF;
6281: IF p_uso_ins_rec.location_cd IS NULL OR p_uso_ins_rec.location_cd = FND_API.G_MISS_CHAR THEN
6282: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD','LEGACY_TOKENS',FALSE);
6283: p_uso_ins_rec.status := 'E';
6284: END IF;
6285: IF p_uso_ins_rec.unit_class IS NULL OR p_uso_ins_rec.unit_class = FND_API.G_MISS_CHAR THEN
6281: IF p_uso_ins_rec.location_cd IS NULL OR p_uso_ins_rec.location_cd = FND_API.G_MISS_CHAR THEN
6282: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD','LEGACY_TOKENS',FALSE);
6283: p_uso_ins_rec.status := 'E';
6284: END IF;
6285: IF p_uso_ins_rec.unit_class IS NULL OR p_uso_ins_rec.unit_class = FND_API.G_MISS_CHAR THEN
6286: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CLASS','LEGACY_TOKENS',FALSE);
6287: p_uso_ins_rec.status := 'E';
6288: END IF;
6289: END IF;
6287: p_uso_ins_rec.status := 'E';
6288: END IF;
6289: END IF;
6290:
6291: IF (p_uso_ins_rec.teach_cal_alternate_code IS NULL OR p_uso_ins_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR ) AND
6292: (p_uso_ins_rec.location_cd IS NULL OR p_uso_ins_rec.location_cd = FND_API.G_MISS_CHAR ) AND
6293: (p_uso_ins_rec.unit_class IS NULL OR p_uso_ins_rec.unit_class = FND_API.G_MISS_CHAR) THEN
6294: IF p_uso_ins_rec.production_uso_id IS NULL OR p_uso_ins_rec.production_uso_id = FND_API.G_MISS_NUM THEN
6295: fnd_message.set_name('IGS','IGS_PS_PRODUCTION_USO_ID');
6288: END IF;
6289: END IF;
6290:
6291: IF (p_uso_ins_rec.teach_cal_alternate_code IS NULL OR p_uso_ins_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR ) AND
6292: (p_uso_ins_rec.location_cd IS NULL OR p_uso_ins_rec.location_cd = FND_API.G_MISS_CHAR ) AND
6293: (p_uso_ins_rec.unit_class IS NULL OR p_uso_ins_rec.unit_class = FND_API.G_MISS_CHAR) THEN
6294: IF p_uso_ins_rec.production_uso_id IS NULL OR p_uso_ins_rec.production_uso_id = FND_API.G_MISS_NUM THEN
6295: fnd_message.set_name('IGS','IGS_PS_PRODUCTION_USO_ID');
6296: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY',fnd_message.get,NULL,FALSE);
6289: END IF;
6290:
6291: IF (p_uso_ins_rec.teach_cal_alternate_code IS NULL OR p_uso_ins_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR ) AND
6292: (p_uso_ins_rec.location_cd IS NULL OR p_uso_ins_rec.location_cd = FND_API.G_MISS_CHAR ) AND
6293: (p_uso_ins_rec.unit_class IS NULL OR p_uso_ins_rec.unit_class = FND_API.G_MISS_CHAR) THEN
6294: IF p_uso_ins_rec.production_uso_id IS NULL OR p_uso_ins_rec.production_uso_id = FND_API.G_MISS_NUM THEN
6295: fnd_message.set_name('IGS','IGS_PS_PRODUCTION_USO_ID');
6296: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY',fnd_message.get,NULL,FALSE);
6297: p_uso_ins_rec.status := 'E';
6290:
6291: IF (p_uso_ins_rec.teach_cal_alternate_code IS NULL OR p_uso_ins_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR ) AND
6292: (p_uso_ins_rec.location_cd IS NULL OR p_uso_ins_rec.location_cd = FND_API.G_MISS_CHAR ) AND
6293: (p_uso_ins_rec.unit_class IS NULL OR p_uso_ins_rec.unit_class = FND_API.G_MISS_CHAR) THEN
6294: IF p_uso_ins_rec.production_uso_id IS NULL OR p_uso_ins_rec.production_uso_id = FND_API.G_MISS_NUM THEN
6295: fnd_message.set_name('IGS','IGS_PS_PRODUCTION_USO_ID');
6296: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY',fnd_message.get,NULL,FALSE);
6297: p_uso_ins_rec.status := 'E';
6298: END IF;
6297: p_uso_ins_rec.status := 'E';
6298: END IF;
6299: END IF;
6300:
6301: IF (p_uso_ins_rec.production_uso_id IS NULL OR p_uso_ins_rec.production_uso_id = FND_API.G_MISS_NUM ) AND
6302: (p_uso_ins_rec.occurrence_identifier IS NULL OR p_uso_ins_rec.occurrence_identifier = FND_API.G_MISS_CHAR) THEN
6303: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'USEC_OCCRS_ID','IGS_PS_LOG_PARAMETERS', FALSE);
6304: p_uso_ins_rec.status := 'E';
6305: END IF;
6298: END IF;
6299: END IF;
6300:
6301: IF (p_uso_ins_rec.production_uso_id IS NULL OR p_uso_ins_rec.production_uso_id = FND_API.G_MISS_NUM ) AND
6302: (p_uso_ins_rec.occurrence_identifier IS NULL OR p_uso_ins_rec.occurrence_identifier = FND_API.G_MISS_CHAR) THEN
6303: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'USEC_OCCRS_ID','IGS_PS_LOG_PARAMETERS', FALSE);
6304: p_uso_ins_rec.status := 'E';
6305: END IF;
6306:
6801: BEGIN
6802: p_usec_teach_resp_rec.status:='S';
6803:
6804: -- Checking for the mandatory existence of Unit Code, verison number, instructor person number parameter in the record.
6805: IF p_usec_teach_resp_rec.instructor_person_number IS NULL OR p_usec_teach_resp_rec.instructor_person_number = FND_API.G_MISS_CHAR THEN
6806: fnd_message.set_name('IGS','IGS_PS_INS_PERSON_NUMBER');
6807: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY',fnd_message.get,NULL,FALSE);
6808: p_usec_teach_resp_rec.status := 'E';
6809: END IF;
6807: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY',fnd_message.get,NULL,FALSE);
6808: p_usec_teach_resp_rec.status := 'E';
6809: END IF;
6810:
6811: IF p_usec_teach_resp_rec.unit_cd IS NULL OR p_usec_teach_resp_rec.unit_cd = FND_API.G_MISS_CHAR THEN
6812: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CD','LEGACY_TOKENS',FALSE);
6813: p_usec_teach_resp_rec.status := 'E';
6814: END IF;
6815:
6812: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CD','LEGACY_TOKENS',FALSE);
6813: p_usec_teach_resp_rec.status := 'E';
6814: END IF;
6815:
6816: IF p_usec_teach_resp_rec.version_number IS NULL OR p_usec_teach_resp_rec.version_number = FND_API.G_MISS_NUM THEN
6817: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_VER_NUM','LEGACY_TOKENS',FALSE);
6818: p_usec_teach_resp_rec.status := 'E';
6819: END IF;
6820:
6817: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_VER_NUM','LEGACY_TOKENS',FALSE);
6818: p_usec_teach_resp_rec.status := 'E';
6819: END IF;
6820:
6821: IF p_usec_teach_resp_rec.teach_cal_alternate_code IS NULL OR p_usec_teach_resp_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
6822: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','TEACH_CAL_ALTERNATE_CD','LEGACY_TOKENS',FALSE);
6823: p_usec_teach_resp_rec.status := 'E';
6824: END IF;
6825:
6822: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','TEACH_CAL_ALTERNATE_CD','LEGACY_TOKENS',FALSE);
6823: p_usec_teach_resp_rec.status := 'E';
6824: END IF;
6825:
6826: IF p_usec_teach_resp_rec.location_cd IS NULL OR p_usec_teach_resp_rec.location_cd = FND_API.G_MISS_CHAR THEN
6827: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD','LEGACY_TOKENS',FALSE);
6828: p_usec_teach_resp_rec.status := 'E';
6829: END IF;
6830:
6827: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD','LEGACY_TOKENS',FALSE);
6828: p_usec_teach_resp_rec.status := 'E';
6829: END IF;
6830:
6831: IF p_usec_teach_resp_rec.unit_class IS NULL OR p_usec_teach_resp_rec.unit_class = FND_API.G_MISS_CHAR THEN
6832: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CLASS','LEGACY_TOKENS',FALSE);
6833: p_usec_teach_resp_rec.status := 'E';
6834: END IF;
6835:
6985: IF cur_resp%FOUND THEN
6986:
6987: IF p_usec_teach_resp_rec.confirmed_flag IS NULL THEN
6988: p_usec_teach_resp_rec.confirmed_flag := l_cur_resp.confirmed_flag;
6989: ELSIF p_usec_teach_resp_rec.confirmed_flag = FND_API.G_MISS_CHAR THEN
6990: p_usec_teach_resp_rec.confirmed_flag := 'N';
6991: END IF;
6992:
6993: IF p_usec_teach_resp_rec.lead_instructor_flag IS NULL THEN
6991: END IF;
6992:
6993: IF p_usec_teach_resp_rec.lead_instructor_flag IS NULL THEN
6994: p_usec_teach_resp_rec.lead_instructor_flag := l_cur_resp.lead_instructor_flag;
6995: ELSIF p_usec_teach_resp_rec.lead_instructor_flag = FND_API.G_MISS_CHAR THEN
6996: p_usec_teach_resp_rec.lead_instructor_flag := 'N';
6997: END IF;
6998:
6999: IF p_usec_teach_resp_rec.wl_percentage_allocation IS NULL THEN
6997: END IF;
6998:
6999: IF p_usec_teach_resp_rec.wl_percentage_allocation IS NULL THEN
7000: p_usec_teach_resp_rec.wl_percentage_allocation := l_cur_resp.percentage_allocation;
7001: ELSIF p_usec_teach_resp_rec.wl_percentage_allocation = FND_API.G_MISS_NUM THEN
7002: p_usec_teach_resp_rec.wl_percentage_allocation := NULL;
7003: END IF;
7004:
7005: IF p_usec_teach_resp_rec.instructional_load_lecture IS NULL THEN
7003: END IF;
7004:
7005: IF p_usec_teach_resp_rec.instructional_load_lecture IS NULL THEN
7006: p_usec_teach_resp_rec.instructional_load_lecture := l_cur_resp.instructional_load_lecture;
7007: ELSIF p_usec_teach_resp_rec.instructional_load_lecture = FND_API.G_MISS_NUM THEN
7008: p_usec_teach_resp_rec.instructional_load_lecture := NULL;
7009: END IF;
7010:
7011: IF p_usec_teach_resp_rec.instructional_load_laboratory IS NULL THEN
7009: END IF;
7010:
7011: IF p_usec_teach_resp_rec.instructional_load_laboratory IS NULL THEN
7012: p_usec_teach_resp_rec.instructional_load_laboratory := l_cur_resp.instructional_load_lab;
7013: ELSIF p_usec_teach_resp_rec.instructional_load_laboratory = FND_API.G_MISS_NUM THEN
7014: p_usec_teach_resp_rec.instructional_load_laboratory := NULL;
7015: END IF;
7016:
7017: IF p_usec_teach_resp_rec.instructional_load_other IS NULL THEN
7015: END IF;
7016:
7017: IF p_usec_teach_resp_rec.instructional_load_other IS NULL THEN
7018: p_usec_teach_resp_rec.instructional_load_other := l_cur_resp.instructional_load;
7019: ELSIF p_usec_teach_resp_rec.instructional_load_other = FND_API.G_MISS_NUM THEN
7020: p_usec_teach_resp_rec.instructional_load_other := NULL;
7021: END IF;
7022:
7023: ELSE
7502: BEGIN
7503: p_usec_sp_fee_rec.status:='S';
7504:
7505:
7506: IF p_usec_sp_fee_rec.unit_cd IS NULL OR p_usec_sp_fee_rec.unit_cd = FND_API.G_MISS_CHAR THEN
7507: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CD','LEGACY_TOKENS',FALSE);
7508: p_usec_sp_fee_rec.status := 'E';
7509: END IF;
7510:
7507: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CD','LEGACY_TOKENS',FALSE);
7508: p_usec_sp_fee_rec.status := 'E';
7509: END IF;
7510:
7511: IF p_usec_sp_fee_rec.version_number IS NULL OR p_usec_sp_fee_rec.version_number = FND_API.G_MISS_NUM THEN
7512: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_VER_NUM','LEGACY_TOKENS',FALSE);
7513: p_usec_sp_fee_rec.status := 'E';
7514: END IF;
7515:
7512: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_VER_NUM','LEGACY_TOKENS',FALSE);
7513: p_usec_sp_fee_rec.status := 'E';
7514: END IF;
7515:
7516: IF p_usec_sp_fee_rec.teach_cal_alternate_code IS NULL OR p_usec_sp_fee_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
7517: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','TEACH_CAL_ALTERNATE_CD','LEGACY_TOKENS',FALSE);
7518: p_usec_sp_fee_rec.status := 'E';
7519: END IF;
7520:
7517: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','TEACH_CAL_ALTERNATE_CD','LEGACY_TOKENS',FALSE);
7518: p_usec_sp_fee_rec.status := 'E';
7519: END IF;
7520:
7521: IF p_usec_sp_fee_rec.location_cd IS NULL OR p_usec_sp_fee_rec.location_cd = FND_API.G_MISS_CHAR THEN
7522: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD','LEGACY_TOKENS',FALSE);
7523: p_usec_sp_fee_rec.status := 'E';
7524: END IF;
7525:
7522: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD','LEGACY_TOKENS',FALSE);
7523: p_usec_sp_fee_rec.status := 'E';
7524: END IF;
7525:
7526: IF p_usec_sp_fee_rec.unit_class IS NULL OR p_usec_sp_fee_rec.unit_class = FND_API.G_MISS_CHAR THEN
7527: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CLASS','LEGACY_TOKENS',FALSE);
7528: p_usec_sp_fee_rec.status := 'E';
7529: END IF;
7530:
7527: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CLASS','LEGACY_TOKENS',FALSE);
7528: p_usec_sp_fee_rec.status := 'E';
7529: END IF;
7530:
7531: IF p_usec_sp_fee_rec.fee_type IS NULL OR p_usec_sp_fee_rec.fee_type = FND_API.G_MISS_CHAR THEN
7532: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','FEE_TYPE','IGS_FI_LOCKBOX',FALSE);
7533: p_usec_sp_fee_rec.status := 'E';
7534: END IF;
7535:
7532: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','FEE_TYPE','IGS_FI_LOCKBOX',FALSE);
7533: p_usec_sp_fee_rec.status := 'E';
7534: END IF;
7535:
7536: IF p_usec_sp_fee_rec.sp_fee_amt IS NULL OR p_usec_sp_fee_rec.sp_fee_amt = FND_API.G_MISS_NUM THEN
7537: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','FEE_AMOUNT','LEGACY_TOKENS',FALSE);
7538: p_usec_sp_fee_rec.status := 'E';
7539: END IF;
7540:
7675: CLOSE cur_sp_fees;
7676:
7677: IF p_usec_sp_fee_rec.closed_flag IS NULL THEN
7678: p_usec_sp_fee_rec.closed_flag := l_cur_sp_fees.closed_flag;
7679: ELSIF p_usec_sp_fee_rec.closed_flag = FND_API.G_MISS_CHAR THEN
7680: p_usec_sp_fee_rec.closed_flag := 'N';
7681: END IF;
7682:
7683: END IF;
8040: BEGIN
8041: p_usec_plus_hr_rec.status:='S';
8042:
8043:
8044: IF p_usec_plus_hr_rec.unit_cd IS NULL OR p_usec_plus_hr_rec.unit_cd = FND_API.G_MISS_CHAR THEN
8045: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CD','LEGACY_TOKENS',FALSE);
8046: p_usec_plus_hr_rec.status := 'E';
8047: END IF;
8048:
8045: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CD','LEGACY_TOKENS',FALSE);
8046: p_usec_plus_hr_rec.status := 'E';
8047: END IF;
8048:
8049: IF p_usec_plus_hr_rec.version_number IS NULL OR p_usec_plus_hr_rec.version_number = FND_API.G_MISS_NUM THEN
8050: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_VER_NUM','LEGACY_TOKENS',FALSE);
8051: p_usec_plus_hr_rec.status := 'E';
8052: END IF;
8053:
8050: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_VER_NUM','LEGACY_TOKENS',FALSE);
8051: p_usec_plus_hr_rec.status := 'E';
8052: END IF;
8053:
8054: IF p_usec_plus_hr_rec.teach_cal_alternate_code IS NULL OR p_usec_plus_hr_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
8055: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','TEACH_CAL_ALTERNATE_CD','LEGACY_TOKENS',FALSE);
8056: p_usec_plus_hr_rec.status := 'E';
8057: END IF;
8058:
8055: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','TEACH_CAL_ALTERNATE_CD','LEGACY_TOKENS',FALSE);
8056: p_usec_plus_hr_rec.status := 'E';
8057: END IF;
8058:
8059: IF p_usec_plus_hr_rec.location_cd IS NULL OR p_usec_plus_hr_rec.location_cd = FND_API.G_MISS_CHAR THEN
8060: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD','LEGACY_TOKENS',FALSE);
8061: p_usec_plus_hr_rec.status := 'E';
8062: END IF;
8063:
8060: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD','LEGACY_TOKENS',FALSE);
8061: p_usec_plus_hr_rec.status := 'E';
8062: END IF;
8063:
8064: IF p_usec_plus_hr_rec.unit_class IS NULL OR p_usec_plus_hr_rec.unit_class = FND_API.G_MISS_CHAR THEN
8065: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CLASS','LEGACY_TOKENS',FALSE);
8066: p_usec_plus_hr_rec.status := 'E';
8067: END IF;
8068:
8065: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CLASS','LEGACY_TOKENS',FALSE);
8066: p_usec_plus_hr_rec.status := 'E';
8067: END IF;
8068:
8069: IF p_usec_plus_hr_rec.activity_type_code IS NULL OR p_usec_plus_hr_rec.activity_type_code = FND_API.G_MISS_CHAR THEN
8070: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','ACTIVITY_TYPE_CODE','LEGACY_TOKENS',FALSE);
8071: p_usec_plus_hr_rec.status := 'E';
8072: END IF;
8073:
8070: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','ACTIVITY_TYPE_CODE','LEGACY_TOKENS',FALSE);
8071: p_usec_plus_hr_rec.status := 'E';
8072: END IF;
8073:
8074: IF p_usec_plus_hr_rec.activity_location_cd IS NULL OR p_usec_plus_hr_rec.activity_location_cd = FND_API.G_MISS_CHAR THEN
8075: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','ACTIVITY_LOCATION_CD','LEGACY_TOKENS',FALSE);
8076: p_usec_plus_hr_rec.status := 'E';
8077: END IF;
8078:
8075: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','ACTIVITY_LOCATION_CD','LEGACY_TOKENS',FALSE);
8076: p_usec_plus_hr_rec.status := 'E';
8077: END IF;
8078:
8079: IF p_usec_plus_hr_rec.building_cd IS NULL OR p_usec_plus_hr_rec.building_cd = FND_API.G_MISS_CHAR THEN
8080: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','BUILDING_CODE','LEGACY_TOKENS',FALSE);
8081: p_usec_plus_hr_rec.status := 'E';
8082: END IF;
8083:
8080: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','BUILDING_CODE','LEGACY_TOKENS',FALSE);
8081: p_usec_plus_hr_rec.status := 'E';
8082: END IF;
8083:
8084: IF p_usec_plus_hr_rec.room_cd IS NULL OR p_usec_plus_hr_rec.room_cd = FND_API.G_MISS_CHAR THEN
8085: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','ROOM_CODE','LEGACY_TOKENS',FALSE);
8086: p_usec_plus_hr_rec.status := 'E';
8087: END IF;
8088:
8085: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','ROOM_CODE','LEGACY_TOKENS',FALSE);
8086: p_usec_plus_hr_rec.status := 'E';
8087: END IF;
8088:
8089: IF p_usec_plus_hr_rec.number_of_students IS NULL OR p_usec_plus_hr_rec.number_of_students = FND_API.G_MISS_NUM THEN
8090: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','NUMBER_OF_STUDENTS','LEGACY_TOKENS',FALSE);
8091: p_usec_plus_hr_rec.status := 'E';
8092: END IF;
8093:
8090: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','NUMBER_OF_STUDENTS','LEGACY_TOKENS',FALSE);
8091: p_usec_plus_hr_rec.status := 'E';
8092: END IF;
8093:
8094: IF p_usec_plus_hr_rec.hours_per_student IS NULL OR p_usec_plus_hr_rec.hours_per_student = FND_API.G_MISS_NUM THEN
8095: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','HOURS_PER_STUDENT','LEGACY_TOKENS',FALSE);
8096: p_usec_plus_hr_rec.status := 'E';
8097: END IF;
8098:
8095: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','HOURS_PER_STUDENT','LEGACY_TOKENS',FALSE);
8096: p_usec_plus_hr_rec.status := 'E';
8097: END IF;
8098:
8099: IF p_usec_plus_hr_rec.hours_per_faculty IS NULL OR p_usec_plus_hr_rec.hours_per_faculty = FND_API.G_MISS_NUM THEN
8100: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','HOURS_PER_FACULTY','LEGACY_TOKENS',FALSE);
8101: p_usec_plus_hr_rec.status := 'E';
8102: END IF;
8103:
8168: END IF;
8169: CLOSE cur_room;
8170:
8171: -- Derive the Instructor identifier
8172: IF p_usec_plus_hr_rec.instructor_number IS NOT NULL AND p_usec_plus_hr_rec.instructor_number <> FND_API.G_MISS_CHAR THEN
8173: igs_ps_validate_lgcy_pkg.get_party_id(p_usec_plus_hr_rec.instructor_number, l_n_ins_id);
8174: IF l_n_ins_id IS NULL THEN
8175: fnd_message.set_name('IGS','IGS_PS_INS_PERSON_NUMBER');
8176: igs_ps_validate_lgcy_pkg.set_msg('IGS_EN_INV', fnd_message.get,NULL, FALSE);
8321: CLOSE cur_plus_hr;
8322:
8323: IF p_usec_plus_hr_rec.instructor_number IS NULL THEN
8324: l_n_ins_id := l_cur_plus_hr.instructor_id;
8325: ELSIF p_usec_plus_hr_rec.instructor_number = FND_API.G_MISS_CHAR THEN
8326: l_n_ins_id := NULL;
8327: END IF;
8328:
8329: END IF;
8614: BEGIN
8615: p_usec_rule_rec.status:='S';
8616:
8617:
8618: IF p_usec_rule_rec.unit_cd IS NULL OR p_usec_rule_rec.unit_cd = FND_API.G_MISS_CHAR THEN
8619: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CD','LEGACY_TOKENS',FALSE);
8620: p_usec_rule_rec.status := 'E';
8621: END IF;
8622:
8619: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CD','LEGACY_TOKENS',FALSE);
8620: p_usec_rule_rec.status := 'E';
8621: END IF;
8622:
8623: IF p_usec_rule_rec.version_number IS NULL OR p_usec_rule_rec.version_number = FND_API.G_MISS_NUM THEN
8624: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_VER_NUM','LEGACY_TOKENS',FALSE);
8625: p_usec_rule_rec.status := 'E';
8626: END IF;
8627:
8624: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_VER_NUM','LEGACY_TOKENS',FALSE);
8625: p_usec_rule_rec.status := 'E';
8626: END IF;
8627:
8628: IF p_usec_rule_rec.teach_cal_alternate_code IS NULL OR p_usec_rule_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
8629: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','TEACH_CAL_ALTERNATE_CD','LEGACY_TOKENS',FALSE);
8630: p_usec_rule_rec.status := 'E';
8631: END IF;
8632:
8629: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','TEACH_CAL_ALTERNATE_CD','LEGACY_TOKENS',FALSE);
8630: p_usec_rule_rec.status := 'E';
8631: END IF;
8632:
8633: IF p_usec_rule_rec.location_cd IS NULL OR p_usec_rule_rec.location_cd = FND_API.G_MISS_CHAR THEN
8634: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD','LEGACY_TOKENS',FALSE);
8635: p_usec_rule_rec.status := 'E';
8636: END IF;
8637:
8634: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD','LEGACY_TOKENS',FALSE);
8635: p_usec_rule_rec.status := 'E';
8636: END IF;
8637:
8638: IF p_usec_rule_rec.unit_class IS NULL OR p_usec_rule_rec.unit_class = FND_API.G_MISS_CHAR THEN
8639: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CLASS','LEGACY_TOKENS',FALSE);
8640: p_usec_rule_rec.status := 'E';
8641: END IF;
8642:
8639: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CLASS','LEGACY_TOKENS',FALSE);
8640: p_usec_rule_rec.status := 'E';
8641: END IF;
8642:
8643: IF p_usec_rule_rec.s_rule_call_cd IS NULL OR p_usec_rule_rec.s_rule_call_cd = FND_API.G_MISS_CHAR THEN
8644: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','S_RULE_CALL_CD','LEGACY_TOKENS',FALSE);
8645: p_usec_rule_rec.status := 'E';
8646: END IF;
8647:
8644: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','S_RULE_CALL_CD','LEGACY_TOKENS',FALSE);
8645: p_usec_rule_rec.status := 'E';
8646: END IF;
8647:
8648: IF p_usec_rule_rec.rule_text IS NULL OR p_usec_rule_rec.rule_text = FND_API.G_MISS_CHAR THEN
8649: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','RULE_TEXT','LEGACY_TOKENS',FALSE);
8650: p_usec_rule_rec.status := 'E';
8651: END IF;
8652:
9001: BEGIN
9002: p_usec_enr_dead_rec.status:='S';
9003:
9004:
9005: IF p_usec_enr_dead_rec.unit_cd IS NULL OR p_usec_enr_dead_rec.unit_cd = FND_API.G_MISS_CHAR THEN
9006: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CD','LEGACY_TOKENS',FALSE);
9007: p_usec_enr_dead_rec.status := 'E';
9008: END IF;
9009:
9006: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CD','LEGACY_TOKENS',FALSE);
9007: p_usec_enr_dead_rec.status := 'E';
9008: END IF;
9009:
9010: IF p_usec_enr_dead_rec.version_number IS NULL OR p_usec_enr_dead_rec.version_number = FND_API.G_MISS_NUM THEN
9011: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_VER_NUM','LEGACY_TOKENS',FALSE);
9012: p_usec_enr_dead_rec.status := 'E';
9013: END IF;
9014:
9011: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_VER_NUM','LEGACY_TOKENS',FALSE);
9012: p_usec_enr_dead_rec.status := 'E';
9013: END IF;
9014:
9015: IF p_usec_enr_dead_rec.teach_cal_alternate_code IS NULL OR p_usec_enr_dead_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
9016: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','TEACH_CAL_ALTERNATE_CD','LEGACY_TOKENS',FALSE);
9017: p_usec_enr_dead_rec.status := 'E';
9018: END IF;
9019:
9016: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','TEACH_CAL_ALTERNATE_CD','LEGACY_TOKENS',FALSE);
9017: p_usec_enr_dead_rec.status := 'E';
9018: END IF;
9019:
9020: IF p_usec_enr_dead_rec.location_cd IS NULL OR p_usec_enr_dead_rec.location_cd = FND_API.G_MISS_CHAR THEN
9021: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD','LEGACY_TOKENS',FALSE);
9022: p_usec_enr_dead_rec.status := 'E';
9023: END IF;
9024:
9021: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD','LEGACY_TOKENS',FALSE);
9022: p_usec_enr_dead_rec.status := 'E';
9023: END IF;
9024:
9025: IF p_usec_enr_dead_rec.unit_class IS NULL OR p_usec_enr_dead_rec.unit_class = FND_API.G_MISS_CHAR THEN
9026: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CLASS','LEGACY_TOKENS',FALSE);
9027: p_usec_enr_dead_rec.status := 'E';
9028: END IF;
9029:
9026: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CLASS','LEGACY_TOKENS',FALSE);
9027: p_usec_enr_dead_rec.status := 'E';
9028: END IF;
9029:
9030: IF p_usec_enr_dead_rec.function_name IS NULL OR p_usec_enr_dead_rec.function_name = FND_API.G_MISS_CHAR THEN
9031: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','FUNCTION_NAME','LEGACY_TOKENS',FALSE);
9032: p_usec_enr_dead_rec.status := 'E';
9033: END IF;
9034:
9569: BEGIN
9570: p_usec_enr_dis_rec.status:='S';
9571:
9572:
9573: IF p_usec_enr_dis_rec.unit_cd IS NULL OR p_usec_enr_dis_rec.unit_cd = FND_API.G_MISS_CHAR THEN
9574: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CD','LEGACY_TOKENS',FALSE);
9575: p_usec_enr_dis_rec.status := 'E';
9576: END IF;
9577:
9574: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CD','LEGACY_TOKENS',FALSE);
9575: p_usec_enr_dis_rec.status := 'E';
9576: END IF;
9577:
9578: IF p_usec_enr_dis_rec.version_number IS NULL OR p_usec_enr_dis_rec.version_number = FND_API.G_MISS_NUM THEN
9579: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_VER_NUM','LEGACY_TOKENS',FALSE);
9580: p_usec_enr_dis_rec.status := 'E';
9581: END IF;
9582:
9579: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_VER_NUM','LEGACY_TOKENS',FALSE);
9580: p_usec_enr_dis_rec.status := 'E';
9581: END IF;
9582:
9583: IF p_usec_enr_dis_rec.teach_cal_alternate_code IS NULL OR p_usec_enr_dis_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
9584: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','TEACH_CAL_ALTERNATE_CD','LEGACY_TOKENS',FALSE);
9585: p_usec_enr_dis_rec.status := 'E';
9586: END IF;
9587:
9584: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','TEACH_CAL_ALTERNATE_CD','LEGACY_TOKENS',FALSE);
9585: p_usec_enr_dis_rec.status := 'E';
9586: END IF;
9587:
9588: IF p_usec_enr_dis_rec.location_cd IS NULL OR p_usec_enr_dis_rec.location_cd = FND_API.G_MISS_CHAR THEN
9589: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD','LEGACY_TOKENS',FALSE);
9590: p_usec_enr_dis_rec.status := 'E';
9591: END IF;
9592:
9589: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD','LEGACY_TOKENS',FALSE);
9590: p_usec_enr_dis_rec.status := 'E';
9591: END IF;
9592:
9593: IF p_usec_enr_dis_rec.unit_class IS NULL OR p_usec_enr_dis_rec.unit_class = FND_API.G_MISS_CHAR THEN
9594: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CLASS','LEGACY_TOKENS',FALSE);
9595: p_usec_enr_dis_rec.status := 'E';
9596: END IF;
9597:
9594: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CLASS','LEGACY_TOKENS',FALSE);
9595: p_usec_enr_dis_rec.status := 'E';
9596: END IF;
9597:
9598: IF p_usec_enr_dis_rec.administrative_unit_status IS NULL OR p_usec_enr_dis_rec.administrative_unit_status = FND_API.G_MISS_CHAR THEN
9599: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','ADMINISTRATIVE_UNIT_STATUS','LEGACY_TOKENS',FALSE);
9600: p_usec_enr_dis_rec.status := 'E';
9601: END IF;
9602:
10143: BEGIN
10144: p_usec_ret_rec.status:='S';
10145:
10146:
10147: IF p_usec_ret_rec.unit_cd IS NULL OR p_usec_ret_rec.unit_cd = FND_API.G_MISS_CHAR THEN
10148: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CD','LEGACY_TOKENS',FALSE);
10149: p_usec_ret_rec.status := 'E';
10150: END IF;
10151:
10148: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CD','LEGACY_TOKENS',FALSE);
10149: p_usec_ret_rec.status := 'E';
10150: END IF;
10151:
10152: IF p_usec_ret_rec.version_number IS NULL OR p_usec_ret_rec.version_number = FND_API.G_MISS_NUM THEN
10153: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_VER_NUM','LEGACY_TOKENS',FALSE);
10154: p_usec_ret_rec.status := 'E';
10155: END IF;
10156:
10153: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_VER_NUM','LEGACY_TOKENS',FALSE);
10154: p_usec_ret_rec.status := 'E';
10155: END IF;
10156:
10157: IF p_usec_ret_rec.teach_cal_alternate_code IS NULL OR p_usec_ret_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
10158: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','TEACH_CAL_ALTERNATE_CD','LEGACY_TOKENS',FALSE);
10159: p_usec_ret_rec.status := 'E';
10160: END IF;
10161:
10158: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','TEACH_CAL_ALTERNATE_CD','LEGACY_TOKENS',FALSE);
10159: p_usec_ret_rec.status := 'E';
10160: END IF;
10161:
10162: IF p_usec_ret_rec.location_cd IS NULL OR p_usec_ret_rec.location_cd = FND_API.G_MISS_CHAR THEN
10163: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD','LEGACY_TOKENS',FALSE);
10164: p_usec_ret_rec.status := 'E';
10165: END IF;
10166:
10163: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD','LEGACY_TOKENS',FALSE);
10164: p_usec_ret_rec.status := 'E';
10165: END IF;
10166:
10167: IF p_usec_ret_rec.unit_class IS NULL OR p_usec_ret_rec.unit_class = FND_API.G_MISS_CHAR THEN
10168: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CLASS','LEGACY_TOKENS',FALSE);
10169: p_usec_ret_rec.status := 'E';
10170: END IF;
10171:
10168: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CLASS','LEGACY_TOKENS',FALSE);
10169: p_usec_ret_rec.status := 'E';
10170: END IF;
10171:
10172: IF p_usec_ret_rec.definition_level IS NULL OR p_usec_ret_rec.definition_level = FND_API.G_MISS_CHAR THEN
10173: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','DEFINITION_LEVEL','LEGACY_TOKENS',FALSE);
10174: p_usec_ret_rec.status := 'E';
10175: END IF;
10176:
10173: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','DEFINITION_LEVEL','LEGACY_TOKENS',FALSE);
10174: p_usec_ret_rec.status := 'E';
10175: END IF;
10176:
10177: IF (p_usec_ret_rec.fee_type IS NULL OR p_usec_ret_rec.fee_type = FND_API.G_MISS_CHAR) AND p_usec_ret_rec.definition_level='UNIT_SECTION_FEE_TYPE' THEN
10178: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','FEE_TYPE','IGS_FI_LOCKBOX',FALSE);
10179: p_usec_ret_rec.status := 'E';
10180: END IF;
10181:
10178: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','FEE_TYPE','IGS_FI_LOCKBOX',FALSE);
10179: p_usec_ret_rec.status := 'E';
10180: END IF;
10181:
10182: IF p_usec_ret_rec.formula_method IS NULL OR p_usec_ret_rec.formula_method = FND_API.G_MISS_CHAR THEN
10183: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','FORMULA_METHOD','LEGACY_TOKENS',FALSE);
10184: p_usec_ret_rec.status := 'E';
10185: END IF;
10186:
10183: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','FORMULA_METHOD','LEGACY_TOKENS',FALSE);
10184: p_usec_ret_rec.status := 'E';
10185: END IF;
10186:
10187: IF p_usec_ret_rec.round_method IS NULL OR p_usec_ret_rec.round_method = FND_API.G_MISS_CHAR THEN
10188: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','ROUND_METHOD','LEGACY_TOKENS',FALSE);
10189: p_usec_ret_rec.status := 'E';
10190: END IF;
10191:
10188: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','ROUND_METHOD','LEGACY_TOKENS',FALSE);
10189: p_usec_ret_rec.status := 'E';
10190: END IF;
10191:
10192: IF p_usec_ret_rec.incl_wkend_duration_flag IS NULL OR p_usec_ret_rec.incl_wkend_duration_flag = FND_API.G_MISS_CHAR THEN
10193: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','INCL_WKEND_DURATION_FLAG','LEGACY_TOKENS',FALSE);
10194: p_usec_ret_rec.status := 'E';
10195: END IF;
10196:
10747: BEGIN
10748: p_usec_ret_dtl_rec.status:='S';
10749:
10750:
10751: IF p_usec_ret_dtl_rec.unit_cd IS NULL OR p_usec_ret_dtl_rec.unit_cd = FND_API.G_MISS_CHAR THEN
10752: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CD','LEGACY_TOKENS',FALSE);
10753: p_usec_ret_dtl_rec.status := 'E';
10754: END IF;
10755:
10752: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CD','LEGACY_TOKENS',FALSE);
10753: p_usec_ret_dtl_rec.status := 'E';
10754: END IF;
10755:
10756: IF p_usec_ret_dtl_rec.version_number IS NULL OR p_usec_ret_dtl_rec.version_number = FND_API.G_MISS_NUM THEN
10757: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_VER_NUM','LEGACY_TOKENS',FALSE);
10758: p_usec_ret_dtl_rec.status := 'E';
10759: END IF;
10760:
10757: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_VER_NUM','LEGACY_TOKENS',FALSE);
10758: p_usec_ret_dtl_rec.status := 'E';
10759: END IF;
10760:
10761: IF p_usec_ret_dtl_rec.teach_cal_alternate_code IS NULL OR p_usec_ret_dtl_rec.teach_cal_alternate_code = FND_API.G_MISS_CHAR THEN
10762: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','TEACH_CAL_ALTERNATE_CD','LEGACY_TOKENS',FALSE);
10763: p_usec_ret_dtl_rec.status := 'E';
10764: END IF;
10765:
10762: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','TEACH_CAL_ALTERNATE_CD','LEGACY_TOKENS',FALSE);
10763: p_usec_ret_dtl_rec.status := 'E';
10764: END IF;
10765:
10766: IF p_usec_ret_dtl_rec.location_cd IS NULL OR p_usec_ret_dtl_rec.location_cd = FND_API.G_MISS_CHAR THEN
10767: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD','LEGACY_TOKENS',FALSE);
10768: p_usec_ret_dtl_rec.status := 'E';
10769: END IF;
10770:
10767: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY', 'LOCATION_CD','LEGACY_TOKENS',FALSE);
10768: p_usec_ret_dtl_rec.status := 'E';
10769: END IF;
10770:
10771: IF p_usec_ret_dtl_rec.unit_class IS NULL OR p_usec_ret_dtl_rec.unit_class = FND_API.G_MISS_CHAR THEN
10772: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CLASS','LEGACY_TOKENS',FALSE);
10773: p_usec_ret_dtl_rec.status := 'E';
10774: END IF;
10775:
10772: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','UNIT_CLASS','LEGACY_TOKENS',FALSE);
10773: p_usec_ret_dtl_rec.status := 'E';
10774: END IF;
10775:
10776: IF p_usec_ret_dtl_rec.definition_level IS NULL OR p_usec_ret_dtl_rec.definition_level = FND_API.G_MISS_CHAR THEN
10777: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','DEFINITION_LEVEL','LEGACY_TOKENS',FALSE);
10778: p_usec_ret_dtl_rec.status := 'E';
10779: END IF;
10780:
10777: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','DEFINITION_LEVEL','LEGACY_TOKENS',FALSE);
10778: p_usec_ret_dtl_rec.status := 'E';
10779: END IF;
10780:
10781: IF (p_usec_ret_dtl_rec.fee_type IS NULL OR p_usec_ret_dtl_rec.fee_type = FND_API.G_MISS_CHAR) AND p_usec_ret_dtl_rec.definition_level='UNIT_SECTION_FEE_TYPE' THEN
10782: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','FEE_TYPE','IGS_FI_LOCKBOX',FALSE);
10783: p_usec_ret_dtl_rec.status := 'E';
10784: END IF;
10785:
10782: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','FEE_TYPE','IGS_FI_LOCKBOX',FALSE);
10783: p_usec_ret_dtl_rec.status := 'E';
10784: END IF;
10785:
10786: IF p_usec_ret_dtl_rec.offset_value IS NULL OR p_usec_ret_dtl_rec.offset_value = FND_API.G_MISS_NUM THEN
10787: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','OFFSET_VALUE','LEGACY_TOKENS',FALSE);
10788: p_usec_ret_dtl_rec.status := 'E';
10789: END IF;
10790:
10789: END IF;
10790:
10791:
10792: --Offset date is mandatory when override date flag is set to 'Y'
10793: IF (p_usec_ret_dtl_rec.offset_date IS NULL OR p_usec_ret_dtl_rec.offset_date = FND_API.G_MISS_DATE) AND
10794: p_usec_ret_dtl_rec.override_date_flag ='Y' THEN
10795: fnd_message.set_name ( 'IGS', 'IGS_PS_OFFSET_DATE_MANDATORY' );
10796: fnd_msg_pub.add;
10797: p_usec_ret_dtl_rec.status := 'E';
10797: p_usec_ret_dtl_rec.status := 'E';
10798: END IF;
10799:
10800:
10801: IF p_usec_ret_dtl_rec.override_date_flag IS NULL OR p_usec_ret_dtl_rec.override_date_flag = FND_API.G_MISS_CHAR THEN
10802: igs_ps_validate_lgcy_pkg.set_msg('IGS_PS_LGCY_MANDATORY','OVERRIDE_DATE_FLAG','LEGACY_TOKENS',FALSE);
10803: p_usec_ret_dtl_rec.status := 'E';
10804: END IF;
10805:
11006: CLOSE cur_ret_det;
11007:
11008: IF p_usec_ret_dtl_rec.retention_percent IS NULL THEN
11009: p_usec_ret_dtl_rec.retention_percent := l_cur_ret_det.retention_percent;
11010: ELSIF p_usec_ret_dtl_rec.retention_percent = FND_API.G_MISS_NUM THEN
11011: p_usec_ret_dtl_rec.retention_percent := NULL;
11012: END IF;
11013:
11014: IF p_usec_ret_dtl_rec.retention_amount IS NULL THEN
11012: END IF;
11013:
11014: IF p_usec_ret_dtl_rec.retention_amount IS NULL THEN
11015: p_usec_ret_dtl_rec.retention_amount := l_cur_ret_det.retention_amount;
11016: ELSIF p_usec_ret_dtl_rec.retention_amount = FND_API.G_MISS_NUM THEN
11017: p_usec_ret_dtl_rec.retention_amount := NULL;
11018: END IF;
11019:
11020: END IF;