From 6ff4db9d6789ac89b7043476501370134c7abcbf Mon Sep 17 00:00:00 2001
From: Chris Sharp <csharp@georgialibraries.org>
Date: Fri, 11 Nov 2022 09:32:08 -0500
Subject: [PATCH] add column to permission.grp_tree to account for e-renew

---
 Open-ILS/examples/fm_IDL.xml                            |  1 +
 .../lib/OpenILS/Application/Storage/CDBI/permission.pm  |  2 +-
 Open-ILS/src/sql/Pg/006.schema.permissions.sql          |  3 ++-
 .../sql/Pg/upgrade/XXXX.schema.erenew_column_pgt.sql    | 17 +++++++++++++++++
 4 files changed, 21 insertions(+), 2 deletions(-)
 create mode 100644 Open-ILS/src/sql/Pg/upgrade/XXXX.schema.erenew_column_pgt.sql

diff --git a/Open-ILS/examples/fm_IDL.xml b/Open-ILS/examples/fm_IDL.xml
index e9c2e014fc..066a8ceb84 100644
--- a/Open-ILS/examples/fm_IDL.xml
+++ b/Open-ILS/examples/fm_IDL.xml
@@ -8104,6 +8104,7 @@ SELECT  usr,
 			<field reporter:label="Required Permission" name="application_perm" reporter:datatype="text"/>
 			<field reporter:label="Is User Group" name="usergroup" reporter:datatype="bool"/>
 			<field reporter:label="Hold Priority" name="hold_priority" reporter:datatype="int"/>
+			<field reporter:label="E-renew?" name="erenew" reporter:datatype="bool"/>
 		</fields>
 		<links>
 			<link field="parent" reltype="has_a" key="id" map="" class="pgt"/>
diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/CDBI/permission.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/CDBI/permission.pm
index 7c7cab6d85..af9ada555a 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/CDBI/permission.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/CDBI/permission.pm
@@ -16,7 +16,7 @@ use base qw/permission/;
 __PACKAGE__->table('permission_grp_tree');
 __PACKAGE__->columns(Primary => qw/id/);
 __PACKAGE__->columns(Essential => qw/name parent description perm_interval
-                     application_perm usergroup hold_priority/);
+                     application_perm usergroup hold_priority erenew/);
 #-------------------------------------------------------------------------------
 package permission::usr_grp_map;
 use base qw/permission/;
diff --git a/Open-ILS/src/sql/Pg/006.schema.permissions.sql b/Open-ILS/src/sql/Pg/006.schema.permissions.sql
index 05d38a6243..c1f1622194 100644
--- a/Open-ILS/src/sql/Pg/006.schema.permissions.sql
+++ b/Open-ILS/src/sql/Pg/006.schema.permissions.sql
@@ -39,7 +39,8 @@ CREATE TABLE permission.grp_tree (
 	perm_interval		INTERVAL DEFAULT '3 years'::interval NOT NULL,
 	description		TEXT,
 	application_perm	TEXT,
-	hold_priority       INT   NOT NULL DEFAULT 0
+	hold_priority       INT   NOT NULL DEFAULT 0,
+	erenew          BOOL NOT NULL DEFAULT TRUE
 );
 CREATE INDEX grp_tree_parent_idx ON permission.grp_tree (parent);
 
diff --git a/Open-ILS/src/sql/Pg/upgrade/XXXX.schema.erenew_column_pgt.sql b/Open-ILS/src/sql/Pg/upgrade/XXXX.schema.erenew_column_pgt.sql
new file mode 100644
index 0000000000..8e835b413d
--- /dev/null
+++ b/Open-ILS/src/sql/Pg/upgrade/XXXX.schema.erenew_column_pgt.sql
@@ -0,0 +1,17 @@
+BEGIN;
+
+ALTER TABLE permission.grp_tree ADD COLUMN (erenew BOOL);
+
+COMMIT;
+
+BEGIN;
+
+UPDATE permission.grp_tree SET erenew = TRUE;
+
+COMMIT;
+
+BEGIN;
+
+ALTER TABLE permission.grp_tree ALTER COLUMN erenew SET NOT NULL;
+
+COMMIT;
-- 
2.11.0