From dfced3d56c62775f948bbf13b54f8d9981eeb8ba Mon Sep 17 00:00:00 2001 From: Fridolin Somers Date: Mon, 5 May 2025 10:12:30 +0200 Subject: [PATCH] Bug 39825: Add a direct link to items tag in MARC bibliographic framework page In MARC bibliographic framework page, add a direct link to items tag (952 in MARC21 and 995 in UNIMARC) can be very useful. Currently one needs to search for the tag, then click on actions, then click on "View subfields". Test plan : 1) Go to Administration > MARC bibliographic framework 2) View any framework MARC structure 3) You see in tools bar new button "View items tag (952)" 4) Click on it, you see this tag subfields Signed-off-by: Roman Dolny --- admin/marctagstructure.pl | 10 +++++++--- .../prog/en/modules/admin/marctagstructure.tt | 5 +++++ 2 files changed, 12 insertions(+), 3 deletions(-) diff --git a/admin/marctagstructure.pl b/admin/marctagstructure.pl index 8e3301e7a6..5bc90cab28 100755 --- a/admin/marctagstructure.pl +++ b/admin/marctagstructure.pl @@ -18,11 +18,12 @@ # along with Koha; if not, see . use Modern::Perl; -use CGI qw ( -utf8 ); -use C4::Auth qw( get_template_and_user ); +use CGI qw ( -utf8 ); + +use C4::Auth qw( get_template_and_user ); +use C4::Biblio qw( GetMarcFromKohaField ); use C4::Context; use C4::Output qw( output_html_with_http_headers ); -use C4::Context; use Koha::Caches; use Koha::AuthorisedValues; @@ -230,6 +231,9 @@ if ( $op eq 'add_form' ) { } } + my ( $items_tag, $items_subtag ) = GetMarcFromKohaField('items.itemnumber'); + $template->param( items_tag => $items_tag ); + # here, $op can be unset or set to "cud-framework_create_confirm". if ( $searchfield ne '' ) { $template->param( searchfield => $searchfield ); diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/marctagstructure.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/admin/marctagstructure.tt index ecb182d342..395ac42221 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/marctagstructure.tt +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/admin/marctagstructure.tt @@ -95,6 +95,11 @@ [% END %] -- 2.39.5