--- 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('
'.&Apache::loncommon::help_open_topic( + 'Slot About', &mt('Help on slots'))); $r->print('
'); $r->print('
@@ -1075,11 +1076,11 @@ sub show_table { } if (!keys(%slots)) { - if ($crstype eq 'Community') { - $r->print('
'.&mt('No slots have been created in this community.').'
'); - } else { - $r->print('
'.&mt('No slots have been created in this course.').'
'); - } + $r->print( + '

' + .&mt('No slots have been created in this '.lc($crstype).'.') + .'

' + ); return; } @@ -2200,7 +2201,7 @@ sub upload_start { my ($r)=@_; $r->print( &Apache::grades::checkforfile_js() - .'

'.&mt('Specify a file containing the slot definitions.').'

' + .'

'.&mt('Upload a file containing the slot definitions').'

' .'' .'' @@ -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( + '' + .'

'.&mt('Identify fields in uploaded list').'

' + .'
' + .&Apache::loncommon::help_open_topic( + 'Slot About',&mt('Help on slots')) + .' '.&Apache::loncommon::help_open_topic( + 'Slot SelectingField',&mt('Help on selecting Fields')) + ."
\n" + .'

' + .&mt('Total number of records found in file: [_1]',''.$distotal.'') + ."

\n" + ); + if ($distotal == 0) { + $r->print('

'.&mt('None found').'

'); + } + $r->print( + '

' + .&mt('Enter as many fields as you can.').'
' + .&mt('The system will inform you and bring you back to this page,[_1]if the data selected is insufficient to create the slots.','
') + .'

' + ); + $r->print( + '
' + .'
'.&mt('Functions').'' + .'' + .' ' + .'

' + ); $r->print(< -

Identify fields $help_field

-Total number of records found in file: $distotal
-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.
- - @@ -2251,9 +2276,10 @@ to this page if the data selected is ins -
ENDPICK return ''; @@ -2264,7 +2290,6 @@ sub csvuploadmap_footer { my ($request,$i,$keyfields) =@_; my $buttontext = &mt('Create Slots'); $request->print(<