--- loncom/interface/lonprintout.pm 2005/02/10 21:05:03 1.360 +++ loncom/interface/lonprintout.pm 2005/02/17 23:19:44 1.362 @@ -1,7 +1,7 @@ # The LearningOnline Network # Printout # -# $Id: lonprintout.pm,v 1.360 2005/02/10 21:05:03 albertel Exp $ +# $Id: lonprintout.pm,v 1.362 2005/02/17 23:19:44 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -784,13 +784,12 @@ sub unsupported { sub output_data { my ($r,$helper,$rparmhash) = @_; my %parmhash = %$rparmhash; + my $html=&Apache::lonxml::xmlbegin(); my $bodytag=&Apache::loncommon::bodytag('Preparing Printout'); $r->print(< - - LON-CAPA output for printing $bodytag @@ -1839,10 +1837,22 @@ CHOOSE_STUDENTS &Apache::lonxml::xmlparse($r, 'helper', < PAGESIZE -
Number of anonymous assignments to print?
- -
Names to store the CODEs under for later:
+
+
Number of anonymous assignments to print? + + + if (((\$helper->{'VARS'}{'NUMBER_TO_PRINT_TOTAL'}+0) < 1) && + !\$helper->{'VARS'}{'REUSE_OLD_CODES'}) { + return "You need to specify the number of assignments to print"; + } + return undef; + + +
+ Names to store the CODEs under for later: + +

Reprint a set of saved CODEs: @@ -1895,10 +1905,21 @@ CHOOSE_STUDENTS1 &Apache::lonxml::xmlparse($r, 'helper', < PAGESIZE -
Number of anonymous assignments to print?
- -
Names to store the CODEs under for later:
+
Number of anonymous assignments to print? + + + if (((\$helper->{'VARS'}{'NUMBER_TO_PRINT_TOTAL'}+0) < 1) && + !\$helper->{'VARS'}{'REUSE_OLD_CODES'}) { + return "You need to specify the number of assignments to print"; + } + return undef; + + +
+ Names to store the CODEs under for later: + +

Reprint a set of saved CODEs: