View | Details | Raw Unified | Return to bug 2553
Collapse All | Expand All

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/reports/serials_stats.tmpl (-3 / +3 lines)
Lines 73-92 Link Here
73
     				<!--/TMPL_LOOP --> 
73
     				<!--/TMPL_LOOP --> 
74
			    </select>
74
			    </select>
75
			</li><li>
75
			</li><li>
76
		    	<label for="branch">
76
		    	<label for="branchcode">
77
					Branch: 
77
					Branch: 
78
		    	</label>
78
		    	</label>
79
		    	<select name="branchcode"  id="branchcode">
79
		    	<select name="branchcode"  id="branchcode">
80
		    		<option value="">Any Branch</option>
80
		    		<option value="">Any Branch</option>
81
    				<!--TMPL_LOOP Name="branches"-->
81
    				<!--TMPL_LOOP Name="branches"-->
82
        				<option value="<!--TMPL_VAR Name="branchcode"-->"><!--TMPL_VAR Name="branchname"--></option>  
82
                                <!-- TMPL_IF NAME="selected" --><option value="<!--TMPL_VAR Name="value" -->" selected="selected"><!-- TMPL_VAR NAME="branchname" --></option><!-- TMPL_ELSE --><option value="<!--TMPL_VAR Name="value"-->"><!--TMPL_VAR Name="branchname"--></option><!-- /TMPL_IF -->  
83
     				<!--/TMPL_LOOP --> 		    	
83
     				<!--/TMPL_LOOP --> 		    	
84
		    	</select>
84
		    	</select>
85
		    	
85
		    	
86
		    </li>
86
		    </li>
87
		    <li>
87
		    <li>
88
		    	<label for="expired">Include expired subscriptions: </label>
88
		    	<label for="expired">Include expired subscriptions: </label>
89
		    	<input type="checkbox" name="expired" />
89
		    	<input type="checkbox" name="expired" id="expired" />
90
		    </li>
90
		    </li>
91
		</ol>	
91
		</ol>	
92
	</fieldset>
92
	</fieldset>
(-)a/reports/serials_stats.pl (-14 / +1 lines)
Lines 142-159 if($do_it){ Link Here
142
        push(@booksellers,$row)
142
        push(@booksellers,$row)
143
    }
143
    }
144
   
144
   
145
    ## We generate branchlist
146
    my $branches=GetBranches();
147
	my @branchloop;
148
	foreach (sort {$branches->{$a}->{'branchname'} cmp $branches->{$b}->{'branchname'}} keys %$branches) {
149
		my $thisbranch = ''; # FIXME: populate $thisbranch to preselect one
150
		my %row = (branchcode => $_,
151
			selected => ($thisbranch eq $_ ? 1 : 0),
152
			branchname => $branches->{$_}->{'branchname'},
153
		);
154
		push @branchloop, \%row;
155
	} 
156
    
157
    my @mime = ( C4::Context->preference("MIME") );
145
    my @mime = ( C4::Context->preference("MIME") );
158
	# warn 'MIME(s): ' . join ' ', @mime;
146
	# warn 'MIME(s): ' . join ' ', @mime;
159
	my $CGIextChoice=CGI::scrolling_list(
147
	my $CGIextChoice=CGI::scrolling_list(
Lines 167-173 if($do_it){ Link Here
167
		CGIextChoice => $CGIextChoice,
155
		CGIextChoice => $CGIextChoice,
168
		CGIsepChoice => $CGIsepChoice,
156
		CGIsepChoice => $CGIsepChoice,
169
        booksellers  => \@booksellers,
157
        booksellers  => \@booksellers,
170
        branches     => \@branchloop);
158
        branches     => GetBranchesLoop(C4::Context->userenv->{'branch'}));
171
}
159
}
172
160
173
output_html_with_http_headers $input, $cookie, $template->output;
161
output_html_with_http_headers $input, $cookie, $template->output;
174
- 

Return to bug 2553