Attachment 129088 Details for Bug 29811 – BUG 29811 : add timestamp option on authority record type

[patch] BUG 29811 : add timestamp option on authority record type

BUG-29811--add-timestamp-option-on-authority-recor.patch (text/plain), 3.38 KB, created by Thibaud Guillot (thibaud_g) on 2022-01-06 14:08:30 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Thibaud Guillot (thibaud_g)

Created: 2022-01-06 14:08:30 UTC

Size: 3.38 KB

patch

obsolete

>From 93c4dd3d3ec54b0eb71b8edf70f8b1685ffa2277 Mon Sep 17 00:00:00 2001
>From: Thibaud Guillot <thibaud.guillot@biblibre.com>
>Date: Thu, 6 Jan 2022 14:48:36 +0100
>Subject: [PATCH] BUG 29811 : add timestamp option on authority record type
>
>According to the timestamp option for bibs record type I added the
>timestamp option for authority records.
>Timestamp is already present in database on field "modification_time"
>
>Test Plan :
>1 - Be sure to have authority record type for easiest test create one
>2 - Execute script export_records.pl in your koha/misc directory and
>choose a date (example yesterday if you just created an authority
>right now).(see export_records.pl -h for help)
>3 - Timestamp option has no effect on authority record type
>4 - Execute script again but choose the date of tomorrow for example
>5 - Same result
>6 - Apply this patch
>7 - Play again steps 2 and 4
>8 - On step 2 you will see only your authorities created today (because
>script show you authority has changes since the date you choose in
>option) and for step 4 you must see an empty file.
>---
> misc/export_records.pl | 42 +++++++++++++++++++++++++-----------------
> 1 file changed, 25 insertions(+), 17 deletions(-)
>
>diff --git a/misc/export_records.pl b/misc/export_records.pl
>index 32658cb8c8..39878b502f 100755
>--- a/misc/export_records.pl
>+++ b/misc/export_records.pl
>@@ -100,9 +100,6 @@ if ( $output_format eq 'csv' and not $csv_profile_id ) {
>     pod2usage(q|Define a csv profile to export in CSV|);
> }
> 
>-if ( $timestamp and $record_type ne 'bibs' ) {
>-    pod2usage(q|--timestamp can only be used with biblios|);
>-}
> 
> if ( $record_type ne 'bibs' and $record_type ne 'auths' ) {
>     pod2usage(q|--record_type is not valid|);
>@@ -210,20 +207,31 @@ if ( $record_type eq 'bibs' ) {
>     }
> }
> elsif ( $record_type eq 'auths' ) {
>-    my $conditions = {
>-        ( $starting_authid or $ending_authid )
>-            ? (
>-                authid => {
>-                    ( $starting_authid ? ( '>=' => $starting_authid ) : () ),
>-                    ( $ending_authid   ? ( '<=' => $ending_authid   ) : () ),
>-                }
>-            )
>-            : (),
>-        ( $authtype ? ( authtypecode => $authtype ) : () ),
>-    };
>-    # Koha::MetadataRecord::Authority is not a Koha::Object...
>-    my $authorities = Koha::Database->new->schema->resultset('AuthHeader')->search( $conditions );
>-    @record_ids = map { $_->authid } $authorities->all;
>+    if ( $timestamp ) {
>+        push @record_ids, $_->{authid} for @{
>+            $dbh->selectall_arrayref(q| (
>+                SELECT authid
>+                FROM auth_header
>+                WHERE modification_time >= ?
>+            ) |, { Slice => {} }, $timestamp );
>+        };
>+    }
>+    else {
>+        my $conditions = {
>+            ( $starting_authid or $ending_authid )
>+                ? (
>+                    authid => {
>+                        ( $starting_authid ? ( '>=' => $starting_authid ) : () ),
>+                        ( $ending_authid   ? ( '<=' => $ending_authid   ) : () ),
>+                    }
>+                )
>+                : (),
>+            ( $authtype ? ( authtypecode => $authtype ) : () ),
>+        };
>+        # Koha::MetadataRecord::Authority is not a Koha::Object...
>+        my $authorities = Koha::Database->new->schema->resultset('AuthHeader')->search( $conditions );
>+        @record_ids = map { $_->authid } $authorities->all;
>+    }
> }
> 
> @record_ids = uniq @record_ids;
>-- 
>2.25.1

Actions: View | Diff | Splinter Review

Attachments on bug 29811: 129088 | 156704 | 156984