Skip to content

Commit

Permalink
Process role-specific input fields, add roles in transformations
Browse files Browse the repository at this point in the history
  • Loading branch information
fsteeg committed Jun 14, 2023
1 parent 365b7fc commit abf3773
Show file tree
Hide file tree
Showing 6 changed files with 105 additions and 35 deletions.
11 changes: 11 additions & 0 deletions conf/output/test-output-15.json
Original file line number Diff line number Diff line change
Expand Up @@ -67,5 +67,16 @@
"id" : "https://rpb.lobid.org/spatial",
"label" : "RPB-Raumsystematik"
}
} ],
"contribution" : [ {
"agent" : {
"id" : "https://d-nb.info/gnd/5118282-8",
"label" : "Heimatverein / Bassenheim"
},
"role" : {
"id" : "http://id.loc.gov/vocabulary/relators/isb",
"label" : "NE hrsg. Körperschaft"
},
"type" : [ "Contribution" ]
} ]
}
10 changes: 10 additions & 0 deletions conf/output/test-output-17.json
Original file line number Diff line number Diff line change
Expand Up @@ -63,5 +63,15 @@
"label" : "Autor/in"
},
"type" : [ "Contribution" ]
}, {
"agent" : {
"id" : "https://rpb.lobid.org/agent/00Pn02k4080a",
"label" : "Baumann, Arno"
},
"role" : {
"id" : "http://id.loc.gov/vocabulary/relators/edt",
"label" : "Bearb."
},
"type" : [ "Contribution" ]
} ]
}
8 changes: 4 additions & 4 deletions conf/output/test-output-36.json
Original file line number Diff line number Diff line change
Expand Up @@ -63,8 +63,8 @@
"label" : "Tourismusverein Hocheifel-Nürburgring"
},
"role" : {
"id" : "http://id.loc.gov/vocabulary/relators/aut",
"label" : "Autor/in"
"id" : "http://id.loc.gov/vocabulary/relators/isb",
"label" : "HE Urheber"
},
"type" : [ "Contribution" ]
}, {
Expand All @@ -73,8 +73,8 @@
"label" : "Ahr, Rhein, Eifel, Tourismus & Service GmbH / Marienthal"
},
"role" : {
"id" : "http://id.loc.gov/vocabulary/relators/aut",
"label" : "Autor/in"
"id" : "http://id.loc.gov/vocabulary/relators/isb",
"label" : "HE Urheber"
},
"type" : [ "Contribution" ]
} ]
Expand Down
6 changes: 3 additions & 3 deletions conf/output/test-output-strapi.json
Original file line number Diff line number Diff line change
Expand Up @@ -14,9 +14,9 @@
{"f00_":"929t093399","f20_":"Geschäftsbericht 1985 (vom damaligen Geschäftsführer Fred Alff)","f30_":"_sn736050_","f31_":"_r99_ _o111000002000_","f32_":"_2111110n8_ ; _00Sn05t0929115a_","f36_":"u","f39_":"Fred Alff","f40_":"_00Pn09k3399281a_","f70h":"3","f70j":"2008","f70k":"Fußballverein Rheingold <Rübenach>","f70s":"34-36","f70t":"Rheingold-Echo","f70y":"Fußballverein Rheingold <Rübenach>: Rheingold-Echo. - 2008, 3, S. 34-36","f76a":"2008","f76b":"2008","f77_":"Ill.","f88_":"1200927-1","f90d":"Z 2268:2008 MAG","f95_":"ZR-20090729/11:42:19\u001FKO-Ei","f97a":"ZR-20090729/19:09:45\u001FZR","f40":[{"f40_":"_00Pn09k3399281a_","n40a":"Verfasser"}]}
{"f00_":"929t093400","f20_":"D-Mädchen mit erfolreichem Saisonverlauf","f30_":"_sn736050_","f31_":"_r99_ _o111000002000_","f32_":"_2111110n8_ ; _00Sn08s0201943a_","f36_":"u","f39_":"Jürgen Mohrs","f40_":"_00Pn97k2589a_","f70h":"3","f70j":"2008","f70k":"Fußballverein Rheingold <Rübenach>","f70s":"6-8","f70t":"Rheingold-Echo","f70y":"Fußballverein Rheingold <Rübenach>: Rheingold-Echo. - 2008, 3, S. 6-8","f76a":"2008","f76b":"2008","f77_":"Ill.","f88_":"1200927-1","f90d":"Z 2268:2008 MAG","f95_":"ZR-20090729/11:45:53\u001FKO-Ei","f96_":"ZR-20090730/14:19:20\u001FZR-Col","f97a":"ZR-20090730/19:09:47\u001FZR","f40":[{"f40_":"_00Pn97k2589a_","n40a":"Verfasser"}]}
{"f00_":"929t093367","f20_":"¬Der¬ FC Meisenheim feierte 100. Geburtstag","f30_":"_sn736050_","f31_":"_r99_ _o13310065_","f32_":"_10179792n8_ ; _00Sn07k1466835a_","f36_":"u","f39_":"von Hans-Otto Thomas","f40_":"_00Pn07k5464537b_","f70j":"2009","f70s":"81-88","f70t":"Naheland-Kalender","f70y":"Naheland-Kalender. - 2009, S. 81-88","f76a":"2008","f76b":"2008","f77_":"Ill.","f851":"Chronik","f88_":"207060-1","f90d":"Z 90:2009","f95_":"ZR-20090727/14:24:44\u001FKO-Hei","f96_":"ZR-20090728/14:58:27\u001FKO-Hei","f97a":"ZR-20090729/19:09:45\u001FZR","f40":[{"f40_":"_00Pn07k5464537b_","n40a":"Verfasser"}]}
{"f00_":"929t093368","f20_":"Bassenheim von 1894 - 1946 : Aufzeichnung aus der Schulchronik","f27_":"¬Die¬ Bassenheimer Schulchronik der Jahre 1894 bis 1946","f30_":"_sn783000_","f30a":"_sn240400_","f31_":"_r99_ _o13708202_","f31a":"_r99_ _o13708202_","f32_":"_4252261n4_ ; _4053474n1_ ; _00Sn09k3368351a_","f36_":"s","f39_":"hrsg. vom Heimatverein Bassenheim e.V.","f61_":"_5118282n8_","f74_":"Bassenheim","f76a":"2004","f76b":"2004","f77_":"99 S. : Ill.","f90d":"C2009/636","f95_":"ZR-20090728/07:48:53\u001FHBZ-Import","f96_":"ZR-20090728/07:53:00\u001FKO-Eid","f97a":"ZR-20090729/19:09:45\u001FZR","f983":"HT015946355"}
{"f00_":"929t093368","f20_":"Bassenheim von 1894 - 1946 : Aufzeichnung aus der Schulchronik","f27_":"¬Die¬ Bassenheimer Schulchronik der Jahre 1894 bis 1946","f30_":"_sn783000_","f30a":"_sn240400_","f31_":"_r99_ _o13708202_","f31a":"_r99_ _o13708202_","f32_":"_4252261n4_ ; _4053474n1_ ; _00Sn09k3368351a_","f36_":"s","f39_":"hrsg. vom Heimatverein Bassenheim e.V.","f61_":"_5118282n8_","f74_":"Bassenheim","f76a":"2004","f76b":"2004","f77_":"99 S. : Ill.","f90d":"C2009/636","f95_":"ZR-20090728/07:48:53\u001FHBZ-Import","f96_":"ZR-20090728/07:53:00\u001FKO-Eid","f97a":"ZR-20090729/19:09:45\u001FZR","f983":"HT015946355","f60":[{"f60_":"_5118282n8_","n60a":"NE hrsg. Körperschaft"}]}
{"f00_":"929t093369","f20_":"¬Der¬ Arbeiterverein St. Josef : Gestapo beim Kassierer","f30_":"_sn611044_","f31_":"_r99_ _o13708228_","f32_":"_7667208n6_","f36_":"s","f39_":"Helmut Schneider","f40_":"_00Pn02k2569a_","f71_":"Stand: 1. Oktober 2005","f74_":"Weißenthurm","f75_":"¬H.¬ Schneider","f76a":"2007","f76b":"2007","f77_":"16 S. : Ill., Notenbeisp.","f85_":"Pfarrarchiv Weißenthurm ; 6","f90d":"C2008/911","f95_":"ZR-20090728/08:01:17\u001FHBZ-Import","f96_":"ZR-20090728/08:03:20\u001FKO-Eid","f97a":"ZR-20090729/19:09:45\u001FZR","f983":"HT015597977","f40":[{"f40_":"_00Pn02k2569a_","n40a":"Verfasser"}]}
{"f00_":"929t093370","f20_":"Diezer Chronik : 1866 - 1922","f30_":"_sn240400_","f31_":"_r99_ _o14103029_","f32_":"_4012241n4_ ; _00Sn09k3370774a_","f36_":"s","f39_":"von Robert Heck. Bearb. von Arno Baumann","f40_":"_12497080X_","f431":"_00Pn02k4080a_","f74_":"[Diez, Lahn]","f75_":"¬A.¬ Baumann","f76a":"[2008?]","f76b":"2008","f77_":"93 S. : Ill.","f83_":"Heck, Robert / 1873-1958","f90d":"C2008A/687","f95_":"ZR-20090728/08:21:24\u001FHBZ-Import","f96_":"ZR-20090728/08:22:37\u001FKO-Eid","f97a":"ZR-20090729/19:09:45\u001FZR","f983":"HT015709903","f40":[{"f40_":"_12497080X_","n40a":"Verfasser"}]}
{"f00_":"929t093370","f20_":"Diezer Chronik : 1866 - 1922","f30_":"_sn240400_","f31_":"_r99_ _o14103029_","f32_":"_4012241n4_ ; _00Sn09k3370774a_","f36_":"s","f39_":"von Robert Heck. Bearb. von Arno Baumann","f40_":"_12497080X_","f431":"_00Pn02k4080a_","f74_":"[Diez, Lahn]","f75_":"¬A.¬ Baumann","f76a":"[2008?]","f76b":"2008","f77_":"93 S. : Ill.","f83_":"Heck, Robert / 1873-1958","f90d":"C2008A/687","f95_":"ZR-20090728/08:21:24\u001FHBZ-Import","f96_":"ZR-20090728/08:22:37\u001FKO-Eid","f97a":"ZR-20090729/19:09:45\u001FZR","f983":"HT015709903","f40":[{"f40_":"_12497080X_","n40a":"Verfasser"},{"f40_":"_00Pn02k4080a_","n40a":"Bearb."}]}
{"f00_":"929t093371","f20_":"Erinnerungen an das gesellschaftliche Leben im Neuendorf der Nachkriegsjahre","f30_":"_sn732000_","f30a":"_sn722000_","f31_":"_r99_ _o111000001500_","f31a":"_r99_ _o111000001500_","f32_":"_4515648n7_ ; _4518119n6_ ; _00Sn05k2020982a_","f36_":"u","f40_":"_00Pn01t42566702a_","f70b":"721","f70j":"2009","f70s":"48-55","f70t":"Festschrift ... Neuendorfer Kirmes","f70y":"Festschrift ... Neuendorfer Kirmes. - 721 (2009), S. 48-55","f76a":"2009","f76b":"2009","f77_":"Ill.","f88_":"1160524-8","f90d":"Z 1197:2009 MAG","f95_":"ZR-20090728/09:27:13\u001FKO-Hei","f97a":"ZR-20090729/19:09:45\u001FZR","f40":[{"f40_":"_00Pn01t42566702a_","n40a":"Verfasser"}]}
{"f00_":"929t093372","f20_":"Energie aus der Tiefe immer beliebter : Im Kreis Mayen-Koblenz zapfen so viele Hausbesitzer wie noch nie Erdwärme an - Bohrlöcher reichen rund 100 Meter tief","f30_":"_sn546028_","f31_":"_r99_ _o137_","f32_":"_4038117n1_ ; _4020286n0_ ; _00Sn08t1622278a_","f36_":"u","f39_":"sil","f70b":"64","f70h":"171 vom 27.07.","f70j":"2009","f70t":"Rhein-Zeitung, Ausg. B0","f70y":"Rhein-Zeitung, Ausg. B0. - 64 (2009), 171 vom 27.07.","f76a":"2009","f76b":"2009","f77_":"Ill.","f88_":"2429557-7","f90d":"ZB 223:2009;MZ 56:2009","f95_":"ZR-20090728/09:44:55\u001FRZ-HP","f96_":"ZR-20090728/09:47:12\u001FKO-Ei","f97a":"ZR-20090729/19:09:45\u001FZR","f98_":"http://rhein-zeitung.de/archiv/09/07/27/B0/00000086.html (Stand: 28.07.2009)"}
{"f00_":"929t093373","f20_":"Westerwälder baggert sich nach oben : Firma Beyer aus dem Kreis Altenkirchen erobert mit Spezial-, Bau- und Industriemaschinen Europas Markt - Chef ist stolz auf junge Mitarbeiter","f30_":"_sn547460_","f31_":"_r99_ _o132060280101_","f32_":"_929n090681_ ; _00Sn09s1030285a_","f36_":"u","f39_":"Sine Weisenberger","f40_":"_00Pn08k4788987b_","f70b":"64","f70h":"169 vom 24.07.","f70j":"2009","f70t":"Rhein-Zeitung, Ausg. B0","f70y":"Rhein-Zeitung, Ausg. B0. - 64 (2009), 169 vom 24.07.","f76a":"2009","f76b":"2009","f77_":"Ill.","f88_":"2429557-7","f90d":"ZB 223:2009;MZ 56:2009","f95_":"ZR-20090728/09:48:24\u001FRZ-HP","f96_":"ZR-20090728/10:02:12\u001FKO-Ei","f97a":"ZR-20090729/19:09:45\u001FZR","f98_":"http://rhein-zeitung.de/archiv/09/07/24/B0/00000184.html (Stand: 28.07.2009)","f40":[{"f40_":"_00Pn08k4788987b_","n40a":"Verfasser"}]}
Expand All @@ -35,4 +35,4 @@
{"f00_":"929t124030b2","f20ü":"Deutsche Binnenwasserstra▀en","f01_":"7/2022","f36_":"sbd","f71_":"1. Aufl.","f76b":"2012","f77_":"13 S., Bl. 46 - 74 ; Ill., graph. Darst., ⁿberw. Kt. ; 1 CD-ROM ; 12 cm","f87_":"978-3-89225-641-0","f90d":"C2012A/785:7"}
{"f00_":"107t120613","f20_":"Firmenhandbuch Süd: Baden-Württemberg, Bayern, Hessen, Rheinland-Pfalz und Saarland, Sachsen, Thüringen","f23_":"Sammelband der Firmenhandbücher Baden-Württemberg, Bayern, Hessen, Rheinland-Pfalz und Saarland, Sachsen, Thüringen","f30_":"_sn548050_","f30a":"_sn543000_","f31_":"_r01_","f31a":"_r01_","f32_":"_4049795n1_ ; _4061963n1_ ; _4017250n8_ ; _4141451n2_ ; _00Sn05k0219865a_","f36_":"s","f74_":"Hannover-Wülfel","f75_":"Industrie- und Handelsverl.","f76a":"1999","f76b":"1999","f76b":"1999;2003","f81_":"49 (1999) Zusatz zum Hauptsacht.: Baden-Württemberg, Bayern, Hessen, Rheinland-Pfalz und Saarland, Sachsen","f81_":"Damit Erscheinen eingest.","f811":"Vorgänger u.d.T.: Firmenhandbuch Baden-Württemberg","f812":"Vorgänger u.d.T.: Firmenhandbuch Bayern","f813":"Vorgänger u.d.T.: Firmenhandbuch Hessen","f814":"Vorgänger u.d.T.: Firmenhandbuch Rheinland-Pfalz und Saarland","f815":"Vorgänger u.d.T.: Firmenhandbuch Sachsen","f816":"Zählung von d. Vorgängern übernommen, z.B. 49=48=53=64=7.1999","f817":"CD-ROM-Beil. bis 2002 u.d.T.: Firmenhandbücher deutscher Länder auf CD-ROM","f818":"CD-ROM-Beil. 2003 u.d.T.: Firmenhandbücher","f88_":"1438-3330","f90b":"Per. 16859","f90b":"Per. 16859/49.1999-54.2003","f95_":"ZR-20120214/12:39:04\u001FSP-Kg","f96_":"ZR-20120214/13:55:10\u001FSP-Kg","f97a":"ZR-20120214/20:06:14\u001FZR","f01_":"49 (1999) - 54 (2003)"}
{"f00_":"929t113420","f20_":"Wie steht es um Montabaurs Innenstadt?","f30_":"_sn566041_","f31_":"_r99_ _o14304048_","f32_":"_4040123n6_ ; _4072821n3_ ; _4115645n6_ ; _4128022n2_","f35_":"_r99_ _o14304048_ ; _sn566041_","f36_":"u","f37_":"_sn566041_ ; _r99_ _o14304048_","f39_":"Lennart Weyandt ; Juliana Hammermeister","f40_":"_00Pn11k3420339a_","f401":"_00Pn11k3420746b_","f70b":"30","f70j":"2010","f70k":"Mons-Tabor-Gymnasium","f70s":"36-41","f70t":"Jahrbuch","f70y":"Mons-Tabor-Gymnasium: Jahrbuch. - 30.2010, S. 36-41","f76a":"2011","f76b":"2011","f77_":"Ill.","f88_":"2201657-0","f90d":"Z 2367:2010 MAG","f95_":"20110829/16:24:51\u001FKO","f96_":"20110829/16:24:51\u001FKO","f40":[{"f40_":"_00Pn11k3420339a_","n40a":"Verfasser"},{"f40_":"_00Pn11k3420746b_","n40a":"Verfasser"}]}
{"f00_":"929t113434","f20_":"Adenauer Land : Natur erleben! ; Rollen & Radeln","f30_":"_sn102070_","f31_":"_r99_ _o13101_","f32_":"_4379862n7_ ; _4198578n3_ ; _4155569n7_","f35_":"_r99_ _o13101_ ; _sn102070_","f36_":"s","f37_":"_sn102070_ ; _r99_ _o13101_","f60_":"_10058716n1_","f601":"_16060933n1_","f74_":"[Adenau]","f76a":"[ca. 2010]","f76b":"2010","f77_":"1 Faltbl. : Ill.","f90d":"in Kapsel A-C","f95_":"20110831/09:32:34\u001FKO","f96_":"20111012/09:16:24\u001FZR","f60":[{"f60_":"_10058716n1_","n60a":"Urheber"},{"f60_":"_16060933n1_","n60a":"Urheber"}]}
{"f00_":"929t113434","f20_":"Adenauer Land : Natur erleben! ; Rollen & Radeln","f30_":"_sn102070_","f31_":"_r99_ _o13101_","f32_":"_4379862n7_ ; _4198578n3_ ; _4155569n7_","f35_":"_r99_ _o13101_ ; _sn102070_","f36_":"s","f37_":"_sn102070_ ; _r99_ _o13101_","f60_":"_10058716n1_","f601":"_16060933n1_","f74_":"[Adenau]","f76a":"[ca. 2010]","f76b":"2010","f77_":"1 Faltbl. : Ill.","f90d":"in Kapsel A-C","f95_":"20110831/09:32:34\u001FKO","f96_":"20111012/09:16:24\u001FZR","f60":[{"f60_":"_10058716n1_","n60a":"HE Urheber"},{"f60_":"_16060933n1_","n60a":"HE Urheber"}]}
60 changes: 44 additions & 16 deletions conf/rpb-titel-to-lobid.fix
Original file line number Diff line number Diff line change
Expand Up @@ -239,25 +239,53 @@ end

# ------- Contribution -------

set_array("contribution[]")
copy_field("f40[].*.f40_", "contribution[].$append.agent.id")
copy_field("f60[].*.f60_", "contribution[].$append.agent.id")

do list(path: "contribution[]")
replace_all("agent.id","_(.*)_","$1")
copy_field("agent.id", "agent.label")
lookup("agent.label", "./RPB-Export_HBZ_SW.tsv","sep_char":"\t")
if all_match("agent.id","^00.*|^107n.*|^929n.*")
prepend("agent.id", "https://rpb.lobid.org/agent/")
else
replace_all("agent.id", "(^\\d*)n(\\d)", "$1-$2")
prepend("agent.id", "https://d-nb.info/gnd/")
put_map("role-to-uri",
"Verfasser": "http://id.loc.gov/vocabulary/relators/aut",
"Herausgeber": "http://id.loc.gov/vocabulary/relators/pbl",
"Mitwirkender": "http://id.loc.gov/vocabulary/relators/ctb",
"Bearb.": "http://id.loc.gov/vocabulary/relators/edt",
"Begr.": "http://id.loc.gov/vocabulary/relators/org",
"Sammler": "http://id.loc.gov/vocabulary/relators/col",
"Librettist": "http://id.loc.gov/vocabulary/relators/lbt",
"Übersetzer": "http://id.loc.gov/vocabulary/relators/trl",
"Illustrator": "http://id.loc.gov/vocabulary/relators/ill",
"Verfasser von ergänzendem Text": "http://id.loc.gov/vocabulary/relators/wst",
"Komponist": "http://id.loc.gov/vocabulary/relators/cmp",
"Red.": "http://id.loc.gov/vocabulary/relators/red",
"Sonstige": "http://id.loc.gov/vocabulary/relators/oth",
"Ausführender": "http://id.loc.gov/vocabulary/relators/act",
"Gefeierter": "http://id.loc.gov/vocabulary/relators/hnr",
"HE Urheber": "http://id.loc.gov/vocabulary/relators/isb",
"NE hrsg. Körperschaft": "http://id.loc.gov/vocabulary/relators/isb",
"Gefeierte Körperschaft": "http://id.loc.gov/vocabulary/relators/hnr")

do put_macro("contributions")
set_array("_temp")
copy_field("f$[from][].*.f$[from]_", "_temp.$append.agent.id")
do list_as(f: "f$[from][]", c: "_temp")
replace_all("c.agent.id","_(.*)_","$1")
copy_field("c.agent.id", "c.agent.label")
lookup("c.agent.label", "./RPB-Export_HBZ_SW.tsv","sep_char":"\t")
if all_match("c.agent.id","^00.*|^107n.*|^929n.*")
prepend("c.agent.id", "https://rpb.lobid.org/agent/")
else
replace_all("c.agent.id", "(^\\d*)n(\\d)", "$1-$2")
prepend("c.agent.id", "https://d-nb.info/gnd/")
end
copy_field("f.n$[from]a", "c.role.id")
copy_field("f.n$[from]a", "c.role.label")
lookup("c.role.id", "role-to-uri")
lookup("c.role.label", "Verfasser": "Autor/in") # TODO: weitere dt. relator labels
set_array("c.type[]", "Contribution")
end
add_field("role.id", "http://id.loc.gov/vocabulary/relators/aut")
add_field("role.label", "Autor/in")
set_array("type[]", "Contribution")
move_field("_temp.*", "contribution[].$append")
end

set_array("contribution[]")

call_macro("contributions", from: "40")
call_macro("contributions", from: "60")

# ------- bibliographicCitation -------
# Siehe https://jira.hbz-nrw.de/browse/RPB-26

Expand Down
45 changes: 33 additions & 12 deletions conf/rpb-titel-to-strapi.fix
Original file line number Diff line number Diff line change
@@ -1,15 +1,36 @@
# Person
if exists("f40?")
set_array("f40[]")
copy_field("f40?", "f40[].$append.f40_")
add_field("f40[].*.n40a", "Verfasser")
# TODO 411 etc, extract to macros
do put_macro("add")
if exists("$[from]")
set_array("_temp")
copy_field("$[from]", "_temp.$append.f$[to]_")
add_field("_temp.*.n$[to]a", "$[role]")
move_field("_temp.*", "f$[to][].$append")
end
end

# Person
set_array("f40[]")

call_macro("add", to: "40", from: "f40?", role: "Verfasser")
call_macro("add", to: "40", from: "f41?", role: "Herausgeber")
call_macro("add", to: "40", from: "f42?", role: "Mitwirkender")
call_macro("add", to: "40", from: "f43?", role: "Bearb.")
call_macro("add", to: "40", from: "f44?", role: "Begr.")
call_macro("add", to: "40", from: "f45?", role: "Sammler")
call_macro("add", to: "40", from: "f46?", role: "Librettist")
call_macro("add", to: "40", from: "f47?", role: "Übersetzer")
call_macro("add", to: "40", from: "f50?", role: "Illustrator")
call_macro("add", to: "40", from: "f51?", role: "Verfasser von ergänzendem Text")
call_macro("add", to: "40", from: "f52?", role: "Komponist")
call_macro("add", to: "40", from: "f56?", role: "Red.")
call_macro("add", to: "40", from: "f57?", role: "Sonstige")
call_macro("add", to: "40", from: "f58?", role: "Ausführender")
call_macro("add", to: "40", from: "f59?", role: "Gefeierter")

# Körperschaft
if exists("f60?")
set_array("f60[]")
copy_field("f60?", "f60[].$append.f60_")
add_field("f60[].*.n60a", "Urheber")
# TODO 611 etc, extract to macros
end
set_array("f60[]")

call_macro("add", to: "60", from: "f60?", role: "HE Urheber")
call_macro("add", to: "60", from: "f61?", role: "NE hrsg. Körperschaft")
call_macro("add", to: "60", from: "f69?", role: "Gefeierte Körperschaft")

vacuum()

0 comments on commit abf3773

Please sign in to comment.