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

(-)a/installer/data/mysql/atomicupdate/bug_33845.pl (+19 lines)
Line 0 Link Here
1
use Modern::Perl;
2
3
return {
4
    bug_number  => "33845",
5
    description => "Update holds_table column settings entries to holds-table",
6
    up          => sub {
7
        my ($args) = @_;
8
        my ( $dbh, $out ) = @$args{qw(dbh out)};
9
10
        $dbh->do(
11
            q{
12
            UPDATE columns_settings SET tablename="holds-table"
13
            WHERE page="circulation" and tablename="holds_table"
14
        }
15
        );
16
17
        say $out "Update columns settings to use table name holds-table";
18
    },
19
};
(-)a/svc/holds (-33 / +29 lines)
Lines 92-131 while ( my $h = $holds_rs->next() ) { Link Here
92
    my $biblio = $h->biblio();
92
    my $biblio = $h->biblio();
93
    my @subtitles = split(/ \| /, $biblio->subtitle() // '');
93
    my @subtitles = split(/ \| /, $biblio->subtitle() // '');
94
    my $hold = {
94
    my $hold = {
95
        DT_RowId       => $h->reserve_id(),
95
        DT_RowId              => $h->reserve_id(),
96
        biblionumber   => $biblionumber,
96
        biblionumber          => $biblionumber,
97
        title          => $biblio->title(),
97
        title                 => $biblio->title(),
98
        subtitle       => \@subtitles,
98
        subtitle              => \@subtitles,
99
        medium         => $biblio->medium() // '',
99
        medium                => $biblio->medium() // '',
100
        part_number    => $biblio->part_number() // '',
100
        part_number           => $biblio->part_number() // '',
101
        part_name      => $biblio->part_name() // '',
101
        part_name             => $biblio->part_name() // '',
102
        author         => $biblio->author(),
102
        author                => $biblio->author(),
103
        reserve_id     => $h->reserve_id(),
103
        reserve_id            => $h->reserve_id(),
104
        branchcode     => $h->branch()->branchname(),
104
        branchcode            => $h->branch()->branchname(),
105
        branches       => $libraries,
105
        branches              => $libraries,
106
        desk_name      => $desk_name,
106
        desk_name             => $desk_name,
107
        reservedate    => $h->reservedate(),
107
        reservedate           => $h->reservedate(),
108
        expirationdate => $h->expirationdate(),
108
        expirationdate        => $h->expirationdate(),
109
        suspend        => $h->suspend(),
109
        suspend               => $h->suspend(),
110
        suspend_until  => $h->suspend_until(),
110
        suspend_until         => $h->suspend_until(),
111
        found          => $h->found(),
111
        found                 => $h->found(),
112
        waiting        => $h->is_waiting(),
112
        waiting               => $h->is_waiting(),
113
        waiting_at     => $h->branch()->branchname(),
113
        waiting_at            => $h->branch()->branchname(),
114
        waiting_here   => $h->branch()->branchcode() eq $branch,
114
        waiting_here          => $h->branch()->branchcode() eq $branch,
115
        priority       => $h->priority(),
115
        priority              => $h->priority(),
116
        reservenotes   => $h->reservenotes(),
116
        reservenotes          => $h->reservenotes(),
117
        itemtype_limit => $itemtype_limit,
117
        itemtype_limit        => $itemtype_limit,
118
        reservedate_formatted => $h->reservedate() ? output_pref(
118
        reservedate_formatted => $h->reservedate()
119
            { dt => dt_from_string( $h->reservedate() ), dateonly => 1 }
119
        ? output_pref( { dt => dt_from_string( $h->reservedate() ), dateonly => 1 } )
120
          )
121
        : q{},
120
        : q{},
122
        suspend_until_formatted => $h->suspend_until() ? output_pref(
121
        suspend_until_formatted => $h->suspend_until()
123
            { dt => dt_from_string( $h->suspend_until() ), dateonly => 1 }
122
        ? output_pref( { dt => dt_from_string( $h->suspend_until() ), dateonly => 1 } )
124
          )
125
        : q{},
123
        : q{},
126
        expirationdate_formatted => $h->expirationdate() ? output_pref(
124
        expirationdate_formatted => $h->expirationdate()
127
            { dt => dt_from_string( $h->expirationdate() ), dateonly => 1 }
125
        ? output_pref( { dt => dt_from_string( $h->expirationdate() ), dateonly => 1 } )
128
          )
129
        : q{},
126
        : q{},
130
    };
127
    };
131
128
132
- 

Return to bug 33845