--- loncom/interface/slotrequest.pm 2012/08/27 14:33:15 1.116 +++ loncom/interface/slotrequest.pm 2013/01/23 17:48:37 1.117 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler for requesting to have slots added to a students record # -# $Id: slotrequest.pm,v 1.116 2012/08/27 14:33:15 raeburn Exp $ +# $Id: slotrequest.pm,v 1.117 2013/01/23 17:48:37 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1059,7 +1059,8 @@ sub show_table { my $available; if ($mgr eq 'F') { # FIXME: This line should be deleted once Slots uses breadcrumbs - $r->print(&Apache::loncommon::help_open_topic('Slot About', 'Help on slots')); + $r->print('<br />'.&Apache::loncommon::help_open_topic( + 'Slot About', &mt('Help on slots'))); $r->print('<div>'); $r->print('<form method="post" action="/adm/slotrequest"> @@ -1075,11 +1076,11 @@ sub show_table { } if (!keys(%slots)) { - if ($crstype eq 'Community') { - $r->print('<div>'.&mt('No slots have been created in this community.').'</div>'); - } else { - $r->print('<div>'.&mt('No slots have been created in this course.').'</div>'); - } + $r->print( + '<p class="LC_info">' + .&mt('No slots have been created in this '.lc($crstype).'.') + .'</p>' + ); return; } @@ -2200,7 +2201,7 @@ sub upload_start { my ($r)=@_; $r->print( &Apache::grades::checkforfile_js() - .'<h3>'.&mt('Specify a file containing the slot definitions.').'</h3>' + .'<h2>'.&mt('Upload a file containing the slot definitions').'</h2>' .'<form method="post" enctype="multipart/form-data"' .' action="/adm/slotrequest" name="slotupload">' .'<input type="hidden" name="command" value="csvuploadmap" />' @@ -2234,16 +2235,40 @@ sub csvuploadmap_header { my $checked=(($env{'form.noFirstLine'})?' checked="checked"':''); my $ignore=&mt('Ignore First Line'); - my $help_field = &Apache::loncommon::help_open_topic('Slot SelectingField'); + my $buttontext = &mt('Reverse Association'); + + $r->print( + '<form method="post" enctype="multipart/form-data" action="/adm/slotrequest" name="slotupload">' + .'<h2>'.&mt('Identify fields in uploaded list').'</h2>' + .'<div class="LC_columnSection">' + .&Apache::loncommon::help_open_topic( + 'Slot About',&mt('Help on slots')) + .' '.&Apache::loncommon::help_open_topic( + 'Slot SelectingField',&mt('Help on selecting Fields')) + ."</div>\n" + .'<p class="LC_info">' + .&mt('Total number of records found in file: [_1]','<b>'.$distotal.'</b>') + ."</p>\n" + ); + if ($distotal == 0) { + $r->print('<p class="LC_warning">'.&mt('None found').'</p>'); + } + $r->print( + '<p>' + .&mt('Enter as many fields as you can.').'<br />' + .&mt('The system will inform you and bring you back to this page,[_1]if the data selected is insufficient to create the slots.','<br />') + .'</p>' + ); + $r->print( + '<div class="LC_left_float">' + .'<fieldset><legend>'.&mt('Functions').'</legend>' + .'<label><input type="checkbox" name="noFirstLine"'.$checked.' />'.$ignore.'</label>' + .' <input type="button" value="'.$buttontext + .'" onclick="javascript:this.form.associate.value=\'Reverse Association\';submit(this.form);" />' + .'</fieldset></div><br clear="all" />' + ); $r->print(<<ENDPICK); -<form method="post" enctype="multipart/form-data" action="/adm/slotrequest" name="slotupload"> -<h3>Identify fields $help_field</h3> -Total number of records found in file: $distotal <hr /> -Enter as many fields as you can. The system will inform you and bring you back -to this page if the data selected is insufficient to create the slots.<hr /> -<input type="button" value="Reverse Association" onclick="javascript:this.form.associate.value='Reverse Association';submit(this.form);" /> -<label><input type="checkbox" name="noFirstLine"$checked />$ignore</label> <input type="hidden" name="associate" value="" /> <input type="hidden" name="datatoken" value="$datatoken" /> <input type="hidden" name="fileupload" value="$env{'form.fileupload'}" /> @@ -2251,9 +2276,10 @@ to this page if the data selected is ins <input type="hidden" name="upfile_associate" value="$env{'form.upfile_associate'}" /> <input type="hidden" name="command" value="csvuploadassign" /> -<hr /> <script type="text/javascript" language="Javascript"> +// <![CDATA[ $javascript +// ]]> </script> ENDPICK return ''; @@ -2264,7 +2290,6 @@ sub csvuploadmap_footer { my ($request,$i,$keyfields) =@_; my $buttontext = &mt('Create Slots'); $request->print(<<ENDPICK); -</table> <input type="hidden" name="nfields" value="$i" /> <input type="hidden" name="keyfields" value="$keyfields" /> <input type="button" onclick="javascript:verify(this.form)" value="$buttontext" /><br />