version 1.80.2.1, 2003/08/25 16:36:58
|
version 1.81, 2003/08/14 14:16:42
|
Line 198 to this page if the data selected is ins
|
Line 198 to this page if the data selected is ins
|
<input type="hidden" name="associate" value="" /> |
<input type="hidden" name="associate" value="" /> |
<input type="hidden" name="datatoken" value="$datatoken" /> |
<input type="hidden" name="datatoken" value="$datatoken" /> |
<input type="hidden" name="fileupload" value="$ENV{'form.fileupload'}" /> |
<input type="hidden" name="fileupload" value="$ENV{'form.fileupload'}" /> |
|
<input type="hidden" name="noFirstLine" value="$ENV{'form.noFirstLine'}" /> |
<input type="hidden" name="upfiletype" value="$ENV{'form.upfiletype'}" /> |
<input type="hidden" name="upfiletype" value="$ENV{'form.upfiletype'}" /> |
<input type="hidden" name="upfile_associate" |
<input type="hidden" name="upfile_associate" |
value="$ENV{'form.upfile_associate'}" /> |
value="$ENV{'form.upfile_associate'}" /> |
Line 518 sub print_upload_manager_form {
|
Line 519 sub print_upload_manager_form {
|
my $distotal=$total+1; |
my $distotal=$total+1; |
my $today=time; |
my $today=time; |
my $halfyear=$today+15552000; |
my $halfyear=$today+15552000; |
my $defdom=$ENV{'request.role.domain'}; |
my $defdom=$r->dir_config('lonDefDomain'); |
my ($krbdef,$krbdefdom) = |
my ($krbdef,$krbdefdom) = |
&Apache::loncommon::get_kerberos_defaults($defdom); |
&Apache::loncommon::get_kerberos_defaults($defdom); |
&print_upload_manager_header($r,$datatoken,$distotal,$krbdefdom); |
&print_upload_manager_header($r,$datatoken,$distotal,$krbdefdom); |
my $i; |
my $i; |
my $keyfields; |
my $keyfields; |
|
my $dummy; |
if ($total>=0) { |
if ($total>=0) { |
my @d=(['username','Username'], |
my @d=(['username','Username'], |
['names','Last Name, First Names'], |
['names','Last Name, First Names'], |
Line 535 sub print_upload_manager_form {
|
Line 537 sub print_upload_manager_form {
|
['sec','Group/Section'], |
['sec','Group/Section'], |
['ipwd','Initial Password'], |
['ipwd','Initial Password'], |
['email','EMail Address']); |
['email','EMail Address']); |
|
if($ENV{'form.noFirstLine'}){ |
|
($dummy,@records)=@records; |
|
} |
|
|
if ($ENV{'form.upfile_associate'} eq 'reverse') { |
if ($ENV{'form.upfile_associate'} eq 'reverse') { |
&Apache::loncommon::csv_print_samples($r,\@records); |
&Apache::loncommon::csv_print_samples($r,\@records); |
$i=&Apache::loncommon::csv_print_select_table($r,\@records,\@d); |
$i=&Apache::loncommon::csv_print_select_table($r,\@records,\@d); |
Line 720 sub make_dates_default {
|
Line 726 sub make_dates_default {
|
sub get_student_username_domain_form { |
sub get_student_username_domain_form { |
my $r = shift; |
my $r = shift; |
my $domform = &Apache::loncommon::select_dom_form |
my $domform = &Apache::loncommon::select_dom_form |
($ENV{'request.role.domain'},'cudomain',0); |
($r->dir_config('lonDefDomain'),'cudomain',0); |
$r->print(<<END); |
$r->print(<<END); |
<input type="hidden" name="action" value="enrollstudent" /> |
<input type="hidden" name="action" value="enrollstudent" /> |
<input type="hidden" name="state" value="gotusername" /> |
<input type="hidden" name="state" value="gotusername" /> |
Line 756 sub print_enroll_single_student_form {
|
Line 762 sub print_enroll_single_student_form {
|
my $user_data_html = ''; |
my $user_data_html = ''; |
my $javascript_validations = ''; |
my $javascript_validations = ''; |
if ($new_user) { |
if ($new_user) { |
my $defdom=$ENV{'request.role.domain'}; |
my $defdom=$r->dir_config('lonDefDomain'); |
# Set up authentication forms |
# Set up authentication forms |
my ($krbdef,$krbdefdom) = |
my ($krbdef,$krbdefdom) = |
&Apache::loncommon::get_kerberos_defaults($domain); |
&Apache::loncommon::get_kerberos_defaults($domain); |
Line 1528 $upfile_select
|
Line 1534 $upfile_select
|
<input type=submit name="fileupload" value="Upload Courselist"> |
<input type=submit name="fileupload" value="Upload Courselist"> |
<input type="hidden" name="action" value="upload" /> |
<input type="hidden" name="action" value="upload" /> |
<input type="hidden" name="state" value="got_file" /> |
<input type="hidden" name="state" value="got_file" /> |
|
<input type="checkbox" name="noFirstLine" /> Ignore First Line<br /> |
</p> |
</p> |
$create_classlist_help <br /> |
$create_classlist_help <br /> |
$create_csv_help |
$create_csv_help |