Attachment #3905 for bug #5791

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

Lines 761-766 Return the ISBD view which can be included in opac and intranet Link Here

(-)a/C4/Biblio.pm (+1 lines)
761	sub GetISBDView {	761	sub GetISBDView {
762	my ( $biblionumber, $template ) = @_;	762	my ( $biblionumber, $template ) = @_;
763	my $record = GetMarcBiblio($biblionumber);	763	my $record = GetMarcBiblio($biblionumber);
		764	return undef unless defined $record;
764	my $itemtype = &GetFrameworkCode($biblionumber);	765	my $itemtype = &GetFrameworkCode($biblionumber);
765	my ( $holdingbrtagf, $holdingbrtagsubf ) = &GetMarcFromKohaField( "items.holdingbranch", $itemtype );	766	my ( $holdingbrtagf, $holdingbrtagsubf ) = &GetMarcFromKohaField( "items.holdingbranch", $itemtype );
766	my $tagslib = &GetMarcStructure( 1, $itemtype );	767	my $tagslib = &GetMarcStructure( 1, $itemtype );





my $authid = $query->param('authid');



# Using default authtypecode, so all fields are seen
my $authtypecode = '';
$tagslib = &GetTagsLabels(1,$authtypecode);

# Build list of authtypes for showing them
my $authtypes = getauthtypes;
my @authtypesloop;

foreach my $thisauthtype (sort { $authtypes->{$b} cmp $authtypes->{$a} } keys %$authtypes) {
    my %row =(value => $thisauthtype,
                selected => $thisauthtype eq $authtypecode,
                authtypetext => $authtypes->{$thisauthtype}{'authtypetext'},
            );
    push @authtypesloop, \%row;
}

my $record=GetAuthority($authid);

if (not defined $record) {
    # authid invalid
    $template->param ( errauthid => $authid,
                       unknownauthid => 1,
                       authtypesloop => \@authtypesloop );
    output_html_with_http_headers $query, $cookie, $template->output;
    exit;
}

if (C4::Context->preference("AuthDisplayHierarchy")){
  my $trees=BuildUnimarcHierarchies($authid);
  my @trees = split /;/,$trees ;

    'displayhierarchy' =>C4::Context->preference("AuthDisplayHierarchy"),
    'loophierarchies' =>\@loophierarchies,
  );
} else {
  $record=GetAuthority($authid);
}

my $count = CountUsage($authid);

# find the marc field/subfield used in biblio by this authority

}
chop $biblio_fields;

build_tabs ($template, $record, $dbh,"",$query);
# fill arrays
my @loop_data =();
my $tag;
# loop through each tab 0 through 9
# for (my $tabloop = 0; $tabloop<=10;$tabloop++) {
# loop through each tag
  build_tabs ($template, $record, $dbh,"",$query);

my $authtypes = getauthtypes;
my @authtypesloop;
foreach my $thisauthtype (sort { $authtypes->{$b} cmp $authtypes->{$a} } keys %$authtypes) {
	my %row =(value => $thisauthtype,
				selected => $thisauthtype eq $authtypecode,
				authtypetext => $authtypes->{$thisauthtype}{'authtypetext'},
			);
	push @authtypesloop, \%row;
}

$template->param(authid => $authid,
		count => $count,




    }
);

my $res = GetISBDView($biblionumber, "intranet");
if ( not defined $res ) {
       # biblionumber invalid -> report and exit
       $template->param( unknownbiblionumber => 1,
                               biblionumber => $biblionumber
       );
       output_html_with_http_headers $query, $cookie, $template->output;
       exit;
}

if($query->cookie("holdfor")){ 
    my $holdfor_patron = GetMember('borrowernumber' => $query->cookie("holdfor"));
    $template->param(

    );
}

# my @blocs = split /\@/,$ISBD;
# my @fields = $record->fields();
my $res = GetISBDView($biblionumber, "intranet");

# count of item linked with biblio
my $itemcount = GetItemsCount($biblionumber);
$template->param( count => $itemcount);

$template->param (
    ISBD                => $res,
    biblionumber        => $biblionumber,
    isbdview            => 1,
    z3950_search_params => C4::Search::z3950_search_args(GetBiblioData($biblionumber)),
    C4::Search::enabled_staff_search_views
);

output_html_with_http_headers $query, $cookie, $template->output;




  ;    # if set to 1, then don't insert links, it's just to show the biblio
my $subscriptionid = $query->param('subscriptionid');

my $tagslib = &GetMarcStructure(1,$frameworkcode);

my $record = GetMarcBiblio($biblionumber);
my $biblio = GetBiblioData($biblionumber);
# open template
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
    {

    }
);

my $record = GetMarcBiblio($biblionumber);

if ( not defined $record ) {
    # biblionumber invalid -> report and exit
    $template->param( unknownbiblionumber => 1,
                biblionumber => $biblionumber
    );
    output_html_with_http_headers $query, $cookie, $template->output;
    exit;
}

my $tagslib = &GetMarcStructure(1,$frameworkcode);
my $biblio = GetBiblioData($biblionumber);

if($query->cookie("holdfor")){ 
    my $holdfor_patron = GetMember('borrowernumber' => $query->cookie("holdfor"));
    $template->param(




    }
);

my $biblionumber = $query->param('biblionumber');
my $record       = GetMarcBiblio($biblionumber);

if ( not defined $record ) {
    # biblionumber invalid -> report and exit
    $template->param( unknownbiblionumber => 1,
                      biblionumber => $biblionumber );
    output_html_with_http_headers $query, $cookie, $template->output;
    exit;
}

if($query->cookie("holdfor")){ 
    my $holdfor_patron = GetMember('borrowernumber' => $query->cookie("holdfor"));
    $template->param(

    );
}

my $fw           = GetFrameworkCode($biblionumber);
my $fw = GetFrameworkCode($biblionumber);

my $showallitems = $query->param('showallitems');
my $marcflavour  = C4::Context->preference("marcflavour");
## get notes and subjects from MARC record
my $marcflavour      = C4::Context->preference("marcflavour");
my $record           = GetMarcBiblio($biblionumber);

# XSLT processing of some stuff
if (C4::Context->preference("XSLTDetailsDisplay") ) {

    normalized_isbn => $isbn,
);

unless (defined($record)) {
    print $query->redirect("/cgi-bin/koha/errors/404.pl");
	exit;
}

my $marcnotesarray   = GetMarcNotes( $record, $marcflavour );
my $marcisbnsarray   = GetMarcISBN( $record, $marcflavour );
my $marcauthorsarray = GetMarcAuthors( $record, $marcflavour );




  $query->param('popup')
  ;    # if set to 1, then don't insert links, it's just to show the biblio

my $tagslib = GetMarcStructure(1,$frameworkcode);
my $record = GetMarcBiblio($biblionumber);
my $biblio = GetBiblioData($biblionumber);
# open template
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
    {

    }
);

my $record = GetMarcBiblio($biblionumber);
if ( not defined $record ) {
    # biblionumber invalid -> report and exit
    $template->param( unknownbiblionumber => 1,
                biblionumber => $biblionumber
    );
    output_html_with_http_headers $query, $cookie, $template->output;
    exit;
}

my $tagslib = GetMarcStructure(1,$frameworkcode);
my $biblio = GetBiblioData($biblionumber);

if($query->cookie("holdfor")){ 
    my $holdfor_patron = GetMember('borrowernumber' => $query->cookie("holdfor"));
    $template->param(




<!-- TMPL_INCLUDE NAME="doc-head-open.inc" -->
<title>Koha &rsaquo; Authorities &rsaquo; <!-- TMPL_IF NAME="unknownauthid" --> Unknown authority record<!-- TMPL_ELSE -->Details for Authority #<!-- TMPL_VAR NAME="authid" --> (<!-- TMPL_VAR name="authtypetext" -->)<!-- /TMPL_IF --></title>
<!-- TMPL_INCLUDE NAME="doc-head-close.inc" -->
<script type="text/javascript">


<body>
<!-- TMPL_INCLUDE NAME="header.inc" -->
<!-- TMPL_INCLUDE NAME="authorities-search.inc" -->
<div id="breadcrumbs"><a href="/cgi-bin/koha/mainpage.pl">Home</a> &rsaquo; <a href="/cgi-bin/koha/authorities/authorities-home.pl">Authorities</a> &rsaquo; <!-- TMPL_IF NAME="unknownauthid" --> Unknown authority record<!-- TMPL_ELSE--> Details for Authority #<!-- TMPL_VAR NAME="authid" --> (<!-- TMPL_VAR name="authtypetext" -->)<!-- /TMPL_IF --></div>

<div id="doc" class="yui-t7">


</div>
<!-- /TMPL_IF -->

<!-- TMPL_IF NAME="unknownauthid" -->
   <div class="dialog message">The authority record you requested does not exist (<!-- TMPL_VAR NAME="errauthid" -->).</div>
<!-- TMPL_ELSE -->
   <h1>Authority #<!-- TMPL_VAR NAME="authid" --> (<!-- TMPL_VAR name="authtypetext" -->)</h1>
   <div id="action">
      Used in <a href="/cgi-bin/koha/catalogue/search.pl?type=intranet&amp;op=do_search&amp;q=an=<!--TMPL_VAR Name="authid" -->"><!-- TMPL_VAR name="count" --> record(s)</a>
    </div>

    <div id="authoritiestabs" class="toptabs numbered">
    <ul>
        <!-- TMPL_LOOP name="BIG_LOOP" -->
            <li>

        <!-- /TMPL_LOOP -->
    </ul>

    <!-- TMPL_LOOP name="BIG_LOOP" -->
    <div id="tab<!-- TMPL_VAR name="number" -->XX">
    <!-- TMPL_LOOP NAME="innerloop" -->
        <!-- TMPL_IF name="tag" -->

                    <a href="/cgi-bin/koha/authorities/detail.pl?authid=<!-- TMPL_VAR name="authority" -->" class="button">Auth</a>
                <!-- /TMPL_IF -->
            </p>
          <!-- /TMPL_LOOP -->
        </div>
    <!-- /TMPL_LOOP -->
    </div>
    <!-- /TMPL_LOOP -->
    </div>
<!-- /TMPL_IF -->
</div>
</div>
</div>




<!-- TMPL_INCLUDE NAME="doc-head-open.inc" -->
<title>Koha &rsaquo; Catalog &rsaquo; <!-- TMPL_IF NAME="unknownbiblionumber" -->Unknown record<!-- TMPL_ELSE -->ISBD Details for <!-- TMPL_VAR NAME="title" --><!-- /TMPL_IF --></title>
<!-- TMPL_INCLUDE NAME="doc-head-close.inc" -->
</head>
<body>

<!-- TMPL_INCLUDE NAME="header.inc" -->
<!-- TMPL_INCLUDE NAME="cat-search.inc" -->

<div id="breadcrumbs"><a href="/cgi-bin/koha/mainpage.pl">Home</a> &rsaquo; <a href="/cgi-bin/koha/catalogue/search.pl">Catalog</a>  &rsaquo; <!-- TMPL_IF NAME="unknownbiblionumber" -->Unknown record<!-- TMPL_ELSE --> ISBD Details for <i><!-- TMPL_VAR NAME="biblionumber" --></i><!-- /TMPL_IF --></div>

<div id="doc3" class="yui-t2">
<!-- TMPL_IF NAME="unknownbiblionumber" -->
  <div class="dialog message">The record you requested does not exist (<!-- TMPL_VAR NAME="biblionumber" -->).</div>
<!-- TMPL_ELSE -->   
  <div id="bd">
    <div id="yui-main">
      <div class="yui-b">
        <!-- TMPL_INCLUDE NAME="cat-toolbar.inc" -->
        <div id="catalogue_ISBDdetail">
          <!-- TMPL_VAR NAME="ISBD" -->
        </div>
      </div>
    </div>
    <div class="yui-b">
      <!-- TMPL_INCLUDE NAME="biblio-view-menu.inc" -->
    </div>
  </div>
<!-- /TMPL_IF -->
</div>
<!-- TMPL_INCLUDE NAME="intranet-bottom.inc" -->

Lines 1-5 Link Here

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/catalogue/MARCdetail.tmpl (-3 / +6 lines)
1	<!-- TMPL_INCLUDE NAME="doc-head-open.inc" -->	1	<!-- TMPL_INCLUDE NAME="doc-head-open.inc" -->
2	<title>Koha &rsaquo; Catalog &rsaquo; MARC Details for <!-- TMPL_VAR NAME="bibliotitle" --></title>	2	<title>Koha &rsaquo; Catalog &rsaquo; <!-- TMPL_IF NAME="unknownbiblionumber" -->Unknown record<!-- TMPL_ELSE -->MARC Details for <!-- TMPL_VAR NAME="bibliotitle" --><!-- /TMPL_IF --></title>
3	<!-- TMPL_INCLUDE NAME="doc-head-close.inc" -->	3	<!-- TMPL_INCLUDE NAME="doc-head-close.inc" -->
4	<script type="text/javascript">	4	<script type="text/javascript">
5	//<![CDATA[	5	//<![CDATA[
Lines 21-30 function Changefwk(FwkList) { Link Here
21	<!-- TMPL_INCLUDE NAME="header.inc" -->	21	<!-- TMPL_INCLUDE NAME="header.inc" -->
22	<!-- TMPL_INCLUDE NAME="cat-search.inc" -->	22	<!-- TMPL_INCLUDE NAME="cat-search.inc" -->
23		23
24	<div id="breadcrumbs"><a href="/cgi-bin/koha/mainpage.pl">Home</a> &rsaquo; <a href="/cgi-bin/koha/catalogue/search.pl">Catalog</a> &rsaquo; MARC Details for <i><!-- TMPL_VAR NAME="bibliotitle" ESCAPE="html" --></i></div>	24	<div id="breadcrumbs"><a href="/cgi-bin/koha/mainpage.pl">Home</a> &rsaquo; <a href="/cgi-bin/koha/catalogue/search.pl">Catalog</a> &rsaquo; <!-- TMPL_IF NAME="unknownbiblionumber" -->Unknown record<!-- TMPL_ELSE -->MARC Details for <i><!-- TMPL_VAR NAME="bibliotitle" ESCAPE="html" --></i><!-- /TMPL_IF --></div>
25		25
26	<div id="doc3" class="yui-t2">	26	<div id="doc3" class="yui-t2">
27		27	<!-- TMPL_IF NAME="unknownbiblionumber" -->
		28	<div class="dialog message">The record you requested does not exist (<!-- TMPL_VAR NAME="biblionumber" -->).</div>
		29	<!-- TMPL_ELSE -->
28	<div id="bd">	30	<div id="bd">
29	<div id="yui-main">	31	<div id="yui-main">
30	<div class="yui-b">	32	<div class="yui-b">
Lines 404-408 function Changefwk(FwkList) { Link Here
404	<div class="yui-b">	406	<div class="yui-b">
405	<!-- TMPL_INCLUDE NAME="biblio-view-menu.inc" -->	407	<!-- TMPL_INCLUDE NAME="biblio-view-menu.inc" -->
406	</div>	408	</div>
		409	<!-- /TMPL_IF -->
407	</div>	410	</div>
408	<!-- TMPL_INCLUDE NAME="intranet-bottom.inc" -->	411	<!-- TMPL_INCLUDE NAME="intranet-bottom.inc" -->

Lines 1-5 Link Here

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/catalogue/detail.tmpl (-3 / +7 lines)
1	<!-- TMPL_INCLUDE NAME="doc-head-open.inc" -->	1	<!-- TMPL_INCLUDE NAME="doc-head-open.inc" -->
2	<title>Koha &rsaquo; Catalog &rsaquo; Details for <!-- TMPL_VAR NAME="title" escape="html" --> <!-- TMPL_LOOP NAME="subtitle" --> <!-- TMPL_VAR NAME="subfield" --><!-- /TMPL_LOOP --></title>	2	<title>Koha &rsaquo; Catalog &rsaquo; <!-- TMPL_IF NAME="unknownbiblionumber" -->Unknown record<!-- TMPL_ELSE -->Details for <!-- TMPL_VAR NAME="title" escape="html" --> <!-- TMPL_LOOP NAME="subtitle" --> <!-- TMPL_VAR NAME="subfield" --><!-- /TMPL_LOOP --><!-- /TMPL_IF --></title>
3	<!-- TMPL_INCLUDE NAME="doc-head-close.inc" --><script type="text/JavaScript" language="JavaScript">	3	<!-- TMPL_INCLUDE NAME="doc-head-close.inc" --><script type="text/JavaScript" language="JavaScript">
4	//<![CDATA[	4	//<![CDATA[
5	// http://www.oreillynet.com/pub/a/javascript/2003/10/21/amazonhacks.html	5	// http://www.oreillynet.com/pub/a/javascript/2003/10/21/amazonhacks.html
Lines 44-53 function verify_images() { Link Here
44	<!-- TMPL_INCLUDE NAME="header.inc" -->	44	<!-- TMPL_INCLUDE NAME="header.inc" -->
45	<!-- TMPL_INCLUDE NAME="cat-search.inc" -->	45	<!-- TMPL_INCLUDE NAME="cat-search.inc" -->
46		46
47	<div id="breadcrumbs"><a href="/cgi-bin/koha/mainpage.pl">Home</a> &rsaquo; <a href="/cgi-bin/koha/catalogue/search.pl">Catalog</a> &rsaquo; Details for <i><!-- TMPL_VAR NAME="title" escape="html" --> <!-- TMPL_LOOP NAME="subtitle" --> <!-- TMPL_VAR NAME="subfield" --><!-- /TMPL_LOOP --></i></div>	47	<div id="breadcrumbs"><a href="/cgi-bin/koha/mainpage.pl">Home</a> &rsaquo; <a href="/cgi-bin/koha/catalogue/search.pl">Catalog</a> &rsaquo; <!-- TMPL_IF NAME="unknownbiblionumber" -->Unknown record<!-- TMPL_ELSE --> Details for <i><!-- TMPL_VAR NAME="title" escape="html" --> <!-- TMPL_LOOP NAME="subtitle" --> <!-- TMPL_VAR NAME="subfield" --><!-- /TMPL_LOOP --><!-- /TMPL_IF --></i></div>
48		48
49	<div id="doc3" class="yui-t2">	49	<div id="doc3" class="yui-t2">
50		50
		51	<!-- TMPL_IF NAME="unknownbiblionumber" -->
		52	<div class="dialog message">The record you requested does not exist (<!-- TMPL_VAR NAME="biblionumber" -->).</div>
		53	<!-- TMPL_ELSE -->
51	<div id="bd">	54	<div id="bd">
52	<div id="yui-main">	55	<div id="yui-main">
53	<div class="yui-b">	56	<div class="yui-b">
Lines 518-522 function verify_images() { Link Here
518	<div class="yui-b">	521	<div class="yui-b">
519	<!-- TMPL_INCLUDE NAME="biblio-view-menu.inc" -->	522	<!-- TMPL_INCLUDE NAME="biblio-view-menu.inc" -->
520	</div>	523	</div>
		524	<!-- /TMPL_IF -->
521	</div>	525	</div>
522	<!-- TMPL_INCLUDE NAME="intranet-bottom.inc" -->	526	<!-- TMPL_INCLUDE NAME="intranet-bottom.inc" -->

Lines 1-6 Link Here

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/catalogue/labeledMARCdetail.tmpl (-7 / +13 lines)
1	<!-- TMPL_INCLUDE NAME="doc-head-open.inc" -->	1	<!-- TMPL_INCLUDE NAME="doc-head-open.inc" -->
2		2
3	<title>Koha &rsaquo; Catalog &rsaquo; Labeled MARC Details for <!-- TMPL_VAR NAME="bibliotitle" --></title>	3	<title>Koha &rsaquo; Catalog &rsaquo;
		4	<!-- TMPL_IF NAME="unknownbiblionumber" -->Unknown record
		5	<!-- TMPL_ELSE -->Labeled MARC Details for <!-- TMPL_VAR NAME="bibliotitle" -->
		6	<!-- /TMPL_IF -->
		7	</title>
4		8
5	<!-- TMPL_INCLUDE NAME="doc-head-close.inc" -->	9	<!-- TMPL_INCLUDE NAME="doc-head-close.inc" -->
6		10
Lines 21-31 Link Here
21		25
22	<div id="breadcrumbs">	26	<div id="breadcrumbs">
23	<a href="/cgi-bin/koha/mainpage.pl">Home</a>	27	<a href="/cgi-bin/koha/mainpage.pl">Home</a>
24	&rsaquo; <a href="/cgi-bin/koha/catalogue/search.pl">Catalog</a>	28	&rsaquo; <!-- TMPL_IF NAME="unknownbiblionumber" -->Unknown record
25	&rsaquo; MARC Details for <i><!-- TMPL_VAR NAME="bibliotitle" --></i>	29	<!-- TMPL_ELSE -->MARC Details for <i><!-- TMPL_VAR NAME="bibliotitle" --></i>
		30	<!-- /TMPL_IF -->
26	</div>	31	</div>
27		32
28	<div id="doc3" class="yui-t2">	33	<div id="doc3" class="yui-t2">
		34	<!-- TMPL_IF NAME="unknownbiblionumber" -->
		35	<div class="dialog message">The record you requested does not exist (<!-- TMPL_VAR NAME="biblionumber" -->).</div>
		36	<!-- TMPL_ELSE -->
29	<div id="bd">	37	<div id="bd">
30	<div id="yui-main">	38	<div id="yui-main">
31	<div class="yui-b">	39	<div class="yui-b">
Lines 50-58 Link Here
50	</div>	58	</div>
51	</div>	59	</div>
52	<div class="yui-b">	60	<div class="yui-b">
53		61	<!-- TMPL_INCLUDE NAME="biblio-view-menu.inc" -->
54	<!-- TMPL_INCLUDE NAME="biblio-view-menu.inc" -->
55
56	</div>	62	</div>
		63	<!-- /TMPL_IF -->
57	</div>	64	</div>
58	<!-- TMPL_INCLUDE NAME="intranet-bottom.inc" -->	65	<!-- TMPL_INCLUDE NAME="intranet-bottom.inc" -->
59	-

Return to bug 5791

Lines 172-184 my ($template, $loggedinuser, $cookie) Link Here

(-)a/authorities/detail.pl (-23 / +25 lines)
172		172
173	my $authid = $query->param('authid');	173	my $authid = $query->param('authid');
174		174
175
176
177	# Using default authtypecode, so all fields are seen	175	# Using default authtypecode, so all fields are seen
178	my $authtypecode = '';	176	my $authtypecode = '';
179	$tagslib = &GetTagsLabels(1,$authtypecode);	177	$tagslib = &GetTagsLabels(1,$authtypecode);
180		178
181	my $record;	179	# Build list of authtypes for showing them
		180	my $authtypes = getauthtypes;
		181	my @authtypesloop;
		182
		183	foreach my $thisauthtype (sort { $authtypes->{$b} cmp $authtypes->{$a} } keys %$authtypes) {
		184	my %row =(value => $thisauthtype,
		185	selected => $thisauthtype eq $authtypecode,
		186	authtypetext => $authtypes->{$thisauthtype}{'authtypetext'},
		187	);
		188	push @authtypesloop, \%row;
		189	}
		190
		191	my $record=GetAuthority($authid);
		192
		193	if (not defined $record) {
		194	# authid invalid
		195	$template->param ( errauthid => $authid,
		196	unknownauthid => 1,
		197	authtypesloop => \@authtypesloop );
		198	output_html_with_http_headers $query, $cookie, $template->output;
		199	exit;
		200	}
		201
182	if (C4::Context->preference("AuthDisplayHierarchy")){	202	if (C4::Context->preference("AuthDisplayHierarchy")){
183	my $trees=BuildUnimarcHierarchies($authid);	203	my $trees=BuildUnimarcHierarchies($authid);
184	my @trees = split /;/,$trees ;	204	my @trees = split /;/,$trees ;
Lines 201-209 if (C4::Context->preference("AuthDisplayHierarchy")){ Link Here
201	'displayhierarchy' =>C4::Context->preference("AuthDisplayHierarchy"),	221	'displayhierarchy' =>C4::Context->preference("AuthDisplayHierarchy"),
202	'loophierarchies' =>\@loophierarchies,	222	'loophierarchies' =>\@loophierarchies,
203	);	223	);
204	} else {
205	$record=GetAuthority($authid);
206	}	224	}
		225
207	my $count = CountUsage($authid);	226	my $count = CountUsage($authid);
208		227
209	# find the marc field/subfield used in biblio by this authority	228	# find the marc field/subfield used in biblio by this authority
Lines 215-238 while (my ($tagfield) = $sth->fetchrow) { Link Here
215	}	234	}
216	chop $biblio_fields;	235	chop $biblio_fields;
217		236
218		237	build_tabs ($template, $record, $dbh,"",$query);
219	# fill arrays
220	my @loop_data =();
221	my $tag;
222	# loop through each tab 0 through 9
223	# for (my $tabloop = 0; $tabloop<=10;$tabloop++) {
224	# loop through each tag
225	build_tabs ($template, $record, $dbh,"",$query);
226
227	my $authtypes = getauthtypes;
228	my @authtypesloop;
229	foreach my $thisauthtype (sort { $authtypes->{$b} cmp $authtypes->{$a} } keys %$authtypes) {
230	my %row =(value => $thisauthtype,
231	selected => $thisauthtype eq $authtypecode,
232	authtypetext => $authtypes->{$thisauthtype}{'authtypetext'},
233	);
234	push @authtypesloop, \%row;
235	}
236		238
237	$template->param(authid => $authid,	239	$template->param(authid => $authid,
238	count => $count,	240	count => $count,

Lines 67-72 my ( $template, $loggedinuser, $cookie ) = get_template_and_user( Link Here

(-)a/catalogue/ISBDdetail.pl (-7 / +13 lines)
67	}	67	}
68	);	68	);
69		69
		70	my $res = GetISBDView($biblionumber, "intranet");
		71	if ( not defined $res ) {
		72	# biblionumber invalid -> report and exit
		73	$template->param( unknownbiblionumber => 1,
		74	biblionumber => $biblionumber
		75	);
		76	output_html_with_http_headers $query, $cookie, $template->output;
		77	exit;
		78	}
		79
70	if($query->cookie("holdfor")){	80	if($query->cookie("holdfor")){
71	my $holdfor_patron = GetMember('borrowernumber' => $query->cookie("holdfor"));	81	my $holdfor_patron = GetMember('borrowernumber' => $query->cookie("holdfor"));
72	$template->param(	82	$template->param(
Lines 77-86 if($query->cookie("holdfor")){ Link Here
77	);	87	);
78	}	88	}
79		89
80	# my @blocs = split /\@/,$ISBD;
81	# my @fields = $record->fields();
82	my $res = GetISBDView($biblionumber, "intranet");
83
84	# count of item linked with biblio	90	# count of item linked with biblio
85	my $itemcount = GetItemsCount($biblionumber);	91	my $itemcount = GetItemsCount($biblionumber);
86	$template->param( count => $itemcount);	92	$template->param( count => $itemcount);
Lines 98-106 if ($subscriptionsnumber) { Link Here
98	$template->param (	104	$template->param (
99	ISBD => $res,	105	ISBD => $res,
100	biblionumber => $biblionumber,	106	biblionumber => $biblionumber,
101	isbdview => 1,	107	isbdview => 1,
102	z3950_search_params => C4::Search::z3950_search_args(GetBiblioData($biblionumber)),	108	z3950_search_params => C4::Search::z3950_search_args(GetBiblioData($biblionumber)),
103	C4::Search::enabled_staff_search_views,	109	C4::Search::enabled_staff_search_views
104	);	110	);
105		111
106	output_html_with_http_headers $query, $cookie, $template->output;	112	output_html_with_http_headers $query, $cookie, $template->output;

Lines 70-79 my $popup = Link Here

(-)a/catalogue/MARCdetail.pl (-4 / +14 lines)
70	; # if set to 1, then don't insert links, it's just to show the biblio	70	; # if set to 1, then don't insert links, it's just to show the biblio
71	my $subscriptionid = $query->param('subscriptionid');	71	my $subscriptionid = $query->param('subscriptionid');
72		72
73	my $tagslib = &GetMarcStructure(1,$frameworkcode);
74
75	my $record = GetMarcBiblio($biblionumber);
76	my $biblio = GetBiblioData($biblionumber);
77	# open template	73	# open template
78	my ( $template, $loggedinuser, $cookie ) = get_template_and_user(	74	my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
79	{	75	{
Lines 86-91 my ( $template, $loggedinuser, $cookie ) = get_template_and_user( Link Here
86	}	82	}
87	);	83	);
88		84
		85	my $record = GetMarcBiblio($biblionumber);
		86
		87	if ( not defined $record ) {
		88	# biblionumber invalid -> report and exit
		89	$template->param( unknownbiblionumber => 1,
		90	biblionumber => $biblionumber
		91	);
		92	output_html_with_http_headers $query, $cookie, $template->output;
		93	exit;
		94	}
		95
		96	my $tagslib = &GetMarcStructure(1,$frameworkcode);
		97	my $biblio = GetBiblioData($biblionumber);
		98
89	if($query->cookie("holdfor")){	99	if($query->cookie("holdfor")){
90	my $holdfor_patron = GetMember('borrowernumber' => $query->cookie("holdfor"));	100	my $holdfor_patron = GetMember('borrowernumber' => $query->cookie("holdfor"));
91	$template->param(	101	$template->param(

Lines 51-56 my ( $template, $borrowernumber, $cookie ) = get_template_and_user( Link Here

(-)a/catalogue/detail.pl (-12 / +13 lines)
51	}	51	}
52	);	52	);
53		53
		54	my $biblionumber = $query->param('biblionumber');
		55	my $record = GetMarcBiblio($biblionumber);
		56
		57	if ( not defined $record ) {
		58	# biblionumber invalid -> report and exit
		59	$template->param( unknownbiblionumber => 1,
		60	biblionumber => $biblionumber );
		61	output_html_with_http_headers $query, $cookie, $template->output;
		62	exit;
		63	}
		64
54	if($query->cookie("holdfor")){	65	if($query->cookie("holdfor")){
55	my $holdfor_patron = GetMember('borrowernumber' => $query->cookie("holdfor"));	66	my $holdfor_patron = GetMember('borrowernumber' => $query->cookie("holdfor"));
56	$template->param(	67	$template->param(
Lines 61-74 if($query->cookie("holdfor")){ Link Here
61	);	72	);
62	}	73	}
63		74
64	my $biblionumber = $query->param('biblionumber');	75	my $fw = GetFrameworkCode($biblionumber);
65	my $fw = GetFrameworkCode($biblionumber);
66
67	my $showallitems = $query->param('showallitems');	76	my $showallitems = $query->param('showallitems');
68		77	my $marcflavour = C4::Context->preference("marcflavour");
69	## get notes and subjects from MARC record
70	my $marcflavour = C4::Context->preference("marcflavour");
71	my $record = GetMarcBiblio($biblionumber);
72		78
73	# XSLT processing of some stuff	79	# XSLT processing of some stuff
74	if (C4::Context->preference("XSLTDetailsDisplay") ) {	80	if (C4::Context->preference("XSLTDetailsDisplay") ) {
Lines 93-103 $template->param( Link Here
93	normalized_isbn => $isbn,	99	normalized_isbn => $isbn,
94	);	100	);
95		101
96	unless (defined($record)) {
97	print $query->redirect("/cgi-bin/koha/errors/404.pl");
98	exit;
99	}
100
101	my $marcnotesarray = GetMarcNotes( $record, $marcflavour );	102	my $marcnotesarray = GetMarcNotes( $record, $marcflavour );
102	my $marcisbnsarray = GetMarcISBN( $record, $marcflavour );	103	my $marcisbnsarray = GetMarcISBN( $record, $marcflavour );
103	my $marcauthorsarray = GetMarcAuthors( $record, $marcflavour );	104	my $marcauthorsarray = GetMarcAuthors( $record, $marcflavour );

Lines 38-46 my $popup = Link Here

(-)a/catalogue/labeledMARCdetail.pl (-3 / +13 lines)
38	$query->param('popup')	38	$query->param('popup')
39	; # if set to 1, then don't insert links, it's just to show the biblio	39	; # if set to 1, then don't insert links, it's just to show the biblio
40		40
41	my $tagslib = GetMarcStructure(1,$frameworkcode);
42	my $record = GetMarcBiblio($biblionumber);
43	my $biblio = GetBiblioData($biblionumber);
44	# open template	41	# open template
45	my ( $template, $loggedinuser, $cookie ) = get_template_and_user(	42	my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
46	{	43	{
Lines 53-58 my ( $template, $loggedinuser, $cookie ) = get_template_and_user( Link Here
53	}	50	}
54	);	51	);
55		52
		53	my $record = GetMarcBiblio($biblionumber);
		54	if ( not defined $record ) {
		55	# biblionumber invalid -> report and exit
		56	$template->param( unknownbiblionumber => 1,
		57	biblionumber => $biblionumber
		58	);
		59	output_html_with_http_headers $query, $cookie, $template->output;
		60	exit;
		61	}
		62
		63	my $tagslib = GetMarcStructure(1,$frameworkcode);
		64	my $biblio = GetBiblioData($biblionumber);
		65
56	if($query->cookie("holdfor")){	66	if($query->cookie("holdfor")){
57	my $holdfor_patron = GetMember('borrowernumber' => $query->cookie("holdfor"));	67	my $holdfor_patron = GetMember('borrowernumber' => $query->cookie("holdfor"));
58	$template->param(	68	$template->param(