version 1.125.2.4, 2018/06/27 14:26:28
|
version 1.125.2.6, 2018/09/14 21:06:22
|
Line 744 sub release_reservation {
|
Line 744 sub release_reservation {
|
action => 'release', |
action => 'release', |
context => $env{'form.context'}, |
context => $env{'form.context'}, |
); |
); |
&Apache::lonnet::write_log('slotreservationslog',\%storehash, |
&Apache::lonnet::write_log('course','slotreservationslog', |
1,$uname,$udom,$cnum,$cdom); |
\%storehash,1,$uname,$udom,$cnum,$cdom); |
&Apache::lonnet::write_log($cdom.'_'.$cnum.'_slotlog',\%storehash, |
&Apache::lonnet::write_log('course',$cdom.'_'.$cnum.'_slotlog', |
1,$uname,$udom,$uname,$udom); |
\%storehash,1,$uname,$udom,$uname,$udom); |
} |
} |
} |
} |
|
|
Line 2672 sub csv_upload_map {
|
Line 2672 sub csv_upload_map {
|
if (!$env{'form.datatoken'}) { |
if (!$env{'form.datatoken'}) { |
$datatoken=&Apache::loncommon::upfile_store($r); |
$datatoken=&Apache::loncommon::upfile_store($r); |
} else { |
} else { |
$datatoken=$env{'form.datatoken'}; |
$datatoken=&Apache::loncommon::valid_datatoken($env{'form.datatoken'}); |
&Apache::loncommon::load_tmp_file($r); |
if ($datatoken ne '') { |
|
&Apache::loncommon::load_tmp_file($r,$datatoken); |
|
} |
} |
} |
my @records=&Apache::loncommon::upfile_record_sep(); |
my @records=&Apache::loncommon::upfile_record_sep(); |
if ($env{'form.noFirstLine'}) { shift(@records); } |
if ($env{'form.noFirstLine'}) { shift(@records); } |
Line 2723 sub csvupload_fields {
|
Line 2725 sub csvupload_fields {
|
|
|
sub csv_upload_assign { |
sub csv_upload_assign { |
my ($r,$mgr)= @_; |
my ($r,$mgr)= @_; |
&Apache::loncommon::load_tmp_file($r); |
my $datatoken = &Apache::loncommon::valid_datatoken($env{'form.datatoken'}); |
|
if ($datatoken ne '') { |
|
&Apache::loncommon::load_tmp_file($r,$datatoken); |
|
} |
my @slotdata = &Apache::loncommon::upfile_record_sep(); |
my @slotdata = &Apache::loncommon::upfile_record_sep(); |
if ($env{'form.noFirstLine'}) { shift(@slotdata); } |
if ($env{'form.noFirstLine'}) { shift(@slotdata); } |
my %fields=&Apache::grades::get_fields(); |
my %fields=&Apache::grades::get_fields(); |