Lines 175-185
sub build_sample_item {
Link Here
|
175 |
my $itype = delete $args->{itype} |
175 |
my $itype = delete $args->{itype} |
176 |
|| $self->build_object( { class => 'Koha::ItemTypes' } )->itemtype; |
176 |
|| $self->build_object( { class => 'Koha::ItemTypes' } )->itemtype; |
177 |
|
177 |
|
|
|
178 |
my $barcode = |
179 |
exists( $args->{barcode} ) |
180 |
? $args->{barcode} |
181 |
: $self->_gen_text( { info => { size => SIZE_BARCODE } } ); |
182 |
|
178 |
my ( undef, undef, $itemnumber ) = C4::Items::AddItem( |
183 |
my ( undef, undef, $itemnumber ) = C4::Items::AddItem( |
179 |
{ |
184 |
{ |
180 |
homebranch => $library, |
185 |
homebranch => $library, |
181 |
holdingbranch => $library, |
186 |
holdingbranch => $library, |
182 |
barcode => $self->_gen_text( { info => { size => SIZE_BARCODE } } ), |
187 |
barcode => $barcode, |
183 |
itype => $itype, |
188 |
itype => $itype, |
184 |
%$args, |
189 |
%$args, |
185 |
}, |
190 |
}, |
186 |
- |
|
|