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

(-)a/acqui/neworderempty.pl (-2 / +2 lines)
Lines 145-151 for ( my $i = 0 ; $i < $count ; $i++ ) { Link Here
145
my $itemtypes = GetItemTypes;
145
my $itemtypes = GetItemTypes;
146
146
147
my @itemtypesloop;
147
my @itemtypesloop;
148
foreach my $thisitemtype (sort keys %$itemtypes) {
148
foreach my $thisitemtype (sort {$itemtypes->{$a}->{'description'} cmp $itemtypes->{$b}->{'description'}} keys %$itemtypes) {
149
    push @itemtypesloop, { itemtype => $itemtypes->{$thisitemtype}->{'itemtype'} , desc =>  $itemtypes->{$thisitemtype}->{'description'} } ;
149
    push @itemtypesloop, { itemtype => $itemtypes->{$thisitemtype}->{'itemtype'} , desc =>  $itemtypes->{$thisitemtype}->{'description'} } ;
150
}
150
}
151
151
Lines 156-162 my $onlymine=C4::Context->preference('IndependantBranches') && Link Here
156
             C4::Context->userenv->{branch};
156
             C4::Context->userenv->{branch};
157
my $branches = GetBranches($onlymine);
157
my $branches = GetBranches($onlymine);
158
my @branchloop;
158
my @branchloop;
159
foreach my $thisbranch ( sort keys %$branches ) {
159
foreach my $thisbranch ( sort {$branches->{$a}->{'branchname'} cmp $branches->{$b}->{'branchname'}} keys %$branches ) {
160
     my %row = (
160
     my %row = (
161
        value      => $thisbranch,
161
        value      => $thisbranch,
162
        branchname => $branches->{$thisbranch}->{'branchname'},
162
        branchname => $branches->{$thisbranch}->{'branchname'},
(-)a/acqui/orderreceive.pl (-4 / +3 lines)
Lines 104-110 if ( $count == 1 ) { Link Here
104
104
105
    my (@itemtypesloop,@locationloop,@ccodeloop);
105
    my (@itemtypesloop,@locationloop,@ccodeloop);
106
    my $itemtypes = GetItemTypes;
106
    my $itemtypes = GetItemTypes;
107
    foreach my $thisitemtype (sort keys %$itemtypes) {
107
    foreach my $thisitemtype (sort {$itemtypes->{$a}->{'description'} cmp $itemtypes->{$b}->{'description'}} keys %$itemtypes) {
108
        push @itemtypesloop, {
108
        push @itemtypesloop, {
109
                  value => $thisitemtype,
109
                  value => $thisitemtype,
110
            description => $itemtypes->{$thisitemtype}->{'description'},
110
            description => $itemtypes->{$thisitemtype}->{'description'},
Lines 112-125 if ( $count == 1 ) { Link Here
112
        };
112
        };
113
    }
113
    }
114
    my $locs = GetKohaAuthorisedValues( 'items.location' );
114
    my $locs = GetKohaAuthorisedValues( 'items.location' );
115
    foreach my $thisloc (sort keys %$locs) {
115
    foreach my $thisloc (sort {$locs->{$a} cmp $locs->{$b}} keys %$locs) {
116
	    push @locationloop, {
116
	    push @locationloop, {
117
                  value => $thisloc,
117
                  value => $thisloc,
118
            description => $locs->{$thisloc},
118
            description => $locs->{$thisloc},
119
        };
119
        };
120
    }
120
    }
121
    my $ccodes = GetKohaAuthorisedValues( 'items.ccode' );
121
    my $ccodes = GetKohaAuthorisedValues( 'items.ccode' );
122
	foreach my $thisccode (sort keys %$ccodes) {
122
	foreach my $thisccode (sort {$ccodes->{$a} cmp $ccodes->{$b}} keys %$ccodes) {
123
        push @ccodeloop, {
123
        push @ccodeloop, {
124
                  value => $thisccode,
124
                  value => $thisccode,
125
            description => $ccodes->{$thisccode},
125
            description => $ccodes->{$thisccode},
126
- 

Return to bug 2553