[Home] [Help]
124: OPEN cur_old_ref_values;
125: FETCH cur_old_ref_values INTO old_references;
126: IF (cur_old_ref_values%NOTFOUND)
127: AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
128: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
129: igs_ge_msg_stack.ADD;
130: CLOSE cur_old_ref_values;
131: app_exception.raise_exception;
132: RETURN;
432: END IF;
433: FETCH c_sua INTO v_sua_rec;
434: IF (c_sua%NOTFOUND) THEN
435: CLOSE c_sua;
436: fnd_message.set_name ('IGS', 'IGS_GE_UNHANDLED_EXCEPTION');
437: igs_ge_msg_stack.ADD;
438: app_exception.raise_exception;
439: END IF;
440: CLOSE c_sua;
467: FETCH cur_sut INTO rec_sut;
468: CLOSE cur_sut;
469: IF (NVL (rec_sut.transfer_exists, 'N') = 'Y') THEN
470: -- Error.
471: fnd_message.set_name ('IGS', 'IGS_AS_COMPL_UAO_NOTUPD');
472: igs_ge_msg_stack.ADD;
473: app_exception.raise_exception;
474: END IF;
475: END IF;
571: v_message_name,
572: new_references.uoo_id
573: ) = FALSE THEN
574: -- Error.
575: fnd_message.set_name ('IGS', v_message_name);
576: igs_ge_msg_stack.ADD;
577: app_exception.raise_exception;
578: END IF;
579: -- Not necessary to check for lock as in the process of insert/updating
643: )
644: ) THEN
645: NULL;
646: ELSIF NOT igs_ca_inst_pkg.get_pk_for_validation (new_references.cal_type, new_references.ci_sequence_number) THEN
647: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
648: igs_ge_msg_stack.ADD;
649: app_exception.raise_exception;
650: END IF;
651: IF (((old_references.grading_schema_cd = new_references.grading_schema_cd)
662: new_references.grading_schema_cd,
663: new_references.version_number,
664: new_references.grade
665: ) THEN
666: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
667: igs_ge_msg_stack.ADD;
668: app_exception.raise_exception;
669: END IF;
670: IF (((old_references.s_grade_creation_method_type = new_references.s_grade_creation_method_type))
674: ELSIF NOT igs_lookups_view_pkg.get_pk_for_validation (
675: 'GRADE_CREATION_METHOD_TYPE',
676: new_references.s_grade_creation_method_type
677: ) THEN
678: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
679: igs_ge_msg_stack.ADD;
680: app_exception.raise_exception;
681: END IF;
682: IF (((old_references.person_id = new_references.person_id)
693: new_references.person_id,
694: new_references.course_cd,
695: new_references.uoo_id
696: ) THEN
697: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
698: igs_ge_msg_stack.ADD;
699: app_exception.raise_exception;
700: END IF;
701: IF (((old_references.translated_grading_schema_cd = new_references.translated_grading_schema_cd)
712: new_references.translated_grading_schema_cd,
713: new_references.translated_version_number,
714: new_references.translated_grade
715: ) THEN
716: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
717: igs_ge_msg_stack.ADD;
718: app_exception.raise_exception;
719: END IF;
720: END check_parent_existance;
765: BEGIN
766: OPEN cur_rowid;
767: FETCH cur_rowid INTO lv_rowid;
768: IF (cur_rowid%FOUND) THEN
769: fnd_message.set_name ('IGS', 'IGS_AS_SUAO_CI_UFK');
770: igs_ge_msg_stack.ADD;
771: CLOSE cur_rowid;
772: app_exception.raise_exception;
773: RETURN;
784: BEGIN
785: OPEN cur_rowid;
786: FETCH cur_rowid INTO lv_rowid;
787: IF (cur_rowid%FOUND) THEN
788: fnd_message.set_name ('IGS', 'IGS_AS_SUAO_SLV_FK');
789: igs_ge_msg_stack.ADD;
790: CLOSE cur_rowid;
791: app_exception.raise_exception;
792: RETURN;
806: OPEN cur_rowid;
807: FETCH cur_rowid INTO lv_rowid;
808: IF (cur_rowid%FOUND) THEN
809: -- Changed '
810: fnd_message.set_name ('IGS', 'IGS_AS_SUAO_SUA_FK');
811: igs_ge_msg_stack.ADD;
812: CLOSE cur_rowid;
813: app_exception.raise_exception;
814: RETURN;
831: BEGIN
832: OPEN cur_rowid;
833: FETCH cur_rowid INTO lv_rowid;
834: IF (cur_rowid%FOUND) THEN
835: fnd_message.set_name ('IGS', 'IGS_AS_SUAO_SUA_FK');
836: igs_ge_msg_stack.ADD;
837: CLOSE cur_rowid;
838: app_exception.raise_exception;
839: RETURN;
989: new_references.outcome_dt,
990: NVL (new_references.grading_period_cd, 'FINAL'),
991: new_references.uoo_id
992: ) THEN
993: fnd_message.set_name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
994: igs_ge_msg_stack.ADD;
995: app_exception.raise_exception;
996: END IF;
997: check_constraints;
1008: new_references.outcome_dt,
1009: NVL (new_references.grading_period_cd, 'FINAL'),
1010: new_references.uoo_id
1011: ) THEN
1012: fnd_message.set_name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
1013: igs_ge_msg_stack.ADD;
1014: app_exception.raise_exception;
1015: END IF;
1016: check_constraints;
1031: --If user tries to assign an audit grade to a student who is not taking the unit as an
1032: --audit, an error is thrown
1033: IF l_sua_ass_ind = 'N'
1034: AND l_gsg_result_type = 'AUDIT' THEN
1035: fnd_message.set_name ('IGS', 'IGS_AS_SS_UNT_NT_ADT_GRD');
1036: igs_ge_msg_stack.ADD;
1037: app_exception.raise_exception;
1038: --If user tries to assign a non-audit grade to a student who is taking the unit attempt
1039: --as an audit, an error is thrown
1038: --If user tries to assign a non-audit grade to a student who is taking the unit attempt
1039: --as an audit, an error is thrown
1040: ELSIF l_sua_ass_ind = 'Y'
1041: AND l_gsg_result_type <> 'AUDIT' THEN
1042: fnd_message.set_name ('IGS', 'IGS_AS_SS_UNT_ADT_GRD');
1043: igs_ge_msg_stack.ADD;
1044: app_exception.raise_exception;
1045: END IF;
1046: END before_dml;
1157: ELSE
1158: x_program_update_date := SYSDATE;
1159: END IF;
1160: ELSE
1161: fnd_message.set_name ('FND', 'SYSTEM-INVALID ARGS');
1162: igs_ge_msg_stack.ADD;
1163: app_exception.raise_exception;
1164: END IF;
1165: before_dml (
1285:
1286: EXCEPTION
1287: WHEN OTHERS THEN
1288: IF (SQLCODE IN (-28115, -28113, -28111)) THEN
1289: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_EXCEPTION');
1290: fnd_message.set_token ('ERR_CD', SQLCODE);
1291: igs_ge_msg_stack.add;
1292: igs_sc_gen_001.unset_ctx('R');
1293: app_exception.raise_exception;
1286: EXCEPTION
1287: WHEN OTHERS THEN
1288: IF (SQLCODE IN (-28115, -28113, -28111)) THEN
1289: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_EXCEPTION');
1290: fnd_message.set_token ('ERR_CD', SQLCODE);
1291: igs_ge_msg_stack.add;
1292: igs_sc_gen_001.unset_ctx('R');
1293: app_exception.raise_exception;
1294: ELSE
1406: BEGIN
1407: OPEN c1;
1408: FETCH c1 INTO tlinfo;
1409: IF (c1%NOTFOUND) THEN
1410: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
1411: igs_ge_msg_stack.ADD;
1412: app_exception.raise_exception;
1413: CLOSE c1;
1414: RETURN;
1609: )
1610: ) THEN
1611: NULL;
1612: ELSE
1613: fnd_message.set_name ('FND', 'FORM_RECORD_CHANGED');
1614: igs_ge_msg_stack.ADD;
1615: app_exception.raise_exception;
1616: END IF;
1617: RETURN;
1694: IF x_last_update_login IS NULL THEN
1695: x_last_update_login := -1;
1696: END IF;
1697: ELSE
1698: fnd_message.set_name ('FND', 'SYSTEM-INVALID ARGS');
1699: igs_ge_msg_stack.ADD;
1700: app_exception.raise_exception;
1701: END IF;
1702: before_dml (
1830: manual_override_flag = new_references.manual_override_flag,
1831: show_on_academic_histry_flag = new_references.show_on_academic_histry_flag
1832: WHERE ROWID = x_rowid;
1833: IF (SQL%NOTFOUND) THEN
1834: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
1835: igs_ge_msg_stack.add;
1836: igs_sc_gen_001.unset_ctx('R');
1837: app_exception.raise_exception;
1838: END IF;
1844:
1845: EXCEPTION
1846: WHEN OTHERS THEN
1847: IF (SQLCODE = (-28115)) THEN
1848: fnd_message.set_name ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
1849: fnd_message.set_token ('ERR_CD', SQLCODE);
1850: igs_ge_msg_stack.add;
1851: igs_sc_gen_001.unset_ctx('R');
1852: app_exception.raise_exception;
1845: EXCEPTION
1846: WHEN OTHERS THEN
1847: IF (SQLCODE = (-28115)) THEN
1848: fnd_message.set_name ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
1849: fnd_message.set_token ('ERR_CD', SQLCODE);
1850: igs_ge_msg_stack.add;
1851: igs_sc_gen_001.unset_ctx('R');
1852: app_exception.raise_exception;
1853: ELSE
2053: END IF;
2054: DELETE FROM igs_as_su_stmptout_all
2055: WHERE ROWID = x_rowid;
2056: IF (SQL%NOTFOUND) THEN
2057: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
2058: igs_ge_msg_stack.add;
2059: igs_sc_gen_001.unset_ctx('R');
2060: app_exception.raise_exception;
2061: END IF;
2108: IF UPPER (column_name) = 'PERSON_ID'
2109: OR column_name IS NULL THEN
2110: IF new_references.person_id < 0
2111: OR new_references.person_id > 9999999999 THEN
2112: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
2113: igs_ge_msg_stack.ADD;
2114: app_exception.raise_exception;
2115: END IF;
2116: END IF;
2117: IF UPPER (column_name) = 'VERSION_NUMBER'
2118: OR column_name IS NULL THEN
2119: IF new_references.version_number < 0
2120: OR new_references.version_number > 999 THEN
2121: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
2122: igs_ge_msg_stack.ADD;
2123: app_exception.raise_exception;
2124: END IF;
2125: END IF;
2126: IF UPPER (column_name) = 'MARK'
2127: OR column_name IS NULL THEN
2128: IF new_references.mark < 0
2129: OR new_references.mark > 999 THEN
2130: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
2131: igs_ge_msg_stack.ADD;
2132: app_exception.raise_exception;
2133: END IF;
2134: END IF;
2134: END IF;
2135: IF UPPER (column_name) = 'FINALISED_OUTCOME_IND'
2136: OR column_name IS NULL THEN
2137: IF new_references.finalised_outcome_ind NOT IN ('Y', 'N') THEN
2138: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
2139: igs_ge_msg_stack.ADD;
2140: app_exception.raise_exception;
2141: END IF;
2142: END IF;
2143: IF UPPER (column_name) = 'TRANSLATED_VERSION_NUMBER'
2144: OR column_name IS NULL THEN
2145: IF new_references.translated_version_number < 0
2146: OR new_references.translated_version_number > 999 THEN
2147: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
2148: igs_ge_msg_stack.ADD;
2149: app_exception.raise_exception;
2150: END IF;
2151: END IF;
2152: IF UPPER (column_name) = 'NUMBER_TIMES_KEYED'
2153: OR column_name IS NULL THEN
2154: IF new_references.number_times_keyed < 0
2155: OR new_references.number_times_keyed > 99 THEN
2156: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
2157: igs_ge_msg_stack.ADD;
2158: app_exception.raise_exception;
2159: END IF;
2160: END IF;
2161: IF UPPER (column_name) = 'CI_SEQUENCE_NUMBER'
2162: OR column_name IS NULL THEN
2163: IF new_references.ci_sequence_number < 0
2164: OR new_references.ci_sequence_number > 999999 THEN
2165: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
2166: igs_ge_msg_stack.ADD;
2167: app_exception.raise_exception;
2168: END IF;
2169: END IF;
2169: END IF;
2170: IF UPPER (column_name) = 'CAL_TYPE'
2171: OR column_name IS NULL THEN
2172: IF new_references.cal_type <> UPPER (new_references.cal_type) THEN
2173: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
2174: igs_ge_msg_stack.ADD;
2175: app_exception.raise_exception;
2176: END IF;
2177: END IF;
2177: END IF;
2178: IF UPPER (column_name) = 'COURSE_CD'
2179: OR column_name IS NULL THEN
2180: IF new_references.course_cd <> UPPER (new_references.course_cd) THEN
2181: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
2182: igs_ge_msg_stack.ADD;
2183: app_exception.raise_exception;
2184: END IF;
2185: END IF;
2185: END IF;
2186: IF UPPER (column_name) = 'GRADE'
2187: OR column_name IS NULL THEN
2188: IF new_references.grade <> UPPER (new_references.grade) THEN
2189: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
2190: igs_ge_msg_stack.ADD;
2191: app_exception.raise_exception;
2192: END IF;
2193: END IF;
2193: END IF;
2194: IF UPPER (column_name) = 'GRADING_SCHEMA_CD'
2195: OR column_name IS NULL THEN
2196: IF new_references.grading_schema_cd <> UPPER (new_references.grading_schema_cd) THEN
2197: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
2198: igs_ge_msg_stack.ADD;
2199: app_exception.raise_exception;
2200: END IF;
2201: END IF;
2201: END IF;
2202: IF UPPER (column_name) = 'S_GRADE_CREATION_METHOD_TYPE'
2203: OR column_name IS NULL THEN
2204: IF new_references.s_grade_creation_method_type <> UPPER (new_references.s_grade_creation_method_type) THEN
2205: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
2206: igs_ge_msg_stack.ADD;
2207: app_exception.raise_exception;
2208: END IF;
2209: END IF;
2209: END IF;
2210: IF UPPER (column_name) = 'TRANSLATED_GRADE'
2211: OR column_name IS NULL THEN
2212: IF new_references.translated_grade <> UPPER (new_references.translated_grade) THEN
2213: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
2214: igs_ge_msg_stack.ADD;
2215: app_exception.raise_exception;
2216: END IF;
2217: END IF;
2217: END IF;
2218: IF UPPER (column_name) = 'TRANSLATED_GRADING_SCHEMA_CD'
2219: OR column_name IS NULL THEN
2220: IF new_references.translated_grading_schema_cd <> UPPER (new_references.translated_grading_schema_cd) THEN
2221: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
2222: igs_ge_msg_stack.ADD;
2223: app_exception.raise_exception;
2224: END IF;
2225: END IF;
2225: END IF;
2226: IF UPPER (column_name) = 'UNIT_CD'
2227: OR column_name IS NULL THEN
2228: IF new_references.unit_cd <> UPPER (new_references.unit_cd) THEN
2229: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
2230: igs_ge_msg_stack.ADD;
2231: app_exception.raise_exception;
2232: END IF;
2233: END IF;
2233: END IF;
2234: IF UPPER (column_name) = 'GRADING_PERIOD_CD'
2235: OR column_name IS NULL THEN
2236: IF new_references.grading_period_cd <> UPPER (new_references.grading_period_cd) THEN
2237: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
2238: igs_ge_msg_stack.ADD;
2239: app_exception.raise_exception;
2240: END IF;
2241: END IF;