Profile of /usr/share/koha/lib/C4/ItemType.pm

Filename	/usr/share/koha/lib/C4/ItemType.pm
Statements	Executed 11 statements in 374µs

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
1	1	1	34µs	41µs	C4::ItemType::::BEGIN@21C4::ItemType::BEGIN@21
1	1	1	18µs	20µs	C4::ItemType::::BEGIN@23C4::ItemType::BEGIN@23
1	1	1	12µs	26µs	C4::ItemType::::BEGIN@22C4::ItemType::BEGIN@22
0	0	0	0s	0s	C4::ItemType::::AUTOLOADC4::ItemType::AUTOLOAD
0	0	0	0s	0s	C4::ItemType::::DESTROYC4::ItemType::DESTROY
0	0	0	0s	0s	C4::ItemType::::allC4::ItemType::all
0	0	0	0s	0s	C4::ItemType::::newC4::ItemType::new

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					package C4::ItemType;
2
3					# Copyright Liblime 2009
4					# Parts Copyright Tamil 2011
5					#
6					# This file is part of Koha.
7					#
8					# Koha is free software; you can redistribute it and/or modify it under the
9					# terms of the GNU General Public License as published by the Free Software
10					# Foundation; either version 2 of the License, or (at your option) any later
11					# version.
12					#
13					# Koha is distributed in the hope that it will be useful, but WITHOUT ANY
14					# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
15					# A PARTICULAR PURPOSE. See the GNU General Public License for more details.
16					#
17					# You should have received a copy of the GNU General Public License along
18					# with Koha; if not, write to the Free Software Foundation, Inc.,
19					# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
20
21	3	41µs	2	48µs	# spent 41µs (34+7) within C4::ItemType::BEGIN@21 which was called: # once (34µs+7µs) by C4::ItemCirculationAlertPreference::BEGIN@24 at line 21 use strict; # spent 41µs making 1 call to C4::ItemType::BEGIN@21 # spent 7µs making 1 call to strict::import
22	3	26µs	2	40µs	# spent 26µs (12+14) within C4::ItemType::BEGIN@22 which was called: # once (12µs+14µs) by C4::ItemCirculationAlertPreference::BEGIN@24 at line 22 use warnings; # spent 26µs making 1 call to C4::ItemType::BEGIN@22 # spent 14µs making 1 call to warnings::import
23	3	302µs	2	22µs	# spent 20µs (18+2) within C4::ItemType::BEGIN@23 which was called: # once (18µs+2µs) by C4::ItemCirculationAlertPreference::BEGIN@24 at line 23 use C4::Context; # spent 20µs making 1 call to C4::ItemType::BEGIN@23 # spent 2µs making 1 call to C4::Context::import
24
25	1	300ns			our $AUTOLOAD;
26
- -
30					=head1 NAME
31
- -
54					=head3 C4::ItemType->new(\%opts)
55
- -
61					sub new {
62					my ($class, $opts) = @_;
63					bless $opts => $class;
64					}
65
- -
69					=head3 C4::ItemType->all
70
- -
76					sub all {
77					my ($class) = @_;
78					my $dbh = C4::Context->dbh;
79
80					my @itypes;
81					for ( @{$dbh->selectall_arrayref(
82					"SELECT * FROM itemtypes ORDER BY description", { Slice => {} })} )
83					{
84					utf8::encode($_->{description});
85					push @itypes, $class->new($_);
86					}
87					return @itypes;
88					}
89
- -
93					=head2 Object Methods
94
- -
101					=head3 $itemtype->description
102
- -
105					=head3 $itemtype->renewalsallowed
106
- -
109					=head3 $itemtype->rentalcharge
110
- -
113					=head3 $itemtype->notforloan
114
- -
117					=head3 $itemtype->imageurl
118
- -
121					=head3 $itemtype->summary
122
- -
125					sub AUTOLOAD {
126					my $self = shift;
127					my $attr = $AUTOLOAD;
128					$attr =~ s/.*://;
129					if (exists $self->{$attr}) {
130					return $self->{$attr};
131					} else {
132					return undef;
133					}
134					}
135
136					sub DESTROY { }
137
- -
140					# ack itemtypes \| grep '\.pm' \| awk '{ print $1 }' \| sed 's/:.*$//' \| sort \| uniq \| sed -e 's,/,::,g' -e 's/\.pm//' -e 's/^/L<C4::/' -e 's/$/>,/'
141
142					=head1 SEE ALSO
143
- -
167	1	3µs			1;