|
Lines 869-876
sub quote_item {
Link Here
|
| 869 |
my $new_item = { |
869 |
my $new_item = { |
| 870 |
itype => |
870 |
itype => |
| 871 |
$item->girfield( 'stock_category', $occurrence ), |
871 |
$item->girfield( 'stock_category', $occurrence ), |
| 872 |
location => |
|
|
| 873 |
$item->girfield( 'collection_code', $occurrence ), |
| 874 |
itemcallnumber => |
872 |
itemcallnumber => |
| 875 |
$item->girfield( 'shelfmark', $occurrence ) |
873 |
$item->girfield( 'shelfmark', $occurrence ) |
| 876 |
|| $item->girfield( 'classification', $occurrence ) |
874 |
|| $item->girfield( 'classification', $occurrence ) |
|
Lines 879-889
sub quote_item {
Link Here
|
| 879 |
$item->girfield( 'branch', $occurrence ), |
877 |
$item->girfield( 'branch', $occurrence ), |
| 880 |
homebranch => $item->girfield( 'branch', $occurrence ), |
878 |
homebranch => $item->girfield( 'branch', $occurrence ), |
| 881 |
}; |
879 |
}; |
|
|
880 |
|
| 881 |
my $lsq_field = C4::Context->preference('EdifactLSQ'); |
| 882 |
$new_item->{$lsq_field} = $item->girfield( 'sequence_code', $occurrence ); |
| 883 |
|
| 882 |
if ( $new_item->{itype} ) { |
884 |
if ( $new_item->{itype} ) { |
| 883 |
$item_hash->{itype} = $new_item->{itype}; |
885 |
$item_hash->{itype} = $new_item->{itype}; |
| 884 |
} |
886 |
} |
| 885 |
if ( $new_item->{location} ) { |
887 |
if ( $new_item->{$lsq_field} ) { |
| 886 |
$item_hash->{location} = $new_item->{location}; |
888 |
$item_hash->{$lsq_field} = $new_item->{$lsq_field}; |
| 887 |
} |
889 |
} |
| 888 |
if ( $new_item->{itemcallnumber} ) { |
890 |
if ( $new_item->{itemcallnumber} ) { |
| 889 |
$item_hash->{itemcallnumber} = |
891 |
$item_hash->{itemcallnumber} = |
|
Lines 957-964
sub quote_item {
Link Here
|
| 957 |
replacementprice => $price, |
959 |
replacementprice => $price, |
| 958 |
itype => |
960 |
itype => |
| 959 |
$item->girfield( 'stock_category', $occurrence ), |
961 |
$item->girfield( 'stock_category', $occurrence ), |
| 960 |
location => |
|
|
| 961 |
$item->girfield( 'collection_code', $occurrence ), |
| 962 |
itemcallnumber => |
962 |
itemcallnumber => |
| 963 |
$item->girfield( 'shelfmark', $occurrence ) |
963 |
$item->girfield( 'shelfmark', $occurrence ) |
| 964 |
|| $item->girfield( 'classification', $occurrence ) |
964 |
|| $item->girfield( 'classification', $occurrence ) |
|
Lines 967-972
sub quote_item {
Link Here
|
| 967 |
$item->girfield( 'branch', $occurrence ), |
967 |
$item->girfield( 'branch', $occurrence ), |
| 968 |
homebranch => $item->girfield( 'branch', $occurrence ), |
968 |
homebranch => $item->girfield( 'branch', $occurrence ), |
| 969 |
}; |
969 |
}; |
|
|
970 |
my $lsq_field = C4::Context->preference('EdifactLSQ'); |
| 971 |
$new_item->{$lsq_field} = $item->girfield( 'sequence_code', $occurrence ); |
| 970 |
$new_item->{biblionumber} = $bib->{biblionumber}; |
972 |
$new_item->{biblionumber} = $bib->{biblionumber}; |
| 971 |
$new_item->{biblioitemnumber} = $bib->{biblioitemnumber}; |
973 |
$new_item->{biblioitemnumber} = $bib->{biblioitemnumber}; |
| 972 |
my $kitem = Koha::Item->new( $new_item )->store; |
974 |
my $kitem = Koha::Item->new( $new_item )->store; |
|
Lines 1173-1179
sub _create_item_from_quote {
Link Here
|
| 1173 |
$item_hash->{booksellerid} = $quote->vendor_id; |
1175 |
$item_hash->{booksellerid} = $quote->vendor_id; |
| 1174 |
$item_hash->{price} = $item_hash->{replacementprice} = $item->price; |
1176 |
$item_hash->{price} = $item_hash->{replacementprice} = $item->price; |
| 1175 |
$item_hash->{itype} = $item->girfield('stock_category'); |
1177 |
$item_hash->{itype} = $item->girfield('stock_category'); |
| 1176 |
$item_hash->{location} = $item->girfield('collection_code'); |
1178 |
my $lsq_field = C4::Context->preference('EdifactLSQ'); |
|
|
1179 |
$item_hash->{$lsq_field} = $item->girfield('sequence_code'); |
| 1177 |
|
1180 |
|
| 1178 |
my $note = {}; |
1181 |
my $note = {}; |
| 1179 |
|
1182 |
|