--- loncom/interface/Attic/londropadd.pm 2001/12/19 17:17:46 1.17 +++ loncom/interface/Attic/londropadd.pm 2002/01/04 18:13:58 1.19 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to drop and add students in courses # -# $Id: londropadd.pm,v 1.17 2001/12/19 17:17:46 albertel Exp $ +# $Id: londropadd.pm,v 1.19 2002/01/04 18:13:58 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -45,6 +45,9 @@ # 8/6 Scott Harrison # Guy Albertelli # 9/25 Gerd Kortemeyer +# 12/19 Guy Albertelli +# YEAR=2002 +# 1/4 Gerd Kortemeyer package Apache::londropadd; @@ -499,6 +502,10 @@ LON-CAPA domain: Full Update Full update (also print list of users not enrolled anymore)

+

ID/Student Number

+ +Disable ID/Student Number Safeguard and Force Change of Conflicting IDs +(only do if you know what you are doing)


Note: for large courses, this operation might be time consuming. ENDPICK @@ -533,7 +540,7 @@ sub enroll_single_student { $ENV{'form.cfirst'},$ENV{'form.cmiddle'}, $ENV{'form.clast'},$ENV{'form.cgen'}, $ENV{'form.csec'},$ENV{'form.enddate'}, - $ENV{'form.startdate'})); + $ENV{'form.startdate'},$ENV{'form.forceid'})); } else { $r->print('Invalid login mode or password'); } @@ -742,6 +749,10 @@ Local Authentication with argument Set Ending Date

+

ID/Student Number

+ +Disable ID/Student Number Safeguard and Force Change of Conflicting IDs +(only do if you know what you are doing)


ENDSENROLL @@ -908,7 +919,8 @@ sub upfile_drop_add { &dropstudent($domain,$username,$cid,$sec); my $reply=&Apache::lonnet::modifystudent( $domain,$username,$id,$amode,$password, - $fname,$mname,$lname,$gen,$sec,$enddate,$startdate); + $fname,$mname,$lname,$gen,$sec,$enddate,$startdate, + $ENV{'form.forceid'}); unless ($reply eq 'ok') { $r->print( "

Error enrolling $username: $reply

");