|
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 |
- |
|
|