Map title of subseries for alternateGraphicRepresentation if no maint…

…itle is given #1879
hbz · Sep 6, 2023 · 224784c · 224784c
1 parent 2934727
commit 224784c
Show file tree

Hide file tree

Showing 2 changed files with 9 additions and 1 deletion.
diff --git a/src/main/resources/alma/fix/titleRelatedFields.fix b/src/main/resources/alma/fix/titleRelatedFields.fix
@@ -106,6 +106,14 @@ do list(path:"alternateGraphicRepresentation[]","var":"$AGR")
     remove_field("$AGR.record.@titleOfSubSeries")
     remove_field("$AGR.record.@titleOfSubSeries_n")
     remove_field("$AGR.record.@titleOfSubSeries_p")
+  elsif exists("$AGR.record.@titleOfSubSeries_p") # We have an appearance where there is no title $a is given as alternateGraphicRepresentation
+    if exists("$AGR.record.@titleOfSubSeries_n") # separate subvolume numbering and title with :
+      prepend("$AGR.record.@titleOfSubSeries_p", ": ")
+    end
+
+    paste("$AGR.record.title", "$AGR.record.@titleOfSubSeries_n",  "$AGR.record.@titleOfSubSeries_p", join_char: "")
+    remove_field("$AGR.record.@titleOfSubSeries_n")
+    remove_field("$AGR.record.@titleOfSubSeries_p")
   end
 end
 

diff --git a/src/test/resources/alma-fix/990202474680206441.json b/src/test/resources/alma-fix/990202474680206441.json
@@ -20,7 +20,7 @@
       "label" : "Katakana"
     },
     "record" : {
-      "@titleOfSubSeries_p" : "ゼンジン キョウイクロン"
+      "title" : "ゼンジン キョウイクロン"
     }
   } ],
   "almaMmsId" : "990202474680206441",