124: pkpatel 20-JUL-2001 Bug no. 1890270 Admissions Standards and Rules Dld_adsr_setup
125: Added code to check for the existence of new lookup_type 'PROBABILITY_DETAILS'
126: samaresh 28-dec-2001 Modified the function lookup_thru_lookup_type to add another parameter
127: Bug Number 2158524. Two columns SYSTEM_STATUS and SYSTEM_DEFAULT have been added
128: Added call to igs_lookups_view_pkg.get_pk_for_validation for the column
129: system_status
130: (reverse chronological order - newest change first)
131: ***************************************************************/
132: BEGIN
132: BEGIN
133: IF (old_references.class = new_references.class OR
134: new_references.class IS NULL) THEN
135: NULL;
136: ELSIF NOT (Igs_Lookups_view_pkg.Get_PK_For_Validation ('ADM_CODE_CLASSES',new_references.class)OR
137: Igs_Lookups_view_pkg.Get_PK_For_Validation ('IGS_AD_QUAL_TYPE',new_references.class) OR
138: Igs_Lookups_view_pkg.Get_PK_For_Validation (new_references.class_type_code,new_references.class)) THEN
139: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
140: IGS_GE_MSG_STACK.ADD;
133: IF (old_references.class = new_references.class OR
134: new_references.class IS NULL) THEN
135: NULL;
136: ELSIF NOT (Igs_Lookups_view_pkg.Get_PK_For_Validation ('ADM_CODE_CLASSES',new_references.class)OR
137: Igs_Lookups_view_pkg.Get_PK_For_Validation ('IGS_AD_QUAL_TYPE',new_references.class) OR
138: Igs_Lookups_view_pkg.Get_PK_For_Validation (new_references.class_type_code,new_references.class)) THEN
139: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
140: IGS_GE_MSG_STACK.ADD;
141: App_Exception.Raise_Exception;
134: new_references.class IS NULL) THEN
135: NULL;
136: ELSIF NOT (Igs_Lookups_view_pkg.Get_PK_For_Validation ('ADM_CODE_CLASSES',new_references.class)OR
137: Igs_Lookups_view_pkg.Get_PK_For_Validation ('IGS_AD_QUAL_TYPE',new_references.class) OR
138: Igs_Lookups_view_pkg.Get_PK_For_Validation (new_references.class_type_code,new_references.class)) THEN
139: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
140: IGS_GE_MSG_STACK.ADD;
141: App_Exception.Raise_Exception;
142: END IF;
143:
144: IF (old_references.system_status = new_references.system_status OR
145: new_references.system_status IS NULL) THEN
146: NULL;
147: ELSIF NOT (Igs_Lookups_view_pkg.Get_PK_For_Validation (new_references.class,new_references.system_status)) THEN
148: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
149: IGS_GE_MSG_STACK.ADD;
150: App_Exception.Raise_Exception;
151: END IF;