[Home] [Help]
415: BEGIN
416: IF column_name IS NULL THEN
417: NULL;
418: ELSIF UPPER (column_name) = 'CI_SEQUENCE_NUMBER' THEN
419: new_references.ci_sequence_number := igs_ge_number.to_num (column_value);
420: ELSIF UPPER (column_name) = 'SEQUENCE_NUMBER' THEN
421: new_references.sequence_number := igs_ge_number.to_num (column_value);
422: ELSIF UPPER (column_name) = 'EXAM_CI_SEQUENCE_NUMBER' THEN
423: new_references.exam_ci_sequence_number :=
417: NULL;
418: ELSIF UPPER (column_name) = 'CI_SEQUENCE_NUMBER' THEN
419: new_references.ci_sequence_number := igs_ge_number.to_num (column_value);
420: ELSIF UPPER (column_name) = 'SEQUENCE_NUMBER' THEN
421: new_references.sequence_number := igs_ge_number.to_num (column_value);
422: ELSIF UPPER (column_name) = 'EXAM_CI_SEQUENCE_NUMBER' THEN
423: new_references.exam_ci_sequence_number :=
424: igs_ge_number.to_num (column_value);
425: ELSIF UPPER (column_name) = 'DFLT_ITEM_IND' THEN
420: ELSIF UPPER (column_name) = 'SEQUENCE_NUMBER' THEN
421: new_references.sequence_number := igs_ge_number.to_num (column_value);
422: ELSIF UPPER (column_name) = 'EXAM_CI_SEQUENCE_NUMBER' THEN
423: new_references.exam_ci_sequence_number :=
424: igs_ge_number.to_num (column_value);
425: ELSIF UPPER (column_name) = 'DFLT_ITEM_IND' THEN
426: new_references.dflt_item_ind := column_value;
427: ELSIF UPPER (column_name) = 'CAL_TYPE' THEN
428: new_references.cal_type := column_value;