Create record list where field 773 doesn't start with DE-605 o. DE-600

hbz · Jul 15, 2024 · 904b698 · 904b698
1 parent 3e4d466
commit 904b698
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/main/resources/alma/fix/relatedRessourcesAndLinks.fix b/src/main/resources/alma/fix/relatedRessourcesAndLinks.fix
@@ -78,6 +78,10 @@ unless any_match("leader", "^.{7}[ad].*")
         set_hash( "isPartOf[].$last.hasSuperordinate[].$append")
         if all_match("$j", "^\\((?:DE-600|DE-605)\\)(.*)$")
           copy_field("$j", "isPartOf[].$last.hasSuperordinate[].$last.id")
+
+        else
+          retain("almaMmsId")
+          print_record(destination: "almaMMSIDs_with_erroneous773_w.txt")
         end
         copy_field("$i.t", "isPartOf[].$last.hasSuperordinate[].$last.label")
         call_macro("alternateGraphicRepresationIsPartOf",variable:"$i")