Lines 156-162
if ($do_it) {
Link Here
|
156 |
|
156 |
|
157 |
my $branches=GetBranches(); |
157 |
my $branches=GetBranches(); |
158 |
my @branchloop; |
158 |
my @branchloop; |
159 |
foreach (keys %$branches) { |
159 |
foreach (sort {$branches->{$a}->{'branchname'} cmp $branches->{$b}->{'branchname'}} keys %$branches) { |
160 |
my $thisbranch = ''; # FIXME: populate $thisbranch to preselect one |
160 |
my $thisbranch = ''; # FIXME: populate $thisbranch to preselect one |
161 |
my %row = (branchcode => $_, |
161 |
my %row = (branchcode => $_, |
162 |
selected => ($thisbranch eq $_ ? 1 : 0), |
162 |
selected => ($thisbranch eq $_ ? 1 : 0), |
163 |
- |
|
|