Open-ILS/src/sql/Pg/upgrade/0898.unique_mr_attrs.sql

   1 BEGIN;
   2
   3 SELECT evergreen.upgrade_deps_block_check('0898', :eg_version);
   4
   5 CREATE OR REPLACE FUNCTION unapi.mmr_mra (
   6     obj_id BIGINT,
   7     format TEXT,
   8     ename TEXT,
   9     includes TEXT[],
  10     org TEXT,
  11     depth INT DEFAULT NULL,
  12     slimit HSTORE DEFAULT NULL,
  13     soffset HSTORE DEFAULT NULL,
  14     include_xmlns BOOL DEFAULT TRUE,
  15     pref_lib INT DEFAULT NULL
  16 ) RETURNS XML AS $F$
  17     SELECT  XMLELEMENT(
  18         name attributes,
  19         XMLATTRIBUTES(
  20             CASE WHEN $9 THEN 'http://open-ils.org/spec/indexing/v1' ELSE NULL END AS xmlns,
  21             'tag:open-ils.org:U2@mmr/' || $1 AS metarecord
  22         ),
  23         (SELECT XMLAGG(foo.y)
  24           FROM (
  25             WITH sourcelist AS (
  26                 WITH aou AS (SELECT COALESCE(id, (evergreen.org_top()).id) AS id
  27                     FROM actor.org_unit WHERE shortname = $5 LIMIT 1)
  28                 SELECT source
  29                 FROM metabib.metarecord_source_map, aou
  30                 WHERE metarecord = $1 AND (
  31                     EXISTS (
  32                         SELECT 1 FROM asset.opac_visible_copies
  33                         WHERE record = source AND circ_lib IN (
  34                             SELECT id FROM actor.org_unit_descendants(aou.id, $6))
  35                         LIMIT 1
  36                     )
  37                     OR EXISTS (SELECT 1 FROM located_uris(source, aou.id, $10) LIMIT 1)
  38                 )
  39             )
  40             SELECT  cmra.aid,
  41                     XMLELEMENT(
  42                         name field,
  43                         XMLATTRIBUTES(
  44                             cmra.attr AS name,
  45                             cmra.value AS "coded-value",
  46                             cmra.aid AS "cvmid",
  47                             rad.composite,
  48                             rad.multi,
  49                             rad.filter,
  50                             rad.sorter
  51                         ),
  52                         cmra.value
  53                     )
  54               FROM  (
  55                 SELECT DISTINCT aid, attr, value
  56                   FROM (
  57                     SELECT  v.source AS id,
  58                             c.id AS aid,
  59                             c.ctype AS attr,
  60                             c.code AS value
  61                       FROM  metabib.record_attr_vector_list v
  62                             JOIN config.coded_value_map c ON ( c.id = ANY( v.vlist ) )
  63                     ) AS x
  64                     JOIN sourcelist ON (x.id = sourcelist.source)
  65                 ) AS cmra
  66                 JOIN config.record_attr_definition rad ON (cmra.attr = rad.name)
  67                 UNION ALL
  68             SELECT  umra.aid,
  69                     XMLELEMENT(
  70                         name field,
  71                         XMLATTRIBUTES(
  72                             umra.attr AS name,
  73                             rad.composite,
  74                             rad.multi,
  75                             rad.filter,
  76                             rad.sorter
  77                         ),
  78                         umra.value
  79                     )
  80               FROM  (
  81                 SELECT DISTINCT aid, attr, value
  82                   FROM (
  83                     SELECT  v.source AS id,
  84                             m.id AS aid,
  85                             m.attr AS attr,
  86                             m.value AS value
  87                       FROM  metabib.record_attr_vector_list v
  88                             JOIN metabib.uncontrolled_record_attr_value m ON ( m.id = ANY( v.vlist ) )
  89                     ) AS x
  90                     JOIN sourcelist ON (x.id = sourcelist.source)
  91                 ) AS umra
  92                 JOIN config.record_attr_definition rad ON (umra.attr = rad.name)
  93                 ORDER BY 1
  94
  95             )foo(id,y)
  96         )
  97     )
  98 $F$ LANGUAGE SQL STABLE;
  99
 100 COMMIT;
 101