JBAS-1998 College barcodes upper case district code

Signed-off-by: Bill Erickson <berickxx@gmail.com>

diff --git a/KCLS/utility-scripts/import_students/generate-patrons-from-csv.pl b/KCLS/utility-scripts/import_students/generate-patrons-from-csv.pl
index 3a4590a..ce22ae9 100755 (executable)
--- a/KCLS/utility-scripts/import_students/generate-patrons-from-csv.pl
+++ b/KCLS/utility-scripts/import_students/generate-patrons-from-csv.pl
@@ -294,6 +294,7 @@ sub iterate_csv_rows {
         $seen{$phash->{student_id}} = 1;
 
         $phash->{barcode}  = $district_code;
+        $phash->{barcode}  = uc($district_code) if $is_college;
         $phash->{barcode} .= 't' if $is_teacher;
         $phash->{barcode} .= $phash->{student_id};