Attachment #116512 for bug #4037

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




  offset       => $offset,
  size         => $size,
  statushash   => $statushash,
  itemtypes    => \@itemsarray,
} );

Retrieve a list of title/authors/barcode/callnumber, for biblio inventory.

    my $size         = $parameters->{'size'}         // '';
    my $statushash   = $parameters->{'statushash'}   // '';
    my $ignore_waiting_holds = $parameters->{'ignore_waiting_holds'} // '';
    my $itemtypes    = $parameters->{'itemtypes'}    || [];

    my $dbh = C4::Context->dbh;
    my ( @bind_params, @where_strings );

        push( @where_strings, q{(reserves.found != 'W' OR reserves.found IS NULL)} );
    }

    if ( @$itemtypes ) {
        my $itemtypes_str = join ', ', @$itemtypes;
        push @where_strings, "( biblioitems.itemtype IN (" . $itemtypes_str . ") OR items.itype IN (" . $itemtypes_str . ") )";
            $joinedvals = join(',', @{$items});
        }
        push @where_strings, "( biblioitems.itemtype IN (" . $joinedvals . ") OR items.itype IN (" . $joinedvals . ") )";
    }

    if ( @where_strings ) {

Lines 167-176 Link Here

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/tools/inventory.tt (-5 lines)
167	<input id="itemtype-[% itemtype.itemtype \| html %]" class="branch_select" type="checkbox" name="itemtype-[% itemtype.itemtype \| html %]" value="[% itemtype.itemtype \| html %]" />	167	<input id="itemtype-[% itemtype.itemtype \| html %]" class="branch_select" type="checkbox" name="itemtype-[% itemtype.itemtype \| html %]" value="[% itemtype.itemtype \| html %]" />
168	<label for="itemtype-[% itemtype.itemtype \| html %]">[% itemtype.description \| html %]</label>	168	<label for="itemtype-[% itemtype.itemtype \| html %]">[% itemtype.description \| html %]</label>
169	</div>	169	</div>
170	[% IF loop.count() % 4 == 0 && !loop.last() %]
171	</div>
172	<div class="branchgridrow">
173	[% END %]
174	[% END %]	170	[% END %]
175	</div>	171	</div>
176	</div>	172	</div>
177	-

Return to bug 4037

Lines 489-495 lists of authorized values for certain item fields. Link Here

(-)a/C4/Items.pm (-8 / +5 lines)
489	offset => $offset,	489	offset => $offset,
490	size => $size,	490	size => $size,
491	statushash => $statushash,	491	statushash => $statushash,
492	itemtypes => @itemsarray,	492	itemtypes => \@itemsarray,
493	} );	493	} );
494		494
495	Retrieve a list of title/authors/barcode/callnumber, for biblio inventory.	495	Retrieve a list of title/authors/barcode/callnumber, for biblio inventory.
Lines 522-528 sub GetItemsForInventory { Link Here
522	my $size = $parameters->{'size'} // '';	522	my $size = $parameters->{'size'} // '';
523	my $statushash = $parameters->{'statushash'} // '';	523	my $statushash = $parameters->{'statushash'} // '';
524	my $ignore_waiting_holds = $parameters->{'ignore_waiting_holds'} // '';	524	my $ignore_waiting_holds = $parameters->{'ignore_waiting_holds'} // '';
525	my $items = $parameters->{'itemtypes'} // '';	525	my $itemtypes = $parameters->{'itemtypes'} \|\| [];
526		526
527	my $dbh = C4::Context->dbh;	527	my $dbh = C4::Context->dbh;
528	my ( @bind_params, @where_strings );	528	my ( @bind_params, @where_strings );
Lines 592-603 sub GetItemsForInventory { Link Here
592	push( @where_strings, q{(reserves.found != 'W' OR reserves.found IS NULL)} );	592	push( @where_strings, q{(reserves.found != 'W' OR reserves.found IS NULL)} );
593	}	593	}
594		594
595	if ( $items and @{$items} > 0 ){	595	if ( @$itemtypes ) {
596	my $joinedvals;	596	my $itemtypes_str = join ', ', @$itemtypes;
597	for my $itemtype (@{$items}){	597	push @where_strings, "( biblioitems.itemtype IN (" . $itemtypes_str . ") OR items.itype IN (" . $itemtypes_str . ") )";
598	$joinedvals = join(',', @{$items});
599	}
600	push @where_strings, "( biblioitems.itemtype IN (" . $joinedvals . ") OR items.itype IN (" . $joinedvals . ") )";
601	}	598	}
602		599
603	if ( @where_strings ) {	600	if ( @where_strings ) {