Attachment #131617 for bug #29990

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




            }
            my $summary = BuildSummary( $authrecord, $authid, $thisauthtypecode );

            if ( C4::Context->preference('ShowHeadingUse') ) {
                # checking valid heading use
                my $f008 = $authrecord->field('008');
                my $pos14to16 = substr( $f008->data, 14, 3 );
                my $main = substr( $pos14to16, 0, 1 );
                $newline{main} = 1 if $main eq 'a';
                my $subject = substr( $pos14to16, 1, 1);
                $newline{subject} = 1 if $subject eq 'a';
                my $series = substr( $pos14to16, 2, 1 );
                $newline{series} = 1 if $series eq 'a';
            }

            $newline{authtype}     = defined($thisauthtype) ?
                                        $thisauthtype->authtypetext : '';
            $newline{summary}      = $summary;

Lines 1-11 Link Here

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/authorities/searchresultlist-auth.tt (+20 lines)
1	[% USE raw %]	1	[% USE raw %]
2	[% USE Asset %]	2	[% USE Asset %]
		3	[% USE Koha %]
3	[% SET footerjs = 1 %]	4	[% SET footerjs = 1 %]
4	[% PROCESS 'authorities-search-results.inc' %]	5	[% PROCESS 'authorities-search-results.inc' %]
5	[% INCLUDE 'doc-head-open.inc' %]	6	[% INCLUDE 'doc-head-open.inc' %]
6	<title>Cataloging authority plugin &rsaquo; Koha</title>	7	<title>Cataloging authority plugin &rsaquo; Koha</title>
7	[% INCLUDE 'doc-head-close.inc' %]	8	[% INCLUDE 'doc-head-close.inc' %]
8	[% Asset.css("css/addbiblio.css") \| $raw %]	9	[% Asset.css("css/addbiblio.css") \| $raw %]
		10	<style>
		11	.usefor {
		12	padding: 0;
		13	margin: 0;
		14	}
		15	.usefor li {
		16	list-style-type: none;
		17	}
		18	</style>
9	</head>	19	</head>
10		20
11	<body id="auth_searchresultlist_auth" class="auth">	21	<body id="auth_searchresultlist_auth" class="auth">
Lines 45-50 Link Here
45	<th>Summary</th>	55	<th>Summary</th>
46	<th>Heading type</th>	56	<th>Heading type</th>
47	<th>Used</th>	57	<th>Used</th>
		58	[% IF Koha.Preference('ShowHeadingUse') %]
		59	<th>Heading use</th>
		60	[% END %]
48	<th>Get it!</th>	61	<th>Get it!</th>
49	<th>Other action</th>	62	<th>Other action</th>
50	</tr>	63	</tr>
Lines 53-58 Link Here
53	<td>[% PROCESS authresult summary=resul.summary authid=resul.authid auth_preview=1 %]</td>	66	<td>[% PROCESS authresult summary=resul.summary authid=resul.authid auth_preview=1 %]</td>
54	<td>[% resul.summary.label \| html %]</td>	67	<td>[% resul.summary.label \| html %]</td>
55	<td>[% resul.used \| html %] times</td>	68	<td>[% resul.used \| html %] times</td>
		69	[% IF Koha.Preference('ShowHeadingUse') %]
		70	<td class="actions"><ul class="usefor">
		71	<li>[% IF resul.main %]<i class="fa fa-check"></i>[% ELSE %]<i class="fa fa-times"></i>[% END %] Main/Added Entry</li>
		72	<li>[% IF resul.subject %]<i class="fa fa-check"></i>[% ELSE %]<i class="fa fa-times"></i>[% END %] Subject</li>
		73	<li>[% IF resul.series %]<i class="fa fa-check"></i>[% ELSE %]<i class="fa fa-times"></i>[% END %] Series Title</li>
		74	</ul></td>
		75	[% END %]
56	<td>	76	<td>
57	[% IF resul.summary && resul.summary.authorized && resul.summary.authorized.size > 1 %]	77	[% IF resul.summary && resul.summary.authorized && resul.summary.authorized.size > 1 %]
58	[% FOREACH authorized IN resul.summary.authorized %]	78	[% FOREACH authorized IN resul.summary.authorized %]

Lines 1-11 Link Here

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/authorities/searchresultlist.tt (-1 / +20 lines)
1	[% USE raw %]	1	[% USE raw %]
2	[% USE Asset %]	2	[% USE Asset %]
		3	[% USE Koha %]
3	[% SET footerjs = 1 %]	4	[% SET footerjs = 1 %]
4	[% PROCESS 'authorities-search-results.inc' %]	5	[% PROCESS 'authorities-search-results.inc' %]
5	[% INCLUDE 'doc-head-open.inc' %]	6	[% INCLUDE 'doc-head-open.inc' %]
6	<title>Authority search results &rsaquo; Authorities &rsaquo; Koha</title>	7	<title>Authority search results &rsaquo; Authorities &rsaquo; Koha</title>
7	[% INCLUDE 'doc-head-close.inc' %]	8	[% INCLUDE 'doc-head-close.inc' %]
8	[% Asset.css("css/addbiblio.css") \| $raw %]	9	[% Asset.css("css/addbiblio.css") \| $raw %]
		10	<style>
		11	.usefor {
		12	padding: 0;
		13	margin: 0;
		14	}
		15	.usefor li {
		16	list-style-type: none;
		17	}
		18	</style>
9	</head>	19	</head>
10		20
11	<body id="auth_searchresultlist" class="auth">	21	<body id="auth_searchresultlist" class="auth">
Lines 51-56 Link Here
51	[% UNLESS ( isEDITORS ) %]	61	[% UNLESS ( isEDITORS ) %]
52	<th>Used in</th>	62	<th>Used in</th>
53	[% END %]	63	[% END %]
		64	[% IF Koha.Preference('ShowHeadingUse') %]
		65	<th>Heading use</th>
		66	[% END %]
54	[% IF ( CAN_user_editauthorities ) %]	67	[% IF ( CAN_user_editauthorities ) %]
55	<th> </th>	68	<th> </th>
56	[% END %]	69	[% END %]
Lines 68-73 Link Here
68	[% END %]	81	[% END %]
69	</td>	82	</td>
70	[% END %]	83	[% END %]
		84	[% IF Koha.Preference('ShowHeadingUse') %]
		85	<td class="actions"><ul class="usefor">
		86	<li>[% IF resul.main %]<i class="fa fa-check"></i>[% ELSE %]<i class="fa fa-times"></i>[% END %] Main/Added Entry</li>
		87	<li>[% IF resul.subject %]<i class="fa fa-check"></i>[% ELSE %]<i class="fa fa-times"></i>[% END %] Subject</li>
		88	<li>[% IF resul.series %]<i class="fa fa-check"></i>[% ELSE %]<i class="fa fa-times"></i>[% END %] Series Title</li>
		89	</ul></td>
		90	[% END %]
71	[% IF ( CAN_user_editauthorities ) %]	91	[% IF ( CAN_user_editauthorities ) %]
72	<td>	92	<td>
73	<div class="btn-group dropup">	93	<div class="btn-group dropup">
74	-

Return to bug 29990

Lines 301-306 sub SearchAuthorities { Link Here

(-)a/C4/AuthoritiesMarc.pm (+12 lines)
301	}	301	}
302	my $summary = BuildSummary( $authrecord, $authid, $thisauthtypecode );	302	my $summary = BuildSummary( $authrecord, $authid, $thisauthtypecode );
303		303
		304	if ( C4::Context->preference('ShowHeadingUse') ) {
		305	# checking valid heading use
		306	my $f008 = $authrecord->field('008');
		307	my $pos14to16 = substr( $f008->data, 14, 3 );
		308	my $main = substr( $pos14to16, 0, 1 );
		309	$newline{main} = 1 if $main eq 'a';
		310	my $subject = substr( $pos14to16, 1, 1);
		311	$newline{subject} = 1 if $subject eq 'a';
		312	my $series = substr( $pos14to16, 2, 1 );
		313	$newline{series} = 1 if $series eq 'a';
		314	}
		315
304	$newline{authtype} = defined($thisauthtype) ?	316	$newline{authtype} = defined($thisauthtype) ?
305	$thisauthtype->authtypetext : '';	317	$thisauthtype->authtypetext : '';
306	$newline{summary} = $summary;	318	$newline{summary} = $summary;