[LON-CAPA-cvs] cvs: modules /msu localenroll.pm

raeburn raeburn at source.lon-capa.org
Sat Aug 18 23:36:05 EDT 2012


raeburn		Sun Aug 19 03:36:05 2012 EDT

  Modified files:              
    /modules/msu	localenroll.pm 
  Log:
  - Customization for MSU.
    - Need to include MSUNetID in place of username:domain when querying
      Dept. Administrator table. 
  
  
Index: modules/msu/localenroll.pm
diff -u modules/msu/localenroll.pm:1.60 modules/msu/localenroll.pm:1.61
--- modules/msu/localenroll.pm:1.60	Fri Aug  3 16:47:17 2012
+++ modules/msu/localenroll.pm	Sun Aug 19 03:36:04 2012
@@ -1,6 +1,6 @@
 # functions to glue school database system into Lon-CAPA for
 # automated enrollment
-# $Id: localenroll.pm,v 1.60 2012/08/03 16:47:17 raeburn Exp $
+# $Id: localenroll.pm,v 1.61 2012/08/19 03:36:04 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -472,7 +472,7 @@
                             eval {
                                 my $seqid = &semyr_to_seqid($term,$sem,$year);
                                 my $admincount = 0;
-                                my $adminsth = $dbh->prepare("SELECT Start_Term_Seq_Id,End_Term_Seq_Id FROM LONCAPA_DeptAdministrators WHERE subj_code = '$subj' AND crse_code = '$crse' AND PilotID = '$owner'");
+                                my $adminsth = $dbh->prepare("SELECT Start_Term_Seq_Id,End_Term_Seq_Id FROM LONCAPA_DeptAdministrators WHERE subj_code = '$subj' AND crse_code = '$crse' AND PilotID = '$ownername'");
                                 $adminsth->execute();
                                 while (my($start_seqid,$end_seqid)  = $adminsth->fetchrow_array ) {
                                     $start_seqid =~ s/^0//;




More information about the LON-CAPA-cvs mailing list