Bugzilla – Attachment 108072 Details for
Bug 24134
Add placeholder for 2 digit years to allow autogeneration of dates in 008
Home
|
New
|
Browse
|
Search
|
[?]
|
Reports
|
Help
|
New Account
|
Log In
[x]
|
Forgot Password
Login:
[x]
[patch]
Bug 24134: Add placeholder for 2 digit years to allow autogeneration of dates in 008
Bug-24134-Add-placeholder-for-2-digit-years-to-all.patch (text/plain), 5.78 KB, created by
Tomás Cohen Arazi (tcohen)
on 2020-08-11 14:39:18 UTC
(
hide
)
Description:
Bug 24134: Add placeholder for 2 digit years to allow autogeneration of dates in 008
Filename:
MIME Type:
Creator:
Tomás Cohen Arazi (tcohen)
Created:
2020-08-11 14:39:18 UTC
Size:
5.78 KB
patch
obsolete
>From 506a979d440995849bd8eafd244dbbb2799dbdc0 Mon Sep 17 00:00:00 2001 >From: Owen Leonard <oleonard@myacpl.org> >Date: Mon, 2 Dec 2019 16:42:59 +0000 >Subject: [PATCH] Bug 24134: Add placeholder for 2 digit years to allow > autogeneration of dates in 008 > >This patch modifies the code for parsing MARC framework configurations >so that the placeholder "<<YY>>" translates to a two-year date. > >To test, apply the patch and modify a framework to include placeholders. >For example, in MARC21: > > - Administration -> MARC structure -> 952 -> Edit subfields -> d > - Expand "Advanced constraints" and add a default value: > <<YYYY>> <<YY>> <<MM>> <<DD>> <<USER>> > - Save your configuration and go to Cataloging. > - Go to the add/edit items page for a record which uses the framework > you edited. > - In the "Add item" form, in the "Date aquired" field, you should see > the correct values. For example: '2019 19 12 03 Leonard' > >Perform the same test when adding an item during the Acquisitions >process (depending on your AcqCreateItem setting). > >Note that acqui/neworderempty.pl has been modified because the >placeholder-replacement code is repeated there, but I couldn't discover >how to test it (if it is used at all?) > >Signed-off-by: Lucas Gass <lucas@bywatersolutions.com> >Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de> >Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io> >--- > C4/Items.pm | 17 +++++++++++++++++ > acqui/neworderempty.pl | 4 +++- > cataloguing/addbiblio.pl | 4 +++- > cataloguing/additem.pl | 4 +++- > 4 files changed, 26 insertions(+), 3 deletions(-) > >diff --git a/C4/Items.pm b/C4/Items.pm >index f2db7a4894..22ac2de12c 100644 >--- a/C4/Items.pm >+++ b/C4/Items.pm >@@ -1608,6 +1608,23 @@ sub PrepareItemrecordDisplay { > $defaultvalue = q||; > } else { > $defaultvalue =~ s/"/"/g; >+ # get today date & replace <<YYYY>>, <<MM>>, <<DD>> if provided in the default value >+ my $today_dt = dt_from_string; >+ my $year = $today_dt->strftime('%Y'); >+ my $shortyear = $today_dt->strftime('%y'); >+ my $month = $today_dt->strftime('%m'); >+ my $day = $today_dt->strftime('%d'); >+ $defaultvalue =~ s/<<YYYY>>/$year/g; >+ $defaultvalue =~ s/<<YY>>/$shortyear/g; >+ $defaultvalue =~ s/<<MM>>/$month/g; >+ $defaultvalue =~ s/<<DD>>/$day/g; >+ >+ # And <<USER>> with surname (?) >+ my $username = >+ ( C4::Context->userenv >+ ? C4::Context->userenv->{'surname'} >+ : "superlibrarian" ); >+ $defaultvalue =~ s/<<USER>>/$username/g; > } > > my $maxlength = $tagslib->{$tag}->{$subfield}->{maxlength}; >diff --git a/acqui/neworderempty.pl b/acqui/neworderempty.pl >index dfa9ebe9ff..d9505d1440 100755 >--- a/acqui/neworderempty.pl >+++ b/acqui/neworderempty.pl >@@ -228,12 +228,14 @@ if ( not $ordernumber ) { # create order > > if ( $value ) { > >- # get today date & replace <<YYYY>>, <<MM>>, <<DD>> if provided in the default value >+ # get today date & replace <<YYYY>>, <<YY>>, <<MM>>, <<DD>> if provided in the default value > my $today_dt = dt_from_string; > my $year = $today_dt->strftime('%Y'); >+ my $shortyear = $today_dt->strftime('%y'); > my $month = $today_dt->strftime('%m'); > my $day = $today_dt->strftime('%d'); > $value =~ s/<<YYYY>>/$year/g; >+ $value =~ s/<<YY>>/$shortyear/g; > $value =~ s/<<MM>>/$month/g; > $value =~ s/<<DD>>/$day/g; > >diff --git a/cataloguing/addbiblio.pl b/cataloguing/addbiblio.pl >index 7d48842c6a..4bbf81df9a 100755 >--- a/cataloguing/addbiblio.pl >+++ b/cataloguing/addbiblio.pl >@@ -279,12 +279,14 @@ sub create_input { > if ( $value eq '' ) { > $value = $tagslib->{$tag}->{$subfield}->{defaultvalue} // q{}; > >- # get today date & replace <<YYYY>>, <<MM>>, <<DD>> if provided in the default value >+ # get today date & replace <<YYYY>>, <<YY>>, <<MM>>, <<DD>> if provided in the default value > my $today_dt = dt_from_string; > my $year = $today_dt->strftime('%Y'); >+ my $shortyear = $today_dt->strftime('%y'); > my $month = $today_dt->strftime('%m'); > my $day = $today_dt->strftime('%d'); > $value =~ s/<<YYYY>>/$year/g; >+ $value =~ s/<<YY>>/$shortyear/g; > $value =~ s/<<MM>>/$month/g; > $value =~ s/<<DD>>/$day/g; > # And <<USER>> with surname (?) >diff --git a/cataloguing/additem.pl b/cataloguing/additem.pl >index 001d9d8c15..bbdedf6d1d 100755 >--- a/cataloguing/additem.pl >+++ b/cataloguing/additem.pl >@@ -132,12 +132,14 @@ sub generate_subfield_form { > if ( ! defined( $value ) || $value eq '') { > $value = $subfieldlib->{defaultvalue}; > if ( $value ) { >- # get today date & replace <<YYYY>>, <<MM>>, <<DD>> if provided in the default value >+ # get today date & replace <<YYYY>>, <<YY>>, <<MM>>, <<DD>> if provided in the default value > my $today_dt = dt_from_string; > my $year = $today_dt->strftime('%Y'); >+ my $shortyear = $today_dt->strftime('%y'); > my $month = $today_dt->strftime('%m'); > my $day = $today_dt->strftime('%d'); > $value =~ s/<<YYYY>>/$year/g; >+ $value =~ s/<<YY>>/$shortyear/g; > $value =~ s/<<MM>>/$month/g; > $value =~ s/<<DD>>/$day/g; > # And <<USER>> with surname (?) >-- >2.28.0
<b>You cannot view the attachment while viewing its details because your browser does not support IFRAMEs. <a href="attachment.cgi?id=108072">View the attachment on a separate page</a>.</b>
View Attachment As Diff
View Attachment As Raw
Actions:
View
|
Diff
|
Splinter Review
Attachments on
bug 24134
:
96106
|
96113
|
105430
| 108072