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

(-)a/C4/Items.pm (-6 / +6 lines)
Lines 173-186 sub GetItem { Link Here
173
        $ssth->execute($data->{'itemnumber'}) ;
173
        $ssth->execute($data->{'itemnumber'}) ;
174
        ($data->{'serialseq'} , $data->{'publisheddate'}) = $ssth->fetchrow_array();
174
        ($data->{'serialseq'} , $data->{'publisheddate'}) = $ssth->fetchrow_array();
175
    }
175
    }
176
	#if we don't have an items.itype, use biblioitems.itemtype.
176
    #if we don't have an items.itype, use biblioitems.itemtype.
177
    # FIXME this should respect the itypes systempreference
177
    # FIXME this should respect the itypes systempreference
178
    # if (C4::Context->preference('item-level_itypes')) {
178
    # if (C4::Context->preference('item-level_itypes')) {
179
	if( $data and ! $data->{'itype'} ) {
179
    if( $data and ! $data->{'itype'} ) {
180
		my $sth = $dbh->prepare("SELECT itemtype FROM biblioitems  WHERE biblionumber = ?");
180
        my $sth = $dbh->prepare("SELECT itemtype FROM biblioitems  WHERE biblionumber = ?");
181
		$sth->execute($data->{'biblionumber'});
181
        $sth->execute($data->{'biblionumber'});
182
		($data->{'itype'}) = $sth->fetchrow_array;
182
        ($data->{'itype'}) = $sth->fetchrow_array;
183
	}
183
    }
184
    return $data;
184
    return $data;
185
}    # sub GetItem
185
}    # sub GetItem
186
186
(-)a/C4/Serials/RoutingLists.pm (-10 / +24 lines)
Lines 4-21 package C4::Serials::RoutingLists; Link Here
4
#
4
#
5
# This file is part of Koha.
5
# This file is part of Koha.
6
#
6
#
7
# Koha is free software; you can redistribute it and/or modify it under the
7
# Koha is free software; you can redistribute it and/or modify it
8
# terms of the GNU General Public License as published by the Free Software
8
# under the terms of the GNU General Public License as published by
9
# Foundation; either version 2 of the License, or (at your option) any later
9
# the Free Software Foundation; either version 3 of the License, or
10
# version.
10
# (at your option) any later version.
11
#
11
#
12
# Koha is distributed in the hope that it will be useful, but WITHOUT ANY
12
# Koha is distributed in the hope that it will be useful, but
13
# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
13
# WITHOUT ANY WARRANTY; without even the implied warranty of
14
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
14
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15
# GNU General Public License for more details.
15
#
16
#
16
# You should have received a copy of the GNU General Public License along
17
# You should have received a copy of the GNU General Public License
17
# with Koha; if not, write to the Free Software Foundation, Inc.,
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
Lines 38-43 BEGIN { Link Here
38
    );
38
    );
39
}
39
}
40
40
41
=head1 NAME
42
43
C4::Serials::RoutingLists
44
45
=head1 SYNOPSYS
46
47
use C4::Serials::RoutingLists;
48
49
=head1 DESCRIPTION
50
51
This module provides subroutines to deal with subscriptions routing lists
52
53
=head1 FUNCTIONS
54
41
=head2 AddRoutingList
55
=head2 AddRoutingList
42
56
43
$routinglistid = &AddRoutingList($subscriptionid, $title);
57
$routinglistid = &AddRoutingList($subscriptionid, $title);
(-)a/serials/routing-preview-slip.pl (-10 / +10 lines)
Lines 3-20 Link Here
3
# Copyright 2011 BibLibre SARL
3
# Copyright 2011 BibLibre SARL
4
# This file is part of Koha.
4
# This file is part of Koha.
5
#
5
#
6
# Koha is free software; you can redistribute it and/or modify it under the
6
# Koha is free software; you can redistribute it and/or modify it
7
# terms of the GNU General Public License as published by the Free Software
7
# under the terms of the GNU General Public License as published by
8
# Foundation; either version 2 of the License, or (at your option) any later
8
# the Free Software Foundation; either version 3 of the License, or
9
# version.
9
# (at your option) any later version.
10
#
10
#
11
# Koha is distributed in the hope that it will be useful, but WITHOUT ANY
11
# Koha is distributed in the hope that it will be useful, but
12
# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
12
# WITHOUT ANY WARRANTY; without even the implied warranty of
13
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
13
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14
# GNU General Public License for more details.
14
#
15
#
15
# You should have received a copy of the GNU General Public License along
16
# You should have received a copy of the GNU General Public License
16
# with Koha; if not, write to the Free Software Foundation, Inc.,
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
18
18
19
=head1 NAME
19
=head1 NAME
20
20
(-)a/serials/routinglist.pl (-10 / +10 lines)
Lines 3-20 Link Here
3
# Copyright 2011 BibLibre SARL
3
# Copyright 2011 BibLibre SARL
4
# This file is part of Koha.
4
# This file is part of Koha.
5
#
5
#
6
# Koha is free software; you can redistribute it and/or modify it under the
6
# Koha is free software; you can redistribute it and/or modify it
7
# terms of the GNU General Public License as published by the Free Software
7
# under the terms of the GNU General Public License as published by
8
# Foundation; either version 2 of the License, or (at your option) any later
8
# the Free Software Foundation; either version 3 of the License, or
9
# version.
9
# (at your option) any later version.
10
#
10
#
11
# Koha is distributed in the hope that it will be useful, but WITHOUT ANY
11
# Koha is distributed in the hope that it will be useful, but
12
# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
12
# WITHOUT ANY WARRANTY; without even the implied warranty of
13
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
13
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14
# GNU General Public License for more details.
14
#
15
#
15
# You should have received a copy of the GNU General Public License along
16
# You should have received a copy of the GNU General Public License
16
# with Koha; if not, write to the Free Software Foundation, Inc.,
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
18
18
19
=head1 NAME
19
=head1 NAME
20
20
(-)a/serials/routinglists.pl (-11 / +10 lines)
Lines 3-20 Link Here
3
# Copyright 2011 BibLibre SARL
3
# Copyright 2011 BibLibre SARL
4
# This file is part of Koha.
4
# This file is part of Koha.
5
#
5
#
6
# Koha is free software; you can redistribute it and/or modify it under the
6
# Koha is free software; you can redistribute it and/or modify it
7
# terms of the GNU General Public License as published by the Free Software
7
# under the terms of the GNU General Public License as published by
8
# Foundation; either version 2 of the License, or (at your option) any later
8
# the Free Software Foundation; either version 3 of the License, or
9
# version.
9
# (at your option) any later version.
10
#
10
#
11
# Koha is distributed in the hope that it will be useful, but WITHOUT ANY
11
# Koha is distributed in the hope that it will be useful, but
12
# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
12
# WITHOUT ANY WARRANTY; without even the implied warranty of
13
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
13
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14
# GNU General Public License for more details.
14
#
15
#
15
# You should have received a copy of the GNU General Public License along
16
# You should have received a copy of the GNU General Public License
16
# with Koha; if not, write to the Free Software Foundation, Inc.,
17
# along with Koha; if not, see <http://www.gnu.org/licenses>.
17
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
18
18
19
=head1 NAME
19
=head1 NAME
20
20
21
- 

Return to bug 7957