Filename | /usr/share/koha/lib/Koha/QueryParser/Driver/PQF/query_plan/modifier.pm |
Statements | Executed 10 statements in 238µs |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
1 | 1 | 1 | 19µs | 166µs | BEGIN@2 | Koha::QueryParser::Driver::PQF::query_plan::modifier::
1 | 1 | 1 | 11µs | 23µs | BEGIN@5 | Koha::QueryParser::Driver::PQF::query_plan::modifier::
1 | 1 | 1 | 11µs | 14µs | BEGIN@4 | Koha::QueryParser::Driver::PQF::query_plan::modifier::
0 | 0 | 0 | 0s | 0s | target_syntax | Koha::QueryParser::Driver::PQF::query_plan::modifier::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | package Koha::QueryParser::Driver::PQF::query_plan::modifier; | ||||
2 | 3 | 40µs | 2 | 314µs | # spent 166µs (19+148) within Koha::QueryParser::Driver::PQF::query_plan::modifier::BEGIN@2 which was called:
# once (19µs+148µs) by Koha::QueryParser::Driver::PQF::BEGIN@12 at line 2 # spent 166µs making 1 call to Koha::QueryParser::Driver::PQF::query_plan::modifier::BEGIN@2
# spent 148µs making 1 call to base::import |
3 | |||||
4 | 3 | 27µs | 2 | 18µs | # spent 14µs (11+4) within Koha::QueryParser::Driver::PQF::query_plan::modifier::BEGIN@4 which was called:
# once (11µs+4µs) by Koha::QueryParser::Driver::PQF::BEGIN@12 at line 4 # spent 14µs making 1 call to Koha::QueryParser::Driver::PQF::query_plan::modifier::BEGIN@4
# spent 4µs making 1 call to strict::import |
5 | 3 | 168µs | 2 | 35µs | # spent 23µs (11+12) within Koha::QueryParser::Driver::PQF::query_plan::modifier::BEGIN@5 which was called:
# once (11µs+12µs) by Koha::QueryParser::Driver::PQF::BEGIN@12 at line 5 # spent 23µs making 1 call to Koha::QueryParser::Driver::PQF::query_plan::modifier::BEGIN@5
# spent 12µs making 1 call to warnings::import |
6 | |||||
7 | =head1 NAME | ||||
8 | |||||
- - | |||||
23 | sub target_syntax { | ||||
24 | my ($self, $server, $query_plan) = @_; | ||||
25 | my $pqf = ''; | ||||
26 | my @fields; | ||||
27 | |||||
28 | my $attributes = $query_plan->QueryParser->bib1_mapping_by_name('modifier', $self->name, $server); | ||||
29 | $pqf = ($attributes->{'op'} ? $attributes->{'op'} . ' ' : '') . ($self->negate ? '@not @attr 1=_ALLRECORDS @attr 2=103 "" ' : '') . $attributes->{'attr_string'}; | ||||
30 | return $pqf; | ||||
31 | } | ||||
32 | |||||
33 | 1 | 3µs | 1; |