<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:m="http://schemas.microsoft.com/office/2004/12/omml" xmlns="http://www.w3.org/TR/REC-html40">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<meta name="Generator" content="Microsoft Word 15 (filtered medium)">
<!--[if !mso]><style>v\:* {behavior:url(#default#VML);}
o\:* {behavior:url(#default#VML);}
w\:* {behavior:url(#default#VML);}
.shape {behavior:url(#default#VML);}
</style><![endif]--><style><!--
/* Font Definitions */
@font-face
        {font-family:"Cambria Math";
        panose-1:2 4 5 3 5 4 6 3 2 4;}
@font-face
        {font-family:DengXian;
        panose-1:2 1 6 0 3 1 1 1 1 1;}
@font-face
        {font-family:Calibri;
        panose-1:2 15 5 2 2 2 4 3 2 4;}
@font-face
        {font-family:Menlo;
        panose-1:0 0 0 0 0 0 0 0 0 0;}
@font-face
        {font-family:"\@DengXian";
        panose-1:2 1 6 0 3 1 1 1 1 1;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
        {margin:0cm;
        margin-bottom:.0001pt;
        font-size:12.0pt;
        font-family:"Times New Roman",serif;}
a:link, span.MsoHyperlink
        {mso-style-priority:99;
        color:#0563C1;
        text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
        {mso-style-priority:99;
        color:#954F72;
        text-decoration:underline;}
p
        {mso-style-priority:99;
        margin:0cm;
        margin-bottom:.0001pt;
        font-size:12.0pt;
        font-family:"Times New Roman",serif;}
code
        {mso-style-priority:99;
        font-family:"Courier New";}
p.msonormal0, li.msonormal0, div.msonormal0
        {mso-style-name:msonormal;
        margin:0cm;
        margin-bottom:.0001pt;
        font-size:12.0pt;
        font-family:"Times New Roman",serif;}
span.xelementtoproof
        {mso-style-name:x_elementtoproof;}
p.xelementtoproof1, li.xelementtoproof1, div.xelementtoproof1
        {mso-style-name:x_elementtoproof1;
        margin:0cm;
        margin-bottom:.0001pt;
        font-size:12.0pt;
        font-family:"Times New Roman",serif;}
p.xxmsonormal, li.xxmsonormal, div.xxmsonormal
        {mso-style-name:x_x_msonormal;
        margin:0cm;
        margin-bottom:.0001pt;
        font-size:11.0pt;
        font-family:"Calibri",sans-serif;}
p.xxmsochpdefault, li.xxmsochpdefault, div.xxmsochpdefault
        {mso-style-name:x_x_msochpdefault;
        margin:0cm;
        margin-bottom:.0001pt;
        font-size:12.0pt;
        font-family:"Calibri",sans-serif;}
span.xxmsohyperlink
        {mso-style-name:x_x_msohyperlink;
        color:#0563C1;
        text-decoration:underline;}
span.xxmsohyperlinkfollowed
        {mso-style-name:x_x_msohyperlinkfollowed;
        color:#954F72;
        text-decoration:underline;}
span.xxe-mailformatvorlage17
        {mso-style-name:x_x_e-mailformatvorlage17;
        font-family:"Calibri",sans-serif;
        color:windowtext;}
span.E-MailFormatvorlage27
        {mso-style-type:personal-reply;
        font-family:"Calibri",sans-serif;
        color:#1F497D;}
.MsoChpDefault
        {mso-style-type:export-only;
        font-size:10.0pt;}
@page WordSection1
        {size:612.0pt 792.0pt;
        margin:70.85pt 70.85pt 2.0cm 70.85pt;}
div.WordSection1
        {page:WordSection1;}
--></style><!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]-->
</head>
<body lang="DE" link="#0563C1" vlink="#954F72">
<div class="WordSection1">
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D">Hi Patrick,<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D">Thanks for the example for a MARC to MARC loop when moving/copying subfields between MARC tags.<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D">I am actually looking for a way to copy these subfields to PICA+. Sorry, I did not phrase this too well.<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D">MARC<o:p></o:p></span></p>
<p class="xxmsonormal"><span lang="EN-US">=600  10<b>$a</b>Sen Sharma, Partha Sarthi,<b>$d</b>1970-<b>$x</b>Travel<b>$z</b>India<b>$z</b>Andaman and Nicobar Islands.<o:p></o:p></span></p>
<p class="xxmsonormal"><span lang="EN-US">=600  10<b>$a</b>Descartes, René,<b>$d</b>1596-1650<b>$x</b>Political and social views.<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D">Shall become PICA+<o:p></o:p></span></p>
<p class="xxmsonormal"><span lang="EN-US">044A $N600$Sp<b>$a</b>Partha Sarthi<b>$d</b>1970-<b>$x</b>Travel<b>$z</b>India<b>$z</b>Andaman and Nicobar Islands<o:p></o:p></span></p>
<p class="xxmsonormal"><span lang="EN-US">044A $N600$Sp<b>$a</b>Descartes, René<b>$d</b>1596-1650<b>$x</b>Political and social views
<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D">Luckily all subfields can keep their subfield “letter”, i.e. $a in MARC is $a in PICA+ in this case.
<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D">Best,<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D">martina<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"><o:p> </o:p></span></p>
<div>
<div style="border:none;border-top:solid #E1E1E1 1.0pt;padding:3.0pt 0cm 0cm 0cm">
<p class="MsoNormal"><b><span style="font-size:11.0pt;font-family:"Calibri",sans-serif">Von:</span></b><span style="font-size:11.0pt;font-family:"Calibri",sans-serif"> Patrick Hochstenbach <Patrick.Hochstenbach@UGent.be>
<br>
<b>Gesendet:</b> Mittwoch, 31. Januar 2024 19:28<br>
<b>An:</b> Siebert, Dr. Martina <Martina.Siebert@sbb.spk-berlin.de>; librecat-dev@lists.uni-bielefeld.de<br>
<b>Betreff:</b> Re: Moving MARC 600 to PICA 044A<o:p></o:p></span></p>
</div>
</div>
<p class="MsoNormal"><o:p> </o:p></p>
<div>
<p class="MsoNormal"><span style="font-family:"Calibri",sans-serif;color:black">Catmandu::MARC 1.32 supports capitals in MARC paths (so that your example should work).<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal"><span style="font-family:"Calibri",sans-serif;color:black"><o:p> </o:p></span></p>
</div>
<div>
<p class="MsoNormal"><span style="font-family:"Calibri",sans-serif;color:black">Patrick<o:p></o:p></span></p>
</div>
<div class="MsoNormal" align="center" style="text-align:center">
<hr size="3" width="98%" align="center">
</div>
<div id="divRplyFwdMsg">
<p class="MsoNormal"><b><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:black">From:</span></b><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:black"> Patrick Hochstenbach <<a href="mailto:Patrick.Hochstenbach@UGent.be">Patrick.Hochstenbach@UGent.be</a>><br>
<b>Sent:</b> 31 January 2024 19:17<br>
<b>To:</b> Siebert, Dr. Martina <<a href="mailto:Martina.Siebert@sbb.spk-berlin.de">Martina.Siebert@sbb.spk-berlin.de</a>>;
<a href="mailto:librecat-dev@lists.uni-bielefeld.de">librecat-dev@lists.uni-bielefeld.de</a> <<a href="mailto:librecat-dev@lists.uni-bielefeld.de">librecat-dev@lists.uni-bielefeld.de</a>><br>
<b>Subject:</b> Re: Moving MARC 600 to PICA 044A</span> <o:p></o:p></p>
<div>
<p class="MsoNormal"> <o:p></o:p></p>
</div>
</div>
<div>
<p><span class="xelementtoproof"><span style="font-size:10.5pt;font-family:"Menlo",serif;color:black">Hi</span></span><o:p></o:p></p>
<p class="xelementtoproof1"><o:p> </o:p></p>
<p class="xelementtoproof1"><span class="xelementtoproof"><span style="font-size:10.5pt;font-family:"Menlo",serif;color:black">This is the fix:</span></span><o:p></o:p></p>
<p><span style="font-size:10.5pt;font-family:"Menlo",serif;color:black"><br>
<span class="xelementtoproof">do marc_each()</span></span><o:p></o:p></p>
<p><span style="font-size:10.5pt;font-family:"Menlo",serif;color:black">  if marc_has('650')</span><o:p></o:p></p>
<p><span style="font-size:10.5pt;font-family:"Menlo",serif;color:black">    marc_copy('650','tmp')</span><o:p></o:p></p>
<p><span style="font-size:10.5pt;font-family:"Menlo",serif;color:black">    set_field(tmp.0.tag,'044')</span><o:p></o:p></p>
<p><span style="font-size:10.5pt;font-family:"Menlo",serif;color:black">    set_field(tmp.0.ind1,'A')</span><o:p></o:p></p>
<p class="xelementtoproof1"><span style="font-size:10.5pt;font-family:"Menlo",serif;color:black">    set_field(tmp.0.ind2,' ')</span><o:p></o:p></p>
<p><span style="font-size:10.5pt;font-family:"Menlo",serif;color:black">    add_field(tmp.0.subfields.$prepend.n,600)</span><o:p></o:p></p>
<p><span style="font-size:10.5pt;font-family:"Menlo",serif;color:black">    marc_paste('tmp')</span><o:p></o:p></p>
<p><span style="font-size:10.5pt;font-family:"Menlo",serif;color:black">    remove_field('tmp')</span><o:p></o:p></p>
<p><span style="font-size:10.5pt;font-family:"Menlo",serif;color:black">  end</span><o:p></o:p></p>
<p class="xelementtoproof1"><span style="font-size:10.5pt;font-family:"Menlo",serif;color:black">end</span><o:p></o:p></p>
<div>
<p class="MsoNormal"><span style="font-family:"Calibri",sans-serif;color:black"><br>
For some reason Catmandu::MARC doesn't like the </span><code><span style="font-size:10.0pt;color:black">$N</span></code><span style="font-family:"Calibri",sans-serif;color:black">​ (capital N) subfield. But, I can add a $n (lowercase n) subfield this way. I
 need to check why capitals are not supported.<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal"><span style="font-family:"Calibri",sans-serif;color:black"><o:p> </o:p></span></p>
</div>
<div>
<p class="MsoNormal"><span style="font-family:"Calibri",sans-serif;color:black">Patrick<o:p></o:p></span></p>
</div>
<div class="MsoNormal" align="center" style="text-align:center">
<hr size="3" width="98%" align="center">
</div>
<div id="x_divRplyFwdMsg">
<p class="MsoNormal"><b><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:black">From:</span></b><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:black">
<a href="mailto:librecat-dev-bounces@lists.uni-bielefeld.de">librecat-dev-bounces@lists.uni-bielefeld.de</a> <<a href="mailto:librecat-dev-bounces@lists.uni-bielefeld.de">librecat-dev-bounces@lists.uni-bielefeld.de</a>> on behalf of Siebert, Dr. Martina <<a href="mailto:Martina.Siebert@sbb.spk-berlin.de">Martina.Siebert@sbb.spk-berlin.de</a>><br>
<b>Sent:</b> 31 January 2024 16:53<br>
<b>To:</b> <a href="mailto:librecat-dev@lists.uni-bielefeld.de">librecat-dev@lists.uni-bielefeld.de</a> <<a href="mailto:librecat-dev@lists.uni-bielefeld.de">librecat-dev@lists.uni-bielefeld.de</a>><br>
<b>Subject:</b> [librecat-dev] Moving MARC 600 to PICA 044A</span> <o:p></o:p></p>
<div>
<p class="MsoNormal"> <o:p></o:p></p>
</div>
</div>
<div>
<div>
<p class="xxmsonormal">Dear all,<o:p></o:p></p>
<p class="xxmsonormal"> <o:p></o:p></p>
<p class="xxmsonormal"><span lang="EN-US">I am trying to move MARC 600 (and 650 etc.) LOC subject headings to PICA+ 044A. 600er fields are repeatable as are most of their subfields.</span><o:p></o:p></p>
<p class="xxmsonormal"><span lang="EN-US">Good thing: PICA+ 044A just reproduces the MARC 600er fields with all their subfields as they are, only prepending it with $N giving the original MARC tag and an indicator ($S) which is fix for each of the 6XX MARC
 fields. My problem is the copying of the set of repeatable subfields from MARC to PICA.</span><o:p></o:p></p>
<p class="xxmsonormal"><span lang="EN-US"> </span><o:p></o:p></p>
<p class="xxmsonormal"><span lang="EN-US">To put it simple:</span><o:p></o:p></p>
<p class="xxmsonormal"><span lang="EN-US">   I have this</span><o:p></o:p></p>
<p class="xxmsonormal"><span lang="EN-US">=600  10$aSen Sharma, Partha Sarthi,$d1970-$xTravel$zIndia$zAndaman and Nicobar Islands.</span><o:p></o:p></p>
<p class="xxmsonormal"><span lang="EN-US">=600  10$aDescartes, René,$d1596-1650$xPolitical and social views.</span><o:p></o:p></p>
<p class="xxmsonormal"><span lang="EN-US"> </span><o:p></o:p></p>
<p class="xxmsonormal"><span lang="EN-US">   and I need this</span><o:p></o:p></p>
<p class="xxmsonormal"><span lang="EN-US">044A $N600$Sp$aPartha Sarthi$d1970-$xTravel$zIndia$zAndaman and Nicobar Islands</span><o:p></o:p></p>
<p class="xxmsonormal"><span lang="EN-US">044A $N600$Sp$aDescartes, René$d1596-1650$xPolitical and social views
</span><o:p></o:p></p>
<p class="xxmsonormal"><span lang="EN-US"> </span><o:p></o:p></p>
<p class="xxmsonormal"><span lang="EN-US">The “Catmandu Cheatsheet” lists a “marc_copy”/”marc_paste” routine which does the trick for moving all subfields from one MARC tag to another MARC tag. But how to “copy” this from MARC and “paste” it to PICA? And how
 to put this within a marc_each() loop?</span><o:p></o:p></p>
<p class="xxmsonormal"><span lang="EN-US"> </span><o:p></o:p></p>
<p class="xxmsonormal"><span lang="EN-US">Best,</span><o:p></o:p></p>
<p class="xxmsonormal"><span lang="EN-US">Martina</span><o:p></o:p></p>
<p class="xxmsonormal"><span lang="EN-US"> </span><o:p></o:p></p>
<p class="xxmsonormal"><span style="font-size:8.0pt;font-family:"Arial",sans-serif">______________________________________________</span><o:p></o:p></p>
<p class="xxmsonormal"><span style="font-size:9.0pt">Dr. Martina Siebert</span><o:p></o:p></p>
<p class="xxmsonormal"><span style="font-size:9.0pt">Ostasienabteilung | CrossAsia</span><o:p></o:p></p>
<p class="xxmsonormal"><span style="font-size:9.0pt">Staatsbibliothek zu Berlin – Preußischer Kulturbesitz</span><o:p></o:p></p>
<p class="xxmsonormal"><span style="font-size:9.0pt"> </span><o:p></o:p></p>
<p class="xxmsonormal"><span style="font-size:9.0pt"><a href="mailto:martina.siebert@sbb.spk-berlin.de">martina.siebert@sbb.spk-berlin.de</a></span><o:p></o:p></p>
<p class="xxmsonormal"><span style="font-size:9.0pt"><a href="http://www.staatsbibliothek-berlin.de/">www.staatsbibliothek-berlin.de</a></span><o:p></o:p></p>
<p class="xxmsonormal"><span style="font-size:9.0pt"> </span><o:p></o:p></p>
<p class="xxmsonormal"><span style="font-size:9.0pt">Im Rahmen der E-Mail-Kommunikation werden gegebenenfalls personenbezogene Daten verarbeitet.
<br>
Unsere Hinweise zum Datenschutz finden Sie hier: <a href="http://sbb.berlin/datenschutz" target="_short" title="Kurz-URL">
http://sbb.berlin/datenschutz</a></span><o:p></o:p></p>
<p class="xxmsonormal"> <o:p></o:p></p>
</div>
</div>
</div>
</div>
</body>
</html>