Open-ILS/src/sql/Pg/upgrade/XXXX.metarecord_constituents_search_result_page_should_use_standard_search_code.sql

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