Lines 137-155
for my $itype ( sort {$itemtypes->{$a}->{description} cmp $itemtypes->{$b}->{des
Link Here
|
137 |
push @itemtypeloop, { code => $itype , description => $itemtypes->{$itype}->{description} } ; |
137 |
push @itemtypeloop, { code => $itype , description => $itemtypes->{$itype}->{description} } ; |
138 |
} |
138 |
} |
139 |
|
139 |
|
140 |
my $branches=GetBranches(); |
|
|
141 |
my @branchloop; |
142 |
foreach (sort {$branches->{$a}->{'branchname'} cmp $branches->{$b}->{'branchname'}} keys %$branches) { |
143 |
my $thisbranch = ''; # FIXME |
144 |
my %row = ( |
145 |
branchcode => $_, |
146 |
selected => ($thisbranch eq $_ ? 1 : 0), |
147 |
code => $branches->{$_}->{'branchcode'}, |
148 |
description => $branches->{$_}->{'branchname'}, |
149 |
); |
150 |
push @branchloop, \%row; |
151 |
} |
152 |
|
153 |
# location list |
140 |
# location list |
154 |
my @locations; |
141 |
my @locations; |
155 |
foreach (sort keys %$locations) { |
142 |
foreach (sort keys %$locations) { |
Lines 178-184
$template->param(
Link Here
|
178 |
itemtypeloop => \@itemtypeloop, |
165 |
itemtypeloop => \@itemtypeloop, |
179 |
locationloop => \@locations, |
166 |
locationloop => \@locations, |
180 |
ccodeloop => \@ccodes, |
167 |
ccodeloop => \@ccodes, |
181 |
branchloop => \@branchloop, |
168 |
branchloop => GetBranchesLoop(C4::Context->userenv->{'branch'}), |
182 |
hassort1=> $hassort1, |
169 |
hassort1=> $hassort1, |
183 |
hassort2=> $hassort2, |
170 |
hassort2=> $hassort2, |
184 |
Bsort1 => $Bsort1, |
171 |
Bsort1 => $Bsort1, |
185 |
- |
|
|