From b42f296d1deb3d1d79be7a13b675239385a48e67 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Sat, 11 May 2019 18:53:25 -0500 Subject: [PATCH] Bug 22509: Add more POD and fix --where We should not need the "WHERE" keyword to have the same behavior as existing script (rebuild_zebra.pl) --- misc/add_date_fields_to_marc_records.pl | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/misc/add_date_fields_to_marc_records.pl b/misc/add_date_fields_to_marc_records.pl index 9d348d3b28..e20cf639e2 100755 --- a/misc/add_date_fields_to_marc_records.pl +++ b/misc/add_date_fields_to_marc_records.pl @@ -59,7 +59,7 @@ if ($verbose) { say "\t" . $_->as_formatted for @fields_to_add; } -$where ||= ""; +$where = $where ? "WHERE $where" : ''; my $sth = $dbh->prepare("SELECT biblionumber, frameworkcode FROM biblio $where"); $sth->execute(); @@ -94,6 +94,8 @@ add_date_fields_to_marc_records.pl perl add_date_fields_to_marc_records.pl --field='905$a=0/%Y' --field='905$a=1/%Y/%b-%m' --field='905$a=2/%Y/%b-%m/%d' --unless-exists='905$a' --verbose --confirm + perl add_date_fields_to_marc_records.pl --field='905$a=0/%Y' --field='905$a=1/%Y/%b-%m' --field='905$a=2/%Y/%b-%m/%d' --unless-exists='905$a' --where "biblionumber=42" --verbose --confirm + =head1 DESCRIPTION Add some MARC fields to bibliographic records. @@ -120,6 +122,8 @@ Confirmation flag, the script will be running in dry-run mode if set not. Limits the search on bibliographic records with a user-specified WHERE clause. +Only the columns from the biblio table are available. + =item B<--field> Fields to add to the bibliographic records. -- 2.11.0