my $query = "

    my $hold = Koha::Holds->search(

        SELECT * FROM reserves

        {

        WHERE itemnumber = ?

            itemnumber => $itemnumber,

        AND found IS NOT NULL

            found => { not => undef },

    ";

        }

    my $sth = $dbh->prepare( $query );

    )->next;

    $sth->execute( $itemnumber );

    my $reserve = $sth->fetchrow_hashref();

    my $hold = Koha::Holds->find( $reserve->{reserve_id} ); # TODO Remove the next raw SQL statements and use this instead

    $query = "

    my $holds = Koha::Holds->search({ biblionumber => $hold->biblionumber, priority => { '>' => 0 } });

        UPDATE reserves

    while ( my $h = $holds->next ) {

        SET

        $h->priority( $h->priority + 1 )->store;

          priority = priority + 1

    }

        WHERE

          biblionumber =  ?

        AND

          priority > 0

    ";

    $sth = $dbh->prepare( $query );

    $sth->execute( $reserve->{'biblionumber'} );

    $query = "

    $hold->set( { priority => 1, found => undef, waitingdate => undef } )->store;

    UPDATE reserves

    SET

      priority = 1,

      found = NULL,

      waitingdate = NULL

    WHERE

      reserve_id = ?

    ";

    $sth = $dbh->prepare( $query );

    $sth->execute( $reserve->{'reserve_id'} );

    _FixPriority( { biblionumber => $reserve->{biblionumber} } );

    _FixPriority( { biblionumber => $hold->biblionumber } );