Open-ILS/src/templates/opac/parts/misc_util.tt2

   1 [%
   2     # Support multiscript records via alternate graphic 880 fields
   3     # get_graphic_880s(target_field='100')
   4     # See "Model A" in http://www.loc.gov/marc/bibliographic/ecbdmulti.html
   5     # and $6 description in http://www.loc.gov/marc/bibliographic/ecbdcntf.html
   6     MACRO get_graphic_880s BLOCK;
   7         FOR node IN xml.findnodes('//*[@tag="' _ target_field _ '"]');
   8             raw_vals = [];
   9             core_val = '';
  10             FOR subnode IN node.findnodes('./*[not(contains("w 0 4 5 6 8 9", @code))]');
  11                 raw_vals.push(subnode.textContent());
  12             END;
  13             core_val = raw_vals.join(" ");
  14             raw_vals = [];
  15
  16             linked_fields = [];
  17             FOR sub IN node.findnodes('./*[@code="6"]');
  18                 linked_fields.push(sub.textContent);
  19             END;
  20             graphics = [];
  21             get_linked_880s;
  22             graphic_880s.push({
  23                 primary => {"occur" => occurrence, "value" => core_val},
  24                 graphic => graphics
  25             });
  26         END;
  27     END;
  28
  29     MACRO get_linked_880s BLOCK;
  30         FOR link_field IN linked_fields;
  31             target = target_field _ link_field.substr(3);
  32             # Get the linked 880 value
  33             raw_val = '';
  34             dir = '';
  35             occurrence = '';
  36             script = '';
  37             FOR node IN xml.findnodes('//*[@tag="880"]');
  38                 # Operate only on the target linked fields
  39                 FOR linknode IN node.findnodes('./*[@code="6"]');
  40                     lf = linknode.textContent();
  41                     IF lf.substr(0, target.length) == target;
  42                         occurrence = lf.substr(4, 2);
  43                         rawscript = lf.substr(7, 2);
  44                         SWITCH rawscript;
  45                         CASE '(3';
  46                             script = 'Arabic';
  47                         CASE '(B';
  48                             script = 'Latin';
  49                         CASE '$1';
  50                             script = 'CJK';
  51                         CASE '(N';
  52                             script = 'Cyrillic';
  53                         CASE '(S';
  54                             script = 'Greek';
  55                         CASE '(2';
  56                             script = 'Hebrew';
  57                         END;
  58
  59                         rawdir = lf.substr(9, 1);
  60                         SWITCH rawdir;
  61                         CASE 'r';
  62                             dir = 'rtl';
  63                         END;
  64
  65                         raw_vals = [];
  66                         FOR subnode IN node.findnodes('./*[not(contains("w 0 5 6 8 9", @code))]');
  67                             raw_vals.push(subnode.textContent());
  68                         END;
  69                         raw_val = raw_vals.join(" ");
  70                     END;
  71                 END;
  72             END;
  73             graphics.push({
  74                 occur => occurrence,
  75                 value => raw_val,
  76                 script => script,
  77                 dir => dir
  78             });
  79         END;
  80     END;
  81
  82     BLOCK get_ccvm_icon;
  83         ctx.media_prefix _ '/images/format_icons/' _ ccvm.ctype _ '/' _ ccvm.code _ '.png';
  84     END;
  85
  86     # Extract MARC fields from XML
  87     #   get_marc_attrs( { marc_xml => doc } )
  88     BLOCK get_marc_attrs;
  89         xml = args.marc_xml;
  90
  91         # Map item types to schema.org types; impedance mismatch :(
  92         args.schema.itemtype = {};
  93         schema_typemap = {};
  94
  95         schema_typemap.bluray = 'Movie'; # Movie could also be TVSeries
  96         schema_typemap.book = 'Book';
  97         schema_typemap.braille = 'Book';
  98         schema_typemap.casaudiobook = 'Book AudioObject';
  99         schema_typemap.casmusic = 'MusicAlbum';
 100         schema_typemap.cdaudiobook = 'Book AudioObject';
 101         schema_typemap.cdmusic = 'MusicAlbum';
 102         schema_typemap.dvd = 'Movie';
 103         schema_typemap.eaudio = 'AudioObject';
 104         schema_typemap.ebook = 'Book';
 105         # schema_typemap.equip = '';
 106         schema_typemap.evideo = 'Movie';
 107         # schema_typemap.kit = '';
 108         schema_typemap.lpbook = 'Book';
 109         schema_typemap.map = 'Map';
 110         # schema_typemap.microform = '';
 111         schema_typemap.music = 'MusicAlbum';
 112         schema_typemap.phonomusic = 'MusicAlbum';
 113         # schema_typemap.phonospoken = '';
 114         # schema_typemap.picture = ''; Painting or Photograph?
 115         schema_typemap.score = 'Book'; # schema.org has no generic Music type
 116         schema_typemap.serial = 'Periodical';
 117         schema_typemap.software = 'SoftwareApplication';
 118         schema_typemap.vhs = 'Movie';
 119
 120         schema_typemap.a = 'Book';
 121         schema_typemap.e = 'Map';
 122         schema_typemap.j = 'MusicAlbum';
 123
 124         # Hard-coded to match defaults in config.copy_status for all OPAC-visible statuses
 125         schema_copy_status = {};
 126         schema_copy_status.0 = '<link property="availability" href="http://schema.org/InStock" />'; # Available
 127         schema_copy_status.1 = '<link property="availability" href="http://schema.org/OutOfStock" />'; # Checked out
 128         schema_copy_status.5 = '<link property="availability" href="http://schema.org/PreOrder" />'; # In process
 129         schema_copy_status.6 = '<link property="availability" href="http://schema.org/PreOrder" />'; # In transit
 130         schema_copy_status.7 = '<link property="availability" href="http://schema.org/InStock" />'; # Reshelving
 131         schema_copy_status.8 = '<link property="availability" href="http://schema.org/OutOfStock" />'; # On holds shelf
 132         schema_copy_status.9 = '<link property="availability" href="http://schema.org/PreOrder" />'; # On order
 133         schema_copy_status.12 = '<link property="availability" href="http://schema.org/InStoreOnly" />'; # Reserves
 134
 135         args.isbns = [];
 136         FOR isbn IN xml.findnodes('//*[@tag="020"]/*[@code="a"]');
 137             args.isbns.push(isbn.textContent);
 138         END;
 139
 140         args.upcs = [];
 141         FOR upc IN xml.findnodes('//*[@tag="024"]/*[@code="a"]');
 142             args.upcs.push(upc.textContent);
 143         END;
 144         args.upc = args.upcs.0; # use first UPC as the default
 145
 146         args.issns = [];
 147         FOR sub IN xml.findnodes('//*[@tag="022"]/*[@code="a"]');
 148             args.issns.push(sub.textContent);
 149         END;
 150         args.issn = (args.issns.size) ? args.issn.0 : '';
 151
 152         graphic_880s = [];
 153         get_graphic_880s(target_field='100');
 154         get_graphic_880s(target_field='110');
 155         get_graphic_880s(target_field='111');
 156         args.graphic_authors = graphic_880s;
 157         args.authors = [];
 158         FOR author IN args.graphic_authors;
 159             args.authors.push(author.primary.value);
 160         END;
 161         args.author = (args.authors.size) ? args.authors.0 : '';
 162
 163         # Include subfields 'abnp' to generate a more comprehensive title display in search results
 164         titresults = xml.findnodes('//*[@tag="245"]/*[@code="a" or @code="b" or @code="n" or @code="p"]');
 165         titresults_content = [];
 166             FOR sub IN titresults; titresults_content.push(sub.textContent); END;
 167         args.title = titresults_content.join(" ");
 168         # Avoid ugly trailing syntax on brief titles
 169         args.title = args.title | replace('[:;/]$', '');
 170
 171         graphic_880s = [];
 172         get_graphic_880s(target_field='245');
 173         args.graphic_titles = graphic_880s;
 174         args.titles = [];
 175         FOR title IN args.graphic_titles;
 176             args.titles.push(title.primary.value);
 177         END;
 178         args.title_extended = (args.titles.size) ? args.titles.0 : '';
 179
 180         args.pubplaces = [];
 181         pubplace_hunt = xml.findnodes('//*[@tag="260"]/*[@code="a"]') ||
 182             xml.findnodes('//*[@tag="264" and @ind2="1"]/*[@code="a"]');
 183         FOR sub IN pubplace_hunt;
 184             args.pubplaces.push(sub.textContent);
 185         END;
 186         args.pubplace = (args.pubplaces.size) ? args.pubplaces.0 : '';
 187
 188         args.publishers = [];
 189         publishers_hunt = xml.findnodes('//*[@tag="260"]/*[@code="b"]') ||
 190             xml.findnodes('//*[@tag="264" and @ind2="1"]/*[@code="b"]');
 191         FOR sub IN publishers_hunt;
 192             args.publishers.push(sub.textContent);
 193         END;
 194         args.publisher = (args.publishers.size) ? args.publishers.0 : '';
 195
 196         args.pubdates = [];
 197         pubdates_hunt = xml.findnodes('//*[@tag="260"]/*[@code="c"]') ||
 198             xml.findnodes('//*[@tag="264" and @ind2="1"]/*[@code="c"]');
 199         FOR sub IN pubdates_hunt;
 200             args.pubdates.push(sub.textContent);
 201         END;
 202         args.pubdate = (args.pubdates.size) ? args.pubdates.0 : '';
 203
 204         # Full publisher info
 205         args.pubinfo = "$args.pubplace $args.publisher $args.pubdate";
 206
 207         # Get RDA Copyright Info.
 208         args.copyrights = [];
 209         FOR sub IN xml.findnodes('//*[@tag="264" and @ind2="4"]/*[@code="c"]');
 210             args.copyrights.push(sub.textContent);
 211         END;
 212         args.copyright = (args.copyrights.size) ? args.copyrights.0 : '';
 213
 214         # Get the RDA Production info.
 215         args.producers = [];
 216         FOR sub IN xml.findnodes('//*[@tag="264" and @ind2="0"]/*[@code="b"]');
 217             args.producers.push(sub.textContent);
 218         END;
 219         args.producer = (args.producers.size) ? args.producers.0 : '';
 220
 221         args.prodplaces = [];
 222         FOR sub IN xml.findnodes('//*[@tag="264" and @ind2="0"]/*[@code="a"]');
 223             args.prodplaces.push(sub.textContent);
 224         END;
 225         args.prodplace = (args.prodplaces.size) ? args.prodplaces.0 : '';
 226
 227         args.proddates = [];
 228         FOR sub IN xml.findnodes('//*[@tag="264" and @ind2="0"]/*[@code="c"]');
 229             args.proddates.push(sub.textContent);
 230         END;
 231         args.proddate = (args.proddates.size) ? args.proddates.0 : '';
 232
 233         # Get the RDA Distribution args.
 234         args.distributors = [];
 235         FOR sub IN xml.findnodes('//*[@tag="264" and @ind2="2"]/*[@code="b"]');
 236             args.distributors.push(sub.textContent);
 237         END;
 238         args.distributor = (args.distributors.size) ? args.distributors.0 : '';
 239
 240         args.distplaces = [];
 241         FOR sub IN xml.findnodes('//*[@tag="264" and @ind2="2"]/*[@code="a"]');
 242             args.distplaces.push(sub.textContent);
 243         END;
 244         args.distplace = (args.distplaces.size) ? args.distplaces.0 : '';
 245
 246         args.distdates = [];
 247         FOR sub IN xml.findnodes('//*[@tag="264" and @ind2="2"]/*[@code="c"]');
 248             args.distdates.push(sub.textContent);
 249         END;
 250         args.distdate = (args.distdates.size) ? args.distdates.0 : '';
 251
 252         # Get the RDA Manufacture args.
 253         args.manufacturers = [];
 254         FOR sub IN xml.findnodes('//*[@tag="264" and @ind2="3"]/*[@code="b"]');
 255             args.manufacturers.push(sub.textContent);
 256         END;
 257         args.manufacturer = (args.manufacturers.size) ? args.manufacturers.0 : '';
 258
 259         args.manplaces = [];
 260         FOR sub IN xml.findnodes('//*[@tag="264" and @ind2="3"]/*[@code="a"]');
 261             args.manplaces.push(sub.textContent);
 262         END;
 263         args.manplace = (args.manplaces.size) ? args.manplaces.0 : '';
 264
 265         args.mandates = [];
 266         FOR sub IN xml.findnodes('//*[@tag="264" and @ind2="3"]/*[@code="c"]');
 267             args.mandates.push(sub.textContent);
 268         END;
 269         args.mandate = (args.mandates.size) ? args.mandates.0 : '';
 270
 271         # RDA adds 264 to the pubinfo 880 consideration mix
 272         graphic_880s = [];
 273         get_graphic_880s(target_field='260');
 274         get_graphic_880s(target_field='264');
 275         args.graphic_pubinfos = graphic_880s;
 276         args.pubinfos = [];
 277         FOR pubinfo IN args.graphic_pubinfos;
 278             args.pubinfos.push(pubinfo.primary.value);
 279         END;
 280         args.pubinfo = (args.pubinfos.size) ? args.pubinfos.0 : '';
 281
 282         args.summaries = [];
 283         FOR sub IN xml.findnodes('//*[@tag="520"]/*[@code="a"]');
 284             args.summaries.push(sub.textContent);
 285         END;
 286         args.summary = (args.summaries.size) ? args.summaries.0 : '';
 287
 288         # 250 gets pride of place for edition statement, and is the
 289         # only logical choice for 880 graphic fields
 290         graphic_880s = [];
 291         get_graphic_880s(target_field='250');
 292         args.graphic_editions = graphic_880s;
 293         args.editions = [];
 294         FOR edition IN args.graphic_editions;
 295             args.editions.push(edition.primary.value);
 296         END;
 297
 298         ed_hunt = xml.findnodes('//*[@tag="250"]/*[@code="a"]') ||
 299             xml.findnodes('//*[@tag="534"]/*[@code="b"]') ||
 300             xml.findnodes('//*[@tag="775"]/*[@code="b"]');
 301         FOR sub IN ed_hunt;
 302             args.editions.push(sub.textContent);
 303         END;
 304         args.edition = (args.editions.size) ? args.editions.0 : '';
 305
 306         phys_content = [];
 307         FOR sub IN xml.findnodes(
 308             '//*[@tag="300"]/*[@code="a" or @code="b" or @code="c" or @code="e"]'
 309         );
 310             phys_content.push(sub.textContent);
 311         END;
 312         args.phys_desc = phys_content.join(" ");
 313
 314         graphic_880s = [];
 315         get_graphic_880s(target_field='505');
 316         args.graphic_contents = graphic_880s;
 317         FOR content IN args.graphic_contents;
 318             args.contents.push(content.primary.value);
 319         END;
 320         args.content = (args.contents.size) ? args.contents.0 : '';
 321
 322         # Maintain contents_list in case any custom use was made of it
 323         args.contents_list = [];
 324         FOR sub IN xml.findnodes('//*[@tag="505"]');
 325             args.contents_list.push(sub.textContent);
 326         END;
 327
 328         # MARC Callnumber
 329         args.marc_cns = [];
 330         FOR sub IN xml.findnodes('//*[@tag="092" or @tag="099"]/*');
 331             args.marc_cns.push(sub.textContent);
 332         END;
 333         args.marc_cn = (args.marc_cns.size ) ? args.marc_cns.0 : '';
 334
 335
 336         # clean up the ISBN
 337         args.isbn_clean = args.isbns.0.replace('\ .*', '');
 338         FOR isbn IN args.isbns;
 339             clean_isbn = isbn.replace('\ .*', '');
 340             clean_isbn = clean_isbn.replace('-', '');
 341             IF clean_isbn.length == 13;
 342                 args.gtin13 = clean_isbn;
 343                 LAST;
 344             END;
 345         END;
 346
 347         # Extract the 856 URLs that are not otherwise represented by asset.uri's
 348         args.online_res = [];
 349         FOR node IN xml.findnodes('//*[@tag="856" and @ind1="4" and (@ind2="0" or @ind2="1")]');
 350             IF node.findnodes('./*[@code="9" or @code="w" or @code="n"]'); NEXT; END; # asset.uri's
 351             label = node.findnodes('./*[@code="y"]');
 352             notes = node.findnodes('./*[@code="z" or @code="3"]');
 353             FOR href IN node.findnodes('./*[@code="u"]');
 354                 NEXT UNLESS href;
 355                 # it's possible for multiple $u's to exist within 1 856 tag.
 356                 # in that case, honor the label/notes data for the first $u, but
 357                 # leave any subsequent $u's as unadorned href's.
 358                 # use href/link/note keys to be consistent with args.uri's
 359                 args.online_res.push({
 360                     href => href.textContent,
 361                     link => (loop.first AND label) ? label.textContent : href.textContent,
 362                     note => (loop.first) ? notes.textContent : ''
 363                 });
 364             END;
 365         END;
 366
 367         args.holdings = [];
 368         args.uris = [];
 369         args.issns = [];
 370         args.resolver_isbns = [];
 371         args.resolver_issns = [];
 372
 373         # we use $9 of ISBN and ISSN as a flag for e-version
 374         FOR resolver_isbn IN xml.findnodes('//*[@tag="020"]/*[@code="9"]');
 375             IF resolver_isbn.textContent == "SFX" || resolver_isbn.textContent == "CUFTS";
 376                 my_parent = resolver_isbn.parentNode();
 377                 FOR resolver_isbn_val IN my_parent.findnodes('./*[@code="a"]');
 378                     args.resolver_isbns.push(
 379                         resolver_isbn_val.textContent.replace('-', '').replace('\ .*', '')
 380                     );
 381                 END;
 382             END;
 383         END;
 384
 385         FOR resolver_issn IN xml.findnodes('//*[@tag="022"]/*[@code="9"]');
 386             IF resolver_issn.textContent == "SFX" || resolver_issn.textContent == "CUFTS";
 387                 my_parent = resolver_issn.parentNode();
 388                 FOR resolver_issn_val IN my_parent.findnodes('./*[@code="a"]');
 389                     args.resolver_issns.push(
 390                         resolver_issn_val.textContent.replace('[^\d\-X]', '')
 391                     );
 392                 END;
 393             END;
 394         END;
 395
 396         # now snag all issns
 397         FOR rawissn IN xml.findnodes('//*[@tag="022"]/*[@code="a"]');
 398             args.issns.push(
 399                 rawissn.textContent.replace('[^\d\-X]', '')
 400             );
 401         END;
 402
 403         ou_hiding_disabled = ctx.org_hiding_disabled();
 404
 405         FOR volume IN xml.findnodes('//*[local-name()="volumes"]/*[local-name()="volume"]');
 406
 407             # Check volume visibility - could push this into XPath
 408             vol.label = volume.getAttribute('label');
 409
 410             # Prepend prefix, if any
 411             prefix = volume.findnodes('./*[local-name()="call_number_prefix"][@ident!="-1"]');
 412             IF prefix.getAttribute('label') != '';
 413                 vol.label = prefix.getAttribute('label') _ " " _ vol.label;
 414             END;
 415
 416             # Append prefix, if any
 417             suffix = volume.findnodes('./*[local-name()="call_number_suffix"][@ident!="-1"]');
 418             IF suffix.getAttribute('label') != '';
 419                 vol.label = vol.label _ " " _ suffix.getAttribute('label');
 420             END;
 421
 422             vol.id = volume.getAttribute('id');
 423             NEXT IF volume.getAttribute('opac_visible') == 'false';
 424             NEXT IF volume.getAttribute('deleted') == 'true';
 425
 426             IF vol.label == '##URI##';
 427                 FOR uri IN volume.findnodes('./*[local-name()="uris"]/*[local-name()="uri"]');
 428                     res = {};
 429                     res.href = uri.getAttribute('href');
 430                     res.link = uri.getAttribute('label');
 431                     res.note = uri.getAttribute('use_restriction');
 432                     args.uris.push(res);
 433                 END;
 434                 NEXT;
 435             ELSE;
 436                 copies = volume.findnodes('./*[local-name()="copies"]/*[local-name()="copy"]');
 437                 FOR copy IN copies;
 438                     parts = copy.findnodes('./*[local-name()="monograph_parts"]/*[local-name()="monograph_part"]');
 439                     FOREACH part IN parts;
 440                         part_label = part.getAttribute('label');
 441                         LAST IF part_label != '';
 442                     END;
 443                     # Check copy visibility
 444                     cp.deleted = copy.getAttribute('deleted');
 445                     cp.visible = copy.getAttribute('opac_visible');
 446                     NEXT IF (cp.deleted == 'true' OR cp.visible == 'false');
 447
 448                     # Iterate through all of the children to determine visibility
 449                     FOR node IN cp.childNodes;
 450                         NEXT IF cp.visible == 'false';
 451                         vis = node.getAttribute('opac_visible');
 452                         del = node.getAttribute('deleted');
 453                         IF vis == 'false' or del == 'true';
 454                             cp.visible = 'false';
 455                         END;
 456                     END;
 457
 458                     NEXT IF cp.visible == 'false';
 459
 460                     loc = copy.findnodes('./*[local-name()="location"]');
 461                     NEXT IF loc.getAttribute('opac_visible') == 'false';
 462
 463                     circlib = copy.findnodes('./*[local-name()="circlib"]');
 464                     NEXT IF circlib.getAttribute('opac_visible') == 'false';
 465
 466                     status = copy.findnodes('./*[local-name()="status"]');
 467                     NEXT IF status.getAttribute('opac_visible') == 'false';
 468
 469                     # extract the circ_lib id from the circ_lib node
 470                     circ_lib = copy.findnodes('./*[local-name()="circ_lib"]');
 471                     circ_lib_id = circ_lib.getAttribute('id').replace('.*/', '');
 472
 473                     UNLESS ou_hiding_disabled;
 474                         NEXT UNLESS ctx.org_within_hiding_scope(circ_lib_id);
 475                     END;
 476
 477                     holding = {
 478                         circ_lib => circ_lib_id,
 479                         label => vol.label,
 480                         part_label => part_label,
 481                         location => loc.textContent,
 482                         library => circlib.textContent,
 483                         status => status.textContent,
 484                         status_code => status.getAttribute('ident'),
 485                         barcode => copy.getAttribute('barcode'),
 486                         owner => volume.getAttribute('lib')
 487                     };
 488                     args.holdings.push(holding);
 489                     part_label = '';
 490                 END;
 491             END;
 492         END;
 493
 494         # Extract the copy count summary
 495         count_type = (ctx.is_staff) ? 'staff' : 'public';
 496
 497         # Consortial copy count summary first
 498         xpath = '//*[local-name()="counts"]/*[local-name()="count"][@type="' _ count_type _ '"]';
 499         args.copy_counts = {};
 500         FOR node IN xml.findnodes(xpath);
 501             FOR attr IN ['count', 'available', 'unshadow', 'transcendant', 'org_unit'];
 502                 depth = node.getAttribute('depth');
 503                 count_org_unit = node.getAttribute('org_unit');
 504                 args.copy_counts.$depth.$attr = node.getAttribute(attr);
 505                 args.org_copy_counts.$count_org_unit.$attr = node.getAttribute(attr);
 506             END;
 507         END;
 508
 509         # Get preferred library copy count
 510         args.plib_copy_counts = {};
 511         count_type = 'pref_lib';
 512         xpath = '//*[local-name()="counts"]/*[local-name()="count"][@type="' _ count_type _ '"]';
 513         FOR node IN xml.findnodes(xpath);
 514             FOR attr IN ['count', 'available', 'unshadow', 'transcendant', 'org_unit'];
 515                 depth = node.getAttribute('depth');
 516                 args.plib_copy_counts.$depth.$attr = node.getAttribute(attr);
 517             END;
 518         END;
 519
 520         # "mattype" == "custom marc format specifier"
 521         icon_style = ctx.get_cgf('opac.icon_attr').value || 'item_type';
 522         formats_xpath = '//*[local-name()="attributes"]/*[local-name()="field"][@name="' _ icon_style _ '"]';
 523
 524         args.all_formats = [];
 525         FOR node IN xml.findnodes(formats_xpath);
 526             IF node AND node.textContent;
 527                 ccvm = ctx.get_ccvm(node.getAttribute('cvmid'));
 528                 NEXT IF ccvm.opac_visible == 'f';
 529
 530                 format = {};
 531                 type = ccvm.code.remove('-'); # blu-ray to bluray
 532                 format.label = ccvm.search_label || ccvm.value;
 533                 format.icon = PROCESS get_ccvm_icon ccvm=ccvm;
 534                 format.itemtype = schema_typemap.$type || 'CreativeWork';
 535
 536                 args.all_formats.push(format); # metarecords want all formats
 537
 538                 IF !args.format_label;
 539                     # use the first format as the default
 540                     args.format_label = format.label;
 541                     args.schema.itemtype = format.itemtype;
 542                     args.format_icon = format.icon;
 543                 END;
 544             END;
 545         END;
 546
 547         args.bibid = [];
 548         FOR bibid IN xml.findnodes('//*[@tag="901"]/*[@code="c"]');
 549             args.bibid.push(bibid.textContent);
 550         END;
 551         args.bibid = args.bibid.0;
 552
 553     END;
 554
 555     # Get the library or location group
 556     # get_library()
 557     # magically upgrades any use of 'loc' to 'locg',
 558     # which is a superset of 'loc'.
 559     BLOCK get_library;
 560         loc_name = 'locg';
 561         loc_value = ctx.copy_location_group_org ||  # resolved locg
 562             CGI.param(loc_name) || CGI.param('loc') || ctx.search_ou;
 563     END;
 564
 565 %]