Lines 65-76
sub get_item_from_barcode {
Link Here
|
65 |
|
65 |
|
66 |
sub set_item_default_location { |
66 |
sub set_item_default_location { |
67 |
my $itemnumber = shift; |
67 |
my $itemnumber = shift; |
|
|
68 |
my $item = GetItem( $itemnumber ); |
68 |
if ( C4::Context->preference('NewItemsDefaultLocation') ) { |
69 |
if ( C4::Context->preference('NewItemsDefaultLocation') ) { |
69 |
my $item = GetItem( $itemnumber ); |
|
|
70 |
$item->{'permanent_location'} = $item->{'location'}; |
70 |
$item->{'permanent_location'} = $item->{'location'}; |
71 |
$item->{'location'} = C4::Context->preference('NewItemsDefaultLocation'); |
71 |
$item->{'location'} = C4::Context->preference('NewItemsDefaultLocation'); |
72 |
ModItem( $item, undef, $itemnumber); |
72 |
ModItem( $item, undef, $itemnumber); |
73 |
} |
73 |
} |
|
|
74 |
else { |
75 |
$item->{'permanent_location'} = $item->{'location'} if !defined($item->{'permanent_location'}); |
76 |
ModItem( $item, undef, $itemnumber); |
77 |
} |
74 |
} |
78 |
} |
75 |
|
79 |
|
76 |
# NOTE: This code is subject to change in the future with the implemenation of ajax based autobarcode code |
80 |
# NOTE: This code is subject to change in the future with the implemenation of ajax based autobarcode code |
77 |
- |
|
|