From 5231d0dda4be9312dc2765eff6e0128078aa42ab Mon Sep 17 00:00:00 2001
From: Kyle Hall <kyle@bywatersolutions.com>
Date: Wed, 22 Feb 2023 10:55:41 -0500
Subject: [PATCH] Bug 33040: Add "Date published (text)" to serials tab on
 record view (detail.pl)

Some libraries would like to see the "Date published (text)" in the serials tab on the "Normal" record view ( aka catalogue/detail.pl ).

Test Plan:
1) View the serials tab on detail.pl for a subscription where the latest
   serial has a "Date published (text)" field populated.
2) Apply this patch
3) Restart all the thigns!
4) Browse to detail.pl for that record
5) View the Subscriptions tab
6) Note the "Date published (text)" column exists now!

Signed-off-by: Matt Blenkinsop <matt.blenkinsop@ptfs-europe.com>
Signed-off-by: Victor Grousset/tuxayo <victor@tuxayo.net>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
(cherry picked from commit b3b33960dac85015d4f6e73604a8f7d21ed31e5b)
Signed-off-by: Jacob O'Mara <jacobomara901@gmail.com>
(cherry picked from commit e640ddc20e6dd44a679f6e738943bdfb69fc4dab)
Signed-off-by: Lucas Gass <lucas@bywatersolutions.com>
(cherry picked from commit da2c777737c0633352a288f96c258ba7914d29a6)
Signed-off-by: Arthur Suzuki <arthur.suzuki@biblibre.com>
---
 C4/Serials.pm                                               | 2 +-
 koha-tmpl/intranet-tmpl/prog/en/modules/catalogue/detail.tt | 2 ++
 2 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/C4/Serials.pm b/C4/Serials.pm
index bdf6ffdc0b..5e8f6a9f8e 100644
--- a/C4/Serials.pm
+++ b/C4/Serials.pm
@@ -779,7 +779,7 @@ sub GetLatestSerials {
     my $dbh = C4::Context->dbh;
 
     my $statuses = join( ',', ( ARRIVED, MISSING_STATUSES ) );
-    my $strsth = "SELECT   serialid,serialseq, status, planneddate, publisheddate, notes
+    my $strsth = "SELECT   serialid,serialseq, status, planneddate, publisheddate, publisheddatetext, notes
                         FROM     serial
                         WHERE    subscriptionid = ?
                         AND      status IN ($statuses)
diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/catalogue/detail.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/catalogue/detail.tt
index 841e166c60..8fc2c0351e 100644
--- a/koha-tmpl/intranet-tmpl/prog/en/modules/catalogue/detail.tt
+++ b/koha-tmpl/intranet-tmpl/prog/en/modules/catalogue/detail.tt
@@ -709,6 +709,7 @@ Note that permanent location is a code, and location may be an authval.
                     <th>Issue #</th>
                     <th>Date arrived</th>
                     <th>Date published</th>
+                    <th>Date published (text)</th>
                     <th>Status</th>
                     <th>Note</th>
                 </tr>
@@ -717,6 +718,7 @@ Note that permanent location is a code, and location may be an authval.
                     <td>[% latestserial.serialseq | html %]</td>
                     <td data-order="[% latestserial.planneddate | html %]">[% latestserial.planneddate | $KohaDates %]</td>
                     <td data-order="[% latestserial.publisheddate | html %]">[% latestserial.publisheddate | $KohaDates %]</td>
+                    <td>[% latestserial.publisheddatetext | html %]</td>
                     <td>
                       [% IF ( latestserial.status1 ) %]Expected[% END %]
                       [% IF ( latestserial.status2 ) %]Arrived[% END %]
-- 
2.39.5