Open-ILS/src/sql/Pg/version-upgrade/2.9.3-2.10.0-upgrade-db.sql

   1 --Upgrade Script for 2.9.3 to 2.10.0
   2 \set eg_version '''2.10.0'''
   3 BEGIN;
   4
   5 INSERT INTO config.upgrade_log (version, applied_to) VALUES ('2.10.0', :eg_version);
   6
   7 SELECT evergreen.upgrade_deps_block_check('0945', :eg_version);
   8
   9 -- run the entire update inside a DO block for managing the logic
  10 -- of whether to recreate the optional reporter views
  11 DO $$
  12 DECLARE
  13     has_current_circ BOOLEAN;
  14     has_billing_summary BOOLEAN;
  15 BEGIN
  16
  17 SELECT INTO has_current_circ TRUE FROM pg_views
  18     WHERE schemaname = 'reporter' AND viewname = 'classic_current_circ';
  19
  20 SELECT INTO has_billing_summary TRUE FROM pg_views
  21     WHERE schemaname = 'reporter' AND
  22     viewname = 'classic_current_billing_summary';
  23
  24 DROP VIEW action.all_circulation;
  25 DROP VIEW IF EXISTS reporter.classic_current_circ;
  26 DROP VIEW IF EXISTS reporter.classic_current_billing_summary;
  27 DROP VIEW reporter.demographic;
  28 DROP VIEW auditor.actor_usr_lifecycle;
  29 DROP VIEW action.all_hold_request;
  30
  31 ALTER TABLE actor.usr
  32     ALTER dob TYPE DATE USING (dob + '3 hours'::INTERVAL)::DATE;
  33
  34 -- alter the auditor table manually to apply the same
  35 -- dob mangling logic as above.
  36 ALTER TABLE auditor.actor_usr_history
  37     ALTER dob TYPE DATE USING (dob + '3 hours'::INTERVAL)::DATE;
  38
  39 -- this recreates auditor.actor_usr_lifecycle
  40 PERFORM auditor.update_auditors();
  41
  42 CREATE VIEW reporter.demographic AS
  43     SELECT u.id, u.dob,
  44         CASE
  45             WHEN u.dob IS NULL THEN 'Adult'::text
  46             WHEN age(u.dob) > '18 years'::interval THEN 'Adult'::text
  47             ELSE 'Juvenile'::text
  48         END AS general_division
  49     FROM actor.usr u;
  50
  51 CREATE VIEW action.all_circulation AS
  52          SELECT aged_circulation.id, aged_circulation.usr_post_code,
  53             aged_circulation.usr_home_ou, aged_circulation.usr_profile,
  54             aged_circulation.usr_birth_year, aged_circulation.copy_call_number,
  55             aged_circulation.copy_location, aged_circulation.copy_owning_lib,
  56             aged_circulation.copy_circ_lib, aged_circulation.copy_bib_record,
  57             aged_circulation.xact_start, aged_circulation.xact_finish,
  58             aged_circulation.target_copy, aged_circulation.circ_lib,
  59             aged_circulation.circ_staff, aged_circulation.checkin_staff,
  60             aged_circulation.checkin_lib, aged_circulation.renewal_remaining,
  61             aged_circulation.grace_period, aged_circulation.due_date,
  62             aged_circulation.stop_fines_time, aged_circulation.checkin_time,
  63             aged_circulation.create_time, aged_circulation.duration,
  64             aged_circulation.fine_interval, aged_circulation.recurring_fine,
  65             aged_circulation.max_fine, aged_circulation.phone_renewal,
  66             aged_circulation.desk_renewal, aged_circulation.opac_renewal,
  67             aged_circulation.duration_rule,
  68             aged_circulation.recurring_fine_rule,
  69             aged_circulation.max_fine_rule, aged_circulation.stop_fines,
  70             aged_circulation.workstation, aged_circulation.checkin_workstation,
  71             aged_circulation.checkin_scan_time, aged_circulation.parent_circ
  72            FROM action.aged_circulation
  73 UNION ALL
  74          SELECT DISTINCT circ.id,
  75             COALESCE(a.post_code, b.post_code) AS usr_post_code,
  76             p.home_ou AS usr_home_ou, p.profile AS usr_profile,
  77             date_part('year'::text, p.dob)::integer AS usr_birth_year,
  78             cp.call_number AS copy_call_number, circ.copy_location,
  79             cn.owning_lib AS copy_owning_lib, cp.circ_lib AS copy_circ_lib,
  80             cn.record AS copy_bib_record, circ.xact_start, circ.xact_finish,
  81             circ.target_copy, circ.circ_lib, circ.circ_staff,
  82             circ.checkin_staff, circ.checkin_lib, circ.renewal_remaining,
  83             circ.grace_period, circ.due_date, circ.stop_fines_time,
  84             circ.checkin_time, circ.create_time, circ.duration,
  85             circ.fine_interval, circ.recurring_fine, circ.max_fine,
  86             circ.phone_renewal, circ.desk_renewal, circ.opac_renewal,
  87             circ.duration_rule, circ.recurring_fine_rule, circ.max_fine_rule,
  88             circ.stop_fines, circ.workstation, circ.checkin_workstation,
  89             circ.checkin_scan_time, circ.parent_circ
  90            FROM action.circulation circ
  91       JOIN asset.copy cp ON circ.target_copy = cp.id
  92    JOIN asset.call_number cn ON cp.call_number = cn.id
  93    JOIN actor.usr p ON circ.usr = p.id
  94    LEFT JOIN actor.usr_address a ON p.mailing_address = a.id
  95    LEFT JOIN actor.usr_address b ON p.billing_address = b.id;
  96
  97 CREATE OR REPLACE VIEW action.all_hold_request AS
  98          SELECT DISTINCT COALESCE(a.post_code, b.post_code) AS usr_post_code,
  99             p.home_ou AS usr_home_ou, p.profile AS usr_profile,
 100             date_part('year'::text, p.dob)::integer AS usr_birth_year,
 101             ahr.requestor <> ahr.usr AS staff_placed, ahr.id, ahr.request_time,
 102             ahr.capture_time, ahr.fulfillment_time, ahr.checkin_time,
 103             ahr.return_time, ahr.prev_check_time, ahr.expire_time,
 104             ahr.cancel_time, ahr.cancel_cause, ahr.cancel_note, ahr.target,
 105             ahr.current_copy, ahr.fulfillment_staff, ahr.fulfillment_lib,
 106             ahr.request_lib, ahr.selection_ou, ahr.selection_depth,
 107             ahr.pickup_lib, ahr.hold_type, ahr.holdable_formats,
 108                 CASE
 109                     WHEN ahr.phone_notify IS NULL THEN false
 110                     WHEN ahr.phone_notify = ''::text THEN false
 111                     ELSE true
 112                 END AS phone_notify,
 113             ahr.email_notify,
 114                 CASE
 115                     WHEN ahr.sms_notify IS NULL THEN false
 116                     WHEN ahr.sms_notify = ''::text THEN false
 117                     ELSE true
 118                 END AS sms_notify,
 119             ahr.frozen, ahr.thaw_date, ahr.shelf_time, ahr.cut_in_line,
 120             ahr.mint_condition, ahr.shelf_expire_time, ahr.current_shelf_lib,
 121             ahr.behind_desk
 122            FROM action.hold_request ahr
 123       JOIN actor.usr p ON ahr.usr = p.id
 124    LEFT JOIN actor.usr_address a ON p.mailing_address = a.id
 125    LEFT JOIN actor.usr_address b ON p.billing_address = b.id
 126 UNION ALL
 127          SELECT aged_hold_request.usr_post_code, aged_hold_request.usr_home_ou,
 128             aged_hold_request.usr_profile, aged_hold_request.usr_birth_year,
 129             aged_hold_request.staff_placed, aged_hold_request.id,
 130             aged_hold_request.request_time, aged_hold_request.capture_time,
 131             aged_hold_request.fulfillment_time, aged_hold_request.checkin_time,
 132             aged_hold_request.return_time, aged_hold_request.prev_check_time,
 133             aged_hold_request.expire_time, aged_hold_request.cancel_time,
 134             aged_hold_request.cancel_cause, aged_hold_request.cancel_note,
 135             aged_hold_request.target, aged_hold_request.current_copy,
 136             aged_hold_request.fulfillment_staff,
 137             aged_hold_request.fulfillment_lib, aged_hold_request.request_lib,
 138             aged_hold_request.selection_ou, aged_hold_request.selection_depth,
 139             aged_hold_request.pickup_lib, aged_hold_request.hold_type,
 140             aged_hold_request.holdable_formats, aged_hold_request.phone_notify,
 141             aged_hold_request.email_notify, aged_hold_request.sms_notify,
 142             aged_hold_request.frozen, aged_hold_request.thaw_date,
 143             aged_hold_request.shelf_time, aged_hold_request.cut_in_line,
 144             aged_hold_request.mint_condition,
 145             aged_hold_request.shelf_expire_time,
 146             aged_hold_request.current_shelf_lib, aged_hold_request.behind_desk
 147            FROM action.aged_hold_request;
 148
 149 IF has_current_circ THEN
 150 RAISE NOTICE 'Recreating optional view reporter.classic_current_circ';
 151
 152 CREATE OR REPLACE VIEW reporter.classic_current_circ AS
 153 SELECT  cl.shortname AS circ_lib,
 154         cl.id AS circ_lib_id,
 155         circ.xact_start AS xact_start,
 156         circ_type.type AS circ_type,
 157         cp.id AS copy_id,
 158         cp.circ_modifier,
 159         ol.shortname AS owning_lib_name,
 160         lm.value AS language,
 161         lfm.value AS lit_form,
 162         ifm.value AS item_form,
 163         itm.value AS item_type,
 164         sl.name AS shelving_location,
 165         p.id AS patron_id,
 166         g.name AS profile_group,
 167         dem.general_division AS demographic_general_division,
 168         circ.id AS id,
 169         cn.id AS call_number,
 170         cn.label AS call_number_label,
 171         call_number_dewey(cn.label) AS dewey,
 172         CASE
 173                 WHEN call_number_dewey(cn.label) ~  E'^[0-9.]+$'
 174                         THEN
 175                                 btrim(
 176                                         to_char(
 177                                                 10 * floor((call_number_dewey(cn.label)::float) / 10), '000'
 178                                         )
 179                                 )
 180                 ELSE NULL
 181         END AS dewey_block_tens,
 182         CASE
 183                 WHEN call_number_dewey(cn.label) ~  E'^[0-9.]+$'
 184                         THEN
 185                                 btrim(
 186                                         to_char(
 187                                                 100 * floor((call_number_dewey(cn.label)::float) / 100), '000'
 188                                         )
 189                                 )
 190                 ELSE NULL
 191         END AS dewey_block_hundreds,
 192         CASE
 193                 WHEN call_number_dewey(cn.label) ~  E'^[0-9.]+$'
 194                         THEN
 195                                 btrim(
 196                                         to_char(
 197                                                 10 * floor((call_number_dewey(cn.label)::float) / 10), '000'
 198                                         )
 199                                 )
 200                                 || '-' ||
 201                                 btrim(
 202                                         to_char(
 203                                                 10 * floor((call_number_dewey(cn.label)::float) / 10) + 9, '000'
 204                                         )
 205                                 )
 206                 ELSE NULL
 207         END AS dewey_range_tens,
 208         CASE
 209                 WHEN call_number_dewey(cn.label) ~  E'^[0-9.]+$'
 210                         THEN
 211                                 btrim(
 212                                         to_char(
 213                                                 100 * floor((call_number_dewey(cn.label)::float) / 100), '000'
 214                                         )
 215                                 )
 216                                 || '-' ||
 217                                 btrim(
 218                                         to_char(
 219                                                 100 * floor((call_number_dewey(cn.label)::float) / 100) + 99, '000'
 220                                         )
 221                                 )
 222                 ELSE NULL
 223         END AS dewey_range_hundreds,
 224         hl.id AS patron_home_lib,
 225         hl.shortname AS patron_home_lib_shortname,
 226         paddr.county AS patron_county,
 227         paddr.city AS patron_city,
 228         paddr.post_code AS patron_zip,
 229         sc1.stat_cat_entry AS stat_cat_1,
 230         sc2.stat_cat_entry AS stat_cat_2,
 231         sce1.value AS stat_cat_1_value,
 232         sce2.value AS stat_cat_2_value
 233   FROM  action.circulation circ
 234         JOIN reporter.circ_type circ_type ON (circ.id = circ_type.id)
 235         JOIN asset.copy cp ON (cp.id = circ.target_copy)
 236         JOIN asset.copy_location sl ON (cp.location = sl.id)
 237         JOIN asset.call_number cn ON (cp.call_number = cn.id)
 238         JOIN actor.org_unit ol ON (cn.owning_lib = ol.id)
 239         JOIN metabib.rec_descriptor rd ON (rd.record = cn.record)
 240         JOIN actor.org_unit cl ON (circ.circ_lib = cl.id)
 241         JOIN actor.usr p ON (p.id = circ.usr)
 242         JOIN actor.org_unit hl ON (p.home_ou = hl.id)
 243         JOIN permission.grp_tree g ON (p.profile = g.id)
 244         JOIN reporter.demographic dem ON (dem.id = p.id)
 245         JOIN actor.usr_address paddr ON (paddr.id = p.billing_address)
 246         LEFT JOIN config.language_map lm ON (rd.item_lang = lm.code)
 247         LEFT JOIN config.lit_form_map lfm ON (rd.lit_form = lfm.code)
 248         LEFT JOIN config.item_form_map ifm ON (rd.item_form = ifm.code)
 249         LEFT JOIN config.item_type_map itm ON (rd.item_type = itm.code)
 250         LEFT JOIN asset.stat_cat_entry_copy_map sc1 ON (sc1.owning_copy = cp.id AND sc1.stat_cat = 1)
 251         LEFT JOIN asset.stat_cat_entry sce1 ON (sce1.id = sc1.stat_cat_entry)
 252         LEFT JOIN asset.stat_cat_entry_copy_map sc2 ON (sc2.owning_copy = cp.id AND sc2.stat_cat = 2)
 253         LEFT JOIN asset.stat_cat_entry sce2 ON (sce2.id = sc2.stat_cat_entry);
 254 END IF;
 255
 256 IF has_billing_summary THEN
 257 RAISE NOTICE 'Recreating optional view reporter.classic_current_billing_summary';
 258
 259 CREATE OR REPLACE VIEW reporter.classic_current_billing_summary AS
 260 SELECT  x.id AS id,
 261         x.usr AS usr,
 262         bl.shortname AS billing_location_shortname,
 263         bl.name AS billing_location_name,
 264         x.billing_location AS billing_location,
 265         c.barcode AS barcode,
 266         u.home_ou AS usr_home_ou,
 267         ul.shortname AS usr_home_ou_shortname,
 268         ul.name AS usr_home_ou_name,
 269         x.xact_start AS xact_start,
 270         x.xact_finish AS xact_finish,
 271         x.xact_type AS xact_type,
 272         x.total_paid AS total_paid,
 273         x.total_owed AS total_owed,
 274         x.balance_owed AS balance_owed,
 275         x.last_payment_ts AS last_payment_ts,
 276         x.last_payment_note AS last_payment_note,
 277         x.last_payment_type AS last_payment_type,
 278         x.last_billing_ts AS last_billing_ts,
 279         x.last_billing_note AS last_billing_note,
 280         x.last_billing_type AS last_billing_type,
 281         paddr.county AS patron_county,
 282         paddr.city AS patron_city,
 283         paddr.post_code AS patron_zip,
 284         g.name AS profile_group,
 285         dem.general_division AS demographic_general_division
 286   FROM  money.open_billable_xact_summary x
 287         JOIN actor.org_unit bl ON (x.billing_location = bl.id)
 288         JOIN actor.usr u ON (u.id = x.usr)
 289         JOIN actor.org_unit ul ON (u.home_ou = ul.id)
 290         JOIN actor.card c ON (u.card = c.id)
 291         JOIN permission.grp_tree g ON (u.profile = g.id)
 292         JOIN reporter.demographic dem ON (dem.id = u.id)
 293         JOIN actor.usr_address paddr ON (paddr.id = u.billing_address);
 294 END IF;
 295
 296 END $$;
 297
 298 SELECT evergreen.upgrade_deps_block_check('0946', :eg_version);
 299
 300 CREATE OR REPLACE FUNCTION actor.org_unit_ancestor_setting_batch( org_id INT, VARIADIC setting_names TEXT[] ) RETURNS SETOF actor.org_unit_setting AS $$
 301 DECLARE
 302     setting RECORD;
 303     setting_name TEXT;
 304     cur_org INT;
 305 BEGIN
 306     FOREACH setting_name IN ARRAY setting_names
 307     LOOP
 308         cur_org := org_id;
 309         LOOP
 310             SELECT INTO setting * FROM actor.org_unit_setting WHERE org_unit = cur_org AND name = setting_name;
 311             IF FOUND THEN
 312                 RETURN NEXT setting;
 313                 EXIT;
 314             END IF;
 315             SELECT INTO cur_org parent_ou FROM actor.org_unit WHERE id = cur_org;
 316             EXIT WHEN cur_org IS NULL;
 317         END LOOP;
 318     END LOOP;
 319     RETURN;
 320 END;
 321 $$ LANGUAGE plpgsql STABLE;
 322
 323 COMMENT ON FUNCTION actor.org_unit_ancestor_setting_batch( INT, VARIADIC TEXT[] ) IS $$
 324 For each setting name passed, search "up" the org_unit tree until
 325 we find the first occurrence of an org_unit_setting with the given name.
 326 $$;
 327
 328 SELECT evergreen.upgrade_deps_block_check('0947', :eg_version);
 329
 330 CREATE OR REPLACE FUNCTION evergreen.lpad_number_substrings( TEXT, TEXT, INT ) RETURNS TEXT AS $$
 331     my $string = shift;            # Source string
 332     my $pad = shift;               # string to fill. Typically '0'. This should be a single character.
 333     my $len = shift;               # length of resultant padded field
 334
 335     $string =~ s/([0-9]+)/$pad x ($len - length($1)) . $1/eg;
 336
 337     return $string;
 338 $$ LANGUAGE PLPERLU;
 339
 340 SELECT evergreen.upgrade_deps_block_check('0951', :eg_version);
 341
 342 ALTER TABLE config.standing_penalty
 343       ADD COLUMN ignore_proximity INTEGER;
 344
 345 CREATE OR REPLACE FUNCTION action.hold_request_permit_test( pickup_ou INT, request_ou INT, match_item BIGINT, match_user INT, match_requestor INT, retargetting BOOL ) RETURNS SETOF action.matrix_test_result AS $func$
 346 DECLARE
 347     matchpoint_id        INT;
 348     user_object        actor.usr%ROWTYPE;
 349     age_protect_object    config.rule_age_hold_protect%ROWTYPE;
 350     standing_penalty    config.standing_penalty%ROWTYPE;
 351     transit_range_ou_type    actor.org_unit_type%ROWTYPE;
 352     transit_source        actor.org_unit%ROWTYPE;
 353     item_object        asset.copy%ROWTYPE;
 354     item_cn_object     asset.call_number%ROWTYPE;
 355     item_status_object  config.copy_status%ROWTYPE;
 356     item_location_object    asset.copy_location%ROWTYPE;
 357     ou_skip              actor.org_unit_setting%ROWTYPE;
 358     result            action.matrix_test_result;
 359     hold_test        config.hold_matrix_matchpoint%ROWTYPE;
 360     use_active_date   TEXT;
 361     age_protect_date  TIMESTAMP WITH TIME ZONE;
 362     hold_count        INT;
 363     hold_transit_prox    INT;
 364     frozen_hold_count    INT;
 365     context_org_list    INT[];
 366     done            BOOL := FALSE;
 367     hold_penalty TEXT;
 368     v_pickup_ou ALIAS FOR pickup_ou;
 369     v_request_ou ALIAS FOR request_ou;
 370     item_prox INT;
 371     pickup_prox INT;
 372 BEGIN
 373     SELECT INTO user_object * FROM actor.usr WHERE id = match_user;
 374     SELECT INTO context_org_list ARRAY_AGG(id) FROM actor.org_unit_full_path( v_pickup_ou );
 375
 376     result.success := TRUE;
 377
 378     -- The HOLD penalty block only applies to new holds.
 379     -- The CAPTURE penalty block applies to existing holds.
 380     hold_penalty := 'HOLD';
 381     IF retargetting THEN
 382         hold_penalty := 'CAPTURE';
 383     END IF;
 384
 385     -- Fail if we couldn't find a user
 386     IF user_object.id IS NULL THEN
 387         result.fail_part := 'no_user';
 388         result.success := FALSE;
 389         done := TRUE;
 390         RETURN NEXT result;
 391         RETURN;
 392     END IF;
 393
 394     SELECT INTO item_object * FROM asset.copy WHERE id = match_item;
 395
 396     -- Fail if we couldn't find a copy
 397     IF item_object.id IS NULL THEN
 398         result.fail_part := 'no_item';
 399         result.success := FALSE;
 400         done := TRUE;
 401         RETURN NEXT result;
 402         RETURN;
 403     END IF;
 404
 405     SELECT INTO matchpoint_id action.find_hold_matrix_matchpoint(v_pickup_ou, v_request_ou, match_item, match_user, match_requestor);
 406     result.matchpoint := matchpoint_id;
 407
 408     SELECT INTO ou_skip * FROM actor.org_unit_setting WHERE name = 'circ.holds.target_skip_me' AND org_unit = item_object.circ_lib;
 409
 410     -- Fail if the circ_lib for the item has circ.holds.target_skip_me set to true
 411     IF ou_skip.id IS NOT NULL AND ou_skip.value = 'true' THEN
 412         result.fail_part := 'circ.holds.target_skip_me';
 413         result.success := FALSE;
 414         done := TRUE;
 415         RETURN NEXT result;
 416         RETURN;
 417     END IF;
 418
 419     -- Fail if user is barred
 420     IF user_object.barred IS TRUE THEN
 421         result.fail_part := 'actor.usr.barred';
 422         result.success := FALSE;
 423         done := TRUE;
 424         RETURN NEXT result;
 425         RETURN;
 426     END IF;
 427
 428     SELECT INTO item_cn_object * FROM asset.call_number WHERE id = item_object.call_number;
 429     SELECT INTO item_status_object * FROM config.copy_status WHERE id = item_object.status;
 430     SELECT INTO item_location_object * FROM asset.copy_location WHERE id = item_object.location;
 431
 432     -- Fail if we couldn't find any matchpoint (requires a default)
 433     IF matchpoint_id IS NULL THEN
 434         result.fail_part := 'no_matchpoint';
 435         result.success := FALSE;
 436         done := TRUE;
 437         RETURN NEXT result;
 438         RETURN;
 439     END IF;
 440
 441     SELECT INTO hold_test * FROM config.hold_matrix_matchpoint WHERE id = matchpoint_id;
 442
 443     IF hold_test.holdable IS FALSE THEN
 444         result.fail_part := 'config.hold_matrix_test.holdable';
 445         result.success := FALSE;
 446         done := TRUE;
 447         RETURN NEXT result;
 448     END IF;
 449
 450     IF item_object.holdable IS FALSE THEN
 451         result.fail_part := 'item.holdable';
 452         result.success := FALSE;
 453         done := TRUE;
 454         RETURN NEXT result;
 455     END IF;
 456
 457     IF item_status_object.holdable IS FALSE THEN
 458         result.fail_part := 'status.holdable';
 459         result.success := FALSE;
 460         done := TRUE;
 461         RETURN NEXT result;
 462     END IF;
 463
 464     IF item_location_object.holdable IS FALSE THEN
 465         result.fail_part := 'location.holdable';
 466         result.success := FALSE;
 467         done := TRUE;
 468         RETURN NEXT result;
 469     END IF;
 470
 471     IF hold_test.transit_range IS NOT NULL THEN
 472         SELECT INTO transit_range_ou_type * FROM actor.org_unit_type WHERE id = hold_test.transit_range;
 473         IF hold_test.distance_is_from_owner THEN
 474             SELECT INTO transit_source ou.* FROM actor.org_unit ou JOIN asset.call_number cn ON (cn.owning_lib = ou.id) WHERE cn.id = item_object.call_number;
 475         ELSE
 476             SELECT INTO transit_source * FROM actor.org_unit WHERE id = item_object.circ_lib;
 477         END IF;
 478
 479         PERFORM * FROM actor.org_unit_descendants( transit_source.id, transit_range_ou_type.depth ) WHERE id = v_pickup_ou;
 480
 481         IF NOT FOUND THEN
 482             result.fail_part := 'transit_range';
 483             result.success := FALSE;
 484             done := TRUE;
 485             RETURN NEXT result;
 486         END IF;
 487     END IF;
 488
 489     -- Proximity of user's home_ou to the pickup_lib to see if penalty should be ignored.
 490     SELECT INTO pickup_prox prox FROM actor.org_unit_proximity WHERE from_org = user_object.home_ou AND to_org = v_pickup_ou;
 491     -- Proximity of user's home_ou to the items' lib to see if penalty should be ignored.
 492     IF hold_test.distance_is_from_owner THEN
 493         SELECT INTO item_prox prox FROM actor.org_unit_proximity WHERE from_org = user_object.home_ou AND to_org = item_cn_object.owning_lib;
 494     ELSE
 495         SELECT INTO item_prox prox FROM actor.org_unit_proximity WHERE from_org = user_object.home_ou AND to_org = item_object.circ_lib;
 496     END IF;
 497
 498     FOR standing_penalty IN
 499         SELECT  DISTINCT csp.*
 500           FROM  actor.usr_standing_penalty usp
 501                 JOIN config.standing_penalty csp ON (csp.id = usp.standing_penalty)
 502           WHERE usr = match_user
 503                 AND usp.org_unit IN ( SELECT * FROM unnest(context_org_list) )
 504                 AND (usp.stop_date IS NULL or usp.stop_date > NOW())
 505                 AND (csp.ignore_proximity IS NULL OR csp.ignore_proximity < item_prox
 506                      OR csp.ignore_proximity < pickup_prox)
 507                 AND csp.block_list LIKE '%' || hold_penalty || '%' LOOP
 508
 509         result.fail_part := standing_penalty.name;
 510         result.success := FALSE;
 511         done := TRUE;
 512         RETURN NEXT result;
 513     END LOOP;
 514
 515     IF hold_test.stop_blocked_user IS TRUE THEN
 516         FOR standing_penalty IN
 517             SELECT  DISTINCT csp.*
 518               FROM  actor.usr_standing_penalty usp
 519                     JOIN config.standing_penalty csp ON (csp.id = usp.standing_penalty)
 520               WHERE usr = match_user
 521                     AND usp.org_unit IN ( SELECT * FROM unnest(context_org_list) )
 522                     AND (usp.stop_date IS NULL or usp.stop_date > NOW())
 523                     AND csp.block_list LIKE '%CIRC%' LOOP
 524
 525             result.fail_part := standing_penalty.name;
 526             result.success := FALSE;
 527             done := TRUE;
 528             RETURN NEXT result;
 529         END LOOP;
 530     END IF;
 531
 532     IF hold_test.max_holds IS NOT NULL AND NOT retargetting THEN
 533         SELECT    INTO hold_count COUNT(*)
 534           FROM    action.hold_request
 535           WHERE    usr = match_user
 536             AND fulfillment_time IS NULL
 537             AND cancel_time IS NULL
 538             AND CASE WHEN hold_test.include_frozen_holds THEN TRUE ELSE frozen IS FALSE END;
 539
 540         IF hold_count >= hold_test.max_holds THEN
 541             result.fail_part := 'config.hold_matrix_test.max_holds';
 542             result.success := FALSE;
 543             done := TRUE;
 544             RETURN NEXT result;
 545         END IF;
 546     END IF;
 547
 548     IF item_object.age_protect IS NOT NULL THEN
 549         SELECT INTO age_protect_object * FROM config.rule_age_hold_protect WHERE id = item_object.age_protect;
 550         IF hold_test.distance_is_from_owner THEN
 551             SELECT INTO use_active_date value FROM actor.org_unit_ancestor_setting('circ.holds.age_protect.active_date', item_cn_object.owning_lib);
 552         ELSE
 553             SELECT INTO use_active_date value FROM actor.org_unit_ancestor_setting('circ.holds.age_protect.active_date', item_object.circ_lib);
 554         END IF;
 555         IF use_active_date = 'true' THEN
 556             age_protect_date := COALESCE(item_object.active_date, NOW());
 557         ELSE
 558             age_protect_date := item_object.create_date;
 559         END IF;
 560         IF age_protect_date + age_protect_object.age > NOW() THEN
 561             IF hold_test.distance_is_from_owner THEN
 562                 SELECT INTO item_cn_object * FROM asset.call_number WHERE id = item_object.call_number;
 563                 SELECT INTO hold_transit_prox prox FROM actor.org_unit_proximity WHERE from_org = item_cn_object.owning_lib AND to_org = v_pickup_ou;
 564             ELSE
 565                 SELECT INTO hold_transit_prox prox FROM actor.org_unit_proximity WHERE from_org = item_object.circ_lib AND to_org = v_pickup_ou;
 566             END IF;
 567
 568             IF hold_transit_prox > age_protect_object.prox THEN
 569                 result.fail_part := 'config.rule_age_hold_protect.prox';
 570                 result.success := FALSE;
 571                 done := TRUE;
 572                 RETURN NEXT result;
 573             END IF;
 574         END IF;
 575     END IF;
 576
 577     IF NOT done THEN
 578         RETURN NEXT result;
 579     END IF;
 580
 581     RETURN;
 582 END;
 583 $func$ LANGUAGE plpgsql;
 584
 585 CREATE OR REPLACE FUNCTION action.item_user_circ_test( circ_ou INT, match_item BIGINT, match_user INT, renewal BOOL ) RETURNS SETOF action.circ_matrix_test_result AS $func$
 586 DECLARE
 587     user_object             actor.usr%ROWTYPE;
 588     standing_penalty        config.standing_penalty%ROWTYPE;
 589     item_object             asset.copy%ROWTYPE;
 590     item_status_object      config.copy_status%ROWTYPE;
 591     item_location_object    asset.copy_location%ROWTYPE;
 592     result                  action.circ_matrix_test_result;
 593     circ_test               action.found_circ_matrix_matchpoint;
 594     circ_matchpoint         config.circ_matrix_matchpoint%ROWTYPE;
 595     circ_limit_set          config.circ_limit_set%ROWTYPE;
 596     hold_ratio              action.hold_stats%ROWTYPE;
 597     penalty_type            TEXT;
 598     items_out               INT;
 599     context_org_list        INT[];
 600     done                    BOOL := FALSE;
 601     item_prox               INT;
 602     home_prox               INT;
 603 BEGIN
 604     -- Assume success unless we hit a failure condition
 605     result.success := TRUE;
 606
 607     -- Need user info to look up matchpoints
 608     SELECT INTO user_object * FROM actor.usr WHERE id = match_user AND NOT deleted;
 609
 610     -- (Insta)Fail if we couldn't find the user
 611     IF user_object.id IS NULL THEN
 612         result.fail_part := 'no_user';
 613         result.success := FALSE;
 614         done := TRUE;
 615         RETURN NEXT result;
 616         RETURN;
 617     END IF;
 618
 619     -- Need item info to look up matchpoints
 620     SELECT INTO item_object * FROM asset.copy WHERE id = match_item AND NOT deleted;
 621
 622     -- (Insta)Fail if we couldn't find the item
 623     IF item_object.id IS NULL THEN
 624         result.fail_part := 'no_item';
 625         result.success := FALSE;
 626         done := TRUE;
 627         RETURN NEXT result;
 628         RETURN;
 629     END IF;
 630
 631     SELECT INTO circ_test * FROM action.find_circ_matrix_matchpoint(circ_ou, item_object, user_object, renewal);
 632
 633     circ_matchpoint             := circ_test.matchpoint;
 634     result.matchpoint           := circ_matchpoint.id;
 635     result.circulate            := circ_matchpoint.circulate;
 636     result.duration_rule        := circ_matchpoint.duration_rule;
 637     result.recurring_fine_rule  := circ_matchpoint.recurring_fine_rule;
 638     result.max_fine_rule        := circ_matchpoint.max_fine_rule;
 639     result.hard_due_date        := circ_matchpoint.hard_due_date;
 640     result.renewals             := circ_matchpoint.renewals;
 641     result.grace_period         := circ_matchpoint.grace_period;
 642     result.buildrows            := circ_test.buildrows;
 643
 644     -- (Insta)Fail if we couldn't find a matchpoint
 645     IF circ_test.success = false THEN
 646         result.fail_part := 'no_matchpoint';
 647         result.success := FALSE;
 648         done := TRUE;
 649         RETURN NEXT result;
 650         RETURN;
 651     END IF;
 652
 653     -- All failures before this point are non-recoverable
 654     -- Below this point are possibly overridable failures
 655
 656     -- Fail if the user is barred
 657     IF user_object.barred IS TRUE THEN
 658         result.fail_part := 'actor.usr.barred';
 659         result.success := FALSE;
 660         done := TRUE;
 661         RETURN NEXT result;
 662     END IF;
 663
 664     -- Fail if the item can't circulate
 665     IF item_object.circulate IS FALSE THEN
 666         result.fail_part := 'asset.copy.circulate';
 667         result.success := FALSE;
 668         done := TRUE;
 669         RETURN NEXT result;
 670     END IF;
 671
 672     -- Fail if the item isn't in a circulateable status on a non-renewal
 673     IF NOT renewal AND item_object.status NOT IN ( 0, 7, 8 ) THEN
 674         result.fail_part := 'asset.copy.status';
 675         result.success := FALSE;
 676         done := TRUE;
 677         RETURN NEXT result;
 678     -- Alternately, fail if the item isn't checked out on a renewal
 679     ELSIF renewal AND item_object.status <> 1 THEN
 680         result.fail_part := 'asset.copy.status';
 681         result.success := FALSE;
 682         done := TRUE;
 683         RETURN NEXT result;
 684     END IF;
 685
 686     -- Fail if the item can't circulate because of the shelving location
 687     SELECT INTO item_location_object * FROM asset.copy_location WHERE id = item_object.location;
 688     IF item_location_object.circulate IS FALSE THEN
 689         result.fail_part := 'asset.copy_location.circulate';
 690         result.success := FALSE;
 691         done := TRUE;
 692         RETURN NEXT result;
 693     END IF;
 694
 695     -- Use Circ OU for penalties and such
 696     SELECT INTO context_org_list ARRAY_AGG(id) FROM actor.org_unit_full_path( circ_ou );
 697
 698     -- Proximity of user's home_ou to circ_ou to see if penalties should be ignored.
 699     SELECT INTO home_prox prox FROM actor.org_unit_proximity WHERE from_org = user_object.home_ou AND to_org = circ_ou;
 700
 701     -- Proximity of user's home_ou to item circ_lib to see if penalties should be ignored.
 702     SELECT INTO item_prox prox FROM actor.org_unit_proximity WHERE from_org = user_object.home_ou AND to_org = item_object.circ_lib;
 703
 704     IF renewal THEN
 705         penalty_type = '%RENEW%';
 706     ELSE
 707         penalty_type = '%CIRC%';
 708     END IF;
 709
 710     FOR standing_penalty IN
 711         SELECT  DISTINCT csp.*
 712           FROM  actor.usr_standing_penalty usp
 713                 JOIN config.standing_penalty csp ON (csp.id = usp.standing_penalty)
 714           WHERE usr = match_user
 715                 AND usp.org_unit IN ( SELECT * FROM unnest(context_org_list) )
 716                 AND (usp.stop_date IS NULL or usp.stop_date > NOW())
 717                 AND (csp.ignore_proximity IS NULL
 718                      OR csp.ignore_proximity < home_prox
 719                      OR csp.ignore_proximity < item_prox)
 720                 AND csp.block_list LIKE penalty_type LOOP
 721
 722         result.fail_part := standing_penalty.name;
 723         result.success := FALSE;
 724         done := TRUE;
 725         RETURN NEXT result;
 726     END LOOP;
 727
 728     -- Fail if the test is set to hard non-circulating
 729     IF circ_matchpoint.circulate IS FALSE THEN
 730         result.fail_part := 'config.circ_matrix_test.circulate';
 731         result.success := FALSE;
 732         done := TRUE;
 733         RETURN NEXT result;
 734     END IF;
 735
 736     -- Fail if the total copy-hold ratio is too low
 737     IF circ_matchpoint.total_copy_hold_ratio IS NOT NULL THEN
 738         SELECT INTO hold_ratio * FROM action.copy_related_hold_stats(match_item);
 739         IF hold_ratio.total_copy_ratio IS NOT NULL AND hold_ratio.total_copy_ratio < circ_matchpoint.total_copy_hold_ratio THEN
 740             result.fail_part := 'config.circ_matrix_test.total_copy_hold_ratio';
 741             result.success := FALSE;
 742             done := TRUE;
 743             RETURN NEXT result;
 744         END IF;
 745     END IF;
 746
 747     -- Fail if the available copy-hold ratio is too low
 748     IF circ_matchpoint.available_copy_hold_ratio IS NOT NULL THEN
 749         IF hold_ratio.hold_count IS NULL THEN
 750             SELECT INTO hold_ratio * FROM action.copy_related_hold_stats(match_item);
 751         END IF;
 752         IF hold_ratio.available_copy_ratio IS NOT NULL AND hold_ratio.available_copy_ratio < circ_matchpoint.available_copy_hold_ratio THEN
 753             result.fail_part := 'config.circ_matrix_test.available_copy_hold_ratio';
 754             result.success := FALSE;
 755             done := TRUE;
 756             RETURN NEXT result;
 757         END IF;
 758     END IF;
 759
 760     -- Fail if the user has too many items out by defined limit sets
 761     FOR circ_limit_set IN SELECT ccls.* FROM config.circ_limit_set ccls
 762       JOIN config.circ_matrix_limit_set_map ccmlsm ON ccmlsm.limit_set = ccls.id
 763       WHERE ccmlsm.active AND ( ccmlsm.matchpoint = circ_matchpoint.id OR
 764         ( ccmlsm.matchpoint IN (SELECT * FROM unnest(result.buildrows)) AND ccmlsm.fallthrough )
 765         ) LOOP
 766             IF circ_limit_set.items_out > 0 AND NOT renewal THEN
 767                 SELECT INTO context_org_list ARRAY_AGG(aou.id)
 768                   FROM actor.org_unit_full_path( circ_ou ) aou
 769                     JOIN actor.org_unit_type aout ON aou.ou_type = aout.id
 770                   WHERE aout.depth >= circ_limit_set.depth;
 771                 IF circ_limit_set.global THEN
 772                     WITH RECURSIVE descendant_depth AS (
 773                         SELECT  ou.id,
 774                             ou.parent_ou
 775                         FROM  actor.org_unit ou
 776                         WHERE ou.id IN (SELECT * FROM unnest(context_org_list))
 777                             UNION
 778                         SELECT  ou.id,
 779                             ou.parent_ou
 780                         FROM  actor.org_unit ou
 781                             JOIN descendant_depth ot ON (ot.id = ou.parent_ou)
 782                     ) SELECT INTO context_org_list ARRAY_AGG(ou.id) FROM actor.org_unit ou JOIN descendant_depth USING (id);
 783                 END IF;
 784                 SELECT INTO items_out COUNT(DISTINCT circ.id)
 785                   FROM action.circulation circ
 786                     JOIN asset.copy copy ON (copy.id = circ.target_copy)
 787                     LEFT JOIN action.circulation_limit_group_map aclgm ON (circ.id = aclgm.circ)
 788                   WHERE circ.usr = match_user
 789                     AND circ.circ_lib IN (SELECT * FROM unnest(context_org_list))
 790                     AND circ.checkin_time IS NULL
 791                     AND (circ.stop_fines IN ('MAXFINES','LONGOVERDUE') OR circ.stop_fines IS NULL)
 792                     AND (copy.circ_modifier IN (SELECT circ_mod FROM config.circ_limit_set_circ_mod_map WHERE limit_set = circ_limit_set.id)
 793                         OR copy.location IN (SELECT copy_loc FROM config.circ_limit_set_copy_loc_map WHERE limit_set = circ_limit_set.id)
 794                         OR aclgm.limit_group IN (SELECT limit_group FROM config.circ_limit_set_group_map WHERE limit_set = circ_limit_set.id)
 795                     );
 796                 IF items_out >= circ_limit_set.items_out THEN
 797                     result.fail_part := 'config.circ_matrix_circ_mod_test';
 798                     result.success := FALSE;
 799                     done := TRUE;
 800                     RETURN NEXT result;
 801                 END IF;
 802             END IF;
 803             SELECT INTO result.limit_groups result.limit_groups || ARRAY_AGG(limit_group) FROM config.circ_limit_set_group_map WHERE limit_set = circ_limit_set.id AND NOT check_only;
 804     END LOOP;
 805
 806     -- If we passed everything, return the successful matchpoint
 807     IF NOT done THEN
 808         RETURN NEXT result;
 809     END IF;
 810
 811     RETURN;
 812 END;
 813 $func$ LANGUAGE plpgsql;
 814
 815 SELECT evergreen.upgrade_deps_block_check('0952', :eg_version); --miker/kmlussier/gmcharlt
 816
 817 INSERT INTO config.metabib_field ( id, field_class, name, label, format, xpath, browse_field, facet_field, facet_xpath, joiner ) VALUES
 818     (33, 'identifier', 'genre', oils_i18n_gettext(33, 'Genre', 'cmf', 'label'), 'marcxml', $$//marc:datafield[@tag='655']$$, FALSE, TRUE, $$//*[local-name()='subfield' and contains('abvxyz',@code)]$$, ' -- ' ); -- /* to fool vim */;
 819
 820 INSERT INTO config.metabib_field_index_norm_map (field,norm)
 821     SELECT  m.id,
 822             i.id
 823       FROM  config.metabib_field m,
 824         config.index_normalizer i
 825       WHERE i.func IN ('search_normalize','split_date_range')
 826             AND m.id IN (33);
 827
 828 SELECT evergreen.upgrade_deps_block_check('0953', :eg_version);
 829
 830 CREATE OR REPLACE FUNCTION unapi.bre (
 831     obj_id BIGINT,
 832     format TEXT,
 833     ename TEXT,
 834     includes TEXT[],
 835     org TEXT,
 836     depth INT DEFAULT NULL,
 837     slimit HSTORE DEFAULT NULL,
 838     soffset HSTORE DEFAULT NULL,
 839     include_xmlns BOOL DEFAULT TRUE,
 840     pref_lib INT DEFAULT NULL
 841 )
 842 RETURNS XML AS $F$
 843 DECLARE
 844     me      biblio.record_entry%ROWTYPE;
 845     layout  unapi.bre_output_layout%ROWTYPE;
 846     xfrm    config.xml_transform%ROWTYPE;
 847     ouid    INT;
 848     tmp_xml TEXT;
 849     top_el  TEXT;
 850     output  XML;
 851     hxml    XML;
 852     axml    XML;
 853     source  XML;
 854 BEGIN
 855
 856     IF org = '-' OR org IS NULL THEN
 857         SELECT shortname INTO org FROM evergreen.org_top();
 858     END IF;
 859
 860     SELECT id INTO ouid FROM actor.org_unit WHERE shortname = org;
 861
 862     IF ouid IS NULL THEN
 863         RETURN NULL::XML;
 864     END IF;
 865
 866     IF format = 'holdings_xml' THEN -- the special case
 867         output := unapi.holdings_xml( obj_id, ouid, org, depth, includes, slimit, soffset, include_xmlns);
 868         RETURN output;
 869     END IF;
 870
 871     SELECT * INTO layout FROM unapi.bre_output_layout WHERE name = format;
 872
 873     IF layout.name IS NULL THEN
 874         RETURN NULL::XML;
 875     END IF;
 876
 877     SELECT * INTO xfrm FROM config.xml_transform WHERE name = layout.transform;
 878
 879     SELECT * INTO me FROM biblio.record_entry WHERE id = obj_id;
 880
 881     -- grab bib_source, if any
 882     IF ('cbs' = ANY (includes) AND me.source IS NOT NULL) THEN
 883         source := unapi.cbs(me.source,NULL,NULL,NULL,NULL);
 884     ELSE
 885         source := NULL::XML;
 886     END IF;
 887
 888     -- grab SVF if we need them
 889     IF ('mra' = ANY (includes)) THEN
 890         axml := unapi.mra(obj_id,NULL,NULL,NULL,NULL);
 891     ELSE
 892         axml := NULL::XML;
 893     END IF;
 894
 895     -- grab holdings if we need them
 896     IF ('holdings_xml' = ANY (includes)) THEN
 897         hxml := unapi.holdings_xml(obj_id, ouid, org, depth, evergreen.array_remove_item_by_value(includes,'holdings_xml'), slimit, soffset, include_xmlns, pref_lib);
 898     ELSE
 899         hxml := NULL::XML;
 900     END IF;
 901
 902
 903     -- generate our item node
 904
 905
 906     IF format = 'marcxml' THEN
 907         tmp_xml := me.marc;
 908         IF tmp_xml !~ E'<marc:' THEN -- If we're not using the prefixed namespace in this record, then remove all declarations of it
 909            tmp_xml := REGEXP_REPLACE(tmp_xml, ' xmlns:marc="http://www.loc.gov/MARC21/slim"', '', 'g');
 910         END IF;
 911     ELSE
 912         tmp_xml := oils_xslt_process(me.marc, xfrm.xslt)::XML;
 913     END IF;
 914
 915     top_el := REGEXP_REPLACE(tmp_xml, E'^.*?<((?:\\S+:)?' || layout.holdings_element || ').*$', E'\\1');
 916
 917     IF source IS NOT NULL THEN
 918         tmp_xml := REGEXP_REPLACE(tmp_xml, '</' || top_el || '>(.*?)$', source || '</' || top_el || E'>\\1');
 919     END IF;
 920
 921     IF axml IS NOT NULL THEN
 922         tmp_xml := REGEXP_REPLACE(tmp_xml, '</' || top_el || '>(.*?)$', axml || '</' || top_el || E'>\\1');
 923     END IF;
 924
 925     IF hxml IS NOT NULL THEN -- XXX how do we configure the holdings position?
 926         tmp_xml := REGEXP_REPLACE(tmp_xml, '</' || top_el || '>(.*?)$', hxml || '</' || top_el || E'>\\1');
 927     END IF;
 928
 929     IF ('bre.unapi' = ANY (includes)) THEN
 930         output := REGEXP_REPLACE(
 931             tmp_xml,
 932             '</' || top_el || '>(.*?)',
 933             XMLELEMENT(
 934                 name abbr,
 935                 XMLATTRIBUTES(
 936                     'http://www.w3.org/1999/xhtml' AS xmlns,
 937                     'unapi-id' AS class,
 938                     'tag:open-ils.org:U2@bre/' || obj_id || '/' || org AS title
 939                 )
 940             )::TEXT || '</' || top_el || E'>\\1'
 941         );
 942     ELSE
 943         output := tmp_xml;
 944     END IF;
 945
 946     IF ('bre.extern' = ANY (includes)) THEN
 947         output := REGEXP_REPLACE(
 948             tmp_xml,
 949             '</' || top_el || '>(.*?)',
 950             XMLELEMENT(
 951                 name extern,
 952                 XMLATTRIBUTES(
 953                     'http://open-ils.org/spec/biblio/v1' AS xmlns,
 954                     me.creator AS creator,
 955                     me.editor AS editor,
 956                     me.create_date AS create_date,
 957                     me.edit_date AS edit_date,
 958                     me.quality AS quality,
 959                     me.fingerprint AS fingerprint,
 960                     me.tcn_source AS tcn_source,
 961                     me.tcn_value AS tcn_value,
 962                     me.owner AS owner,
 963                     me.share_depth AS share_depth,
 964                     me.active AS active,
 965                     me.deleted AS deleted
 966                 )
 967             )::TEXT || '</' || top_el || E'>\\1'
 968         );
 969     ELSE
 970         output := tmp_xml;
 971     END IF;
 972
 973     output := REGEXP_REPLACE(output::TEXT,E'>\\s+<','><','gs')::XML;
 974     RETURN output;
 975 END;
 976 $F$ LANGUAGE PLPGSQL STABLE;
 977
 978 SELECT evergreen.upgrade_deps_block_check('0954', :eg_version);
 979
 980 ALTER TABLE acq.fund_debit
 981     ADD COLUMN invoice_entry INTEGER
 982         REFERENCES acq.invoice_entry (id)
 983         ON DELETE SET NULL;
 984
 985 CREATE INDEX fund_debit_invoice_entry_idx ON acq.fund_debit (invoice_entry);
 986 CREATE INDEX lineitem_detail_fund_debit_idx ON acq.lineitem_detail (fund_debit);
 987
 988 SELECT evergreen.upgrade_deps_block_check('0955', :eg_version);
 989
 990 UPDATE config.org_unit_setting_type
 991 SET description = 'Regular expression defining the password format.  Note: Be sure to update the update_password_msg.tt2 TPAC template with a user-friendly description of your password strength requirements.'
 992 WHERE NAME = 'global.password_regex';
 993
 994 SELECT evergreen.upgrade_deps_block_check('0956', :eg_version);
 995
 996 ALTER TABLE money.credit_card_payment
 997     DROP COLUMN cc_type,
 998     DROP COLUMN expire_month,
 999     DROP COLUMN expire_year,
1000     DROP COLUMN cc_first_name,
1001     DROP COLUMN cc_last_name;
1002
1003 SELECT evergreen.upgrade_deps_block_check('0957', :eg_version);
1004
1005 -- Remove references to dropped CC payment columns in the print/email
1006 -- payment receipt templates, but only if the in-db template matches
1007 -- the stock template.
1008 -- The actual diff here is only about 8 lines.
1009
1010 UPDATE action_trigger.event_definition SET template =
1011 $$
1012 [%- USE date -%]
1013 [%- SET user = target.0.xact.usr -%]
1014 To: [%- params.recipient_email || user.email %]
1015 From: [%- params.sender_email || default_sender %]
1016 Subject: Payment Receipt
1017
1018 [% date.format -%]
1019 [%- SET xact_mp_hash = {} -%]
1020 [%- FOR mp IN target %][%# Template is hooked around payments, but let us make the receipt focused on transactions -%]
1021     [%- SET xact_id = mp.xact.id -%]
1022     [%- IF ! xact_mp_hash.defined( xact_id ) -%][%- xact_mp_hash.$xact_id = { 'xact' => mp.xact, 'payments' => [] } -%][%- END -%]
1023     [%- xact_mp_hash.$xact_id.payments.push(mp) -%]
1024 [%- END -%]
1025 [%- FOR xact_id IN xact_mp_hash.keys.sort -%]
1026     [%- SET xact = xact_mp_hash.$xact_id.xact %]
1027 Transaction ID: [% xact_id %]
1028     [% IF xact.circulation %][% helpers.get_copy_bib_basics(xact.circulation.target_copy).title %]
1029     [% ELSE %]Miscellaneous
1030     [% END %]
1031     Line item billings:
1032         [%- SET mb_type_hash = {} -%]
1033         [%- FOR mb IN xact.billings %][%# Group billings by their btype -%]
1034             [%- IF mb.voided == 'f' -%]
1035                 [%- SET mb_type = mb.btype.id -%]
1036                 [%- IF ! mb_type_hash.defined( mb_type ) -%][%- mb_type_hash.$mb_type = { 'sum' => 0.00, 'billings' => [] } -%][%- END -%]
1037                 [%- IF ! mb_type_hash.$mb_type.defined( 'first_ts' ) -%][%- mb_type_hash.$mb_type.first_ts = mb.billing_ts -%][%- END -%]
1038                 [%- mb_type_hash.$mb_type.last_ts = mb.billing_ts -%]
1039                 [%- mb_type_hash.$mb_type.sum = mb_type_hash.$mb_type.sum + mb.amount -%]
1040                 [%- mb_type_hash.$mb_type.billings.push( mb ) -%]
1041             [%- END -%]
1042         [%- END -%]
1043         [%- FOR mb_type IN mb_type_hash.keys.sort -%]
1044             [%- IF mb_type == 1 %][%-# Consolidated view of overdue billings -%]
1045                 $[% mb_type_hash.$mb_type.sum %] for [% mb_type_hash.$mb_type.billings.0.btype.name %]
1046                     on [% mb_type_hash.$mb_type.first_ts %] through [% mb_type_hash.$mb_type.last_ts %]
1047             [%- ELSE -%][%# all other billings show individually %]
1048                 [% FOR mb IN mb_type_hash.$mb_type.billings %]
1049                     $[% mb.amount %] for [% mb.btype.name %] on [% mb.billing_ts %] [% mb.note %]
1050                 [% END %]
1051             [% END %]
1052         [% END %]
1053     Line item payments:
1054         [% FOR mp IN xact_mp_hash.$xact_id.payments %]
1055             Payment ID: [% mp.id %]
1056                 Paid [% mp.amount %] via [% SWITCH mp.payment_type -%]
1057                     [% CASE "cash_payment" %]cash
1058                     [% CASE "check_payment" %]check
1059                     [% CASE "credit_card_payment" %]credit card
1060                     [%- IF mp.credit_card_payment.cc_number %] ([% mp.credit_card_payment.cc_number %])[% END %]
1061                     [% CASE "credit_payment" %]credit
1062                     [% CASE "forgive_payment" %]forgiveness
1063                     [% CASE "goods_payment" %]goods
1064                     [% CASE "work_payment" %]work
1065                 [%- END %] on [% mp.payment_ts %] [% mp.note %]
1066         [% END %]
1067 [% END %]
1068 $$
1069
1070 WHERE id = 29 AND template =
1071
1072 $$
1073 [%- USE date -%]
1074 [%- SET user = target.0.xact.usr -%]
1075 To: [%- params.recipient_email || user.email %]
1076 From: [%- params.sender_email || default_sender %]
1077 Subject: Payment Receipt
1078
1079 [% date.format -%]
1080 [%- SET xact_mp_hash = {} -%]
1081 [%- FOR mp IN target %][%# Template is hooked around payments, but let us make the receipt focused on transactions -%]
1082     [%- SET xact_id = mp.xact.id -%]
1083     [%- IF ! xact_mp_hash.defined( xact_id ) -%][%- xact_mp_hash.$xact_id = { 'xact' => mp.xact, 'payments' => [] } -%][%- END -%]
1084     [%- xact_mp_hash.$xact_id.payments.push(mp) -%]
1085 [%- END -%]
1086 [%- FOR xact_id IN xact_mp_hash.keys.sort -%]
1087     [%- SET xact = xact_mp_hash.$xact_id.xact %]
1088 Transaction ID: [% xact_id %]
1089     [% IF xact.circulation %][% helpers.get_copy_bib_basics(xact.circulation.target_copy).title %]
1090     [% ELSE %]Miscellaneous
1091     [% END %]
1092     Line item billings:
1093         [%- SET mb_type_hash = {} -%]
1094         [%- FOR mb IN xact.billings %][%# Group billings by their btype -%]
1095             [%- IF mb.voided == 'f' -%]
1096                 [%- SET mb_type = mb.btype.id -%]
1097                 [%- IF ! mb_type_hash.defined( mb_type ) -%][%- mb_type_hash.$mb_type = { 'sum' => 0.00, 'billings' => [] } -%][%- END -%]
1098                 [%- IF ! mb_type_hash.$mb_type.defined( 'first_ts' ) -%][%- mb_type_hash.$mb_type.first_ts = mb.billing_ts -%][%- END -%]
1099                 [%- mb_type_hash.$mb_type.last_ts = mb.billing_ts -%]
1100                 [%- mb_type_hash.$mb_type.sum = mb_type_hash.$mb_type.sum + mb.amount -%]
1101                 [%- mb_type_hash.$mb_type.billings.push( mb ) -%]
1102             [%- END -%]
1103         [%- END -%]
1104         [%- FOR mb_type IN mb_type_hash.keys.sort -%]
1105             [%- IF mb_type == 1 %][%-# Consolidated view of overdue billings -%]
1106                 $[% mb_type_hash.$mb_type.sum %] for [% mb_type_hash.$mb_type.billings.0.btype.name %]
1107                     on [% mb_type_hash.$mb_type.first_ts %] through [% mb_type_hash.$mb_type.last_ts %]
1108             [%- ELSE -%][%# all other billings show individually %]
1109                 [% FOR mb IN mb_type_hash.$mb_type.billings %]
1110                     $[% mb.amount %] for [% mb.btype.name %] on [% mb.billing_ts %] [% mb.note %]
1111                 [% END %]
1112             [% END %]
1113         [% END %]
1114     Line item payments:
1115         [% FOR mp IN xact_mp_hash.$xact_id.payments %]
1116             Payment ID: [% mp.id %]
1117                 Paid [% mp.amount %] via [% SWITCH mp.payment_type -%]
1118                     [% CASE "cash_payment" %]cash
1119                     [% CASE "check_payment" %]check
1120                     [% CASE "credit_card_payment" %]credit card (
1121                         [%- SET cc_chunks = mp.credit_card_payment.cc_number.replace(' ','').chunk(4); -%]
1122                         [%- cc_chunks.slice(0, -1+cc_chunks.max).join.replace('\S','X') -%]
1123                         [% cc_chunks.last -%]
1124                         exp [% mp.credit_card_payment.expire_month %]/[% mp.credit_card_payment.expire_year -%]
1125                     )
1126                     [% CASE "credit_payment" %]credit
1127                     [% CASE "forgive_payment" %]forgiveness
1128                     [% CASE "goods_payment" %]goods
1129                     [% CASE "work_payment" %]work
1130                 [%- END %] on [% mp.payment_ts %] [% mp.note %]
1131         [% END %]
1132 [% END %]
1133 $$;
1134
1135
1136 UPDATE action_trigger.event_definition SET template =
1137 $$
1138 [%- USE date -%][%- SET user = target.0.xact.usr -%]
1139 <div style="li { padding: 8px; margin 5px; }">
1140     <div>[% date.format %]</div><br/>
1141     <ol>
1142     [% SET xact_mp_hash = {} %]
1143     [% FOR mp IN target %][%# Template is hooked around payments, but let us make the receipt focused on transactions %]
1144         [% SET xact_id = mp.xact.id %]
1145         [% IF ! xact_mp_hash.defined( xact_id ) %][% xact_mp_hash.$xact_id = { 'xact' => mp.xact, 'payments' => [] } %][% END %]
1146         [% xact_mp_hash.$xact_id.payments.push(mp) %]
1147     [% END %]
1148     [% FOR xact_id IN xact_mp_hash.keys.sort %]
1149         [% SET xact = xact_mp_hash.$xact_id.xact %]
1150         <li>Transaction ID: [% xact_id %]
1151             [% IF xact.circulation %][% helpers.get_copy_bib_basics(xact.circulation.target_copy).title %]
1152             [% ELSE %]Miscellaneous
1153             [% END %]
1154             Line item billings:<ol>
1155                 [% SET mb_type_hash = {} %]
1156                 [% FOR mb IN xact.billings %][%# Group billings by their btype %]
1157                     [% IF mb.voided == 'f' %]
1158                         [% SET mb_type = mb.btype.id %]
1159                         [% IF ! mb_type_hash.defined( mb_type ) %][% mb_type_hash.$mb_type = { 'sum' => 0.00, 'billings' => [] } %][% END %]
1160                         [% IF ! mb_type_hash.$mb_type.defined( 'first_ts' ) %][% mb_type_hash.$mb_type.first_ts = mb.billing_ts %][% END %]
1161                         [% mb_type_hash.$mb_type.last_ts = mb.billing_ts %]
1162                         [% mb_type_hash.$mb_type.sum = mb_type_hash.$mb_type.sum + mb.amount %]
1163                         [% mb_type_hash.$mb_type.billings.push( mb ) %]
1164                     [% END %]
1165                 [% END %]
1166                 [% FOR mb_type IN mb_type_hash.keys.sort %]
1167                     <li>[% IF mb_type == 1 %][%# Consolidated view of overdue billings %]
1168                         $[% mb_type_hash.$mb_type.sum %] for [% mb_type_hash.$mb_type.billings.0.btype.name %]
1169                             on [% mb_type_hash.$mb_type.first_ts %] through [% mb_type_hash.$mb_type.last_ts %]
1170                     [% ELSE %][%# all other billings show individually %]
1171                         [% FOR mb IN mb_type_hash.$mb_type.billings %]
1172                             $[% mb.amount %] for [% mb.btype.name %] on [% mb.billing_ts %] [% mb.note %]
1173                         [% END %]
1174                     [% END %]</li>
1175                 [% END %]
1176             </ol>
1177             Line item payments:<ol>
1178                 [% FOR mp IN xact_mp_hash.$xact_id.payments %]
1179                     <li>Payment ID: [% mp.id %]
1180                         Paid [% mp.amount %] via [% SWITCH mp.payment_type -%]
1181                             [% CASE "cash_payment" %]cash
1182                             [% CASE "check_payment" %]check
1183                             [% CASE "credit_card_payment" %]credit card
1184                             [%- IF mp.credit_card_payment.cc_number %] ([% mp.credit_card_payment.cc_number %])[% END %]
1185                             [% CASE "credit_payment" %]credit
1186                             [% CASE "forgive_payment" %]forgiveness
1187                             [% CASE "goods_payment" %]goods
1188                             [% CASE "work_payment" %]work
1189                         [%- END %] on [% mp.payment_ts %] [% mp.note %]
1190                     </li>
1191                 [% END %]
1192             </ol>
1193         </li>
1194     [% END %]
1195     </ol>
1196 </div>
1197 $$
1198
1199 WHERE id = 30 AND template =
1200
1201 $$
1202 [%- USE date -%][%- SET user = target.0.xact.usr -%]
1203 <div style="li { padding: 8px; margin 5px; }">
1204     <div>[% date.format %]</div><br/>
1205     <ol>
1206     [% SET xact_mp_hash = {} %]
1207     [% FOR mp IN target %][%# Template is hooked around payments, but let us make the receipt focused on transactions %]
1208         [% SET xact_id = mp.xact.id %]
1209         [% IF ! xact_mp_hash.defined( xact_id ) %][% xact_mp_hash.$xact_id = { 'xact' => mp.xact, 'payments' => [] } %][% END %]
1210         [% xact_mp_hash.$xact_id.payments.push(mp) %]
1211     [% END %]
1212     [% FOR xact_id IN xact_mp_hash.keys.sort %]
1213         [% SET xact = xact_mp_hash.$xact_id.xact %]
1214         <li>Transaction ID: [% xact_id %]
1215             [% IF xact.circulation %][% helpers.get_copy_bib_basics(xact.circulation.target_copy).title %]
1216             [% ELSE %]Miscellaneous
1217             [% END %]
1218             Line item billings:<ol>
1219                 [% SET mb_type_hash = {} %]
1220                 [% FOR mb IN xact.billings %][%# Group billings by their btype %]
1221                     [% IF mb.voided == 'f' %]
1222                         [% SET mb_type = mb.btype.id %]
1223                         [% IF ! mb_type_hash.defined( mb_type ) %][% mb_type_hash.$mb_type = { 'sum' => 0.00, 'billings' => [] } %][% END %]
1224                         [% IF ! mb_type_hash.$mb_type.defined( 'first_ts' ) %][% mb_type_hash.$mb_type.first_ts = mb.billing_ts %][% END %]
1225                         [% mb_type_hash.$mb_type.last_ts = mb.billing_ts %]
1226                         [% mb_type_hash.$mb_type.sum = mb_type_hash.$mb_type.sum + mb.amount %]
1227                         [% mb_type_hash.$mb_type.billings.push( mb ) %]
1228                     [% END %]
1229                 [% END %]
1230                 [% FOR mb_type IN mb_type_hash.keys.sort %]
1231                     <li>[% IF mb_type == 1 %][%# Consolidated view of overdue billings %]
1232                         $[% mb_type_hash.$mb_type.sum %] for [% mb_type_hash.$mb_type.billings.0.btype.name %]
1233                             on [% mb_type_hash.$mb_type.first_ts %] through [% mb_type_hash.$mb_type.last_ts %]
1234                     [% ELSE %][%# all other billings show individually %]
1235                         [% FOR mb IN mb_type_hash.$mb_type.billings %]
1236                             $[% mb.amount %] for [% mb.btype.name %] on [% mb.billing_ts %] [% mb.note %]
1237                         [% END %]
1238                     [% END %]</li>
1239                 [% END %]
1240             </ol>
1241             Line item payments:<ol>
1242                 [% FOR mp IN xact_mp_hash.$xact_id.payments %]
1243                     <li>Payment ID: [% mp.id %]
1244                         Paid [% mp.amount %] via [% SWITCH mp.payment_type -%]
1245                             [% CASE "cash_payment" %]cash
1246                             [% CASE "check_payment" %]check
1247                             [% CASE "credit_card_payment" %]credit card (
1248                                 [%- SET cc_chunks = mp.credit_card_payment.cc_number.replace(' ','').chunk(4); -%]
1249                                 [%- cc_chunks.slice(0, -1+cc_chunks.max).join.replace('\S','X') -%]
1250                                 [% cc_chunks.last -%]
1251                                 exp [% mp.credit_card_payment.expire_month %]/[% mp.credit_card_payment.expire_year -%]
1252                             )
1253                             [% CASE "credit_payment" %]credit
1254                             [% CASE "forgive_payment" %]forgiveness
1255                             [% CASE "goods_payment" %]goods
1256                             [% CASE "work_payment" %]work
1257                         [%- END %] on [% mp.payment_ts %] [% mp.note %]
1258                     </li>
1259                 [% END %]
1260             </ol>
1261         </li>
1262     [% END %]
1263     </ol>
1264 </div>
1265 $$;
1266
1267
1268 SELECT evergreen.upgrade_deps_block_check('0958', :eg_version);
1269
1270 CREATE OR REPLACE FUNCTION search.facets_for_record_set(ignore_facet_classes TEXT[], hits BIGINT[]) RETURNS TABLE (id INT, value TEXT, count BIGINT) AS $$
1271     SELECT id, value, count FROM (
1272         SELECT mfae.field AS id,
1273                mfae.value,
1274                COUNT(DISTINCT mmrsm.source),
1275                row_number() OVER (
1276                 PARTITION BY mfae.field ORDER BY COUNT(distinct mmrsm.source) DESC
1277                ) AS rownum
1278         FROM metabib.facet_entry mfae
1279         JOIN metabib.metarecord_source_map mmrsm ON (mfae.source = mmrsm.source)
1280         JOIN config.metabib_field cmf ON (cmf.id = mfae.field)
1281         WHERE mmrsm.source IN (SELECT * FROM unnest($2))
1282         AND cmf.facet_field
1283         AND cmf.field_class NOT IN (SELECT * FROM unnest($1))
1284         GROUP by 1, 2
1285     ) all_facets
1286     WHERE rownum <= (SELECT COALESCE((SELECT value::INT FROM config.global_flag WHERE name = 'search.max_facets_per_field' AND enabled), 1000));
1287 $$ LANGUAGE SQL;
1288
1289 CREATE OR REPLACE FUNCTION search.facets_for_metarecord_set(ignore_facet_classes TEXT[], hits BIGINT[]) RETURNS TABLE (id INT, value TEXT, count BIGINT) AS $$
1290     SELECT id, value, count FROM (
1291         SELECT mfae.field AS id,
1292                mfae.value,
1293                COUNT(DISTINCT mmrsm.metarecord),
1294                row_number() OVER (
1295                 PARTITION BY mfae.field ORDER BY COUNT(distinct mmrsm.metarecord) DESC
1296                ) AS rownum
1297         FROM metabib.facet_entry mfae
1298         JOIN metabib.metarecord_source_map mmrsm ON (mfae.source = mmrsm.source)
1299         JOIN config.metabib_field cmf ON (cmf.id = mfae.field)
1300         WHERE mmrsm.metarecord IN (SELECT * FROM unnest($2))
1301         AND cmf.facet_field
1302         AND cmf.field_class NOT IN (SELECT * FROM unnest($1))
1303         GROUP by 1, 2
1304     ) all_facets
1305     WHERE rownum <= (SELECT COALESCE((SELECT value::INT FROM config.global_flag WHERE name = 'search.max_facets_per_field' AND enabled), 1000));
1306 $$ LANGUAGE SQL;
1307
1308 INSERT INTO config.global_flag (name, value, label, enabled)
1309     VALUES (
1310         'search.max_facets_per_field',
1311         '1000',
1312         oils_i18n_gettext(
1313             'search.max_facets_per_field',
1314             'Search: maximum number of facet values to retrieve for each facet field',
1315             'cgf',
1316             'label'
1317         ),
1318         TRUE
1319     );
1320
1321 SELECT evergreen.upgrade_deps_block_check('0960', :eg_version);
1322
1323 CREATE TABLE action.usr_circ_history (
1324     id           BIGSERIAL PRIMARY KEY,
1325     usr          INTEGER NOT NULL REFERENCES actor.usr(id)
1326                  DEFERRABLE INITIALLY DEFERRED,
1327     xact_start   TIMESTAMP WITH TIME ZONE NOT NULL DEFAULT NOW(),
1328     target_copy  BIGINT NOT NULL REFERENCES asset.copy(id)
1329                  DEFERRABLE INITIALLY DEFERRED,
1330     due_date     TIMESTAMP WITH TIME ZONE NOT NULL,
1331     checkin_time TIMESTAMP WITH TIME ZONE,
1332     source_circ  BIGINT REFERENCES action.circulation(id)
1333                  ON DELETE SET NULL DEFERRABLE INITIALLY DEFERRED
1334 );
1335
1336 CREATE OR REPLACE FUNCTION action.maintain_usr_circ_history()
1337     RETURNS TRIGGER AS $FUNK$
1338 DECLARE
1339     cur_circ  BIGINT;
1340     first_circ BIGINT;
1341 BEGIN
1342
1343     -- Any retention value signifies history is enabled.
1344     -- This assumes that clearing these values via external
1345     -- process deletes the action.usr_circ_history rows.
1346     -- TODO: replace these settings w/ a single bool setting?
1347     PERFORM 1 FROM actor.usr_setting
1348         WHERE usr = NEW.usr AND value IS NOT NULL AND name IN (
1349             'history.circ.retention_age',
1350             'history.circ.retention_start'
1351         );
1352
1353     IF NOT FOUND THEN
1354         RETURN NEW;
1355     END IF;
1356
1357     IF TG_OP = 'INSERT' AND NEW.parent_circ IS NULL THEN
1358         -- Starting a new circulation.  Insert the history row.
1359         INSERT INTO action.usr_circ_history
1360             (usr, xact_start, target_copy, due_date, source_circ)
1361         VALUES (
1362             NEW.usr,
1363             NEW.xact_start,
1364             NEW.target_copy,
1365             NEW.due_date,
1366             NEW.id
1367         );
1368
1369         RETURN NEW;
1370     END IF;
1371
1372     -- find the first and last circs in the circ chain
1373     -- for the currently modified circ.
1374     FOR cur_circ IN SELECT id FROM action.circ_chain(NEW.id) LOOP
1375         IF first_circ IS NULL THEN
1376             first_circ := cur_circ;
1377             CONTINUE;
1378         END IF;
1379         -- Allow the loop to continue so that at as the loop
1380         -- completes cur_circ points to the final circulation.
1381     END LOOP;
1382
1383     IF NEW.id <> cur_circ THEN
1384         -- Modifying an intermediate circ.  Ignore it.
1385         RETURN NEW;
1386     END IF;
1387
1388     -- Update the due_date/checkin_time on the history row if the current
1389     -- circ is the last circ in the chain and an update is warranted.
1390
1391     UPDATE action.usr_circ_history
1392         SET
1393             due_date = NEW.due_date,
1394             checkin_time = NEW.checkin_time
1395         WHERE
1396             source_circ = first_circ
1397             AND (
1398                 due_date <> NEW.due_date OR (
1399                     (checkin_time IS NULL AND NEW.checkin_time IS NOT NULL) OR
1400                     (checkin_time IS NOT NULL AND NEW.checkin_time IS NULL) OR
1401                     (checkin_time <> NEW.checkin_time)
1402                 )
1403             );
1404     RETURN NEW;
1405 END;
1406 $FUNK$ LANGUAGE PLPGSQL;
1407
1408 CREATE TRIGGER maintain_usr_circ_history_tgr
1409     AFTER INSERT OR UPDATE ON action.circulation
1410     FOR EACH ROW EXECUTE PROCEDURE action.maintain_usr_circ_history();
1411
1412 UPDATE action_trigger.hook
1413     SET core_type = 'auch'
1414     WHERE key ~ '^circ.format.history.';
1415
1416 UPDATE action_trigger.event_definition SET template =
1417 $$
1418 [%- USE date -%]
1419 [%- SET user = target.0.usr -%]
1420 To: [%- params.recipient_email || user.email %]
1421 From: [%- params.sender_email || default_sender %]
1422 Subject: Circulation History
1423
1424     [% FOR circ IN target %]
1425             [% helpers.get_copy_bib_basics(circ.target_copy.id).title %]
1426             Barcode: [% circ.target_copy.barcode %]
1427             Checked Out: [% date.format(helpers.format_date(circ.xact_start), '%Y-%m-%d') %]
1428             Due Date: [% date.format(helpers.format_date(circ.due_date), '%Y-%m-%d') %]
1429             Returned: [%
1430                 date.format(
1431                     helpers.format_date(circ.checkin_time), '%Y-%m-%d')
1432                     IF circ.checkin_time;
1433             %]
1434     [% END %]
1435 $$
1436 WHERE id = 25 AND template =
1437 $$
1438 [%- USE date -%]
1439 [%- SET user = target.0.usr -%]
1440 To: [%- params.recipient_email || user.email %]
1441 From: [%- params.sender_email || default_sender %]
1442 Subject: Circulation History
1443
1444     [% FOR circ IN target %]
1445             [% helpers.get_copy_bib_basics(circ.target_copy.id).title %]
1446             Barcode: [% circ.target_copy.barcode %]
1447             Checked Out: [% date.format(helpers.format_date(circ.xact_start), '%Y-%m-%d') %]
1448             Due Date: [% date.format(helpers.format_date(circ.due_date), '%Y-%m-%d') %]
1449             Returned: [% date.format(helpers.format_date(circ.checkin_time), '%Y-%m-%d') %]
1450     [% END %]
1451 $$;
1452
1453 -- avoid TT undef date errors
1454 UPDATE action_trigger.event_definition SET template =
1455 $$
1456 [%- USE date -%]
1457 <div>
1458     <style> li { padding: 8px; margin 5px; }</style>
1459     <div>[% date.format %]</div>
1460     <br/>
1461
1462     [% user.family_name %], [% user.first_given_name %]
1463     <ol>
1464     [% FOR circ IN target %]
1465         <li>
1466             <div>[% helpers.get_copy_bib_basics(circ.target_copy.id).title %]</div>
1467             <div>Barcode: [% circ.target_copy.barcode %]</div>
1468             <div>Checked Out: [% date.format(helpers.format_date(circ.xact_start), '%Y-%m-%d') %]</div>
1469             <div>Due Date: [% date.format(helpers.format_date(circ.due_date), '%Y-%m-%d') %]</div>
1470             <div>Returned: [%
1471                 date.format(
1472                     helpers.format_date(circ.checkin_time), '%Y-%m-%d')
1473                     IF circ.checkin_time; -%]
1474             </div>
1475         </li>
1476     [% END %]
1477     </ol>
1478 </div>
1479 $$
1480 WHERE id = 26 AND template = -- only replace template if it matches stock
1481 $$
1482 [%- USE date -%]
1483 <div>
1484     <style> li { padding: 8px; margin 5px; }</style>
1485     <div>[% date.format %]</div>
1486     <br/>
1487
1488     [% user.family_name %], [% user.first_given_name %]
1489     <ol>
1490     [% FOR circ IN target %]
1491         <li>
1492             <div>[% helpers.get_copy_bib_basics(circ.target_copy.id).title %]</div>
1493             <div>Barcode: [% circ.target_copy.barcode %]</div>
1494             <div>Checked Out: [% date.format(helpers.format_date(circ.xact_start), '%Y-%m-%d') %]</div>
1495             <div>Due Date: [% date.format(helpers.format_date(circ.due_date), '%Y-%m-%d') %]</div>
1496             <div>Returned: [% date.format(helpers.format_date(circ.checkin_time), '%Y-%m-%d') %]</div>
1497         </li>
1498     [% END %]
1499     </ol>
1500 </div>
1501 $$;
1502
1503 -- NOTE: ^-- stock CSV template does not include checkin_time, so
1504 -- no modifications are required.
1505
1506 -- Create circ history rows for existing circ history data.
1507 DO $FUNK$
1508 DECLARE
1509     cur_usr   INTEGER;
1510     cur_circ  action.circulation%ROWTYPE;
1511     last_circ action.circulation%ROWTYPE;
1512     counter   INTEGER DEFAULT 1;
1513 BEGIN
1514
1515     RAISE NOTICE
1516         'Migrating circ history for % users.  This might take a while...',
1517         (SELECT COUNT(DISTINCT(au.id)) FROM actor.usr au
1518             JOIN actor.usr_setting aus ON (aus.usr = au.id)
1519             WHERE NOT au.deleted AND
1520                 aus.name ~ '^history.circ.retention_');
1521
1522     FOR cur_usr IN
1523         SELECT DISTINCT(au.id)
1524             FROM actor.usr au
1525             JOIN actor.usr_setting aus ON (aus.usr = au.id)
1526             WHERE NOT au.deleted AND
1527                 aus.name ~ '^history.circ.retention_' LOOP
1528
1529         FOR cur_circ IN SELECT * FROM action.usr_visible_circs(cur_usr) LOOP
1530
1531             -- Find the last circ in the circ chain.
1532             SELECT INTO last_circ *
1533                 FROM action.circ_chain(cur_circ.id)
1534                 ORDER BY xact_start DESC LIMIT 1;
1535
1536             -- Create the history row.
1537             -- It's OK if last_circ = cur_circ
1538             INSERT INTO action.usr_circ_history
1539                 (usr, xact_start, target_copy,
1540                     due_date, checkin_time, source_circ)
1541             VALUES (
1542                 cur_circ.usr,
1543                 cur_circ.xact_start,
1544                 cur_circ.target_copy,
1545                 last_circ.due_date,
1546                 last_circ.checkin_time,
1547                 cur_circ.id
1548             );
1549
1550             -- useful for alleviating administrator anxiety.
1551             IF counter % 10000 = 0 THEN
1552                 RAISE NOTICE 'Migrated history for % total users', counter;
1553             END IF;
1554
1555             counter := counter + 1;
1556
1557         END LOOP;
1558     END LOOP;
1559
1560 END $FUNK$;
1561
1562 DROP FUNCTION IF EXISTS action.usr_visible_circs (INTEGER);
1563 DROP FUNCTION IF EXISTS action.usr_visible_circ_copies (INTEGER);
1564
1565 -- remove user retention age checks
1566 CREATE OR REPLACE FUNCTION action.purge_circulations () RETURNS INT AS $func$
1567 DECLARE
1568     org_keep_age    INTERVAL;
1569     org_use_last    BOOL = false;
1570     org_age_is_min  BOOL = false;
1571     org_keep_count  INT;
1572
1573     keep_age        INTERVAL;
1574
1575     target_acp      RECORD;
1576     circ_chain_head action.circulation%ROWTYPE;
1577     circ_chain_tail action.circulation%ROWTYPE;
1578
1579     count_purged    INT;
1580     num_incomplete  INT;
1581
1582     last_finished   TIMESTAMP WITH TIME ZONE;
1583 BEGIN
1584
1585     count_purged := 0;
1586
1587     SELECT value::INTERVAL INTO org_keep_age FROM config.global_flag WHERE name = 'history.circ.retention_age' AND enabled;
1588
1589     SELECT value::INT INTO org_keep_count FROM config.global_flag WHERE name = 'history.circ.retention_count' AND enabled;
1590     IF org_keep_count IS NULL THEN
1591         RETURN count_purged; -- Gimme a count to keep, or I keep them all, forever
1592     END IF;
1593
1594     SELECT enabled INTO org_use_last FROM config.global_flag WHERE name = 'history.circ.retention_uses_last_finished';
1595     SELECT enabled INTO org_age_is_min FROM config.global_flag WHERE name = 'history.circ.retention_age_is_min';
1596
1597     -- First, find copies with more than keep_count non-renewal circs
1598     FOR target_acp IN
1599         SELECT  target_copy,
1600                 COUNT(*) AS total_real_circs
1601           FROM  action.circulation
1602           WHERE parent_circ IS NULL
1603                 AND xact_finish IS NOT NULL
1604           GROUP BY target_copy
1605           HAVING COUNT(*) > org_keep_count
1606     LOOP
1607         -- And, for those, select circs that are finished and older than keep_age
1608         FOR circ_chain_head IN
1609             -- For reference, the subquery uses a window function to order the circs newest to oldest and number them
1610             -- The outer query then uses that information to skip the most recent set the library wants to keep
1611             -- End result is we don't care what order they come out in, as they are all potentials for deletion.
1612             SELECT ac.* FROM action.circulation ac JOIN (
1613               SELECT  rank() OVER (ORDER BY xact_start DESC), ac.id
1614                 FROM  action.circulation ac
1615                 WHERE ac.target_copy = target_acp.target_copy
1616                   AND ac.parent_circ IS NULL
1617                 ORDER BY ac.xact_start ) ranked USING (id)
1618                 WHERE ranked.rank > org_keep_count
1619         LOOP
1620
1621             SELECT * INTO circ_chain_tail FROM action.circ_chain(circ_chain_head.id) ORDER BY xact_start DESC LIMIT 1;
1622             SELECT COUNT(CASE WHEN xact_finish IS NULL THEN 1 ELSE NULL END), MAX(xact_finish) INTO num_incomplete, last_finished FROM action.circ_chain(circ_chain_head.id);
1623             CONTINUE WHEN circ_chain_tail.xact_finish IS NULL OR num_incomplete > 0;
1624
1625             IF NOT org_use_last THEN
1626                 last_finished := circ_chain_tail.xact_finish;
1627             END IF;
1628
1629             keep_age := COALESCE( org_keep_age, '2000 years'::INTERVAL );
1630
1631             IF org_age_is_min THEN
1632                 keep_age := GREATEST( keep_age, org_keep_age );
1633             END IF;
1634
1635             CONTINUE WHEN AGE(NOW(), last_finished) < keep_age;
1636
1637             -- We've passed the purging tests, purge the circ chain starting at the end
1638             -- A trigger should auto-purge the rest of the chain.
1639             DELETE FROM action.circulation WHERE id = circ_chain_tail.id;
1640
1641             count_purged := count_purged + 1;
1642
1643         END LOOP;
1644     END LOOP;
1645
1646     return count_purged;
1647 END;
1648 $func$ LANGUAGE PLPGSQL;
1649
1650 -- delete circ history rows when a user is purged.
1651 CREATE OR REPLACE FUNCTION actor.usr_purge_data(
1652         src_usr  IN INTEGER,
1653         specified_dest_usr IN INTEGER
1654 ) RETURNS VOID AS $$
1655 DECLARE
1656         suffix TEXT;
1657         renamable_row RECORD;
1658         dest_usr INTEGER;
1659 BEGIN
1660
1661         IF specified_dest_usr IS NULL THEN
1662                 dest_usr := 1; -- Admin user on stock installs
1663         ELSE
1664                 dest_usr := specified_dest_usr;
1665         END IF;
1666
1667         -- acq.*
1668         UPDATE acq.fund_allocation SET allocator = dest_usr WHERE allocator = src_usr;
1669         UPDATE acq.lineitem SET creator = dest_usr WHERE creator = src_usr;
1670         UPDATE acq.lineitem SET editor = dest_usr WHERE editor = src_usr;
1671         UPDATE acq.lineitem SET selector = dest_usr WHERE selector = src_usr;
1672         UPDATE acq.lineitem_note SET creator = dest_usr WHERE creator = src_usr;
1673         UPDATE acq.lineitem_note SET editor = dest_usr WHERE editor = src_usr;
1674         DELETE FROM acq.lineitem_usr_attr_definition WHERE usr = src_usr;
1675
1676         -- Update with a rename to avoid collisions
1677         FOR renamable_row in
1678                 SELECT id, name
1679                 FROM   acq.picklist
1680                 WHERE  owner = src_usr
1681         LOOP
1682                 suffix := ' (' || src_usr || ')';
1683                 LOOP
1684                         BEGIN
1685                                 UPDATE  acq.picklist
1686                                 SET     owner = dest_usr, name = name || suffix
1687                                 WHERE   id = renamable_row.id;
1688                         EXCEPTION WHEN unique_violation THEN
1689                                 suffix := suffix || ' ';
1690                                 CONTINUE;
1691                         END;
1692                         EXIT;
1693                 END LOOP;
1694         END LOOP;
1695
1696         UPDATE acq.picklist SET creator = dest_usr WHERE creator = src_usr;
1697         UPDATE acq.picklist SET editor = dest_usr WHERE editor = src_usr;
1698         UPDATE acq.po_note SET creator = dest_usr WHERE creator = src_usr;
1699         UPDATE acq.po_note SET editor = dest_usr WHERE editor = src_usr;
1700         UPDATE acq.purchase_order SET owner = dest_usr WHERE owner = src_usr;
1701         UPDATE acq.purchase_order SET creator = dest_usr WHERE creator = src_usr;
1702         UPDATE acq.purchase_order SET editor = dest_usr WHERE editor = src_usr;
1703         UPDATE acq.claim_event SET creator = dest_usr WHERE creator = src_usr;
1704
1705         -- action.*
1706         DELETE FROM action.circulation WHERE usr = src_usr;
1707         UPDATE action.circulation SET circ_staff = dest_usr WHERE circ_staff = src_usr;
1708         UPDATE action.circulation SET checkin_staff = dest_usr WHERE checkin_staff = src_usr;
1709         UPDATE action.hold_notification SET notify_staff = dest_usr WHERE notify_staff = src_usr;
1710         UPDATE action.hold_request SET fulfillment_staff = dest_usr WHERE fulfillment_staff = src_usr;
1711         UPDATE action.hold_request SET requestor = dest_usr WHERE requestor = src_usr;
1712         DELETE FROM action.hold_request WHERE usr = src_usr;
1713         UPDATE action.in_house_use SET staff = dest_usr WHERE staff = src_usr;
1714         UPDATE action.non_cat_in_house_use SET staff = dest_usr WHERE staff = src_usr;
1715         DELETE FROM action.non_cataloged_circulation WHERE patron = src_usr;
1716         UPDATE action.non_cataloged_circulation SET staff = dest_usr WHERE staff = src_usr;
1717         DELETE FROM action.survey_response WHERE usr = src_usr;
1718         UPDATE action.fieldset SET owner = dest_usr WHERE owner = src_usr;
1719     DELETE FROM action.usr_circ_history WHERE usr = src_usr;
1720
1721         -- actor.*
1722         DELETE FROM actor.card WHERE usr = src_usr;
1723         DELETE FROM actor.stat_cat_entry_usr_map WHERE target_usr = src_usr;
1724
1725         -- The following update is intended to avoid transient violations of a foreign
1726         -- key constraint, whereby actor.usr_address references itself.  It may not be
1727         -- necessary, but it does no harm.
1728         UPDATE actor.usr_address SET replaces = NULL
1729                 WHERE usr = src_usr AND replaces IS NOT NULL;
1730         DELETE FROM actor.usr_address WHERE usr = src_usr;
1731         DELETE FROM actor.usr_note WHERE usr = src_usr;
1732         UPDATE actor.usr_note SET creator = dest_usr WHERE creator = src_usr;
1733         DELETE FROM actor.usr_org_unit_opt_in WHERE usr = src_usr;
1734         UPDATE actor.usr_org_unit_opt_in SET staff = dest_usr WHERE staff = src_usr;
1735         DELETE FROM actor.usr_setting WHERE usr = src_usr;
1736         DELETE FROM actor.usr_standing_penalty WHERE usr = src_usr;
1737         UPDATE actor.usr_standing_penalty SET staff = dest_usr WHERE staff = src_usr;
1738
1739         -- asset.*
1740         UPDATE asset.call_number SET creator = dest_usr WHERE creator = src_usr;
1741         UPDATE asset.call_number SET editor = dest_usr WHERE editor = src_usr;
1742         UPDATE asset.call_number_note SET creator = dest_usr WHERE creator = src_usr;
1743         UPDATE asset.copy SET creator = dest_usr WHERE creator = src_usr;
1744         UPDATE asset.copy SET editor = dest_usr WHERE editor = src_usr;
1745         UPDATE asset.copy_note SET creator = dest_usr WHERE creator = src_usr;
1746
1747         -- auditor.*
1748         DELETE FROM auditor.actor_usr_address_history WHERE id = src_usr;
1749         DELETE FROM auditor.actor_usr_history WHERE id = src_usr;
1750         UPDATE auditor.asset_call_number_history SET creator = dest_usr WHERE creator = src_usr;
1751         UPDATE auditor.asset_call_number_history SET editor  = dest_usr WHERE editor  = src_usr;
1752         UPDATE auditor.asset_copy_history SET creator = dest_usr WHERE creator = src_usr;
1753         UPDATE auditor.asset_copy_history SET editor  = dest_usr WHERE editor  = src_usr;
1754         UPDATE auditor.biblio_record_entry_history SET creator = dest_usr WHERE creator = src_usr;
1755         UPDATE auditor.biblio_record_entry_history SET editor  = dest_usr WHERE editor  = src_usr;
1756
1757         -- biblio.*
1758         UPDATE biblio.record_entry SET creator = dest_usr WHERE creator = src_usr;
1759         UPDATE biblio.record_entry SET editor = dest_usr WHERE editor = src_usr;
1760         UPDATE biblio.record_note SET creator = dest_usr WHERE creator = src_usr;
1761         UPDATE biblio.record_note SET editor = dest_usr WHERE editor = src_usr;
1762
1763         -- container.*
1764         -- Update buckets with a rename to avoid collisions
1765         FOR renamable_row in
1766                 SELECT id, name
1767                 FROM   container.biblio_record_entry_bucket
1768                 WHERE  owner = src_usr
1769         LOOP
1770                 suffix := ' (' || src_usr || ')';
1771                 LOOP
1772                         BEGIN
1773                                 UPDATE  container.biblio_record_entry_bucket
1774                                 SET     owner = dest_usr, name = name || suffix
1775                                 WHERE   id = renamable_row.id;
1776                         EXCEPTION WHEN unique_violation THEN
1777                                 suffix := suffix || ' ';
1778                                 CONTINUE;
1779                         END;
1780                         EXIT;
1781                 END LOOP;
1782         END LOOP;
1783
1784         FOR renamable_row in
1785                 SELECT id, name
1786                 FROM   container.call_number_bucket
1787                 WHERE  owner = src_usr
1788         LOOP
1789                 suffix := ' (' || src_usr || ')';
1790                 LOOP
1791                         BEGIN
1792                                 UPDATE  container.call_number_bucket
1793                                 SET     owner = dest_usr, name = name || suffix
1794                                 WHERE   id = renamable_row.id;
1795                         EXCEPTION WHEN unique_violation THEN
1796                                 suffix := suffix || ' ';
1797                                 CONTINUE;
1798                         END;
1799                         EXIT;
1800                 END LOOP;
1801         END LOOP;
1802
1803         FOR renamable_row in
1804                 SELECT id, name
1805                 FROM   container.copy_bucket
1806                 WHERE  owner = src_usr
1807         LOOP
1808                 suffix := ' (' || src_usr || ')';
1809                 LOOP
1810                         BEGIN
1811                                 UPDATE  container.copy_bucket
1812                                 SET     owner = dest_usr, name = name || suffix
1813                                 WHERE   id = renamable_row.id;
1814                         EXCEPTION WHEN unique_violation THEN
1815                                 suffix := suffix || ' ';
1816                                 CONTINUE;
1817                         END;
1818                         EXIT;
1819                 END LOOP;
1820         END LOOP;
1821
1822         FOR renamable_row in
1823                 SELECT id, name
1824                 FROM   container.user_bucket
1825                 WHERE  owner = src_usr
1826         LOOP
1827                 suffix := ' (' || src_usr || ')';
1828                 LOOP
1829                         BEGIN
1830                                 UPDATE  container.user_bucket
1831                                 SET     owner = dest_usr, name = name || suffix
1832                                 WHERE   id = renamable_row.id;
1833                         EXCEPTION WHEN unique_violation THEN
1834                                 suffix := suffix || ' ';
1835                                 CONTINUE;
1836                         END;
1837                         EXIT;
1838                 END LOOP;
1839         END LOOP;
1840
1841         DELETE FROM container.user_bucket_item WHERE target_user = src_usr;
1842
1843         -- money.*
1844         DELETE FROM money.billable_xact WHERE usr = src_usr;
1845         DELETE FROM money.collections_tracker WHERE usr = src_usr;
1846         UPDATE money.collections_tracker SET collector = dest_usr WHERE collector = src_usr;
1847
1848         -- permission.*
1849         DELETE FROM permission.usr_grp_map WHERE usr = src_usr;
1850         DELETE FROM permission.usr_object_perm_map WHERE usr = src_usr;
1851         DELETE FROM permission.usr_perm_map WHERE usr = src_usr;
1852         DELETE FROM permission.usr_work_ou_map WHERE usr = src_usr;
1853
1854         -- reporter.*
1855         -- Update with a rename to avoid collisions
1856         BEGIN
1857                 FOR renamable_row in
1858                         SELECT id, name
1859                         FROM   reporter.output_folder
1860                         WHERE  owner = src_usr
1861                 LOOP
1862                         suffix := ' (' || src_usr || ')';
1863                         LOOP
1864                                 BEGIN
1865                                         UPDATE  reporter.output_folder
1866                                         SET     owner = dest_usr, name = name || suffix
1867                                         WHERE   id = renamable_row.id;
1868                                 EXCEPTION WHEN unique_violation THEN
1869                                         suffix := suffix || ' ';
1870                                         CONTINUE;
1871                                 END;
1872                                 EXIT;
1873                         END LOOP;
1874                 END LOOP;
1875         EXCEPTION WHEN undefined_table THEN
1876                 -- do nothing
1877         END;
1878
1879         BEGIN
1880                 UPDATE reporter.report SET owner = dest_usr WHERE owner = src_usr;
1881         EXCEPTION WHEN undefined_table THEN
1882                 -- do nothing
1883         END;
1884
1885         -- Update with a rename to avoid collisions
1886         BEGIN
1887                 FOR renamable_row in
1888                         SELECT id, name
1889                         FROM   reporter.report_folder
1890                         WHERE  owner = src_usr
1891                 LOOP
1892                         suffix := ' (' || src_usr || ')';
1893                         LOOP
1894                                 BEGIN
1895                                         UPDATE  reporter.report_folder
1896                                         SET     owner = dest_usr, name = name || suffix
1897                                         WHERE   id = renamable_row.id;
1898                                 EXCEPTION WHEN unique_violation THEN
1899                                         suffix := suffix || ' ';
1900                                         CONTINUE;
1901                                 END;
1902                                 EXIT;
1903                         END LOOP;
1904                 END LOOP;
1905         EXCEPTION WHEN undefined_table THEN
1906                 -- do nothing
1907         END;
1908
1909         BEGIN
1910                 UPDATE reporter.schedule SET runner = dest_usr WHERE runner = src_usr;
1911         EXCEPTION WHEN undefined_table THEN
1912                 -- do nothing
1913         END;
1914
1915         BEGIN
1916                 UPDATE reporter.template SET owner = dest_usr WHERE owner = src_usr;
1917         EXCEPTION WHEN undefined_table THEN
1918                 -- do nothing
1919         END;
1920
1921         -- Update with a rename to avoid collisions
1922         BEGIN
1923                 FOR renamable_row in
1924                         SELECT id, name
1925                         FROM   reporter.template_folder
1926                         WHERE  owner = src_usr
1927                 LOOP
1928                         suffix := ' (' || src_usr || ')';
1929                         LOOP
1930                                 BEGIN
1931                                         UPDATE  reporter.template_folder
1932                                         SET     owner = dest_usr, name = name || suffix
1933                                         WHERE   id = renamable_row.id;
1934                                 EXCEPTION WHEN unique_violation THEN
1935                                         suffix := suffix || ' ';
1936                                         CONTINUE;
1937                                 END;
1938                                 EXIT;
1939                         END LOOP;
1940                 END LOOP;
1941         EXCEPTION WHEN undefined_table THEN
1942         -- do nothing
1943         END;
1944
1945         -- vandelay.*
1946         -- Update with a rename to avoid collisions
1947         FOR renamable_row in
1948                 SELECT id, name
1949                 FROM   vandelay.queue
1950                 WHERE  owner = src_usr
1951         LOOP
1952                 suffix := ' (' || src_usr || ')';
1953                 LOOP
1954                         BEGIN
1955                                 UPDATE  vandelay.queue
1956                                 SET     owner = dest_usr, name = name || suffix
1957                                 WHERE   id = renamable_row.id;
1958                         EXCEPTION WHEN unique_violation THEN
1959                                 suffix := suffix || ' ';
1960                                 CONTINUE;
1961                         END;
1962                         EXIT;
1963                 END LOOP;
1964         END LOOP;
1965
1966     -- NULL-ify addresses last so other cleanup (e.g. circ anonymization)
1967     -- can access the information before deletion.
1968         UPDATE actor.usr SET
1969                 active = FALSE,
1970                 card = NULL,
1971                 mailing_address = NULL,
1972                 billing_address = NULL
1973         WHERE id = src_usr;
1974
1975 END;
1976 $$ LANGUAGE plpgsql;
1977
1978 SELECT evergreen.upgrade_deps_block_check('0961', :eg_version);
1979
1980 CREATE EXTENSION IF NOT EXISTS pgcrypto;
1981
1982 CREATE TABLE actor.passwd_type (
1983     code        TEXT PRIMARY KEY,
1984     name        TEXT UNIQUE NOT NULL,
1985     login       BOOLEAN NOT NULL DEFAULT FALSE,
1986     regex       TEXT,   -- pending
1987     crypt_algo  TEXT,   -- e.g. 'bf'
1988
1989     -- gen_salt() iter count used with each new salt.
1990     -- A non-NULL value for iter_count is our indication the
1991     -- password is salted and encrypted via crypt()
1992     iter_count  INTEGER CHECK (iter_count IS NULL OR iter_count > 0)
1993 );
1994
1995 CREATE TABLE actor.passwd (
1996     id          SERIAL PRIMARY KEY,
1997     usr         INTEGER NOT NULL REFERENCES actor.usr(id)
1998                 ON DELETE CASCADE DEFERRABLE INITIALLY DEFERRED,
1999     salt        TEXT, -- will be NULL for non-crypt'ed passwords
2000     passwd      TEXT NOT NULL,
2001     passwd_type TEXT NOT NULL REFERENCES actor.passwd_type(code)
2002                 DEFERRABLE INITIALLY DEFERRED,
2003     create_date TIMESTAMP WITH TIME ZONE NOT NULL DEFAULT NOW(),
2004     edit_date   TIMESTAMP WITH TIME ZONE NOT NULL DEFAULT NOW(),
2005     CONSTRAINT  passwd_type_once_per_user UNIQUE (usr, passwd_type)
2006 );
2007
2008 CREATE OR REPLACE FUNCTION actor.create_salt(pw_type TEXT)
2009     RETURNS TEXT AS $$
2010 DECLARE
2011     type_row actor.passwd_type%ROWTYPE;
2012 BEGIN
2013     /* Returns a new salt based on the passwd_type encryption settings.
2014      * Returns NULL If the password type is not crypt()'ed.
2015      */
2016
2017     SELECT INTO type_row * FROM actor.passwd_type WHERE code = pw_type;
2018
2019     IF NOT FOUND THEN
2020         RETURN EXCEPTION 'No such password type: %', pw_type;
2021     END IF;
2022
2023     IF type_row.iter_count IS NULL THEN
2024         -- This password type is unsalted.  That's OK.
2025         RETURN NULL;
2026     END IF;
2027
2028     RETURN gen_salt(type_row.crypt_algo, type_row.iter_count);
2029 END;
2030 $$ LANGUAGE PLPGSQL;
2031
2032
2033 /*
2034     TODO: when a user changes their password in the application, the
2035     app layer has access to the bare password.  At that point, we have
2036     the opportunity to store the new password without the MD5(MD5())
2037     intermediate hashing.  Do we care?  We would need a way to indicate
2038     which passwords have the legacy intermediate hashing and which don't
2039     so the app layer would know whether it should perform the intermediate
2040     hashing.  In either event, with the exception of migrate_passwd(), the
2041     DB functions know or care nothing about intermediate hashing.  Every
2042     password is just a value that may or may not be internally crypt'ed.
2043 */
2044
2045 CREATE OR REPLACE FUNCTION actor.set_passwd(
2046     pw_usr INTEGER, pw_type TEXT, new_pass TEXT, new_salt TEXT DEFAULT NULL)
2047     RETURNS BOOLEAN AS $$
2048 DECLARE
2049     pw_salt TEXT;
2050     pw_text TEXT;
2051 BEGIN
2052     /* Sets the password value, creating a new actor.passwd row if needed.
2053      * If the password type supports it, the new_pass value is crypt()'ed.
2054      * For crypt'ed passwords, the salt comes from one of 3 places in order:
2055      * new_salt (if present), existing salt (if present), newly created
2056      * salt.
2057      */
2058
2059     IF new_salt IS NOT NULL THEN
2060         pw_salt := new_salt;
2061     ELSE
2062         pw_salt := actor.get_salt(pw_usr, pw_type);
2063
2064         IF pw_salt IS NULL THEN
2065             /* We have no salt for this user + type.  Assume they want a
2066              * new salt.  If this type is unsalted, create_salt() will
2067              * return NULL. */
2068             pw_salt := actor.create_salt(pw_type);
2069         END IF;
2070     END IF;
2071
2072     IF pw_salt IS NULL THEN
2073         pw_text := new_pass; -- unsalted, use as-is.
2074     ELSE
2075         pw_text := CRYPT(new_pass, pw_salt);
2076     END IF;
2077
2078     UPDATE actor.passwd
2079         SET passwd = pw_text, salt = pw_salt, edit_date = NOW()
2080         WHERE usr = pw_usr AND passwd_type = pw_type;
2081
2082     IF NOT FOUND THEN
2083         -- no password row exists for this user + type.  Create one.
2084         INSERT INTO actor.passwd (usr, passwd_type, salt, passwd)
2085             VALUES (pw_usr, pw_type, pw_salt, pw_text);
2086     END IF;
2087
2088     RETURN TRUE;
2089 END;
2090 $$ LANGUAGE PLPGSQL;
2091
2092 CREATE OR REPLACE FUNCTION actor.get_salt(pw_usr INTEGER, pw_type TEXT)
2093     RETURNS TEXT AS $$
2094 DECLARE
2095     pw_salt TEXT;
2096     type_row actor.passwd_type%ROWTYPE;
2097 BEGIN
2098     /* Returns the salt for the requested user + type.  If the password
2099      * type of "main" is requested and no password exists in actor.passwd,
2100      * the user's existing password is migrated and the new salt is returned.
2101      * Returns NULL if the password type is not crypt'ed (iter_count is NULL).
2102      */
2103
2104     SELECT INTO pw_salt salt FROM actor.passwd
2105         WHERE usr = pw_usr AND passwd_type = pw_type;
2106
2107     IF FOUND THEN
2108         RETURN pw_salt;
2109     END IF;
2110
2111     IF pw_type = 'main' THEN
2112         -- Main password has not yet been migrated.
2113         -- Do it now and return the newly created salt.
2114         RETURN actor.migrate_passwd(pw_usr);
2115     END IF;
2116
2117     -- We have no salt to return.  actor.create_salt() needed.
2118     RETURN NULL;
2119 END;
2120 $$ LANGUAGE PLPGSQL;
2121
2122 CREATE OR REPLACE FUNCTION
2123     actor.migrate_passwd(pw_usr INTEGER) RETURNS TEXT AS $$
2124 DECLARE
2125     pw_salt TEXT;
2126     usr_row actor.usr%ROWTYPE;
2127 BEGIN
2128     /* Migrates legacy actor.usr.passwd value to actor.passwd with
2129      * a password type 'main' and returns the new salt.  For backwards
2130      * compatibility with existing CHAP-style API's, we perform a
2131      * layer of intermediate MD5(MD5()) hashing.  This is intermediate
2132      * hashing is not required of other passwords.
2133      */
2134
2135     -- Avoid calling get_salt() here, because it may result in a
2136     -- migrate_passwd() call, creating a loop.
2137     SELECT INTO pw_salt salt FROM actor.passwd
2138         WHERE usr = pw_usr AND passwd_type = 'main';
2139
2140     -- Only migrate passwords that have not already been migrated.
2141     IF FOUND THEN
2142         RETURN pw_salt;
2143     END IF;
2144
2145     SELECT INTO usr_row * FROM actor.usr WHERE id = pw_usr;
2146
2147     pw_salt := actor.create_salt('main');
2148
2149     PERFORM actor.set_passwd(
2150         pw_usr, 'main', MD5(pw_salt || usr_row.passwd), pw_salt);
2151
2152     -- clear the existing password
2153     UPDATE actor.usr SET passwd = '' WHERE id = usr_row.id;
2154
2155     RETURN pw_salt;
2156 END;
2157 $$ LANGUAGE PLPGSQL;
2158
2159 CREATE OR REPLACE FUNCTION
2160     actor.verify_passwd(pw_usr INTEGER, pw_type TEXT, test_passwd TEXT)
2161     RETURNS BOOLEAN AS $$
2162 DECLARE
2163     pw_salt TEXT;
2164 BEGIN
2165     /* Returns TRUE if the password provided matches the in-db password.
2166      * If the password type is salted, we compare the output of CRYPT().
2167      * NOTE: test_passwd is MD5(salt || MD5(password)) for legacy
2168      * 'main' passwords.
2169      */
2170
2171     SELECT INTO pw_salt salt FROM actor.passwd
2172         WHERE usr = pw_usr AND passwd_type = pw_type;
2173
2174     IF NOT FOUND THEN
2175         -- no such password
2176         RETURN FALSE;
2177     END IF;
2178
2179     IF pw_salt IS NULL THEN
2180         -- Password is unsalted, compare the un-CRYPT'ed values.
2181         RETURN EXISTS (
2182             SELECT TRUE FROM actor.passwd WHERE
2183                 usr = pw_usr AND
2184                 passwd_type = pw_type AND
2185                 passwd = test_passwd
2186         );
2187     END IF;
2188
2189     RETURN EXISTS (
2190         SELECT TRUE FROM actor.passwd WHERE
2191             usr = pw_usr AND
2192             passwd_type = pw_type AND
2193             passwd = CRYPT(test_passwd, pw_salt)
2194     );
2195 END;
2196 $$ STRICT LANGUAGE PLPGSQL;
2197
2198 --- DATA ----------------------
2199
2200 INSERT INTO actor.passwd_type
2201     (code, name, login, crypt_algo, iter_count)
2202     VALUES ('main', 'Main Login Password', TRUE, 'bf', 10);
2203
2204 SELECT evergreen.upgrade_deps_block_check('0962', :eg_version);
2205
2206 ALTER TABLE vandelay.import_item_attr_definition
2207     ADD COLUMN parts_data TEXT;
2208
2209 ALTER TABLE vandelay.import_item
2210     ADD COLUMN parts_data TEXT;
2211
2212 CREATE OR REPLACE FUNCTION vandelay.ingest_items ( import_id BIGINT, attr_def_id BIGINT ) RETURNS SETOF vandelay.import_item AS $$
2213 DECLARE
2214
2215     owning_lib      TEXT;
2216     circ_lib        TEXT;
2217     call_number     TEXT;
2218     copy_number     TEXT;
2219     status          TEXT;
2220     location        TEXT;
2221     circulate       TEXT;
2222     deposit         TEXT;
2223     deposit_amount  TEXT;
2224     ref             TEXT;
2225     holdable        TEXT;
2226     price           TEXT;
2227     barcode         TEXT;
2228     circ_modifier   TEXT;
2229     circ_as_type    TEXT;
2230     alert_message   TEXT;
2231     opac_visible    TEXT;
2232     pub_note        TEXT;
2233     priv_note       TEXT;
2234     internal_id     TEXT;
2235     stat_cat_data   TEXT;
2236     parts_data      TEXT;
2237
2238     attr_def        RECORD;
2239     tmp_attr_set    RECORD;
2240     attr_set        vandelay.import_item%ROWTYPE;
2241
2242     xpaths          TEXT[];
2243     tmp_str         TEXT;
2244
2245 BEGIN
2246
2247     SELECT * INTO attr_def FROM vandelay.import_item_attr_definition WHERE id = attr_def_id;
2248
2249     IF FOUND THEN
2250
2251         attr_set.definition := attr_def.id;
2252
2253         -- Build the combined XPath
2254
2255         owning_lib :=
2256             CASE
2257                 WHEN attr_def.owning_lib IS NULL THEN 'null()'
2258                 WHEN LENGTH( attr_def.owning_lib ) = 1 THEN '*[@code="' || attr_def.owning_lib || '"]'
2259                 ELSE '*' || attr_def.owning_lib
2260             END;
2261
2262         circ_lib :=
2263             CASE
2264                 WHEN attr_def.circ_lib IS NULL THEN 'null()'
2265                 WHEN LENGTH( attr_def.circ_lib ) = 1 THEN '*[@code="' || attr_def.circ_lib || '"]'
2266                 ELSE '*' || attr_def.circ_lib
2267             END;
2268
2269         call_number :=
2270             CASE
2271                 WHEN attr_def.call_number IS NULL THEN 'null()'
2272                 WHEN LENGTH( attr_def.call_number ) = 1 THEN '*[@code="' || attr_def.call_number || '"]'
2273                 ELSE '*' || attr_def.call_number
2274             END;
2275
2276         copy_number :=
2277             CASE
2278                 WHEN attr_def.copy_number IS NULL THEN 'null()'
2279                 WHEN LENGTH( attr_def.copy_number ) = 1 THEN '*[@code="' || attr_def.copy_number || '"]'
2280                 ELSE '*' || attr_def.copy_number
2281             END;
2282
2283         status :=
2284             CASE
2285                 WHEN attr_def.status IS NULL THEN 'null()'
2286                 WHEN LENGTH( attr_def.status ) = 1 THEN '*[@code="' || attr_def.status || '"]'
2287                 ELSE '*' || attr_def.status
2288             END;
2289
2290         location :=
2291             CASE
2292                 WHEN attr_def.location IS NULL THEN 'null()'
2293                 WHEN LENGTH( attr_def.location ) = 1 THEN '*[@code="' || attr_def.location || '"]'
2294                 ELSE '*' || attr_def.location
2295             END;
2296
2297         circulate :=
2298             CASE
2299                 WHEN attr_def.circulate IS NULL THEN 'null()'
2300                 WHEN LENGTH( attr_def.circulate ) = 1 THEN '*[@code="' || attr_def.circulate || '"]'
2301                 ELSE '*' || attr_def.circulate
2302             END;
2303
2304         deposit :=
2305             CASE
2306                 WHEN attr_def.deposit IS NULL THEN 'null()'
2307                 WHEN LENGTH( attr_def.deposit ) = 1 THEN '*[@code="' || attr_def.deposit || '"]'
2308                 ELSE '*' || attr_def.deposit
2309             END;
2310
2311         deposit_amount :=
2312             CASE
2313                 WHEN attr_def.deposit_amount IS NULL THEN 'null()'
2314                 WHEN LENGTH( attr_def.deposit_amount ) = 1 THEN '*[@code="' || attr_def.deposit_amount || '"]'
2315                 ELSE '*' || attr_def.deposit_amount
2316             END;
2317
2318         ref :=
2319             CASE
2320                 WHEN attr_def.ref IS NULL THEN 'null()'
2321                 WHEN LENGTH( attr_def.ref ) = 1 THEN '*[@code="' || attr_def.ref || '"]'
2322                 ELSE '*' || attr_def.ref
2323             END;
2324
2325         holdable :=
2326             CASE
2327                 WHEN attr_def.holdable IS NULL THEN 'null()'
2328                 WHEN LENGTH( attr_def.holdable ) = 1 THEN '*[@code="' || attr_def.holdable || '"]'
2329                 ELSE '*' || attr_def.holdable
2330             END;
2331
2332         price :=
2333             CASE
2334                 WHEN attr_def.price IS NULL THEN 'null()'
2335                 WHEN LENGTH( attr_def.price ) = 1 THEN '*[@code="' || attr_def.price || '"]'
2336                 ELSE '*' || attr_def.price
2337             END;
2338
2339         barcode :=
2340             CASE
2341                 WHEN attr_def.barcode IS NULL THEN 'null()'
2342                 WHEN LENGTH( attr_def.barcode ) = 1 THEN '*[@code="' || attr_def.barcode || '"]'
2343                 ELSE '*' || attr_def.barcode
2344             END;
2345
2346         circ_modifier :=
2347             CASE
2348                 WHEN attr_def.circ_modifier IS NULL THEN 'null()'
2349                 WHEN LENGTH( attr_def.circ_modifier ) = 1 THEN '*[@code="' || attr_def.circ_modifier || '"]'
2350                 ELSE '*' || attr_def.circ_modifier
2351             END;
2352
2353         circ_as_type :=
2354             CASE
2355                 WHEN attr_def.circ_as_type IS NULL THEN 'null()'
2356                 WHEN LENGTH( attr_def.circ_as_type ) = 1 THEN '*[@code="' || attr_def.circ_as_type || '"]'
2357                 ELSE '*' || attr_def.circ_as_type
2358             END;
2359
2360         alert_message :=
2361             CASE
2362                 WHEN attr_def.alert_message IS NULL THEN 'null()'
2363                 WHEN LENGTH( attr_def.alert_message ) = 1 THEN '*[@code="' || attr_def.alert_message || '"]'
2364                 ELSE '*' || attr_def.alert_message
2365             END;
2366
2367         opac_visible :=
2368             CASE
2369                 WHEN attr_def.opac_visible IS NULL THEN 'null()'
2370                 WHEN LENGTH( attr_def.opac_visible ) = 1 THEN '*[@code="' || attr_def.opac_visible || '"]'
2371                 ELSE '*' || attr_def.opac_visible
2372             END;
2373
2374         pub_note :=
2375             CASE
2376                 WHEN attr_def.pub_note IS NULL THEN 'null()'
2377                 WHEN LENGTH( attr_def.pub_note ) = 1 THEN '*[@code="' || attr_def.pub_note || '"]'
2378                 ELSE '*' || attr_def.pub_note
2379             END;
2380         priv_note :=
2381             CASE
2382                 WHEN attr_def.priv_note IS NULL THEN 'null()'
2383                 WHEN LENGTH( attr_def.priv_note ) = 1 THEN '*[@code="' || attr_def.priv_note || '"]'
2384                 ELSE '*' || attr_def.priv_note
2385             END;
2386
2387         internal_id :=
2388             CASE
2389                 WHEN attr_def.internal_id IS NULL THEN 'null()'
2390                 WHEN LENGTH( attr_def.internal_id ) = 1 THEN '*[@code="' || attr_def.internal_id || '"]'
2391                 ELSE '*' || attr_def.internal_id
2392             END;
2393
2394         stat_cat_data :=
2395             CASE
2396                 WHEN attr_def.stat_cat_data IS NULL THEN 'null()'
2397                 WHEN LENGTH( attr_def.stat_cat_data ) = 1 THEN '*[@code="' || attr_def.stat_cat_data || '"]'
2398                 ELSE '*' || attr_def.stat_cat_data
2399             END;
2400
2401         parts_data :=
2402             CASE
2403                 WHEN attr_def.parts_data IS NULL THEN 'null()'
2404                 WHEN LENGTH( attr_def.parts_data ) = 1 THEN '*[@code="' || attr
2405                 ELSE '*' || attr_def.parts_data
2406             END;
2407
2408
2409
2410         xpaths := ARRAY[owning_lib, circ_lib, call_number, copy_number, status, location, circulate,
2411                         deposit, deposit_amount, ref, holdable, price, barcode, circ_modifier, circ_as_type,
2412                         alert_message, pub_note, priv_note, internal_id, stat_cat_data, parts_data, opac_visible];
2413
2414         FOR tmp_attr_set IN
2415                 SELECT  *
2416                   FROM  oils_xpath_tag_to_table( (SELECT marc FROM vandelay.queued_bib_record WHERE id = import_id), attr_def.tag, xpaths)
2417                             AS t( ol TEXT, clib TEXT, cn TEXT, cnum TEXT, cs TEXT, cl TEXT, circ TEXT,
2418                                   dep TEXT, dep_amount TEXT, r TEXT, hold TEXT, pr TEXT, bc TEXT, circ_mod TEXT,
2419                                   circ_as TEXT, amessage TEXT, note TEXT, pnote TEXT, internal_id TEXT,
2420                                   stat_cat_data TEXT, parts_data TEXT, opac_vis TEXT )
2421         LOOP
2422
2423             attr_set.import_error := NULL;
2424             attr_set.error_detail := NULL;
2425             attr_set.deposit_amount := NULL;
2426             attr_set.copy_number := NULL;
2427             attr_set.price := NULL;
2428             attr_set.circ_modifier := NULL;
2429             attr_set.location := NULL;
2430             attr_set.barcode := NULL;
2431             attr_set.call_number := NULL;
2432
2433             IF tmp_attr_set.pr != '' THEN
2434                 tmp_str = REGEXP_REPLACE(tmp_attr_set.pr, E'[^0-9\\.]', '', 'g');
2435                 IF tmp_str = '' THEN
2436                     attr_set.import_error := 'import.item.invalid.price';
2437                     attr_set.error_detail := tmp_attr_set.pr; -- original value
2438                     RETURN NEXT attr_set; CONTINUE;
2439                 END IF;
2440                 attr_set.price := tmp_str::NUMERIC(8,2);
2441             END IF;
2442
2443             IF tmp_attr_set.dep_amount != '' THEN
2444                 tmp_str = REGEXP_REPLACE(tmp_attr_set.dep_amount, E'[^0-9\\.]', '', 'g');
2445                 IF tmp_str = '' THEN
2446                     attr_set.import_error := 'import.item.invalid.deposit_amount';
2447                     attr_set.error_detail := tmp_attr_set.dep_amount;
2448                     RETURN NEXT attr_set; CONTINUE;
2449                 END IF;
2450                 attr_set.deposit_amount := tmp_str::NUMERIC(8,2);
2451             END IF;
2452
2453             IF tmp_attr_set.cnum != '' THEN
2454                 tmp_str = REGEXP_REPLACE(tmp_attr_set.cnum, E'[^0-9]', '', 'g');
2455                 IF tmp_str = '' THEN
2456                     attr_set.import_error := 'import.item.invalid.copy_number';
2457                     attr_set.error_detail := tmp_attr_set.cnum;
2458                     RETURN NEXT attr_set; CONTINUE;
2459                 END IF;
2460                 attr_set.copy_number := tmp_str::INT;
2461             END IF;
2462
2463             IF tmp_attr_set.ol != '' THEN
2464                 SELECT id INTO attr_set.owning_lib FROM actor.org_unit WHERE shortname = UPPER(tmp_attr_set.ol); -- INT
2465                 IF NOT FOUND THEN
2466                     attr_set.import_error := 'import.item.invalid.owning_lib';
2467                     attr_set.error_detail := tmp_attr_set.ol;
2468                     RETURN NEXT attr_set; CONTINUE;
2469                 END IF;
2470             END IF;
2471
2472             IF tmp_attr_set.clib != '' THEN
2473                 SELECT id INTO attr_set.circ_lib FROM actor.org_unit WHERE shortname = UPPER(tmp_attr_set.clib); -- INT
2474                 IF NOT FOUND THEN
2475                     attr_set.import_error := 'import.item.invalid.circ_lib';
2476                     attr_set.error_detail := tmp_attr_set.clib;
2477                     RETURN NEXT attr_set; CONTINUE;
2478                 END IF;
2479             END IF;
2480
2481             IF tmp_attr_set.cs != '' THEN
2482                 SELECT id INTO attr_set.status FROM config.copy_status WHERE LOWER(name) = LOWER(tmp_attr_set.cs); -- INT
2483                 IF NOT FOUND THEN
2484                     attr_set.import_error := 'import.item.invalid.status';
2485                     attr_set.error_detail := tmp_attr_set.cs;
2486                     RETURN NEXT attr_set; CONTINUE;
2487                 END IF;
2488             END IF;
2489
2490             IF COALESCE(tmp_attr_set.circ_mod, '') = '' THEN
2491
2492                 -- no circ mod defined, see if we should apply a default
2493                 SELECT INTO attr_set.circ_modifier TRIM(BOTH '"' FROM value)
2494                     FROM actor.org_unit_ancestor_setting(
2495                         'vandelay.item.circ_modifier.default',
2496                         attr_set.owning_lib
2497                     );
2498
2499                 -- make sure the value from the org setting is still valid
2500                 PERFORM 1 FROM config.circ_modifier WHERE code = attr_set.circ_modifier;
2501                 IF NOT FOUND THEN
2502                     attr_set.import_error := 'import.item.invalid.circ_modifier';
2503                     attr_set.error_detail := tmp_attr_set.circ_mod;
2504                     RETURN NEXT attr_set; CONTINUE;
2505                 END IF;
2506
2507             ELSE
2508
2509                 SELECT code INTO attr_set.circ_modifier FROM config.circ_modifier WHERE code = tmp_attr_set.circ_mod;
2510                 IF NOT FOUND THEN
2511                     attr_set.import_error := 'import.item.invalid.circ_modifier';
2512                     attr_set.error_detail := tmp_attr_set.circ_mod;
2513                     RETURN NEXT attr_set; CONTINUE;
2514                 END IF;
2515             END IF;
2516
2517             IF tmp_attr_set.circ_as != '' THEN
2518                 SELECT code INTO attr_set.circ_as_type FROM config.coded_value_map WHERE ctype = 'item_type' AND code = tmp_attr_set.circ_as;
2519                 IF NOT FOUND THEN
2520                     attr_set.import_error := 'import.item.invalid.circ_as_type';
2521                     attr_set.error_detail := tmp_attr_set.circ_as;
2522                     RETURN NEXT attr_set; CONTINUE;
2523                 END IF;
2524             END IF;
2525
2526             IF COALESCE(tmp_attr_set.cl, '') = '' THEN
2527                 -- no location specified, see if we should apply a default
2528
2529                 SELECT INTO attr_set.location TRIM(BOTH '"' FROM value)
2530                     FROM actor.org_unit_ancestor_setting(
2531                         'vandelay.item.copy_location.default',
2532                         attr_set.owning_lib
2533                     );
2534
2535                 -- make sure the value from the org setting is still valid
2536                 PERFORM 1 FROM asset.copy_location WHERE id = attr_set.location;
2537                 IF NOT FOUND THEN
2538                     attr_set.import_error := 'import.item.invalid.location';
2539                     attr_set.error_detail := tmp_attr_set.cs;
2540                     RETURN NEXT attr_set; CONTINUE;
2541                 END IF;
2542             ELSE
2543
2544                 -- search up the org unit tree for a matching copy location
2545                 WITH RECURSIVE anscestor_depth AS (
2546                     SELECT  ou.id,
2547                         out.depth AS depth,
2548                         ou.parent_ou
2549                     FROM  actor.org_unit ou
2550                         JOIN actor.org_unit_type out ON (out.id = ou.ou_type)
2551                     WHERE ou.id = COALESCE(attr_set.owning_lib, attr_set.circ_lib)
2552                         UNION ALL
2553                     SELECT  ou.id,
2554                         out.depth,
2555                         ou.parent_ou
2556                     FROM  actor.org_unit ou
2557                         JOIN actor.org_unit_type out ON (out.id = ou.ou_type)
2558                         JOIN anscestor_depth ot ON (ot.parent_ou = ou.id)
2559                 ) SELECT  cpl.id INTO attr_set.location
2560                     FROM  anscestor_depth a
2561                         JOIN asset.copy_location cpl ON (cpl.owning_lib = a.id)
2562                     WHERE LOWER(cpl.name) = LOWER(tmp_attr_set.cl)
2563                     ORDER BY a.depth DESC
2564                     LIMIT 1;
2565
2566                 IF NOT FOUND THEN
2567                     attr_set.import_error := 'import.item.invalid.location';
2568                     attr_set.error_detail := tmp_attr_set.cs;
2569                     RETURN NEXT attr_set; CONTINUE;
2570                 END IF;
2571             END IF;
2572
2573             attr_set.circulate      :=
2574                 LOWER( SUBSTRING( tmp_attr_set.circ, 1, 1)) IN ('t','y','1')
2575                 OR LOWER(tmp_attr_set.circ) = 'circulating'; -- BOOL
2576
2577             attr_set.deposit        :=
2578                 LOWER( SUBSTRING( tmp_attr_set.dep, 1, 1 ) ) IN ('t','y','1')
2579                 OR LOWER(tmp_attr_set.dep) = 'deposit'; -- BOOL
2580
2581             attr_set.holdable       :=
2582                 LOWER( SUBSTRING( tmp_attr_set.hold, 1, 1 ) ) IN ('t','y','1')
2583                 OR LOWER(tmp_attr_set.hold) = 'holdable'; -- BOOL
2584
2585             attr_set.opac_visible   :=
2586                 LOWER( SUBSTRING( tmp_attr_set.opac_vis, 1, 1 ) ) IN ('t','y','1')
2587                 OR LOWER(tmp_attr_set.opac_vis) = 'visible'; -- BOOL
2588
2589             attr_set.ref            :=
2590                 LOWER( SUBSTRING( tmp_attr_set.r, 1, 1 ) ) IN ('t','y','1')
2591                 OR LOWER(tmp_attr_set.r) = 'reference'; -- BOOL
2592
2593             attr_set.call_number    := tmp_attr_set.cn; -- TEXT
2594             attr_set.barcode        := tmp_attr_set.bc; -- TEXT,
2595             attr_set.alert_message  := tmp_attr_set.amessage; -- TEXT,
2596             attr_set.pub_note       := tmp_attr_set.note; -- TEXT,
2597             attr_set.priv_note      := tmp_attr_set.pnote; -- TEXT,
2598             attr_set.alert_message  := tmp_attr_set.amessage; -- TEXT,
2599             attr_set.internal_id    := tmp_attr_set.internal_id::BIGINT;
2600             attr_set.stat_cat_data  := tmp_attr_set.stat_cat_data; -- TEXT,
2601             attr_set.parts_data     := tmp_attr_set.parts_data; -- TEXT,
2602
2603             RETURN NEXT attr_set;
2604
2605         END LOOP;
2606
2607     END IF;
2608
2609     RETURN;
2610
2611 END;
2612 $$ LANGUAGE PLPGSQL;
2613
2614 CREATE OR REPLACE FUNCTION vandelay.ingest_bib_items ( ) RETURNS TRIGGER AS $func$
2615 DECLARE
2616     attr_def    BIGINT;
2617     item_data   vandelay.import_item%ROWTYPE;
2618 BEGIN
2619
2620     IF TG_OP IN ('INSERT','UPDATE') AND NEW.imported_as IS NOT NULL THEN
2621         RETURN NEW;
2622     END IF;
2623
2624     SELECT item_attr_def INTO attr_def FROM vandelay.bib_queue WHERE id = NEW.queue;
2625
2626     FOR item_data IN SELECT * FROM vandelay.ingest_items( NEW.id::BIGINT, attr_def ) LOOP
2627         INSERT INTO vandelay.import_item (
2628             record,
2629             definition,
2630             owning_lib,
2631             circ_lib,
2632             call_number,
2633             copy_number,
2634             status,
2635             location,
2636             circulate,
2637             deposit,
2638             deposit_amount,
2639             ref,
2640             holdable,
2641             price,
2642             barcode,
2643             circ_modifier,
2644             circ_as_type,
2645             alert_message,
2646             pub_note,
2647             priv_note,
2648             internal_id,
2649             opac_visible,
2650             stat_cat_data,
2651             parts_data,
2652             import_error,
2653             error_detail
2654         ) VALUES (
2655             NEW.id,
2656             item_data.definition,
2657             item_data.owning_lib,
2658             item_data.circ_lib,
2659             item_data.call_number,
2660             item_data.copy_number,
2661             item_data.status,
2662             item_data.location,
2663             item_data.circulate,
2664             item_data.deposit,
2665             item_data.deposit_amount,
2666             item_data.ref,
2667             item_data.holdable,
2668             item_data.price,
2669             item_data.barcode,
2670             item_data.circ_modifier,
2671             item_data.circ_as_type,
2672             item_data.alert_message,
2673             item_data.pub_note,
2674             item_data.priv_note,
2675             item_data.internal_id,
2676             item_data.opac_visible,
2677             item_data.stat_cat_data,
2678             item_data.parts_data,
2679             item_data.import_error,
2680             item_data.error_detail
2681         );
2682     END LOOP;
2683
2684     RETURN NULL;
2685 END;
2686 $func$ LANGUAGE PLPGSQL;
2687
2688 SELECT evergreen.upgrade_deps_block_check('0963', :eg_version);
2689
2690 ALTER TABLE config.z3950_index_field_map DROP CONSTRAINT "valid_z3950_attr_type";
2691
2692 DROP FUNCTION evergreen.z3950_attr_name_is_valid(text);
2693
2694 CREATE OR REPLACE FUNCTION evergreen.z3950_attr_name_is_valid() RETURNS TRIGGER AS $func$
2695 BEGIN
2696
2697   PERFORM * FROM config.z3950_attr WHERE name = NEW.z3950_attr_type;
2698
2699   IF FOUND THEN
2700     RETURN NULL;
2701   END IF;
2702
2703   RAISE EXCEPTION '% is not a valid Z39.50 attribute type', NEW.z3950_attr_type;
2704
2705 END;
2706 $func$ LANGUAGE PLPGSQL STABLE;
2707
2708 COMMENT ON FUNCTION evergreen.z3950_attr_name_is_valid() IS $$
2709 Used by a config.z3950_index_field_map constraint trigger
2710 to verify z3950_attr_type maps.
2711 $$;
2712
2713 CREATE CONSTRAINT TRIGGER valid_z3950_attr_type AFTER INSERT OR UPDATE ON config.z3950_index_field_map
2714   DEFERRABLE INITIALLY DEFERRED FOR EACH ROW WHEN (NEW.z3950_attr_type IS NOT NULL)
2715   EXECUTE PROCEDURE evergreen.z3950_attr_name_is_valid();
2716
2717 SELECT evergreen.upgrade_deps_block_check('0964', :eg_version);
2718
2719 INSERT INTO config.coded_value_map
2720     (id, ctype, code, opac_visible, value, search_label) VALUES
2721 (712, 'search_format', 'electronic', FALSE,
2722     oils_i18n_gettext(712, 'Electronic', 'ccvm', 'value'),
2723     oils_i18n_gettext(712, 'Electronic', 'ccvm', 'search_label'));
2724
2725 INSERT INTO config.composite_attr_entry_definition
2726     (coded_value, definition) VALUES
2727 (712, '[{"_attr":"item_form","_val":"s"},{"_attr":"item_form","_val":"o"}]');
2728
2729
2730 SELECT evergreen.upgrade_deps_block_check('0965', :eg_version);
2731
2732 UPDATE action_trigger.event_definition SET template =
2733 $$
2734 [%- USE date -%]
2735 [%- SET user = target.0.usr -%]
2736 [%- SET lib = target.0.circ_lib -%]
2737 [%- SET lib_addr = target.0.circ_lib.billing_address -%]
2738 [%- SET hours = lib.hours_of_operation -%]
2739 <div>
2740     <style> li { padding: 8px; margin 5px; }</style>
2741     <div>[% date.format %]</div>
2742     <div>[% lib.name %]</div>
2743     <div>[% lib_addr.street1 %] [% lib_addr.street2 %]</div>
2744     <div>[% lib_addr.city %], [% lib_addr.state %] [% lib_addr.post_code %]</div>
2745     <div>[% lib.phone %]</div>
2746     <br/>
2747
2748     [% user.family_name %], [% user.first_given_name %]
2749     <ol>
2750     [% FOR circ IN target %]
2751         [%-
2752             SET idx = loop.count - 1;
2753             SET udata =  user_data.$idx
2754         -%]
2755         <li>
2756             <div>[% helpers.get_copy_bib_basics(circ.target_copy.id).title %]</div>
2757             <div>Barcode: [% circ.target_copy.barcode %]</div>
2758             [% IF user_data.renewal_failure %]
2759                 <div style='color:red;'>Renewal Failed</div>
2760             [% ELSE %]
2761                 <div>Due Date: [% date.format(helpers.format_date(circ.due_date), '%Y-%m-%d') %]</div>
2762             [% END %]
2763         </li>
2764     [% END %]
2765     </ol>
2766
2767     <div>
2768         Library Hours
2769         [%- BLOCK format_time; date.format(time _ ' 1/1/1000', format='%I:%M %p'); END -%]
2770         <div>
2771             Monday
2772             [% PROCESS format_time time = hours.dow_0_open %]
2773             [% PROCESS format_time time = hours.dow_0_close %]
2774         </div>
2775         <div>
2776             Tuesday
2777             [% PROCESS format_time time = hours.dow_1_open %]
2778             [% PROCESS format_time time = hours.dow_1_close %]
2779         </div>
2780         <div>
2781             Wednesday
2782             [% PROCESS format_time time = hours.dow_2_open %]
2783             [% PROCESS format_time time = hours.dow_2_close %]
2784         </div>
2785         <div>
2786             Thursday
2787             [% PROCESS format_time time = hours.dow_3_open %]
2788             [% PROCESS format_time time = hours.dow_3_close %]
2789         </div>
2790         <div>
2791             Friday
2792             [% PROCESS format_time time = hours.dow_4_open %]
2793             [% PROCESS format_time time = hours.dow_4_close %]
2794         </div>
2795         <div>
2796             Saturday
2797             [% PROCESS format_time time = hours.dow_5_open %]
2798             [% PROCESS format_time time = hours.dow_5_close %]
2799         </div>
2800         <div>
2801             Sunday
2802             [% PROCESS format_time time = hours.dow_6_open %]
2803             [% PROCESS format_time time = hours.dow_6_close %]
2804         </div>
2805     </div>
2806 </div>
2807 $$
2808 WHERE id = 10 AND template =
2809 $$
2810 [%- USE date -%]
2811 [%- SET user = target.0.usr -%]
2812 [%- SET lib = target.0.circ_lib -%]
2813 [%- SET lib_addr = target.0.circ_lib.billing_address -%]
2814 [%- SET hours = lib.hours_of_operation -%]
2815 <div>
2816     <style> li { padding: 8px; margin 5px; }</style>
2817     <div>[% date.format %]</div>
2818     <div>[% lib.name %]</div>
2819     <div>[% lib_addr.street1 %] [% lib_addr.street2 %]</div>
2820     <div>[% lib_addr.city %], [% lib_addr.state %] [% lb_addr.post_code %]</div>
2821     <div>[% lib.phone %]</div>
2822     <br/>
2823
2824     [% user.family_name %], [% user.first_given_name %]
2825     <ol>
2826     [% FOR circ IN target %]
2827         [%-
2828             SET idx = loop.count - 1;
2829             SET udata =  user_data.$idx
2830         -%]
2831         <li>
2832             <div>[% helpers.get_copy_bib_basics(circ.target_copy.id).title %]</div>
2833             <div>Barcode: [% circ.target_copy.barcode %]</div>
2834             [% IF user_data.renewal_failure %]
2835                 <div style='color:red;'>Renewal Failed</div>
2836             [% ELSE %]
2837                 <div>Due Date: [% date.format(helpers.format_date(circ.due_date), '%Y-%m-%d') %]</div>
2838             [% END %]
2839         </li>
2840     [% END %]
2841     </ol>
2842
2843     <div>
2844         Library Hours
2845         [%- BLOCK format_time; date.format(time _ ' 1/1/1000', format='%I:%M %p'); END -%]
2846         <div>
2847             Monday
2848             [% PROCESS format_time time = hours.dow_0_open %]
2849             [% PROCESS format_time time = hours.dow_0_close %]
2850         </div>
2851         <div>
2852             Tuesday
2853             [% PROCESS format_time time = hours.dow_1_open %]
2854             [% PROCESS format_time time = hours.dow_1_close %]
2855         </div>
2856         <div>
2857             Wednesday
2858             [% PROCESS format_time time = hours.dow_2_open %]
2859             [% PROCESS format_time time = hours.dow_2_close %]
2860         </div>
2861         <div>
2862             Thursday
2863             [% PROCESS format_time time = hours.dow_3_open %]
2864             [% PROCESS format_time time = hours.dow_3_close %]
2865         </div>
2866         <div>
2867             Friday
2868             [% PROCESS format_time time = hours.dow_4_open %]
2869             [% PROCESS format_time time = hours.dow_4_close %]
2870         </div>
2871         <div>
2872             Saturday
2873             [% PROCESS format_time time = hours.dow_5_open %]
2874             [% PROCESS format_time time = hours.dow_5_close %]
2875         </div>
2876         <div>
2877             Sunday
2878             [% PROCESS format_time time = hours.dow_6_open %]
2879             [% PROCESS format_time time = hours.dow_6_close %]
2880         </div>
2881     </div>
2882 </div>
2883 $$;
2884
2885 SELECT evergreen.upgrade_deps_block_check('0966', :eg_version); -- miker/jpringle/gmcharlt
2886
2887 -- Allow NULL post-normalization sorters
2888 CREATE OR REPLACE FUNCTION metabib.reingest_record_attributes (rid BIGINT, pattr_list TEXT[] DEFAULT NULL, prmarc TEXT DEFAULT NULL, rdeleted BOOL DEFAULT TRUE) RETURNS VOID AS $func$
2889 DECLARE
2890     transformed_xml TEXT;
2891     rmarc           TEXT := prmarc;
2892     tmp_val         TEXT;
2893     prev_xfrm       TEXT;
2894     normalizer      RECORD;
2895     xfrm            config.xml_transform%ROWTYPE;
2896     attr_vector     INT[] := '{}'::INT[];
2897     attr_vector_tmp INT[];
2898     attr_list       TEXT[] := pattr_list;
2899     attr_value      TEXT[];
2900     norm_attr_value TEXT[];
2901     tmp_xml         TEXT;
2902     attr_def        config.record_attr_definition%ROWTYPE;
2903     ccvm_row        config.coded_value_map%ROWTYPE;
2904 BEGIN
2905
2906     IF attr_list IS NULL OR rdeleted THEN -- need to do the full dance on INSERT or undelete
2907         SELECT ARRAY_AGG(name) INTO attr_list FROM config.record_attr_definition;
2908     END IF;
2909
2910     IF rmarc IS NULL THEN
2911         SELECT marc INTO rmarc FROM biblio.record_entry WHERE id = rid;
2912     END IF;
2913
2914     FOR attr_def IN SELECT * FROM config.record_attr_definition WHERE NOT composite AND name = ANY( attr_list ) ORDER BY format LOOP
2915
2916         attr_value := '{}'::TEXT[];
2917         norm_attr_value := '{}'::TEXT[];
2918         attr_vector_tmp := '{}'::INT[];
2919
2920         SELECT * INTO ccvm_row FROM config.coded_value_map c WHERE c.ctype = attr_def.name LIMIT 1;
2921
2922         -- tag+sf attrs only support SVF
2923         IF attr_def.tag IS NOT NULL THEN -- tag (and optional subfield list) selection
2924             SELECT  ARRAY[ARRAY_TO_STRING(ARRAY_AGG(value), COALESCE(attr_def.joiner,' '))] INTO attr_value
2925               FROM  (SELECT * FROM metabib.full_rec ORDER BY tag, subfield) AS x
2926               WHERE record = rid
2927                     AND tag LIKE attr_def.tag
2928                     AND CASE
2929                         WHEN attr_def.sf_list IS NOT NULL
2930                             THEN POSITION(subfield IN attr_def.sf_list) > 0
2931                         ELSE TRUE
2932                     END
2933               GROUP BY tag
2934               ORDER BY tag
2935               LIMIT 1;
2936
2937         ELSIF attr_def.fixed_field IS NOT NULL THEN -- a named fixed field, see config.marc21_ff_pos_map.fixed_field
2938             attr_value := vandelay.marc21_extract_fixed_field_list(rmarc, attr_def.fixed_field);
2939
2940             IF NOT attr_def.multi THEN
2941                 attr_value := ARRAY[attr_value[1]];
2942             END IF;
2943
2944         ELSIF attr_def.xpath IS NOT NULL THEN -- and xpath expression
2945
2946             SELECT INTO xfrm * FROM config.xml_transform WHERE name = attr_def.format;
2947
2948             -- See if we can skip the XSLT ... it's expensive
2949             IF prev_xfrm IS NULL OR prev_xfrm <> xfrm.name THEN
2950                 -- Can't skip the transform
2951                 IF xfrm.xslt <> '---' THEN
2952                     transformed_xml := oils_xslt_process(rmarc,xfrm.xslt);
2953                 ELSE
2954                     transformed_xml := rmarc;
2955                 END IF;
2956
2957                 prev_xfrm := xfrm.name;
2958             END IF;
2959
2960             IF xfrm.name IS NULL THEN
2961                 -- just grab the marcxml (empty) transform
2962                 SELECT INTO xfrm * FROM config.xml_transform WHERE xslt = '---' LIMIT 1;
2963                 prev_xfrm := xfrm.name;
2964             END IF;
2965
2966             FOR tmp_xml IN SELECT UNNEST(oils_xpath(attr_def.xpath, transformed_xml, ARRAY[ARRAY[xfrm.prefix, xfrm.namespace_uri]])) LOOP
2967                 tmp_val := oils_xpath_string(
2968                                 '//*',
2969                                 tmp_xml,
2970                                 COALESCE(attr_def.joiner,' '),
2971                                 ARRAY[ARRAY[xfrm.prefix, xfrm.namespace_uri]]
2972                             );
2973                 IF tmp_val IS NOT NULL AND BTRIM(tmp_val) <> '' THEN
2974                     attr_value := attr_value || tmp_val;
2975                     EXIT WHEN NOT attr_def.multi;
2976                 END IF;
2977             END LOOP;
2978
2979         ELSIF attr_def.phys_char_sf IS NOT NULL THEN -- a named Physical Characteristic, see config.marc21_physical_characteristic_*_map
2980             SELECT  ARRAY_AGG(m.value) INTO attr_value
2981               FROM  vandelay.marc21_physical_characteristics(rmarc) v
2982                     LEFT JOIN config.marc21_physical_characteristic_value_map m ON (m.id = v.value)
2983               WHERE v.subfield = attr_def.phys_char_sf AND (m.value IS NOT NULL AND BTRIM(m.value) <> '')
2984                     AND ( ccvm_row.id IS NULL OR ( ccvm_row.id IS NOT NULL AND v.id IS NOT NULL) );
2985
2986             IF NOT attr_def.multi THEN
2987                 attr_value := ARRAY[attr_value[1]];
2988             END IF;
2989
2990         END IF;
2991
2992                 -- apply index normalizers to attr_value
2993         FOR tmp_val IN SELECT value FROM UNNEST(attr_value) x(value) LOOP
2994             FOR normalizer IN
2995                 SELECT  n.func AS func,
2996                         n.param_count AS param_count,
2997                         m.params AS params
2998                   FROM  config.index_normalizer n
2999                         JOIN config.record_attr_index_norm_map m ON (m.norm = n.id)
3000                   WHERE attr = attr_def.name
3001                   ORDER BY m.pos LOOP
3002                     EXECUTE 'SELECT ' || normalizer.func || '(' ||
3003                     COALESCE( quote_literal( tmp_val ), 'NULL' ) ||
3004                         CASE
3005                             WHEN normalizer.param_count > 0
3006                                 THEN ',' || REPLACE(REPLACE(BTRIM(normalizer.params,'[]'),E'\'',E'\\\''),E'"',E'\'')
3007                                 ELSE ''
3008                             END ||
3009                     ')' INTO tmp_val;
3010
3011             END LOOP;
3012             IF tmp_val IS NOT NULL AND tmp_val <> '' THEN
3013                 -- note that a string that contains only blanks
3014                 -- is a valid value for some attributes
3015                 norm_attr_value := norm_attr_value || tmp_val;
3016             END IF;
3017         END LOOP;
3018
3019         IF attr_def.filter THEN
3020             -- Create unknown uncontrolled values and find the IDs of the values
3021             IF ccvm_row.id IS NULL THEN
3022                 FOR tmp_val IN SELECT value FROM UNNEST(norm_attr_value) x(value) LOOP
3023                     IF tmp_val IS NOT NULL AND BTRIM(tmp_val) <> '' THEN
3024                         BEGIN -- use subtransaction to isolate unique constraint violations
3025                             INSERT INTO metabib.uncontrolled_record_attr_value ( attr, value ) VALUES ( attr_def.name, tmp_val );
3026                         EXCEPTION WHEN unique_violation THEN END;
3027                     END IF;
3028                 END LOOP;
3029
3030                 SELECT ARRAY_AGG(id) INTO attr_vector_tmp FROM metabib.uncontrolled_record_attr_value WHERE attr = attr_def.name AND value = ANY( norm_attr_value );
3031             ELSE
3032                 SELECT ARRAY_AGG(id) INTO attr_vector_tmp FROM config.coded_value_map WHERE ctype = attr_def.name AND code = ANY( norm_attr_value );
3033             END IF;
3034
3035             -- Add the new value to the vector
3036             attr_vector := attr_vector || attr_vector_tmp;
3037         END IF;
3038
3039         IF attr_def.sorter THEN
3040             DELETE FROM metabib.record_sorter WHERE source = rid AND attr = attr_def.name;
3041             IF norm_attr_value[1] IS NOT NULL THEN
3042                 INSERT INTO metabib.record_sorter (source, attr, value) VALUES (rid, attr_def.name, norm_attr_value[1]);
3043             END IF;
3044         END IF;
3045
3046     END LOOP;
3047
3048 /* We may need to rewrite the vlist to contain
3049    the intersection of new values for requested
3050    attrs and old values for ignored attrs. To
3051    do this, we take the old attr vlist and
3052    subtract any values that are valid for the
3053    requested attrs, and then add back the new
3054    set of attr values. */
3055
3056     IF ARRAY_LENGTH(pattr_list, 1) > 0 THEN
3057         SELECT vlist INTO attr_vector_tmp FROM metabib.record_attr_vector_list WHERE source = rid;
3058         SELECT attr_vector_tmp - ARRAY_AGG(id::INT) INTO attr_vector_tmp FROM metabib.full_attr_id_map WHERE attr = ANY (pattr_list);
3059         attr_vector := attr_vector || attr_vector_tmp;
3060     END IF;
3061
3062     -- On to composite attributes, now that the record attrs have been pulled.  Processed in name order, so later composite
3063     -- attributes can depend on earlier ones.
3064     PERFORM metabib.compile_composite_attr_cache_init();
3065     FOR attr_def IN SELECT * FROM config.record_attr_definition WHERE composite AND name = ANY( attr_list ) ORDER BY name LOOP
3066
3067         FOR ccvm_row IN SELECT * FROM config.coded_value_map c WHERE c.ctype = attr_def.name ORDER BY value LOOP
3068
3069             tmp_val := metabib.compile_composite_attr( ccvm_row.id );
3070             CONTINUE WHEN tmp_val IS NULL OR tmp_val = ''; -- nothing to do
3071
3072             IF attr_def.filter THEN
3073                 IF attr_vector @@ tmp_val::query_int THEN
3074                     attr_vector = attr_vector + intset(ccvm_row.id);
3075                     EXIT WHEN NOT attr_def.multi;
3076                 END IF;
3077             END IF;
3078
3079             IF attr_def.sorter THEN
3080                 IF attr_vector @@ tmp_val THEN
3081                     DELETE FROM metabib.record_sorter WHERE source = rid AND attr = attr_def.name;
3082                     INSERT INTO metabib.record_sorter (source, attr, value) VALUES (rid, attr_def.name, ccvm_row.code);
3083                 END IF;
3084             END IF;
3085
3086         END LOOP;
3087
3088     END LOOP;
3089
3090     IF ARRAY_LENGTH(attr_vector, 1) > 0 THEN
3091         IF rdeleted THEN -- initial insert OR revivication
3092             DELETE FROM metabib.record_attr_vector_list WHERE source = rid;
3093             INSERT INTO metabib.record_attr_vector_list (source, vlist) VALUES (rid, attr_vector);
3094         ELSE
3095             UPDATE metabib.record_attr_vector_list SET vlist = attr_vector WHERE source = rid;
3096         END IF;
3097     END IF;
3098
3099 END;
3100
3101 $func$ LANGUAGE PLPGSQL;
3102
3103 -- Correct SER and COM records, add most other subfields and make them usable as CCVMs
3104
3105 SELECT evergreen.upgrade_deps_block_check('0967', :eg_version);
3106
3107 -- Fix SER
3108 DELETE FROM config.marc21_ff_pos_map WHERE fixed_field = 'Audn' AND rec_type = 'SER';
3109
3110
3111 -- Map Fields to Record Types
3112 -- Form was already defined but missing from COM
3113 INSERT INTO config.marc21_ff_pos_map (fixed_field, tag, rec_type,start_pos, length, default_val) VALUES
3114     ('Form', '006', 'COM', 6, 1, ' '),
3115     ('Form', '008', 'COM', 23, 1, ' '),
3116
3117     ('Relf', '006', 'MAP', 1, 4, '    '),
3118     ('Relf', '008', 'MAP', 18, 4, '    '),
3119     ('Proj', '006', 'MAP', 5, 2, '  '),
3120     ('Proj', '008', 'MAP', 22, 2, '  '),
3121     ('CrTp', '006', 'MAP', 8, 1, 'a'),
3122     ('CrTp', '008', 'MAP', 25, 1, 'a'),
3123     ('SpFm', '006', 'MAP', 16, 2, '  '),
3124     ('SpFm', '008', 'MAP', 33, 2, '  '),
3125     ('Relf1', '006', 'MAP', 1, 1, ' '),
3126     ('Relf1', '008', 'MAP', 18, 1, ' '),
3127     ('Relf2', '006', 'MAP', 2, 1, ' '),
3128     ('Relf2', '008', 'MAP', 19, 1, ' '),
3129     ('Relf3', '006', 'MAP', 3, 1, ' '),
3130     ('Relf3', '008', 'MAP', 20, 1, ' '),
3131     ('Relf4', '006', 'MAP', 4, 1, ' '),
3132     ('Relf4', '008', 'MAP', 21, 1, ' '),
3133     ('SpFm1', '006', 'MAP', 16, 1, ' '),
3134     ('SpFm1', '008', 'MAP', 33, 1, ' '),
3135     ('SpFm2', '006', 'MAP', 17, 1, ' '),
3136     ('SpFm2', '008', 'MAP', 34, 1, ' '),
3137
3138     ('Comp', '006', 'REC', 1, 2, 'uu'),
3139     ('Comp', '008', 'REC', 18, 2, 'uu'),
3140     ('FMus', '006', 'REC', 3, 1, 'n'),
3141     ('FMus', '008', 'REC', 20, 1, 'n'),
3142     ('Part', '006', 'REC', 4, 1, 'n'),
3143     ('Part', '008', 'REC', 21, 1, 'n'),
3144     ('AccM', '006', 'REC', 7, 6, '      '),
3145     ('AccM', '008', 'REC', 24, 6, '      '),
3146     ('LTxt', '006', 'REC', 13, 2, '  '),
3147     ('LTxt', '008', 'REC', 30, 2, '  '),
3148     ('TrAr', '006', 'REC', 16, 1, 'n'),
3149     ('TrAr', '008', 'REC', 33, 1, 'n'),
3150     ('AccM1', '006', 'REC', 7, 1, ' '),
3151     ('AccM1', '008', 'REC', 24, 1, ' '),
3152     ('AccM2', '006', 'REC', 8, 1, ' '),
3153     ('AccM2', '008', 'REC', 25, 1, ' '),
3154     ('AccM3', '006', 'REC', 9, 1, ' '),
3155     ('AccM3', '008', 'REC', 26, 1, ' '),
3156     ('AccM4', '006', 'REC', 10, 1, ' '),
3157     ('AccM4', '008', 'REC', 27, 1, ' '),
3158     ('AccM5', '006', 'REC', 11, 1, ' '),
3159     ('AccM5', '008', 'REC', 28, 1, ' '),
3160     ('AccM6', '006', 'REC', 12, 1, ' '),
3161     ('AccM6', '008', 'REC', 29, 1, ' '),
3162     ('LTxt1', '006', 'REC', 13, 1, ' '),
3163     ('LTxt1', '008', 'REC', 30, 1, ' '),
3164     ('LTxt2', '006', 'REC', 14, 1, ' '),
3165     ('LTxt2', '008', 'REC', 31, 1, ' '),
3166
3167     ('Comp', '006', 'SCO', 1, 2, 'uu'),
3168     ('Comp', '008', 'SCO', 18, 2, 'uu'),
3169     ('FMus', '006', 'SCO', 3, 1, 'u'),
3170     ('FMus', '008', 'SCO', 20, 1, 'u'),
3171     ('Part', '006', 'SCO', 4, 1, ' '),
3172     ('Part', '008', 'SCO', 21, 1, ' '),
3173     ('AccM', '006', 'SCO', 7, 6, '      '),
3174     ('AccM', '008', 'SCO', 24, 6, '      '),
3175     ('LTxt', '006', 'SCO', 13, 2, 'n '),
3176     ('LTxt', '008', 'SCO', 30, 2, 'n '),
3177     ('TrAr', '006', 'SCO', 16, 1, ' '),
3178     ('TrAr', '008', 'SCO', 33, 1, ' '),
3179     ('AccM1', '006', 'SCO', 7, 1, ' '),
3180     ('AccM1', '008', 'SCO', 24, 1, ' '),
3181     ('AccM2', '006', 'SCO', 8, 1, ' '),
3182     ('AccM2', '008', 'SCO', 25, 1, ' '),
3183     ('AccM3', '006', 'SCO', 9, 1, ' '),
3184     ('AccM3', '008', 'SCO', 26, 1, ' '),
3185     ('AccM4', '006', 'SCO', 10, 1, ' '),
3186     ('AccM4', '008', 'SCO', 27, 1, ' '),
3187     ('AccM5', '006', 'SCO', 11, 1, ' '),
3188     ('AccM5', '008', 'SCO', 28, 1, ' '),
3189     ('AccM6', '006', 'SCO', 12, 1, ' '),
3190     ('AccM6', '008', 'SCO', 29, 1, ' '),
3191     ('LTxt1', '006', 'SCO', 13, 1, 'n'),
3192     ('LTxt1', '008', 'SCO', 30, 1, 'n'),
3193     ('LTxt2', '006', 'SCO', 14, 1, 'n'),
3194     ('LTxt2', '008', 'SCO', 31, 1, 'n'),
3195
3196     ('SrTp', '006', 'SER', 4, 1, ' '),
3197     ('SrTp', '008', 'SER', 21, 1, ' '),
3198     ('Orig', '006', 'SER', 5, 1, ' '),
3199     ('Orig', '008', 'SER', 22, 1, ' '),
3200     ('EntW', '006', 'SER', 7, 1, ' '),
3201     ('EntW', '008', 'SER', 24, 1, ' '),
3202
3203     ('Time', '006', 'VIS', 1, 3, '   '),
3204     ('Time', '008', 'VIS', 18, 3, '   '),
3205     ('Tech', '006', 'VIS', 17, 1, 'n'),
3206     ('Tech', '008', 'VIS', 34, 1, 'n'),
3207
3208         ('Ills1', '006', 'BKS', 1, 1, ' '),
3209     ('Ills1', '008', 'BKS', 18, 1, ' '),
3210     ('Ills2', '006', 'BKS', 2, 1, ' '),
3211     ('Ills2', '008', 'BKS', 19, 1, ' '),
3212     ('Ills3', '006', 'BKS', 3, 1, ' '),
3213     ('Ills3', '008', 'BKS', 20, 1, ' '),
3214     ('Ills4', '006', 'BKS', 4, 1, ' '),
3215     ('Ills4', '008', 'BKS', 21, 1, ' '),
3216     ('Cont1', '006', 'BKS', 7, 1, ' '),
3217     ('Cont1', '008', 'BKS', 24, 1, ' '),
3218     ('Cont2', '006', 'BKS', 8, 1, ' '),
3219     ('Cont2', '008', 'BKS', 25, 1, ' '),
3220     ('Cont3', '006', 'BKS', 9, 1, ' '),
3221     ('Cont3', '008', 'BKS', 26, 1, ' '),
3222     ('Cont4', '006', 'BKS', 10, 1, ' '),
3223     ('Cont4', '008', 'BKS', 27, 1, ' '),
3224
3225     ('Cont1', '006', 'SER', 8, 1, ' '),
3226     ('Cont1', '008', 'SER', 25, 1, ' '),
3227     ('Cont2', '006', 'SER', 9, 1, ' '),
3228     ('Cont2', '008', 'SER', 26, 1, ' '),
3229     ('Cont3', '006', 'SER', 10, 1, ' '),
3230     ('Cont3', '008', 'SER', 27, 1, ' ');
3231
3232
3233 -- Add record_attr_definitions
3234 -- The xxx1,2,etc. are for multi-position single character code fields.
3235 INSERT INTO config.record_attr_definition (name,label,fixed_field) VALUES
3236     ('accm','AccM','AccM'),
3237     ('comp','Comp','Comp'),
3238     ('crtp','CrTp','CrTp'),
3239     ('entw','EntW','EntW'),
3240     ('cont','Cont','Cont'),
3241     ('fmus','FMus','FMus'),
3242     ('ltxt','LTxt','LTxt'),
3243     ('orig','Orig','Orig'),
3244     ('part','Part','Part'),
3245     ('proj','Proj','Proj'),
3246     ('relf','Relf','Relf'),
3247     ('spfm','SpFm','SpFm'),
3248     ('srtp','SrTp','SrTp'),
3249     ('tech','Tech','Tech'),
3250     ('trar','TrAr','TrAr'),
3251     ('accm1','AccM(1)','AccM1'),
3252     ('accm2','AccM(2)','AccM2'),
3253     ('accm3','AccM(3)','AccM3'),
3254     ('accm4','AccM(4)','AccM4'),
3255     ('accm5','AccM(5)','AccM5'),
3256     ('accm6','AccM(6)','AccM6'),
3257     ('cont1','Cont(1)','Cont1'),
3258     ('cont2','Cont(2)','Cont2'),
3259     ('cont3','Cont(3)','Cont3'),
3260     ('cont4','Cont(4)','Cont4'),
3261     ('ills1','Ills(1)','Ills1'),
3262     ('ills2','Ills(2)','Ills2'),
3263     ('ills3','Ills(3)','Ills3'),
3264     ('ills4','Ills(4)','Ills4'),
3265     ('ltxt1','LTxt(1)','LTxt1'),
3266     ('ltxt2','LTxt(2)','LTxt2'),
3267     ('relf1','Relf(1)','Relf1'),
3268     ('relf2','Relf(2)','Relf2'),
3269     ('relf3','Relf(3)','Relf3'),
3270     ('relf4','Relf(4)','Relf4'),
3271     ('spfm1','SpFm(1)','SpFm1'),
3272     ('spfm2','SpFm(2)','SpFm2');
3273
3274 UPDATE config.record_attr_definition SET composite = TRUE WHERE name IN ('accm', 'cont', 'ills', 'ltxt', 'relf', 'spfm');
3275
3276 -- "Next" id for stock config.coded_value_map is 634 as of 7/16/15, but there's an incoming patch that takes 634-711
3277 INSERT INTO config.coded_value_map (id, ctype, code, value) VALUES
3278     (1735, 'accm', ' ',                 oils_i18n_gettext('1735', 'No accompanying matter', 'ccvm', 'value')),
3279     (713, 'accm', 'a',                  oils_i18n_gettext('713', 'Discography', 'ccvm', 'value')),
3280     (714, 'accm', 'b',                  oils_i18n_gettext('714', 'Bibliography', 'ccvm', 'value')),
3281     (715, 'accm', 'c',                  oils_i18n_gettext('715', 'Thematic index', 'ccvm', 'value')),
3282     (716, 'accm', 'd',                  oils_i18n_gettext('716', 'Libretto or text', 'ccvm', 'value')),
3283     (717, 'accm', 'e',                  oils_i18n_gettext('717', 'Biography of composer or author', 'ccvm', 'value')),
3284     (718, 'accm', 'f',                  oils_i18n_gettext('718', 'Biography or performer or history of ensemble', 'ccvm', 'value')),
3285     (719, 'accm', 'g',                  oils_i18n_gettext('719', 'Technical and/or historical information on instruments', 'ccvm', 'value')),
3286     (720, 'accm', 'h',                  oils_i18n_gettext('720', 'Technical information on music', 'ccvm', 'value')),
3287     (721, 'accm', 'i',                  oils_i18n_gettext('721', 'Historical information', 'ccvm', 'value')),
3288     (722, 'accm', 'k',                  oils_i18n_gettext('722', 'Ethnological information', 'ccvm', 'value')),
3289     (723, 'accm', 'r',                  oils_i18n_gettext('723', 'Instructional materials', 'ccvm', 'value')),
3290     (724, 'accm', 's',                  oils_i18n_gettext('724', 'Music', 'ccvm', 'value')),
3291     (725, 'accm', 'z',                  oils_i18n_gettext('725', 'Other accompanying matter', 'ccvm', 'value')),
3292
3293     (726, 'comp', '  ',                 oils_i18n_gettext('726', 'No information supplied', 'ccvm', 'value')),
3294     (727, 'comp', 'an',                 oils_i18n_gettext('727', 'Anthems', 'ccvm', 'value')),
3295     (728, 'comp', 'bd',                 oils_i18n_gettext('728', 'Ballads', 'ccvm', 'value')),
3296     (729, 'comp', 'bt',                 oils_i18n_gettext('729', 'Ballets', 'ccvm', 'value')),
3297     (730, 'comp', 'bg',                 oils_i18n_gettext('730', 'Bluegrass music', 'ccvm', 'value')),
3298     (731, 'comp', 'bl',                 oils_i18n_gettext('731', 'Blues', 'ccvm', 'value')),
3299     (732, 'comp', 'cn',                 oils_i18n_gettext('732', 'Canons and rounds', 'ccvm', 'value')),
3300     (733, 'comp', 'ct',                 oils_i18n_gettext('733', 'Cantatas', 'ccvm', 'value')),
3301     (734, 'comp', 'cz',                 oils_i18n_gettext('734', 'Canzonas', 'ccvm', 'value')),
3302     (735, 'comp', 'cr',                 oils_i18n_gettext('735', 'Carols', 'ccvm', 'value')),
3303     (736, 'comp', 'ca',                 oils_i18n_gettext('736', 'Chaconnes', 'ccvm', 'value')),
3304     (737, 'comp', 'cs',                 oils_i18n_gettext('737', 'Chance compositions', 'ccvm', 'value')),
3305     (738, 'comp', 'cp',                 oils_i18n_gettext('738', 'Chansons, Polyphonic', 'ccvm', 'value')),
3306     (739, 'comp', 'cc',                 oils_i18n_gettext('739', 'Chant, Christian', 'ccvm', 'value')),
3307     (740, 'comp', 'cb',                 oils_i18n_gettext('740', 'Chants, other', 'ccvm', 'value')),
3308     (741, 'comp', 'cl',                 oils_i18n_gettext('741', 'Chorale preludes', 'ccvm', 'value')),
3309     (742, 'comp', 'ch',                 oils_i18n_gettext('742', 'Chorales', 'ccvm', 'value')),
3310     (743, 'comp', 'cg',                 oils_i18n_gettext('743', 'Concerti grossi', 'ccvm', 'value')),
3311     (744, 'comp', 'co',                 oils_i18n_gettext('744', 'Concertos', 'ccvm', 'value')),
3312     (745, 'comp', 'cy',                 oils_i18n_gettext('745', 'Country music', 'ccvm', 'value')),
3313     (746, 'comp', 'df',                 oils_i18n_gettext('746', 'Dance forms', 'ccvm', 'value')),
3314     (747, 'comp', 'dv',                 oils_i18n_gettext('747', 'Divertimentos, serenades, cassations, divertissements, and notturni', 'ccvm', 'value')),
3315     (748, 'comp', 'ft',                 oils_i18n_gettext('748', 'Fantasias', 'ccvm', 'value')),
3316     (749, 'comp', 'fl',                 oils_i18n_gettext('749', 'Flamenco', 'ccvm', 'value')),
3317     (750, 'comp', 'fm',                 oils_i18n_gettext('750', 'Folk music', 'ccvm', 'value')),
3318     (751, 'comp', 'fg',                 oils_i18n_gettext('751', 'Fugues', 'ccvm', 'value')),
3319     (752, 'comp', 'gm',                 oils_i18n_gettext('752', 'Gospel music', 'ccvm', 'value')),
3320     (753, 'comp', 'hy',                 oils_i18n_gettext('753', 'Hymns', 'ccvm', 'value')),
3321     (754, 'comp', 'jz',                 oils_i18n_gettext('754', 'Jazz', 'ccvm', 'value')),
3322     (755, 'comp', 'md',                 oils_i18n_gettext('755', 'Madrigals', 'ccvm', 'value')),
3323     (756, 'comp', 'mr',                 oils_i18n_gettext('756', 'Marches', 'ccvm', 'value')),
3324     (757, 'comp', 'ms',                 oils_i18n_gettext('757', 'Masses', 'ccvm', 'value')),
3325     (758, 'comp', 'mz',                 oils_i18n_gettext('758', 'Mazurkas', 'ccvm', 'value')),
3326     (759, 'comp', 'mi',                 oils_i18n_gettext('759', 'Minuets', 'ccvm', 'value')),
3327     (760, 'comp', 'mo',                 oils_i18n_gettext('760', 'Motets', 'ccvm', 'value')),
3328     (761, 'comp', 'mp',                 oils_i18n_gettext('761', 'Motion picture music', 'ccvm', 'value')),
3329     (762, 'comp', 'mu',                 oils_i18n_gettext('762', 'Multiple forms', 'ccvm', 'value')),
3330     (763, 'comp', 'mc',                 oils_i18n_gettext('763', 'Musical reviews and comedies', 'ccvm', 'value')),
3331     (764, 'comp', 'nc',                 oils_i18n_gettext('764', 'Nocturnes', 'ccvm', 'value')),
3332     (765, 'comp', 'nn',                 oils_i18n_gettext('765', 'Not applicable', 'ccvm', 'value')),
3333     (766, 'comp', 'op',                 oils_i18n_gettext('766', 'Operas', 'ccvm', 'value')),
3334     (767, 'comp', 'or',                 oils_i18n_gettext('767', 'Oratorios', 'ccvm', 'value')),
3335     (768, 'comp', 'ov',                 oils_i18n_gettext('768', 'Overtures', 'ccvm', 'value')),
3336     (769, 'comp', 'pt',                 oils_i18n_gettext('769', 'Part-songs', 'ccvm', 'value')),
3337     (770, 'comp', 'ps',                 oils_i18n_gettext('770', 'Passacaglias', 'ccvm', 'value')),
3338     (771, 'comp', 'pm',                 oils_i18n_gettext('771', 'Passion music', 'ccvm', 'value')),
3339     (772, 'comp', 'pv',                 oils_i18n_gettext('772', 'Pavans', 'ccvm', 'value')),
3340     (773, 'comp', 'po',                 oils_i18n_gettext('773', 'Polonaises', 'ccvm', 'value')),
3341     (774, 'comp', 'pp',                 oils_i18n_gettext('774', 'Popular music', 'ccvm', 'value')),
3342     (775, 'comp', 'pr',                 oils_i18n_gettext('775', 'Preludes', 'ccvm', 'value')),
3343     (776, 'comp', 'pg',                 oils_i18n_gettext('776', 'Program music', 'ccvm', 'value')),
3344     (777, 'comp', 'rg',                 oils_i18n_gettext('777', 'Ragtime music', 'ccvm', 'value')),
3345     (778, 'comp', 'rq',                 oils_i18n_gettext('778', 'Requiems', 'ccvm', 'value')),
3346     (779, 'comp', 'rp',                 oils_i18n_gettext('779', 'Rhapsodies', 'ccvm', 'value')),
3347     (780, 'comp', 'ri',                 oils_i18n_gettext('780', 'Ricercars', 'ccvm', 'value')),
3348     (781, 'comp', 'rc',                 oils_i18n_gettext('781', 'Rock music', 'ccvm', 'value')),
3349     (782, 'comp', 'rd',                 oils_i18n_gettext('782', 'Rondos', 'ccvm', 'value')),
3350     (783, 'comp', 'sn',                 oils_i18n_gettext('783', 'Sonatas', 'ccvm', 'value')),
3351     (784, 'comp', 'sg',                 oils_i18n_gettext('784', 'Songs', 'ccvm', 'value')),
3352     (785, 'comp', 'sd',                 oils_i18n_gettext('785', 'Square dance music', 'ccvm', 'value')),
3353     (786, 'comp', 'st',                 oils_i18n_gettext('786', 'Studies and exercises', 'ccvm', 'value')),
3354     (787, 'comp', 'su',                 oils_i18n_gettext('787', 'Suites', 'ccvm', 'value')),
3355     (788, 'comp', 'sp',                 oils_i18n_gettext('788', 'Symphonic poems', 'ccvm', 'value')),
3356     (789, 'comp', 'sy',                 oils_i18n_gettext('789', 'Symphonies', 'ccvm', 'value')),
3357     (790, 'comp', 'tl',                 oils_i18n_gettext('790', 'Teatro lirico', 'ccvm', 'value')),
3358     (791, 'comp', 'tc',                 oils_i18n_gettext('791', 'Toccatas', 'ccvm', 'value')),
3359     (792, 'comp', 'ts',                 oils_i18n_gettext('792', 'Trio-sonatas', 'ccvm', 'value')),
3360     (793, 'comp', 'uu',                 oils_i18n_gettext('793', 'Unknown', 'ccvm', 'value')),
3361     (794, 'comp', 'vi',                 oils_i18n_gettext('794', 'Villancicos', 'ccvm', 'value')),
3362     (795, 'comp', 'vr',                 oils_i18n_gettext('795', 'Variations', 'ccvm', 'value')),
3363     (796, 'comp', 'wz',                 oils_i18n_gettext('796', 'Waltzes', 'ccvm', 'value')),
3364     (797, 'comp', 'za',                 oils_i18n_gettext('797', 'Zarzuelas', 'ccvm', 'value')),
3365     (798, 'comp', 'zz',                 oils_i18n_gettext('798', 'Other forms', 'ccvm', 'value')),
3366
3367     (799, 'crtp', 'a',                  oils_i18n_gettext('799', 'Single map', 'ccvm', 'value')),
3368     (800, 'crtp', 'b',                  oils_i18n_gettext('800', 'Map series', 'ccvm', 'value')),
3369     (801, 'crtp', 'c',                  oils_i18n_gettext('801', 'Map serial', 'ccvm', 'value')),
3370     (802, 'crtp', 'd',                  oils_i18n_gettext('802', 'Globe', 'ccvm', 'value')),
3371     (803, 'crtp', 'e',                  oils_i18n_gettext('803', 'Atlas', 'ccvm', 'value')),
3372     (804, 'crtp', 'f',                  oils_i18n_gettext('804', 'Separate supplement to another work', 'ccvm', 'value')),
3373     (805, 'crtp', 'g',                  oils_i18n_gettext('805', 'Bound as part of another work', 'ccvm', 'value')),
3374     (806, 'crtp', 'u',                  oils_i18n_gettext('806', 'Unknown', 'ccvm', 'value')),
3375     (807, 'crtp', 'z',                  oils_i18n_gettext('807', 'Other', 'ccvm', 'value')),
3376
3377     (808, 'entw', ' ',                  oils_i18n_gettext('808', 'Not specified', 'ccvm', 'value')),
3378     (809, 'entw', 'a',                  oils_i18n_gettext('809', 'Abstracts/summaries', 'ccvm', 'value')),
3379     (810, 'entw', 'b',                  oils_i18n_gettext('810', 'Bibliographies', 'ccvm', 'value')),
3380     (811, 'entw', 'c',                  oils_i18n_gettext('811', 'Catalogs', 'ccvm', 'value')),
3381     (812, 'entw', 'd',                  oils_i18n_gettext('812', 'Dictionaries', 'ccvm', 'value')),
3382     (813, 'entw', 'e',                  oils_i18n_gettext('813', 'Encyclopedias', 'ccvm', 'value')),
3383     (814, 'entw', 'f',                  oils_i18n_gettext('814', 'Handbooks', 'ccvm', 'value')),
3384     (815, 'entw', 'g',                  oils_i18n_gettext('815', 'Legal articles', 'ccvm', 'value')),
3385     (816, 'entw', 'h',                  oils_i18n_gettext('816', 'Biography', 'ccvm', 'value')),
3386     (817, 'entw', 'i',                  oils_i18n_gettext('817', 'Indexes', 'ccvm', 'value')),
3387     (818, 'entw', 'k',                  oils_i18n_gettext('818', 'Discographies', 'ccvm', 'value')),
3388     (819, 'entw', 'l',                  oils_i18n_gettext('819', 'Legislation', 'ccvm', 'value')),
3389     (820, 'entw', 'm',                  oils_i18n_gettext('820', 'Theses', 'ccvm', 'value')),
3390     (821, 'entw', 'n',                  oils_i18n_gettext('821', 'Surveys of the literature in a subject area', 'ccvm', 'value')),
3391     (822, 'entw', 'o',                  oils_i18n_gettext('822', 'Reviews', 'ccvm', 'value')),
3392     (823, 'entw', 'p',                  oils_i18n_gettext('823', 'Programmed texts', 'ccvm', 'value')),
3393     (824, 'entw', 'q',                  oils_i18n_gettext('824', 'Filmographies', 'ccvm', 'value')),
3394     (825, 'entw', 'r',                  oils_i18n_gettext('825', 'Directories', 'ccvm', 'value')),
3395     (826, 'entw', 's',                  oils_i18n_gettext('826', 'Statistics', 'ccvm', 'value')),
3396     (827, 'entw', 't',                  oils_i18n_gettext('827', 'Technical reports', 'ccvm', 'value')),
3397     (828, 'entw', 'u',                  oils_i18n_gettext('828', 'Standards/specifications', 'ccvm', 'value')),
3398     (829, 'entw', 'v',                  oils_i18n_gettext('829', 'Legal cases and case notes', 'ccvm', 'value')),
3399     (830, 'entw', 'w',                  oils_i18n_gettext('830', 'Law reports and digests', 'ccvm', 'value')),
3400     (831, 'entw', 'y',                  oils_i18n_gettext('831', 'Yearbooks', 'ccvm', 'value')),
3401     (832, 'entw', 'z',                  oils_i18n_gettext('832', 'Treaties', 'ccvm', 'value')),
3402     (833, 'entw', '5',                  oils_i18n_gettext('833', 'Calendars', 'ccvm', 'value')),
3403     (834, 'entw', '6',                  oils_i18n_gettext('834', 'Comics/graphic novels', 'ccvm', 'value')),
3404
3405     (835, 'cont', ' ',                  oils_i18n_gettext('835', 'Not specified', 'ccvm', 'value')),
3406     (836, 'cont', 'a',                  oils_i18n_gettext('836', 'Abstracts/summaries', 'ccvm', 'value')),
3407     (837, 'cont', 'b',                  oils_i18n_gettext('837', 'Bibliographies', 'ccvm', 'value')),
3408     (838, 'cont', 'c',                  oils_i18n_gettext('838', 'Catalogs', 'ccvm', 'value')),
3409     (839, 'cont', 'd',                  oils_i18n_gettext('839', 'Dictionaries', 'ccvm', 'value')),
3410     (840, 'cont', 'e',                  oils_i18n_gettext('840', 'Encyclopedias', 'ccvm', 'value')),
3411     (841, 'cont', 'f',                  oils_i18n_gettext('841', 'Handbooks', 'ccvm', 'value')),
3412     (842, 'cont', 'g',                  oils_i18n_gettext('842', 'Legal articles', 'ccvm', 'value')),
3413     (843, 'cont', 'h',                  oils_i18n_gettext('843', 'Biography', 'ccvm', 'value')),
3414     (844, 'cont', 'i',                  oils_i18n_gettext('844', 'Indexes', 'ccvm', 'value')),
3415     (845, 'cont', 'j',                  oils_i18n_gettext('845', 'Patent document', 'ccvm', 'value')),
3416     (846, 'cont', 'k',                  oils_i18n_gettext('846', 'Discographies', 'ccvm', 'value')),
3417     (847, 'cont', 'l',                  oils_i18n_gettext('847', 'Legislation', 'ccvm', 'value')),
3418     (848, 'cont', 'm',                  oils_i18n_gettext('848', 'Theses', 'ccvm', 'value')),
3419     (849, 'cont', 'n',                  oils_i18n_gettext('849', 'Surveys of the literature in a subject area', 'ccvm', 'value')),
3420     (850, 'cont', 'o',                  oils_i18n_gettext('850', 'Reviews', 'ccvm', 'value')),
3421     (851, 'cont', 'p',                  oils_i18n_gettext('851', 'Programmed texts', 'ccvm', 'value')),
3422     (852, 'cont', 'q',                  oils_i18n_gettext('852', 'Filmographies', 'ccvm', 'value')),
3423     (853, 'cont', 'r',                  oils_i18n_gettext('853', 'Directories', 'ccvm', 'value')),
3424     (854, 'cont', 's',                  oils_i18n_gettext('854', 'Statistics', 'ccvm', 'value')),
3425     (855, 'cont', 't',                  oils_i18n_gettext('855', 'Technical reports', 'ccvm', 'value')),
3426     (856, 'cont', 'u',                  oils_i18n_gettext('856', 'Standards/specifications', 'ccvm', 'value')),
3427     (857, 'cont', 'v',                  oils_i18n_gettext('857', 'Legal cases and case notes', 'ccvm', 'value')),
3428     (858, 'cont', 'w',                  oils_i18n_gettext('858', 'Law reports and digests', 'ccvm', 'value')),
3429     (859, 'cont', 'x',                  oils_i18n_gettext('859', 'Other reports', 'ccvm', 'value')),
3430     (860, 'cont', 'y',                  oils_i18n_gettext('860', 'Yearbooks', 'ccvm', 'value')),
3431     (861, 'cont', 'z',                  oils_i18n_gettext('861', 'Treaties', 'ccvm', 'value')),
3432     (862, 'cont', '2',                  oils_i18n_gettext('862', 'Offprints', 'ccvm', 'value')),
3433     (863, 'cont', '5',                  oils_i18n_gettext('863', 'Calendars', 'ccvm', 'value')),
3434     (864, 'cont', '6',                  oils_i18n_gettext('864', 'Comics/graphic novels', 'ccvm', 'value')),
3435
3436     (865, 'fmus', ' ',                  oils_i18n_gettext('865', 'Information not supplied', 'ccvm', 'value')),
3437     (866, 'fmus', 'a',                  oils_i18n_gettext('866', 'Full score', 'ccvm', 'value')),
3438     (867, 'fmus', 'b',                  oils_i18n_gettext('867', 'Full score, miniature or study size', 'ccvm', 'value')),
3439     (868, 'fmus', 'c',                  oils_i18n_gettext('868', 'Accompaniment reduced for keyboard', 'ccvm', 'value')),
3440     (869, 'fmus', 'd',                  oils_i18n_gettext('869', 'Voice score with accompaniment omitted', 'ccvm', 'value')),
3441     (870, 'fmus', 'e',                  oils_i18n_gettext('870', 'Condensed score or piano-conductor score', 'ccvm', 'value')),
3442     (871, 'fmus', 'g',                  oils_i18n_gettext('871', 'Close score', 'ccvm', 'value')),
3443     (872, 'fmus', 'h',                  oils_i18n_gettext('872', 'Chorus score', 'ccvm', 'value')),
3444     (873, 'fmus', 'i',                  oils_i18n_gettext('873', 'Condensed score', 'ccvm', 'value')),
3445     (874, 'fmus', 'j',                  oils_i18n_gettext('874', 'Performer-conductor part', 'ccvm', 'value')),
3446     (875, 'fmus', 'k',                  oils_i18n_gettext('875', 'Vocal score', 'ccvm', 'value')),
3447     (876, 'fmus', 'l',                  oils_i18n_gettext('876', 'Score', 'ccvm', 'value')),
3448     (877, 'fmus', 'm',                  oils_i18n_gettext('877', 'Multiple score formats', 'ccvm', 'value')),
3449     (878, 'fmus', 'n',                  oils_i18n_gettext('878', 'Not applicable', 'ccvm', 'value')),
3450     (879, 'fmus', 'u',                  oils_i18n_gettext('879', 'Unknown', 'ccvm', 'value')),
3451     (880, 'fmus', 'z',                  oils_i18n_gettext('880', 'Other', 'ccvm', 'value')),
3452
3453     (881, 'ltxt', ' ',                  oils_i18n_gettext('881', 'Item is a music sound recording', 'ccvm', 'value')),
3454     (882, 'ltxt', 'a',                  oils_i18n_gettext('882', 'Autobiography', 'ccvm', 'value')),
3455     (883, 'ltxt', 'b',                  oils_i18n_gettext('883', 'Biography', 'ccvm', 'value')),
3456     (884, 'ltxt', 'c',                  oils_i18n_gettext('884', 'Conference proceedings', 'ccvm', 'value')),
3457     (885, 'ltxt', 'd',                  oils_i18n_gettext('885', 'Drama', 'ccvm', 'value')),
3458     (886, 'ltxt', 'e',                  oils_i18n_gettext('886', 'Essays', 'ccvm', 'value')),
3459     (887, 'ltxt', 'f',                  oils_i18n_gettext('887', 'Fiction', 'ccvm', 'value')),
3460     (888, 'ltxt', 'g',                  oils_i18n_gettext('888', 'Reporting', 'ccvm', 'value')),
3461     (889, 'ltxt', 'h',                  oils_i18n_gettext('889', 'History', 'ccvm', 'value')),
3462     (890, 'ltxt', 'i',                  oils_i18n_gettext('890', 'Instruction', 'ccvm', 'value')),
3463     (891, 'ltxt', 'j',                  oils_i18n_gettext('891', 'Language instruction', 'ccvm', 'value')),
3464     (892, 'ltxt', 'k',                  oils_i18n_gettext('892', 'Comedy', 'ccvm', 'value')),
3465     (893, 'ltxt', 'l',                  oils_i18n_gettext('893', 'Lectures, speeches', 'ccvm', 'value')),
3466     (894, 'ltxt', 'm',                  oils_i18n_gettext('894', 'Memoirs', 'ccvm', 'value')),
3467     (895, 'ltxt', 'n',                  oils_i18n_gettext('895', 'Not applicable', 'ccvm', 'value')),
3468     (896, 'ltxt', 'o',                  oils_i18n_gettext('896', 'Folktales', 'ccvm', 'value')),
3469     (897, 'ltxt', 'p',                  oils_i18n_gettext('897', 'Poetry', 'ccvm', 'value')),
3470     (898, 'ltxt', 'r',                  oils_i18n_gettext('898', 'Rehearsals', 'ccvm', 'value')),
3471     (899, 'ltxt', 's',                  oils_i18n_gettext('899', 'Sounds', 'ccvm', 'value')),
3472     (900, 'ltxt', 't',                  oils_i18n_gettext('900', 'Interviews', 'ccvm', 'value')),
3473     (901, 'ltxt', 'z',                  oils_i18n_gettext('901', 'Other', 'ccvm', 'value')),
3474
3475     (902, 'orig', ' ',                  oils_i18n_gettext('902', 'None of the following', 'ccvm', 'value')),
3476     (903, 'orig', 'a',                  oils_i18n_gettext('903', 'Microfilm', 'ccvm', 'value')),
3477     (904, 'orig', 'b',                  oils_i18n_gettext('904', 'Microfiche', 'ccvm', 'value')),
3478     (905, 'orig', 'c',                  oils_i18n_gettext('905', 'Microopaque', 'ccvm', 'value')),
3479     (906, 'orig', 'd',                  oils_i18n_gettext('906', 'Large print', 'ccvm', 'value')),
3480     (907, 'orig', 'e',                  oils_i18n_gettext('907', 'Newspaper format', 'ccvm', 'value')),
3481     (908, 'orig', 'f',                  oils_i18n_gettext('908', 'Braille', 'ccvm', 'value')),
3482     (909, 'orig', 'o',                  oils_i18n_gettext('909', 'Online', 'ccvm', 'value')),
3483     (910, 'orig', 'q',                  oils_i18n_gettext('910', 'Direct electronic', 'ccvm', 'value')),
3484     (911, 'orig', 's',                  oils_i18n_gettext('911', 'Electronic', 'ccvm', 'value')),
3485
3486     (912, 'part', ' ',                  oils_i18n_gettext('912', 'No parts in hand or not specified', 'ccvm', 'value')),
3487     (913, 'part', 'd',                  oils_i18n_gettext('913', 'Instrumental and vocal parts', 'ccvm', 'value')),
3488     (914, 'part', 'e',                  oils_i18n_gettext('914', 'Instrumental parts', 'ccvm', 'value')),
3489     (915, 'part', 'f',                  oils_i18n_gettext('915', 'Vocal parts', 'ccvm', 'value')),
3490     (916, 'part', 'n',                  oils_i18n_gettext('916', 'Not Applicable', 'ccvm', 'value')),
3491     (917, 'part', 'u',                  oils_i18n_gettext('917', 'Unknown', 'ccvm', 'value')),
3492
3493     (918, 'proj', '  ',                 oils_i18n_gettext('918', 'Project not specified', 'ccvm', 'value')),
3494     (919, 'proj', 'aa',                 oils_i18n_gettext('919', 'Aitoff', 'ccvm', 'value')),
3495     (920, 'proj', 'ab',                 oils_i18n_gettext('920', 'Gnomic', 'ccvm', 'value')),
3496     (921, 'proj', 'ac',                 oils_i18n_gettext('921', 'Lambert''s azimuthal equal area', 'ccvm', 'value')),
3497     (922, 'proj', 'ad',                 oils_i18n_gettext('922', 'Orthographic', 'ccvm', 'value')),
3498     (923, 'proj', 'ae',                 oils_i18n_gettext('923', 'Azimuthal equidistant', 'ccvm', 'value')),
3499     (924, 'proj', 'af',                 oils_i18n_gettext('924', 'Stereographic', 'ccvm', 'value')),
3500     (925, 'proj', 'ag',                 oils_i18n_gettext('925', 'General vertical near-sided', 'ccvm', 'value')),
3501     (926, 'proj', 'am',                 oils_i18n_gettext('926', 'Modified stereographic for Alaska', 'ccvm', 'value')),
3502     (927, 'proj', 'an',                 oils_i18n_gettext('927', 'Chamberlin trimetric', 'ccvm', 'value')),
3503     (928, 'proj', 'ap',                 oils_i18n_gettext('928', 'Polar stereographic', 'ccvm', 'value')),
3504     (929, 'proj', 'au',                 oils_i18n_gettext('929', 'Azimuthal, specific type unknown', 'ccvm', 'value')),
3505     (930, 'proj', 'az',                 oils_i18n_gettext('930', 'Azimuthal, other', 'ccvm', 'value')),
3506     (931, 'proj', 'ba',                 oils_i18n_gettext('931', 'Gall', 'ccvm', 'value')),
3507     (932, 'proj', 'bb',                 oils_i18n_gettext('932', 'Goode''s homolographic', 'ccvm', 'value')),
3508     (933, 'proj', 'bc',                 oils_i18n_gettext('933', 'Lambert''s cylindrical equal area', 'ccvm', 'value')),
3509     (934, 'proj', 'bd',                 oils_i18n_gettext('934', 'Mercator', 'ccvm', 'value')),
3510     (935, 'proj', 'be',                 oils_i18n_gettext('935', 'Miller', 'ccvm', 'value')),
3511     (936, 'proj', 'bf',                 oils_i18n_gettext('936', 'Mollweide', 'ccvm', 'value')),
3512     (937, 'proj', 'bg',                 oils_i18n_gettext('937', 'Sinusoidal', 'ccvm', 'value')),
3513     (938, 'proj', 'bh',                 oils_i18n_gettext('938', 'Transverse Mercator', 'ccvm', 'value')),
3514     (939, 'proj', 'bi',                 oils_i18n_gettext('939', 'Gauss-Kruger', 'ccvm', 'value')),
3515     (940, 'proj', 'bj',                 oils_i18n_gettext('940', 'Equirectangular', 'ccvm', 'value')),
3516     (941, 'proj', 'bk',                 oils_i18n_gettext('941', 'Krovak', 'ccvm', 'value')),
3517     (942, 'proj', 'bl',                 oils_i18n_gettext('942', 'Cassini-Soldner', 'ccvm', 'value')),
3518     (943, 'proj', 'bo',                 oils_i18n_gettext('943', 'Oblique Mercator', 'ccvm', 'value')),
3519     (944, 'proj', 'br',                 oils_i18n_gettext('944', 'Robinson', 'ccvm', 'value')),
3520     (945, 'proj', 'bs',                 oils_i18n_gettext('945', 'Space oblique Mercator', 'ccvm', 'value')),
3521     (946, 'proj', 'bu',                 oils_i18n_gettext('946', 'Cylindrical, specific type unknown', 'ccvm', 'value')),
3522     (947, 'proj', 'bz',                 oils_i18n_gettext('947', 'Cylindrical, other', 'ccvm', 'value')),
3523     (948, 'proj', 'ca',                 oils_i18n_gettext('948', 'Alber''s equal area', 'ccvm', 'value')),
3524     (949, 'proj', 'cb',                 oils_i18n_gettext('949', 'Bonne', 'ccvm', 'value')),
3525     (950, 'proj', 'cc',                 oils_i18n_gettext('950', 'Lambert''s conformal conic', 'ccvm', 'value')),
3526     (951, 'proj', 'ce',                 oils_i18n_gettext('951', 'Equidistant conic', 'ccvm', 'value')),
3527     (952, 'proj', 'cp',                 oils_i18n_gettext('952', 'Polyconic', 'ccvm', 'value')),
3528     (953, 'proj', 'cu',                 oils_i18n_gettext('953', 'Conic, specific type unknown', 'ccvm', 'value')),
3529     (954, 'proj', 'cz',                 oils_i18n_gettext('954', 'Conic, other', 'ccvm', 'value')),
3530     (955, 'proj', 'da',                 oils_i18n_gettext('955', 'Armadillo', 'ccvm', 'value')),
3531     (956, 'proj', 'db',                 oils_i18n_gettext('956', 'Butterfly', 'ccvm', 'value')),
3532     (957, 'proj', 'dc',                 oils_i18n_gettext('957', 'Eckert', 'ccvm', 'value')),
3533     (958, 'proj', 'dd',                 oils_i18n_gettext('958', 'Goode''s homolosine', 'ccvm', 'value')),
3534     (959, 'proj', 'de',                 oils_i18n_gettext('959', 'Miller''s bipolar oblique conformal conic', 'ccvm', 'value')),
3535     (960, 'proj', 'df',                 oils_i18n_gettext('960', 'Van Der Grinten', 'ccvm', 'value')),
3536     (961, 'proj', 'dg',                 oils_i18n_gettext('961', 'Dymaxion', 'ccvm', 'value')),
3537     (962, 'proj', 'dh',                 oils_i18n_gettext('962', 'Cordiform', 'ccvm', 'value')),
3538     (963, 'proj', 'dl',                 oils_i18n_gettext('963', 'Lambert conformal', 'ccvm', 'value')),
3539     (964, 'proj', 'zz',                 oils_i18n_gettext('964', 'Other', 'ccvm', 'value')),
3540
3541     (965, 'relf', ' ',                  oils_i18n_gettext('965', 'No relief shown', 'ccvm', 'value')),
3542     (966, 'relf', 'a',                  oils_i18n_gettext('966', 'Contours', 'ccvm', 'value')),
3543     (967, 'relf', 'b',                  oils_i18n_gettext('967', 'Shading', 'ccvm', 'value')),
3544     (968, 'relf', 'c',                  oils_i18n_gettext('968', 'Gradient and bathymetric tints', 'ccvm', 'value')),
3545     (969, 'relf', 'd',                  oils_i18n_gettext('969', 'Hachures', 'ccvm', 'value')),
3546     (970, 'relf', 'e',                  oils_i18n_gettext('970', 'Bathymetry, soundings', 'ccvm', 'value')),
3547     (971, 'relf', 'f',                  oils_i18n_gettext('971', 'Form lines', 'ccvm', 'value')),
3548     (972, 'relf', 'g',                  oils_i18n_gettext('972', 'Spot heights', 'ccvm', 'value')),
3549     (973, 'relf', 'i',                  oils_i18n_gettext('973', 'Pictorially', 'ccvm', 'value')),
3550     (974, 'relf', 'j',                  oils_i18n_gettext('974', 'Land forms', 'ccvm', 'value')),
3551     (975, 'relf', 'k',                  oils_i18n_gettext('975', 'Bathymetry, isolines', 'ccvm', 'value')),
3552     (976, 'relf', 'm',                  oils_i18n_gettext('976', 'Rock drawings', 'ccvm', 'value')),
3553     (977, 'relf', 'z',                  oils_i18n_gettext('977', 'Other', 'ccvm', 'value')),
3554
3555     (978, 'spfm', ' ',                  oils_i18n_gettext('978', 'No specified special format characteristics', 'ccvm', 'value')),
3556     (979, 'spfm', 'e',                  oils_i18n_gettext('979', 'Manuscript', 'ccvm', 'value')),
3557     (980, 'spfm', 'j',                  oils_i18n_gettext('980', 'Picture card, post card', 'ccvm', 'value')),
3558     (981, 'spfm', 'k',                  oils_i18n_gettext('981', 'Calendar', 'ccvm', 'value')),
3559     (982, 'spfm', 'l',                  oils_i18n_gettext('982', 'Puzzle', 'ccvm', 'value')),
3560     (983, 'spfm', 'n',                  oils_i18n_gettext('983', 'Game', 'ccvm', 'value')),
3561     (984, 'spfm', 'o',                  oils_i18n_gettext('984', 'Wall map', 'ccvm', 'value')),
3562     (985, 'spfm', 'p',                  oils_i18n_gettext('985', 'Playing cards', 'ccvm', 'value')),
3563     (986, 'spfm', 'r',                  oils_i18n_gettext('986', 'Loose-leaf', 'ccvm', 'value')),
3564     (987, 'spfm', 'z',                  oils_i18n_gettext('987', 'Other', 'ccvm', 'value')),
3565
3566     (988, 'srtp', ' ',                  oils_i18n_gettext('988', 'None of the following', 'ccvm', 'value')),
3567     (989, 'srtp', 'd',                  oils_i18n_gettext('989', 'Updating database', 'ccvm', 'value')),
3568     (990, 'srtp', 'l',                  oils_i18n_gettext('990', 'Updating loose-leaf', 'ccvm', 'value')),
3569     (991, 'srtp', 'm',                  oils_i18n_gettext('991', 'Monographic series', 'ccvm', 'value')),
3570     (992, 'srtp', 'n',                  oils_i18n_gettext('992', 'Newspaper', 'ccvm', 'value')),
3571     (993, 'srtp', 'p',                  oils_i18n_gettext('993', 'Periodical', 'ccvm', 'value')),
3572     (994, 'srtp', 'w',                  oils_i18n_gettext('994', 'Updating Web site', 'ccvm', 'value')),
3573
3574     (995, 'tech', 'a',                  oils_i18n_gettext('995', 'Animation', 'ccvm', 'value')),
3575     (996, 'tech', 'c',                  oils_i18n_gettext('996', 'Animation and live action', 'ccvm', 'value')),
3576     (997, 'tech', 'l',                  oils_i18n_gettext('997', 'Live action', 'ccvm', 'value')),
3577     (998, 'tech', 'n',                  oils_i18n_gettext('998', 'Not applicable', 'ccvm', 'value')),
3578     (999, 'tech', 'u',                  oils_i18n_gettext('999', 'Unknown', 'ccvm', 'value')),
3579     (1000, 'tech', 'z',                 oils_i18n_gettext('1000', 'Other', 'ccvm', 'value')),
3580
3581     (1001, 'trar', ' ',                 oils_i18n_gettext('1001', 'Not arrangement or transposition or not specified', 'ccvm', 'value')),
3582     (1002, 'trar', 'a',                 oils_i18n_gettext('1002', 'Transposition', 'ccvm', 'value')),
3583     (1003, 'trar', 'b',                 oils_i18n_gettext('1003', 'Arrangement', 'ccvm', 'value')),
3584     (1004, 'trar', 'c',                 oils_i18n_gettext('1004', 'Both transposed and arranged', 'ccvm', 'value')),
3585     (1005, 'trar', 'n',                 oils_i18n_gettext('1005', 'Not applicable', 'ccvm', 'value')),
3586     (1006, 'trar', 'u',                 oils_i18n_gettext('1006', 'Unknown', 'ccvm', 'value')),
3587
3588     (1007, 'ctry', 'aa ',               oils_i18n_gettext('1007', 'Albania ', 'ccvm', 'value')),
3589     (1008, 'ctry', 'abc',               oils_i18n_gettext('1008', 'Alberta ', 'ccvm', 'value')),
3590     (1009, 'ctry', 'aca',               oils_i18n_gettext('1009', 'Australian Capital Territory ', 'ccvm', 'value')),
3591     (1010, 'ctry', 'ae ',               oils_i18n_gettext('1010', 'Algeria ', 'ccvm', 'value')),
3592     (1011, 'ctry', 'af ',               oils_i18n_gettext('1011', 'Afghanistan ', 'ccvm', 'value')),
3593     (1012, 'ctry', 'ag ',               oils_i18n_gettext('1012', 'Argentina ', 'ccvm', 'value')),
3594     (1013, 'ctry', 'ai ',               oils_i18n_gettext('1013', 'Armenia (Republic) ', 'ccvm', 'value')),
3595     (1014, 'ctry', 'aj ',               oils_i18n_gettext('1014', 'Azerbaijan ', 'ccvm', 'value')),
3596     (1015, 'ctry', 'aku',               oils_i18n_gettext('1015', 'Alaska ', 'ccvm', 'value')),
3597     (1016, 'ctry', 'alu',               oils_i18n_gettext('1016', 'Alabama ', 'ccvm', 'value')),
3598     (1017, 'ctry', 'am ',               oils_i18n_gettext('1017', 'Anguilla ', 'ccvm', 'value')),
3599     (1018, 'ctry', 'an ',               oils_i18n_gettext('1018', 'Andorra ', 'ccvm', 'value')),
3600     (1019, 'ctry', 'ao ',               oils_i18n_gettext('1019', 'Angola ', 'ccvm', 'value')),
3601     (1020, 'ctry', 'aq ',               oils_i18n_gettext('1020', 'Antigua and Barbuda ', 'ccvm', 'value')),
3602     (1021, 'ctry', 'aru',               oils_i18n_gettext('1021', 'Arkansas ', 'ccvm', 'value')),
3603     (1022, 'ctry', 'as ',               oils_i18n_gettext('1022', 'American Samoa ', 'ccvm', 'value')),
3604     (1023, 'ctry', 'at ',               oils_i18n_gettext('1023', 'Australia ', 'ccvm', 'value')),
3605     (1024, 'ctry', 'au ',               oils_i18n_gettext('1024', 'Austria ', 'ccvm', 'value')),
3606     (1025, 'ctry', 'aw ',               oils_i18n_gettext('1025', 'Aruba ', 'ccvm', 'value')),
3607     (1026, 'ctry', 'ay ',               oils_i18n_gettext('1026', 'Antarctica ', 'ccvm', 'value')),
3608     (1027, 'ctry', 'azu',               oils_i18n_gettext('1027', 'Arizona ', 'ccvm', 'value')),
3609     (1028, 'ctry', 'ba ',               oils_i18n_gettext('1028', 'Bahrain ', 'ccvm', 'value')),
3610     (1029, 'ctry', 'bb ',               oils_i18n_gettext('1029', 'Barbados ', 'ccvm', 'value')),
3611     (1030, 'ctry', 'bcc',               oils_i18n_gettext('1030', 'British Columbia ', 'ccvm', 'value')),
3612     (1031, 'ctry', 'bd ',               oils_i18n_gettext('1031', 'Burundi ', 'ccvm', 'value')),
3613     (1032, 'ctry', 'be ',               oils_i18n_gettext('1032', 'Belgium ', 'ccvm', 'value')),
3614     (1033, 'ctry', 'bf ',               oils_i18n_gettext('1033', 'Bahamas ', 'ccvm', 'value')),
3615     (1034, 'ctry', 'bg ',               oils_i18n_gettext('1034', 'Bangladesh ', 'ccvm', 'value')),
3616     (1035, 'ctry', 'bh ',               oils_i18n_gettext('1035', 'Belize ', 'ccvm', 'value')),
3617     (1036, 'ctry', 'bi ',               oils_i18n_gettext('1036', 'British Indian Ocean Territory ', 'ccvm', 'value')),
3618     (1037, 'ctry', 'bl ',               oils_i18n_gettext('1037', 'Brazil ', 'ccvm', 'value')),
3619     (1038, 'ctry', 'bm ',               oils_i18n_gettext('1038', 'Bermuda Islands ', 'ccvm', 'value')),
3620     (1039, 'ctry', 'bn ',               oils_i18n_gettext('1039', 'Bosnia and Herzegovina ', 'ccvm', 'value')),
3621     (1040, 'ctry', 'bo ',               oils_i18n_gettext('1040', 'Bolivia ', 'ccvm', 'value')),
3622     (1041, 'ctry', 'bp ',               oils_i18n_gettext('1041', 'Solomon Islands ', 'ccvm', 'value')),
3623     (1042, 'ctry', 'br ',               oils_i18n_gettext('1042', 'Burma ', 'ccvm', 'value')),
3624     (1043, 'ctry', 'bs ',               oils_i18n_gettext('1043', 'Botswana ', 'ccvm', 'value')),
3625     (1044, 'ctry', 'bt ',               oils_i18n_gettext('1044', 'Bhutan ', 'ccvm', 'value')),
3626     (1045, 'ctry', 'bu ',               oils_i18n_gettext('1045', 'Bulgaria ', 'ccvm', 'value')),
3627     (1046, 'ctry', 'bv ',               oils_i18n_gettext('1046', 'Bouvet Island ', 'ccvm', 'value')),
3628     (1047, 'ctry', 'bw ',               oils_i18n_gettext('1047', 'Belarus ', 'ccvm', 'value')),
3629     (1048, 'ctry', 'bx ',               oils_i18n_gettext('1048', 'Brunei ', 'ccvm', 'value')),
3630     (1049, 'ctry', 'ca ',               oils_i18n_gettext('1049', 'Caribbean Netherlands ', 'ccvm', 'value')),
3631     (1050, 'ctry', 'cau',               oils_i18n_gettext('1050', 'California ', 'ccvm', 'value')),
3632     (1051, 'ctry', 'cb ',               oils_i18n_gettext('1051', 'Cambodia ', 'ccvm', 'value')),
3633     (1052, 'ctry', 'cc ',               oils_i18n_gettext('1052', 'China ', 'ccvm', 'value')),
3634     (1053, 'ctry', 'cd ',               oils_i18n_gettext('1053', 'Chad ', 'ccvm', 'value')),
3635     (1054, 'ctry', 'ce ',               oils_i18n_gettext('1054', 'Sri Lanka ', 'ccvm', 'value')),
3636     (1055, 'ctry', 'cf ',               oils_i18n_gettext('1055', 'Congo (Brazzaville) ', 'ccvm', 'value')),
3637     (1056, 'ctry', 'cg ',               oils_i18n_gettext('1056', 'Congo (Democratic Republic) ', 'ccvm', 'value')),
3638     (1057, 'ctry', 'ch ',               oils_i18n_gettext('1057', 'China (Republic : 1949', 'ccvm', 'value')),
3639     (1058, 'ctry', 'ci ',               oils_i18n_gettext('1058', 'Croatia ', 'ccvm', 'value')),
3640     (1059, 'ctry', 'cj ',               oils_i18n_gettext('1059', 'Cayman Islands ', 'ccvm', 'value')),
3641     (1060, 'ctry', 'ck ',               oils_i18n_gettext('1060', 'Colombia ', 'ccvm', 'value')),
3642     (1061, 'ctry', 'cl ',               oils_i18n_gettext('1061', 'Chile ', 'ccvm', 'value')),
3643     (1062, 'ctry', 'cm ',               oils_i18n_gettext('1062', 'Cameroon ', 'ccvm', 'value')),
3644     (1063, 'ctry', 'co ',               oils_i18n_gettext('1063', 'Curaçao ', 'ccvm', 'value')),
3645     (1064, 'ctry', 'cou',               oils_i18n_gettext('1064', 'Colorado ', 'ccvm', 'value')),
3646     (1065, 'ctry', 'cq ',               oils_i18n_gettext('1065', 'Comoros ', 'ccvm', 'value')),
3647     (1066, 'ctry', 'cr ',               oils_i18n_gettext('1066', 'Costa Rica ', 'ccvm', 'value')),
3648     (1067, 'ctry', 'ctu',               oils_i18n_gettext('1067', 'Connecticut ', 'ccvm', 'value')),
3649     (1068, 'ctry', 'cu ',               oils_i18n_gettext('1068', 'Cuba ', 'ccvm', 'value')),
3650     (1069, 'ctry', 'cv ',               oils_i18n_gettext('1069', 'Cabo Verde ', 'ccvm', 'value')),
3651     (1070, 'ctry', 'cw ',               oils_i18n_gettext('1070', 'Cook Islands ', 'ccvm', 'value')),
3652     (1071, 'ctry', 'cx ',               oils_i18n_gettext('1071', 'Central African Republic ', 'ccvm', 'value')),
3653     (1072, 'ctry', 'cy ',               oils_i18n_gettext('1072', 'Cyprus ', 'ccvm', 'value')),
3654     (1073, 'ctry', 'dcu',               oils_i18n_gettext('1073', 'District of Columbia ', 'ccvm', 'value')),
3655     (1074, 'ctry', 'deu',               oils_i18n_gettext('1074', 'Delaware ', 'ccvm', 'value')),
3656     (1075, 'ctry', 'dk ',               oils_i18n_gettext('1075', 'Denmark ', 'ccvm', 'value')),
3657     (1076, 'ctry', 'dm ',               oils_i18n_gettext('1076', 'Benin ', 'ccvm', 'value')),
3658     (1077, 'ctry', 'dq ',               oils_i18n_gettext('1077', 'Dominica ', 'ccvm', 'value')),
3659     (1078, 'ctry', 'dr ',               oils_i18n_gettext('1078', 'Dominican Republic ', 'ccvm', 'value')),
3660     (1079, 'ctry', 'ea ',               oils_i18n_gettext('1079', 'Eritrea ', 'ccvm', 'value')),
3661     (1080, 'ctry', 'ec ',               oils_i18n_gettext('1080', 'Ecuador ', 'ccvm', 'value')),
3662     (1081, 'ctry', 'eg ',               oils_i18n_gettext('1081', 'Equatorial Guinea ', 'ccvm', 'value')),
3663     (1082, 'ctry', 'em ',               oils_i18n_gettext('1082', 'Timor', 'ccvm', 'value')),
3664     (1083, 'ctry', 'enk',               oils_i18n_gettext('1083', 'England ', 'ccvm', 'value')),
3665     (1084, 'ctry', 'er ',               oils_i18n_gettext('1084', 'Estonia ', 'ccvm', 'value')),
3666     (1085, 'ctry', 'es ',               oils_i18n_gettext('1085', 'El Salvador ', 'ccvm', 'value')),
3667     (1086, 'ctry', 'et ',               oils_i18n_gettext('1086', 'Ethiopia ', 'ccvm', 'value')),
3668     (1087, 'ctry', 'fa ',               oils_i18n_gettext('1087', 'Faroe Islands ', 'ccvm', 'value')),
3669     (1088, 'ctry', 'fg ',               oils_i18n_gettext('1088', 'French Guiana ', 'ccvm', 'value')),
3670     (1089, 'ctry', 'fi ',               oils_i18n_gettext('1089', 'Finland ', 'ccvm', 'value')),
3671     (1090, 'ctry', 'fj ',               oils_i18n_gettext('1090', 'Fiji ', 'ccvm', 'value')),
3672     (1091, 'ctry', 'fk ',               oils_i18n_gettext('1091', 'Falkland Islands ', 'ccvm', 'value')),
3673     (1092, 'ctry', 'flu',               oils_i18n_gettext('1092', 'Florida ', 'ccvm', 'value')),
3674     (1093, 'ctry', 'fm ',               oils_i18n_gettext('1093', 'Micronesia (Federated States) ', 'ccvm', 'value')),
3675     (1094, 'ctry', 'fp ',               oils_i18n_gettext('1094', 'French Polynesia ', 'ccvm', 'value')),
3676     (1095, 'ctry', 'fr ',               oils_i18n_gettext('1095', 'France ', 'ccvm', 'value')),
3677     (1096, 'ctry', 'fs ',               oils_i18n_gettext('1096', 'Terres australes et antarctiques françaises ', 'ccvm', 'value')),
3678     (1097, 'ctry', 'ft ',               oils_i18n_gettext('1097', 'Djibouti ', 'ccvm', 'value')),
3679     (1098, 'ctry', 'gau',               oils_i18n_gettext('1098', 'Georgia ', 'ccvm', 'value')),
3680     (1099, 'ctry', 'gb ',               oils_i18n_gettext('1099', 'Kiribati ', 'ccvm', 'value')),
3681     (1100, 'ctry', 'gd ',               oils_i18n_gettext('1100', 'Grenada ', 'ccvm', 'value')),
3682     (1101, 'ctry', 'gh ',               oils_i18n_gettext('1101', 'Ghana ', 'ccvm', 'value')),
3683     (1102, 'ctry', 'gi ',               oils_i18n_gettext('1102', 'Gibraltar ', 'ccvm', 'value')),
3684     (1103, 'ctry', 'gl ',               oils_i18n_gettext('1103', 'Greenland ', 'ccvm', 'value')),
3685     (1104, 'ctry', 'gm ',               oils_i18n_gettext('1104', 'Gambia ', 'ccvm', 'value')),
3686     (1105, 'ctry', 'go ',               oils_i18n_gettext('1105', 'Gabon ', 'ccvm', 'value')),
3687     (1106, 'ctry', 'gp ',               oils_i18n_gettext('1106', 'Guadeloupe ', 'ccvm', 'value')),
3688     (1107, 'ctry', 'gr ',               oils_i18n_gettext('1107', 'Greece ', 'ccvm', 'value')),
3689     (1108, 'ctry', 'gs ',               oils_i18n_gettext('1108', 'Georgia (Republic) ', 'ccvm', 'value')),
3690     (1109, 'ctry', 'gt ',               oils_i18n_gettext('1109', 'Guatemala ', 'ccvm', 'value')),
3691     (1110, 'ctry', 'gu ',               oils_i18n_gettext('1110', 'Guam ', 'ccvm', 'value')),
3692     (1111, 'ctry', 'gv ',               oils_i18n_gettext('1111', 'Guinea ', 'ccvm', 'value')),
3693     (1112, 'ctry', 'gw ',               oils_i18n_gettext('1112', 'Germany ', 'ccvm', 'value')),
3694     (1113, 'ctry', 'gy ',               oils_i18n_gettext('1113', 'Guyana ', 'ccvm', 'value')),
3695     (1114, 'ctry', 'gz ',               oils_i18n_gettext('1114', 'Gaza Strip ', 'ccvm', 'value')),
3696     (1115, 'ctry', 'hiu',               oils_i18n_gettext('1115', 'Hawaii ', 'ccvm', 'value')),
3697     (1116, 'ctry', 'hm ',               oils_i18n_gettext('1116', 'Heard and McDonald Islands ', 'ccvm', 'value')),
3698     (1117, 'ctry', 'ho ',               oils_i18n_gettext('1117', 'Honduras ', 'ccvm', 'value')),
3699     (1118, 'ctry', 'ht ',               oils_i18n_gettext('1118', 'Haiti ', 'ccvm', 'value')),
3700     (1119, 'ctry', 'hu ',               oils_i18n_gettext('1119', 'Hungary ', 'ccvm', 'value')),
3701     (1120, 'ctry', 'iau',               oils_i18n_gettext('1120', 'Iowa ', 'ccvm', 'value')),
3702     (1121, 'ctry', 'ic ',               oils_i18n_gettext('1121', 'Iceland ', 'ccvm', 'value')),
3703     (1122, 'ctry', 'idu',               oils_i18n_gettext('1122', 'Idaho ', 'ccvm', 'value')),
3704     (1123, 'ctry', 'ie ',               oils_i18n_gettext('1123', 'Ireland ', 'ccvm', 'value')),
3705     (1124, 'ctry', 'ii ',               oils_i18n_gettext('1124', 'India ', 'ccvm', 'value')),
3706     (1125, 'ctry', 'ilu',               oils_i18n_gettext('1125', 'Illinois ', 'ccvm', 'value')),
3707     (1126, 'ctry', 'inu',               oils_i18n_gettext('1126', 'Indiana ', 'ccvm', 'value')),
3708     (1127, 'ctry', 'io ',               oils_i18n_gettext('1127', 'Indonesia ', 'ccvm', 'value')),
3709     (1128, 'ctry', 'iq ',               oils_i18n_gettext('1128', 'Iraq ', 'ccvm', 'value')),
3710     (1129, 'ctry', 'ir ',               oils_i18n_gettext('1129', 'Iran ', 'ccvm', 'value')),
3711     (1130, 'ctry', 'is ',               oils_i18n_gettext('1130', 'Israel ', 'ccvm', 'value')),
3712     (1131, 'ctry', 'it ',               oils_i18n_gettext('1131', 'Italy ', 'ccvm', 'value')),
3713     (1132, 'ctry', 'iv ',               oils_i18n_gettext('1132', 'Côte d''Ivoire ', 'ccvm', 'value')),
3714     (1133, 'ctry', 'iy ',               oils_i18n_gettext('1133', 'Iraq', 'ccvm', 'value')),
3715     (1134, 'ctry', 'ja ',               oils_i18n_gettext('1134', 'Japan ', 'ccvm', 'value')),
3716     (1135, 'ctry', 'ji ',               oils_i18n_gettext('1135', 'Johnston Atoll ', 'ccvm', 'value')),
3717     (1136, 'ctry', 'jm ',               oils_i18n_gettext('1136', 'Jamaica ', 'ccvm', 'value')),
3718     (1137, 'ctry', 'jo ',               oils_i18n_gettext('1137', 'Jordan ', 'ccvm', 'value')),
3719     (1138, 'ctry', 'ke ',               oils_i18n_gettext('1138', 'Kenya ', 'ccvm', 'value')),
3720     (1139, 'ctry', 'kg ',               oils_i18n_gettext('1139', 'Kyrgyzstan ', 'ccvm', 'value')),
3721     (1140, 'ctry', 'kn ',               oils_i18n_gettext('1140', 'Korea (North) ', 'ccvm', 'value')),
3722     (1141, 'ctry', 'ko ',               oils_i18n_gettext('1141', 'Korea (South) ', 'ccvm', 'value')),
3723     (1142, 'ctry', 'ksu',               oils_i18n_gettext('1142', 'Kansas ', 'ccvm', 'value')),
3724     (1143, 'ctry', 'ku ',               oils_i18n_gettext('1143', 'Kuwait ', 'ccvm', 'value')),
3725     (1144, 'ctry', 'kv ',               oils_i18n_gettext('1144', 'Kosovo ', 'ccvm', 'value')),
3726     (1145, 'ctry', 'kyu',               oils_i18n_gettext('1145', 'Kentucky ', 'ccvm', 'value')),
3727     (1146, 'ctry', 'kz ',               oils_i18n_gettext('1146', 'Kazakhstan ', 'ccvm', 'value')),
3728     (1147, 'ctry', 'lau',               oils_i18n_gettext('1147', 'Louisiana ', 'ccvm', 'value')),
3729     (1148, 'ctry', 'lb ',               oils_i18n_gettext('1148', 'Liberia ', 'ccvm', 'value')),
3730     (1149, 'ctry', 'le ',               oils_i18n_gettext('1149', 'Lebanon ', 'ccvm', 'value')),
3731     (1150, 'ctry', 'lh ',               oils_i18n_gettext('1150', 'Liechtenstein ', 'ccvm', 'value')),
3732     (1151, 'ctry', 'li ',               oils_i18n_gettext('1151', 'Lithuania ', 'ccvm', 'value')),
3733     (1152, 'ctry', 'lo ',               oils_i18n_gettext('1152', 'Lesotho ', 'ccvm', 'value')),
3734     (1153, 'ctry', 'ls ',               oils_i18n_gettext('1153', 'Laos ', 'ccvm', 'value')),
3735     (1154, 'ctry', 'lu ',               oils_i18n_gettext('1154', 'Luxembourg ', 'ccvm', 'value')),
3736     (1155, 'ctry', 'lv ',               oils_i18n_gettext('1155', 'Latvia ', 'ccvm', 'value')),
3737     (1156, 'ctry', 'ly ',               oils_i18n_gettext('1156', 'Libya ', 'ccvm', 'value')),
3738     (1157, 'ctry', 'mau',               oils_i18n_gettext('1157', 'Massachusetts ', 'ccvm', 'value')),
3739     (1158, 'ctry', 'mbc',               oils_i18n_gettext('1158', 'Manitoba ', 'ccvm', 'value')),
3740     (1159, 'ctry', 'mc ',               oils_i18n_gettext('1159', 'Monaco ', 'ccvm', 'value')),
3741     (1160, 'ctry', 'mdu',               oils_i18n_gettext('1160', 'Maryland ', 'ccvm', 'value')),
3742     (1161, 'ctry', 'meu',               oils_i18n_gettext('1161', 'Maine ', 'ccvm', 'value')),
3743     (1162, 'ctry', 'mf ',               oils_i18n_gettext('1162', 'Mauritius ', 'ccvm', 'value')),
3744     (1163, 'ctry', 'mg ',               oils_i18n_gettext('1163', 'Madagascar ', 'ccvm', 'value')),
3745     (1164, 'ctry', 'miu',               oils_i18n_gettext('1164', 'Michigan ', 'ccvm', 'value')),
3746     (1165, 'ctry', 'mj ',               oils_i18n_gettext('1165', 'Montserrat ', 'ccvm', 'value')),
3747     (1166, 'ctry', 'mk ',               oils_i18n_gettext('1166', 'Oman ', 'ccvm', 'value')),
3748     (1167, 'ctry', 'ml ',               oils_i18n_gettext('1167', 'Mali ', 'ccvm', 'value')),
3749     (1168, 'ctry', 'mm ',               oils_i18n_gettext('1168', 'Malta ', 'ccvm', 'value')),
3750     (1169, 'ctry', 'mnu',               oils_i18n_gettext('1169', 'Minnesota ', 'ccvm', 'value')),
3751     (1170, 'ctry', 'mo ',               oils_i18n_gettext('1170', 'Montenegro ', 'ccvm', 'value')),
3752     (1171, 'ctry', 'mou',               oils_i18n_gettext('1171', 'Missouri ', 'ccvm', 'value')),
3753     (1172, 'ctry', 'mp ',               oils_i18n_gettext('1172', 'Mongolia ', 'ccvm', 'value')),
3754     (1173, 'ctry', 'mq ',               oils_i18n_gettext('1173', 'Martinique ', 'ccvm', 'value')),
3755     (1174, 'ctry', 'mr ',               oils_i18n_gettext('1174', 'Morocco ', 'ccvm', 'value')),
3756     (1175, 'ctry', 'msu',               oils_i18n_gettext('1175', 'Mississippi ', 'ccvm', 'value')),
3757     (1176, 'ctry', 'mtu',               oils_i18n_gettext('1176', 'Montana ', 'ccvm', 'value')),
3758     (1177, 'ctry', 'mu ',               oils_i18n_gettext('1177', 'Mauritania ', 'ccvm', 'value')),
3759     (1178, 'ctry', 'mv ',               oils_i18n_gettext('1178', 'Moldova ', 'ccvm', 'value')),
3760     (1179, 'ctry', 'mw ',               oils_i18n_gettext('1179', 'Malawi ', 'ccvm', 'value')),
3761     (1180, 'ctry', 'mx ',               oils_i18n_gettext('1180', 'Mexico ', 'ccvm', 'value')),
3762     (1181, 'ctry', 'my ',               oils_i18n_gettext('1181', 'Malaysia ', 'ccvm', 'value')),
3763     (1182, 'ctry', 'mz ',               oils_i18n_gettext('1182', 'Mozambique ', 'ccvm', 'value')),
3764     (1183, 'ctry', 'nbu',               oils_i18n_gettext('1183', 'Nebraska ', 'ccvm', 'value')),
3765     (1184, 'ctry', 'ncu',               oils_i18n_gettext('1184', 'North Carolina ', 'ccvm', 'value')),
3766     (1185, 'ctry', 'ndu',               oils_i18n_gettext('1185', 'North Dakota ', 'ccvm', 'value')),
3767     (1186, 'ctry', 'ne ',               oils_i18n_gettext('1186', 'Netherlands ', 'ccvm', 'value')),
3768     (1187, 'ctry', 'nfc',               oils_i18n_gettext('1187', 'Newfoundland and Labrador ', 'ccvm', 'value')),
3769     (1188, 'ctry', 'ng ',               oils_i18n_gettext('1188', 'Niger ', 'ccvm', 'value')),
3770     (1189, 'ctry', 'nhu',               oils_i18n_gettext('1189', 'New Hampshire ', 'ccvm', 'value')),
3771     (1190, 'ctry', 'nik',               oils_i18n_gettext('1190', 'Northern Ireland ', 'ccvm', 'value')),
3772     (1191, 'ctry', 'nju',               oils_i18n_gettext('1191', 'New Jersey ', 'ccvm', 'value')),
3773     (1192, 'ctry', 'nkc',               oils_i18n_gettext('1192', 'New Brunswick ', 'ccvm', 'value')),
3774     (1193, 'ctry', 'nl ',               oils_i18n_gettext('1193', 'New Caledonia ', 'ccvm', 'value')),
3775     (1194, 'ctry', 'nmu',               oils_i18n_gettext('1194', 'New Mexico ', 'ccvm', 'value')),
3776     (1195, 'ctry', 'nn ',               oils_i18n_gettext('1195', 'Vanuatu ', 'ccvm', 'value')),
3777     (1196, 'ctry', 'no ',               oils_i18n_gettext('1196', 'Norway ', 'ccvm', 'value')),
3778     (1197, 'ctry', 'np ',               oils_i18n_gettext('1197', 'Nepal ', 'ccvm', 'value')),
3779     (1198, 'ctry', 'nq ',               oils_i18n_gettext('1198', 'Nicaragua ', 'ccvm', 'value')),
3780     (1199, 'ctry', 'nr ',               oils_i18n_gettext('1199', 'Nigeria ', 'ccvm', 'value')),
3781     (1200, 'ctry', 'nsc',               oils_i18n_gettext('1200', 'Nova Scotia ', 'ccvm', 'value')),
3782     (1201, 'ctry', 'ntc',               oils_i18n_gettext('1201', 'Northwest Territories ', 'ccvm', 'value')),
3783     (1202, 'ctry', 'nu ',               oils_i18n_gettext('1202', 'Nauru ', 'ccvm', 'value')),
3784     (1203, 'ctry', 'nuc',               oils_i18n_gettext('1203', 'Nunavut ', 'ccvm', 'value')),
3785     (1204, 'ctry', 'nvu',               oils_i18n_gettext('1204', 'Nevada ', 'ccvm', 'value')),
3786     (1205, 'ctry', 'nw ',               oils_i18n_gettext('1205', 'Northern Mariana Islands ', 'ccvm', 'value')),
3787     (1206, 'ctry', 'nx ',               oils_i18n_gettext('1206', 'Norfolk Island ', 'ccvm', 'value')),
3788     (1207, 'ctry', 'nyu',               oils_i18n_gettext('1207', 'New York (State) ', 'ccvm', 'value')),
3789     (1208, 'ctry', 'nz ',               oils_i18n_gettext('1208', 'New Zealand ', 'ccvm', 'value')),
3790     (1209, 'ctry', 'ohu',               oils_i18n_gettext('1209', 'Ohio ', 'ccvm', 'value')),
3791     (1210, 'ctry', 'oku',               oils_i18n_gettext('1210', 'Oklahoma ', 'ccvm', 'value')),
3792     (1211, 'ctry', 'onc',               oils_i18n_gettext('1211', 'Ontario ', 'ccvm', 'value')),
3793     (1212, 'ctry', 'oru',               oils_i18n_gettext('1212', 'Oregon ', 'ccvm', 'value')),
3794     (1213, 'ctry', 'ot ',               oils_i18n_gettext('1213', 'Mayotte ', 'ccvm', 'value')),
3795     (1214, 'ctry', 'pau',               oils_i18n_gettext('1214', 'Pennsylvania ', 'ccvm', 'value')),
3796     (1215, 'ctry', 'pc ',               oils_i18n_gettext('1215', 'Pitcairn Island ', 'ccvm', 'value')),
3797     (1216, 'ctry', 'pe ',               oils_i18n_gettext('1216', 'Peru ', 'ccvm', 'value')),
3798     (1217, 'ctry', 'pf ',               oils_i18n_gettext('1217', 'Paracel Islands ', 'ccvm', 'value')),
3799     (1218, 'ctry', 'pg ',               oils_i18n_gettext('1218', 'Guinea', 'ccvm', 'value')),
3800     (1219, 'ctry', 'ph ',               oils_i18n_gettext('1219', 'Philippines ', 'ccvm', 'value')),
3801     (1220, 'ctry', 'pic',               oils_i18n_gettext('1220', 'Prince Edward Island ', 'ccvm', 'value')),
3802     (1221, 'ctry', 'pk ',               oils_i18n_gettext('1221', 'Pakistan ', 'ccvm', 'value')),
3803     (1222, 'ctry', 'pl ',               oils_i18n_gettext('1222', 'Poland ', 'ccvm', 'value')),
3804     (1223, 'ctry', 'pn ',               oils_i18n_gettext('1223', 'Panama ', 'ccvm', 'value')),
3805     (1224, 'ctry', 'po ',               oils_i18n_gettext('1224', 'Portugal ', 'ccvm', 'value')),
3806     (1225, 'ctry', 'pp ',               oils_i18n_gettext('1225', 'Papua New Guinea ', 'ccvm', 'value')),
3807     (1226, 'ctry', 'pr ',               oils_i18n_gettext('1226', 'Puerto Rico ', 'ccvm', 'value')),
3808     (1227, 'ctry', 'pw ',               oils_i18n_gettext('1227', 'Palau ', 'ccvm', 'value')),
3809     (1228, 'ctry', 'py ',               oils_i18n_gettext('1228', 'Paraguay ', 'ccvm', 'value')),
3810     (1229, 'ctry', 'qa ',               oils_i18n_gettext('1229', 'Qatar ', 'ccvm', 'value')),
3811     (1230, 'ctry', 'qea',               oils_i18n_gettext('1230', 'Queensland ', 'ccvm', 'value')),
3812     (1231, 'ctry', 'quc',               oils_i18n_gettext('1231', 'Québec (Province) ', 'ccvm', 'value')),
3813     (1232, 'ctry', 'rb ',               oils_i18n_gettext('1232', 'Serbia ', 'ccvm', 'value')),
3814     (1233, 'ctry', 're ',               oils_i18n_gettext('1233', 'Réunion ', 'ccvm', 'value')),
3815     (1234, 'ctry', 'rh ',               oils_i18n_gettext('1234', 'Zimbabwe ', 'ccvm', 'value')),
3816     (1235, 'ctry', 'riu',               oils_i18n_gettext('1235', 'Rhode Island ', 'ccvm', 'value')),
3817     (1236, 'ctry', 'rm ',               oils_i18n_gettext('1236', 'Romania ', 'ccvm', 'value')),
3818     (1237, 'ctry', 'ru ',               oils_i18n_gettext('1237', 'Russia (Federation) ', 'ccvm', 'value')),
3819     (1238, 'ctry', 'rw ',               oils_i18n_gettext('1238', 'Rwanda ', 'ccvm', 'value')),
3820     (1239, 'ctry', 'sa ',               oils_i18n_gettext('1239', 'South Africa ', 'ccvm', 'value')),
3821     (1240, 'ctry', 'sc ',               oils_i18n_gettext('1240', 'Saint', 'ccvm', 'value')),
3822     (1241, 'ctry', 'scu',               oils_i18n_gettext('1241', 'South Carolina ', 'ccvm', 'value')),
3823     (1242, 'ctry', 'sd ',               oils_i18n_gettext('1242', 'South Sudan ', 'ccvm', 'value')),
3824     (1243, 'ctry', 'sdu',               oils_i18n_gettext('1243', 'South Dakota ', 'ccvm', 'value')),
3825     (1244, 'ctry', 'se ',               oils_i18n_gettext('1244', 'Seychelles ', 'ccvm', 'value')),
3826     (1245, 'ctry', 'sf ',               oils_i18n_gettext('1245', 'Sao Tome and Principe ', 'ccvm', 'value')),
3827     (1246, 'ctry', 'sg ',               oils_i18n_gettext('1246', 'Senegal ', 'ccvm', 'value')),
3828     (1247, 'ctry', 'sh ',               oils_i18n_gettext('1247', 'Spanish North Africa ', 'ccvm', 'value')),
3829     (1248, 'ctry', 'si ',               oils_i18n_gettext('1248', 'Singapore ', 'ccvm', 'value')),
3830     (1249, 'ctry', 'sj ',               oils_i18n_gettext('1249', 'Sudan ', 'ccvm', 'value')),
3831     (1250, 'ctry', 'sl ',               oils_i18n_gettext('1250', 'Sierra Leone ', 'ccvm', 'value')),
3832     (1251, 'ctry', 'sm ',               oils_i18n_gettext('1251', 'San Marino ', 'ccvm', 'value')),
3833     (1252, 'ctry', 'sn ',               oils_i18n_gettext('1252', 'Sint Maarten ', 'ccvm', 'value')),
3834     (1253, 'ctry', 'snc',               oils_i18n_gettext('1253', 'Saskatchewan ', 'ccvm', 'value')),
3835     (1254, 'ctry', 'so ',               oils_i18n_gettext('1254', 'Somalia ', 'ccvm', 'value')),
3836     (1255, 'ctry', 'sp ',               oils_i18n_gettext('1255', 'Spain ', 'ccvm', 'value')),
3837     (1256, 'ctry', 'sq ',               oils_i18n_gettext('1256', 'Swaziland ', 'ccvm', 'value')),
3838     (1257, 'ctry', 'sr ',               oils_i18n_gettext('1257', 'Surinam ', 'ccvm', 'value')),
3839     (1258, 'ctry', 'ss ',               oils_i18n_gettext('1258', 'Western Sahara ', 'ccvm', 'value')),
3840     (1259, 'ctry', 'st ',               oils_i18n_gettext('1259', 'Saint', 'ccvm', 'value')),
3841     (1260, 'ctry', 'stk',               oils_i18n_gettext('1260', 'Scotland ', 'ccvm', 'value')),
3842     (1261, 'ctry', 'su ',               oils_i18n_gettext('1261', 'Saudi Arabia ', 'ccvm', 'value')),
3843     (1262, 'ctry', 'sw ',               oils_i18n_gettext('1262', 'Sweden ', 'ccvm', 'value')),
3844     (1263, 'ctry', 'sx ',               oils_i18n_gettext('1263', 'Namibia ', 'ccvm', 'value')),
3845     (1264, 'ctry', 'sy ',               oils_i18n_gettext('1264', 'Syria ', 'ccvm', 'value')),
3846     (1265, 'ctry', 'sz ',               oils_i18n_gettext('1265', 'Switzerland ', 'ccvm', 'value')),
3847     (1266, 'ctry', 'ta ',               oils_i18n_gettext('1266', 'Tajikistan ', 'ccvm', 'value')),
3848     (1267, 'ctry', 'tc ',               oils_i18n_gettext('1267', 'Turks and Caicos Islands ', 'ccvm', 'value')),
3849     (1268, 'ctry', 'tg ',               oils_i18n_gettext('1268', 'Togo ', 'ccvm', 'value')),
3850     (1269, 'ctry', 'th ',               oils_i18n_gettext('1269', 'Thailand ', 'ccvm', 'value')),
3851     (1270, 'ctry', 'ti ',               oils_i18n_gettext('1270', 'Tunisia ', 'ccvm', 'value')),
3852     (1271, 'ctry', 'tk ',               oils_i18n_gettext('1271', 'Turkmenistan ', 'ccvm', 'value')),
3853     (1272, 'ctry', 'tl ',               oils_i18n_gettext('1272', 'Tokelau ', 'ccvm', 'value')),
3854     (1273, 'ctry', 'tma',               oils_i18n_gettext('1273', 'Tasmania ', 'ccvm', 'value')),
3855     (1274, 'ctry', 'tnu',               oils_i18n_gettext('1274', 'Tennessee ', 'ccvm', 'value')),
3856     (1275, 'ctry', 'to ',               oils_i18n_gettext('1275', 'Tonga ', 'ccvm', 'value')),
3857     (1276, 'ctry', 'tr ',               oils_i18n_gettext('1276', 'Trinidad and Tobago ', 'ccvm', 'value')),
3858     (1277, 'ctry', 'ts ',               oils_i18n_gettext('1277', 'United Arab Emirates ', 'ccvm', 'value')),
3859     (1278, 'ctry', 'tu ',               oils_i18n_gettext('1278', 'Turkey ', 'ccvm', 'value')),
3860     (1279, 'ctry', 'tv ',               oils_i18n_gettext('1279', 'Tuvalu ', 'ccvm', 'value')),
3861     (1280, 'ctry', 'txu',               oils_i18n_gettext('1280', 'Texas ', 'ccvm', 'value')),
3862     (1281, 'ctry', 'tz ',               oils_i18n_gettext('1281', 'Tanzania ', 'ccvm', 'value')),
3863     (1282, 'ctry', 'ua ',               oils_i18n_gettext('1282', 'Egypt ', 'ccvm', 'value')),
3864     (1283, 'ctry', 'uc ',               oils_i18n_gettext('1283', 'United States Misc. Caribbean Islands ', 'ccvm', 'value')),
3865     (1284, 'ctry', 'ug ',               oils_i18n_gettext('1284', 'Uganda ', 'ccvm', 'value')),
3866     (1285, 'ctry', 'uik',               oils_i18n_gettext('1285', 'United Kingdom Misc. Islands ', 'ccvm', 'value')),
3867     (1286, 'ctry', 'un ',               oils_i18n_gettext('1286', 'Ukraine ', 'ccvm', 'value')),
3868     (1287, 'ctry', 'up ',               oils_i18n_gettext('1287', 'United States Misc. Pacific Islands ', 'ccvm', 'value')),
3869     (1288, 'ctry', 'utu',               oils_i18n_gettext('1288', 'Utah ', 'ccvm', 'value')),
3870     (1289, 'ctry', 'uv ',               oils_i18n_gettext('1289', 'Burkina Faso ', 'ccvm', 'value')),
3871     (1290, 'ctry', 'uy ',               oils_i18n_gettext('1290', 'Uruguay ', 'ccvm', 'value')),
3872     (1291, 'ctry', 'uz ',               oils_i18n_gettext('1291', 'Uzbekistan ', 'ccvm', 'value')),
3873     (1292, 'ctry', 'vau',               oils_i18n_gettext('1292', 'Virginia ', 'ccvm', 'value')),
3874     (1293, 'ctry', 'vb ',               oils_i18n_gettext('1293', 'British Virgin Islands ', 'ccvm', 'value')),
3875     (1294, 'ctry', 'vc ',               oils_i18n_gettext('1294', 'Vatican City ', 'ccvm', 'value')),
3876     (1295, 'ctry', 've ',               oils_i18n_gettext('1295', 'Venezuela ', 'ccvm', 'value')),
3877     (1296, 'ctry', 'vi ',               oils_i18n_gettext('1296', 'Virgin Islands of the United States ', 'ccvm', 'value')),
3878     (1297, 'ctry', 'vm ',               oils_i18n_gettext('1297', 'Vietnam ', 'ccvm', 'value')),
3879     (1298, 'ctry', 'vp ',               oils_i18n_gettext('1298', 'Various places ', 'ccvm', 'value')),
3880     (1299, 'ctry', 'vra',               oils_i18n_gettext('1299', 'Victoria ', 'ccvm', 'value')),
3881     (1300, 'ctry', 'vtu',               oils_i18n_gettext('1300', 'Vermont ', 'ccvm', 'value')),
3882     (1301, 'ctry', 'wau',               oils_i18n_gettext('1301', 'Washington (State) ', 'ccvm', 'value')),
3883     (1302, 'ctry', 'wea',               oils_i18n_gettext('1302', 'Western Australia ', 'ccvm', 'value')),
3884     (1303, 'ctry', 'wf ',               oils_i18n_gettext('1303', 'Wallis and Futuna ', 'ccvm', 'value')),
3885     (1304, 'ctry', 'wiu',               oils_i18n_gettext('1304', 'Wisconsin ', 'ccvm', 'value')),
3886     (1305, 'ctry', 'wj ',               oils_i18n_gettext('1305', 'West Bank of the Jordan River ', 'ccvm', 'value')),
3887     (1306, 'ctry', 'wk ',               oils_i18n_gettext('1306', 'Wake Island ', 'ccvm', 'value')),
3888     (1307, 'ctry', 'wlk',               oils_i18n_gettext('1307', 'Wales ', 'ccvm', 'value')),
3889     (1308, 'ctry', 'ws ',               oils_i18n_gettext('1308', 'Samoa ', 'ccvm', 'value')),
3890     (1309, 'ctry', 'wvu',               oils_i18n_gettext('1309', 'West Virginia ', 'ccvm', 'value')),
3891     (1310, 'ctry', 'wyu',               oils_i18n_gettext('1310', 'Wyoming ', 'ccvm', 'value')),
3892     (1311, 'ctry', 'xa ',               oils_i18n_gettext('1311', 'Christmas Island (Indian Ocean) ', 'ccvm', 'value')),
3893     (1312, 'ctry', 'xb ',               oils_i18n_gettext('1312', 'Cocos (Keeling) Islands ', 'ccvm', 'value')),
3894     (1313, 'ctry', 'xc ',               oils_i18n_gettext('1313', 'Maldives ', 'ccvm', 'value')),
3895     (1314, 'ctry', 'xd ',               oils_i18n_gettext('1314', 'Saint Kitts', 'ccvm', 'value')),
3896     (1315, 'ctry', 'xe ',               oils_i18n_gettext('1315', 'Marshall Islands ', 'ccvm', 'value')),
3897     (1316, 'ctry', 'xf ',               oils_i18n_gettext('1316', 'Midway Islands ', 'ccvm', 'value')),
3898     (1317, 'ctry', 'xga',               oils_i18n_gettext('1317', 'Coral Sea Islands Territory ', 'ccvm', 'value')),
3899     (1318, 'ctry', 'xh ',               oils_i18n_gettext('1318', 'Niue ', 'ccvm', 'value')),
3900     (1319, 'ctry', 'xj ',               oils_i18n_gettext('1319', 'Saint Helena ', 'ccvm', 'value')),
3901     (1320, 'ctry', 'xk ',               oils_i18n_gettext('1320', 'Saint Lucia ', 'ccvm', 'value')),
3902     (1321, 'ctry', 'xl ',               oils_i18n_gettext('1321', 'Saint Pierre and Miquelon ', 'ccvm', 'value')),
3903     (1322, 'ctry', 'xm ',               oils_i18n_gettext('1322', 'Saint Vincent and the Grenadines ', 'ccvm', 'value')),
3904     (1323, 'ctry', 'xn ',               oils_i18n_gettext('1323', 'Macedonia ', 'ccvm', 'value')),
3905     (1324, 'ctry', 'xna',               oils_i18n_gettext('1324', 'New South Wales ', 'ccvm', 'value')),
3906     (1325, 'ctry', 'xo ',               oils_i18n_gettext('1325', 'Slovakia ', 'ccvm', 'value')),
3907     (1326, 'ctry', 'xoa',               oils_i18n_gettext('1326', 'Northern Territory ', 'ccvm', 'value')),
3908     (1327, 'ctry', 'xp ',               oils_i18n_gettext('1327', 'Spratly Island ', 'ccvm', 'value')),
3909     (1328, 'ctry', 'xr ',               oils_i18n_gettext('1328', 'Czech Republic ', 'ccvm', 'value')),
3910     (1329, 'ctry', 'xra',               oils_i18n_gettext('1329', 'South Australia ', 'ccvm', 'value')),
3911     (1330, 'ctry', 'xs ',               oils_i18n_gettext('1330', 'South Georgia and the South Sandwich Islands ', 'ccvm', 'value')),
3912     (1331, 'ctry', 'xv ',               oils_i18n_gettext('1331', 'Slovenia ', 'ccvm', 'value')),
3913     (1332, 'ctry', 'xx ',               oils_i18n_gettext('1332', 'No place, unknown, or undetermined ', 'ccvm', 'value')),
3914     (1333, 'ctry', 'xxc',               oils_i18n_gettext('1333', 'Canada ', 'ccvm', 'value')),
3915     (1334, 'ctry', 'xxk',               oils_i18n_gettext('1334', 'United Kingdom ', 'ccvm', 'value')),
3916     (1335, 'ctry', 'xxu',               oils_i18n_gettext('1335', 'United States ', 'ccvm', 'value')),
3917     (1336, 'ctry', 'ye ',               oils_i18n_gettext('1336', 'Yemen ', 'ccvm', 'value')),
3918     (1337, 'ctry', 'ykc',               oils_i18n_gettext('1337', 'Yukon Territory ', 'ccvm', 'value')),
3919     (1338, 'ctry', 'za ',               oils_i18n_gettext('1338', 'Zambia ', 'ccvm', 'value')),
3920
3921     (1339, 'pub_status', 'b',   oils_i18n_gettext('1339', 'No dates given; B.C. date involved', 'ccvm', 'value')),
3922     (1340, 'pub_status', 'c',   oils_i18n_gettext('1340', 'Continuing resource currently published', 'ccvm', 'value')),
3923     (1341, 'pub_status', 'd',   oils_i18n_gettext('1341', 'Continuing resource ceased publication', 'ccvm', 'value')),
3924     (1342, 'pub_status', 'e',   oils_i18n_gettext('1342', 'Detailed date', 'ccvm', 'value')),
3925     (1343, 'pub_status', 'i',   oils_i18n_gettext('1343', 'Inclusive dates of collection', 'ccvm', 'value')),
3926     (1344, 'pub_status', 'k',   oils_i18n_gettext('1344', 'Range of years of bulk of collection', 'ccvm', 'value')),
3927     (1345, 'pub_status', 'm',   oils_i18n_gettext('1345', 'Multiple dates', 'ccvm', 'value')),
3928     (1346, 'pub_status', 'n',   oils_i18n_gettext('1346', 'Dates unknown', 'ccvm', 'value')),
3929     (1347, 'pub_status', 'p',   oils_i18n_gettext('1347', 'Date of distribution/release/issue and production/recording session when different', 'ccvm', 'value')),
3930     (1348, 'pub_status', 'q',   oils_i18n_gettext('1348', 'Questionable date', 'ccvm', 'value')),
3931     (1349, 'pub_status', 'r',   oils_i18n_gettext('1349', 'Reprint/reissue date and original date', 'ccvm', 'value')),
3932     (1350, 'pub_status', 's',   oils_i18n_gettext('1350', 'Single known date/probable date', 'ccvm', 'value')),
3933     (1351, 'pub_status', 't',   oils_i18n_gettext('1351', 'Publication date and copyright date', 'ccvm', 'value')),
3934     (1352, 'pub_status', 'u',   oils_i18n_gettext('1352', 'Continuing resource status unknown', 'ccvm', 'value'));
3935
3936
3937 -- These are fixed fields that are made up of multiple single-character codes. These are the actual fields that are used to define relevent attributes,
3938 -- the "unnumbered" version of these fields are used for the MARC editor and as composite attributes for use in the OPAC if desired.
3939 -- i18n ids are left as-is because there's no need to have multiple translations for the same value.
3940 -- The ' ' codes only apply to the first position because if there's anything in pos 1 then the rest of the spaces are just filler.
3941 -- There's also no need for them to be opac visible because there will be composite attributes that OR these numbered attributes together.
3942 INSERT INTO config.coded_value_map (id, ctype, code, value, opac_visible) VALUES
3943     (1353, 'accm1', ' ',        oils_i18n_gettext('1735', 'No accompanying matter', 'ccvm', 'value'), FALSE),
3944     (1354, 'accm1', 'a',        oils_i18n_gettext('713', 'Discography', 'ccvm', 'value'), FALSE),
3945     (1355, 'accm1', 'b',        oils_i18n_gettext('714', 'Bibliography', 'ccvm', 'value'), FALSE),
3946     (1356, 'accm1', 'c',        oils_i18n_gettext('715', 'Thematic index', 'ccvm', 'value'), FALSE),
3947     (1357, 'accm1', 'd',        oils_i18n_gettext('716', 'Libretto or text', 'ccvm', 'value'), FALSE),
3948     (1358, 'accm1', 'e',        oils_i18n_gettext('717', 'Biography of composer or author', 'ccvm', 'value'), FALSE),
3949     (1359, 'accm1', 'f',        oils_i18n_gettext('718', 'Biography or performer or history of ensemble', 'ccvm', 'value'), FALSE),
3950     (1360, 'accm1', 'g',        oils_i18n_gettext('719', 'Technical and/or historical information on instruments', 'ccvm', 'value'), FALSE),
3951     (1361, 'accm1', 'h',        oils_i18n_gettext('720', 'Technical information on music', 'ccvm', 'value'), FALSE),
3952     (1362, 'accm1', 'i',        oils_i18n_gettext('721', 'Historical information', 'ccvm', 'value'), FALSE),
3953     (1363, 'accm1', 'k',        oils_i18n_gettext('722', 'Ethnological information', 'ccvm', 'value'), FALSE),
3954     (1364, 'accm1', 'r',        oils_i18n_gettext('723', 'Instructional materials', 'ccvm', 'value'), FALSE),
3955     (1365, 'accm1', 's',        oils_i18n_gettext('724', 'Music', 'ccvm', 'value'), FALSE),
3956     (1366, 'accm1', 'z',        oils_i18n_gettext('725', 'Other accompanying matter', 'ccvm', 'value'), FALSE),
3957
3958     (1367, 'accm2', 'a',        oils_i18n_gettext('713', 'Discography', 'ccvm', 'value'), FALSE),
3959     (1368, 'accm2', 'b',        oils_i18n_gettext('714', 'Bibliography', 'ccvm', 'value'), FALSE),
3960     (1369, 'accm2', 'c',        oils_i18n_gettext('715', 'Thematic index', 'ccvm', 'value'), FALSE),
3961     (1370, 'accm2', 'd',        oils_i18n_gettext('716', 'Libretto or text', 'ccvm', 'value'), FALSE),
3962     (1371, 'accm2', 'e',        oils_i18n_gettext('717', 'Biography of composer or author', 'ccvm', 'value'), FALSE),
3963     (1372, 'accm2', 'f',        oils_i18n_gettext('718', 'Biography or performer or history of ensemble', 'ccvm', 'value'), FALSE),
3964     (1373, 'accm2', 'g',        oils_i18n_gettext('719', 'Technical and/or historical information on instruments', 'ccvm', 'value'), FALSE),
3965     (1374, 'accm2', 'h',        oils_i18n_gettext('720', 'Technical information on music', 'ccvm', 'value'), FALSE),
3966     (1375, 'accm2', 'i',        oils_i18n_gettext('721', 'Historical information', 'ccvm', 'value'), FALSE),
3967     (1376, 'accm2', 'k',        oils_i18n_gettext('722', 'Ethnological information', 'ccvm', 'value'), FALSE),
3968     (1377, 'accm2', 'r',        oils_i18n_gettext('723', 'Instructional materials', 'ccvm', 'value'), FALSE),
3969     (1378, 'accm2', 's',        oils_i18n_gettext('724', 'Music', 'ccvm', 'value'), FALSE),
3970     (1379, 'accm2', 'z',        oils_i18n_gettext('725', 'Other accompanying matter', 'ccvm', 'value'), FALSE),
3971
3972     (1380, 'accm3', 'a',        oils_i18n_gettext('713', 'Discography', 'ccvm', 'value'), FALSE),
3973     (1381, 'accm3', 'b',        oils_i18n_gettext('714', 'Bibliography', 'ccvm', 'value'), FALSE),
3974     (1382, 'accm3', 'c',        oils_i18n_gettext('715', 'Thematic index', 'ccvm', 'value'), FALSE),
3975     (1383, 'accm3', 'd',        oils_i18n_gettext('716', 'Libretto or text', 'ccvm', 'value'), FALSE),
3976     (1384, 'accm3', 'e',        oils_i18n_gettext('717', 'Biography of composer or author', 'ccvm', 'value'), FALSE),
3977     (1385, 'accm3', 'f',        oils_i18n_gettext('718', 'Biography or performer or history of ensemble', 'ccvm', 'value'), FALSE),
3978     (1386, 'accm3', 'g',        oils_i18n_gettext('719', 'Technical and/or historical information on instruments', 'ccvm', 'value'), FALSE),
3979     (1387, 'accm3', 'h',        oils_i18n_gettext('720', 'Technical information on music', 'ccvm', 'value'), FALSE),
3980     (1388, 'accm3', 'i',        oils_i18n_gettext('721', 'Historical information', 'ccvm', 'value'), FALSE),
3981     (1389, 'accm3', 'k',        oils_i18n_gettext('722', 'Ethnological information', 'ccvm', 'value'), FALSE),
3982     (1390, 'accm3', 'r',        oils_i18n_gettext('723', 'Instructional materials', 'ccvm', 'value'), FALSE),
3983     (1391, 'accm3', 's',        oils_i18n_gettext('724', 'Music', 'ccvm', 'value'), FALSE),
3984     (1392, 'accm3', 'z',        oils_i18n_gettext('725', 'Other accompanying matter', 'ccvm', 'value'), FALSE),
3985
3986     (1393, 'accm4', 'a',        oils_i18n_gettext('713', 'Discography', 'ccvm', 'value'), FALSE),
3987     (1394, 'accm4', 'b',        oils_i18n_gettext('714', 'Bibliography', 'ccvm', 'value'), FALSE),
3988     (1395, 'accm4', 'c',        oils_i18n_gettext('715', 'Thematic index', 'ccvm', 'value'), FALSE),
3989     (1396, 'accm4', 'd',        oils_i18n_gettext('716', 'Libretto or text', 'ccvm', 'value'), FALSE),
3990     (1397, 'accm4', 'e',        oils_i18n_gettext('717', 'Biography of composer or author', 'ccvm', 'value'), FALSE),
3991     (1398, 'accm4', 'f',        oils_i18n_gettext('718', 'Biography or performer or history of ensemble', 'ccvm', 'value'), FALSE),
3992     (1399, 'accm4', 'g',        oils_i18n_gettext('719', 'Technical and/or historical information on instruments', 'ccvm', 'value'), FALSE),
3993     (1400, 'accm4', 'h',        oils_i18n_gettext('720', 'Technical information on music', 'ccvm', 'value'), FALSE),
3994     (1401, 'accm4', 'i',        oils_i18n_gettext('721', 'Historical information', 'ccvm', 'value'), FALSE),
3995     (1402, 'accm4', 'k',        oils_i18n_gettext('722', 'Ethnological information', 'ccvm', 'value'), FALSE),
3996     (1403, 'accm4', 'r',        oils_i18n_gettext('723', 'Instructional materials', 'ccvm', 'value'), FALSE),
3997     (1404, 'accm4', 's',        oils_i18n_gettext('724', 'Music', 'ccvm', 'value'), FALSE),
3998     (1405, 'accm4', 'z',        oils_i18n_gettext('725', 'Other accompanying matter', 'ccvm', 'value'), FALSE),
3999
4000     (1406, 'accm5', 'a',        oils_i18n_gettext('713', 'Discography', 'ccvm', 'value'), FALSE),
4001     (1407, 'accm5', 'b',        oils_i18n_gettext('714', 'Bibliography', 'ccvm', 'value'), FALSE),
4002     (1408, 'accm5', 'c',        oils_i18n_gettext('715', 'Thematic index', 'ccvm', 'value'), FALSE),
4003     (1409, 'accm5', 'd',        oils_i18n_gettext('716', 'Libretto or text', 'ccvm', 'value'), FALSE),
4004     (1410, 'accm5', 'e',        oils_i18n_gettext('717', 'Biography of composer or author', 'ccvm', 'value'), FALSE),
4005     (1411, 'accm5', 'f',        oils_i18n_gettext('718', 'Biography or performer or history of ensemble', 'ccvm', 'value'), FALSE),
4006     (1412, 'accm5', 'g',        oils_i18n_gettext('719', 'Technical and/or historical information on instruments', 'ccvm', 'value'), FALSE),
4007     (1413, 'accm5', 'h',        oils_i18n_gettext('720', 'Technical information on music', 'ccvm', 'value'), FALSE),
4008     (1414, 'accm5', 'i',        oils_i18n_gettext('721', 'Historical information', 'ccvm', 'value'), FALSE),
4009     (1415, 'accm5', 'k',        oils_i18n_gettext('722', 'Ethnological information', 'ccvm', 'value'), FALSE),
4010     (1416, 'accm5', 'r',        oils_i18n_gettext('723', 'Instructional materials', 'ccvm', 'value'), FALSE),
4011     (1417, 'accm5', 's',        oils_i18n_gettext('724', 'Music', 'ccvm', 'value'), FALSE),
4012     (1418, 'accm5', 'z',        oils_i18n_gettext('725', 'Other accompanying matter', 'ccvm', 'value'), FALSE),
4013
4014     (1419, 'accm6', 'a',        oils_i18n_gettext('713', 'Discography', 'ccvm', 'value'), FALSE),
4015     (1420, 'accm6', 'b',        oils_i18n_gettext('714', 'Bibliography', 'ccvm', 'value'), FALSE),
4016     (1421, 'accm6', 'c',        oils_i18n_gettext('715', 'Thematic index', 'ccvm', 'value'), FALSE),
4017     (1422, 'accm6', 'd',        oils_i18n_gettext('716', 'Libretto or text', 'ccvm', 'value'), FALSE),
4018     (1423, 'accm6', 'e',        oils_i18n_gettext('717', 'Biography of composer or author', 'ccvm', 'value'), FALSE),
4019     (1424, 'accm6', 'f',        oils_i18n_gettext('718', 'Biography or performer or history of ensemble', 'ccvm', 'value'), FALSE),
4020     (1425, 'accm6', 'g',        oils_i18n_gettext('719', 'Technical and/or historical information on instruments', 'ccvm', 'value'), FALSE),
4021     (1426, 'accm6', 'h',        oils_i18n_gettext('720', 'Technical information on music', 'ccvm', 'value'), FALSE),
4022     (1427, 'accm6', 'i',        oils_i18n_gettext('721', 'Historical information', 'ccvm', 'value'), FALSE),
4023     (1428, 'accm6', 'k',        oils_i18n_gettext('722', 'Ethnological information', 'ccvm', 'value'), FALSE),
4024     (1429, 'accm6', 'r',        oils_i18n_gettext('723', 'Instructional materials', 'ccvm', 'value'), FALSE),
4025     (1430, 'accm6', 's',        oils_i18n_gettext('724', 'Music', 'ccvm', 'value'), FALSE),
4026     (1431, 'accm6', 'z',        oils_i18n_gettext('725', 'Other accompanying matter', 'ccvm', 'value'), FALSE),
4027
4028     (1432, 'cont1', ' ',        oils_i18n_gettext('835', 'Not specified', 'ccvm', 'value'), FALSE),
4029     (1433, 'cont1', 'a',        oils_i18n_gettext('836', 'Abstracts/summaries', 'ccvm', 'value'), FALSE),
4030     (1434, 'cont1', 'b',        oils_i18n_gettext('837', 'Bibliographies', 'ccvm', 'value'), FALSE),
4031     (1435, 'cont1', 'c',        oils_i18n_gettext('838', 'Catalogs', 'ccvm', 'value'), FALSE),
4032     (1436, 'cont1', 'd',        oils_i18n_gettext('839', 'Dictionaries', 'ccvm', 'value'), FALSE),
4033     (1437, 'cont1', 'e',        oils_i18n_gettext('840', 'Encyclopedias', 'ccvm', 'value'), FALSE),
4034     (1438, 'cont1', 'f',        oils_i18n_gettext('841', 'Handbooks', 'ccvm', 'value'), FALSE),
4035     (1439, 'cont1', 'g',        oils_i18n_gettext('842', 'Legal articles', 'ccvm', 'value'), FALSE),
4036     (1440, 'cont1', 'h',        oils_i18n_gettext('843', 'Biography', 'ccvm', 'value'), FALSE),
4037     (1441, 'cont1', 'i',        oils_i18n_gettext('844', 'Indexes', 'ccvm', 'value'), FALSE),
4038     (1442, 'cont1', 'j',        oils_i18n_gettext('845', 'Patent document', 'ccvm', 'value'), FALSE),
4039     (1443, 'cont1', 'k',        oils_i18n_gettext('846', 'Discographies', 'ccvm', 'value'), FALSE),
4040     (1444, 'cont1', 'l',        oils_i18n_gettext('847', 'Legislation', 'ccvm', 'value'), FALSE),
4041     (1445, 'cont1', 'm',        oils_i18n_gettext('848', 'Theses', 'ccvm', 'value'), FALSE),
4042     (1446, 'cont1', 'n',        oils_i18n_gettext('849', 'Surveys of the literature in a subject area', 'ccvm', 'value'), FALSE),
4043     (1447, 'cont1', 'o',        oils_i18n_gettext('850', 'Reviews', 'ccvm', 'value'), FALSE),
4044     (1448, 'cont1', 'p',        oils_i18n_gettext('851', 'Programmed texts', 'ccvm', 'value'), FALSE),
4045     (1449, 'cont1', 'q',        oils_i18n_gettext('852', 'Filmographies', 'ccvm', 'value'), FALSE),
4046     (1450, 'cont1', 'r',        oils_i18n_gettext('853', 'Directories', 'ccvm', 'value'), FALSE),
4047     (1451, 'cont1', 's',        oils_i18n_gettext('854', 'Statistics', 'ccvm', 'value'), FALSE),
4048     (1452, 'cont1', 't',        oils_i18n_gettext('855', 'Technical reports', 'ccvm', 'value'), FALSE),
4049     (1453, 'cont1', 'u',        oils_i18n_gettext('856', 'Standards/specifications', 'ccvm', 'value'), FALSE),
4050     (1454, 'cont1', 'v',        oils_i18n_gettext('857', 'Legal cases and case notes', 'ccvm', 'value'), FALSE),
4051     (1455, 'cont1', 'w',        oils_i18n_gettext('858', 'Law reports and digests', 'ccvm', 'value'), FALSE),
4052     (1456, 'cont1', 'x',        oils_i18n_gettext('859', 'Other reports', 'ccvm', 'value'), FALSE),
4053     (1457, 'cont1', 'y',        oils_i18n_gettext('860', 'Yearbooks', 'ccvm', 'value'), FALSE),
4054     (1458, 'cont1', 'z',        oils_i18n_gettext('861', 'Treaties', 'ccvm', 'value'), FALSE),
4055     (1459, 'cont1', '2',        oils_i18n_gettext('862', 'Offprints', 'ccvm', 'value'), FALSE),
4056     (1460, 'cont1', '5',        oils_i18n_gettext('863', 'Calendars', 'ccvm', 'value'), FALSE),
4057     (1461, 'cont1', '6',        oils_i18n_gettext('864', 'Comics/graphic novels', 'ccvm', 'value'), FALSE),
4058
4059     (1462, 'cont2', 'a',        oils_i18n_gettext('836', 'Abstracts/summaries', 'ccvm', 'value'), FALSE),
4060     (1463, 'cont2', 'b',        oils_i18n_gettext('837', 'Bibliographies', 'ccvm', 'value'), FALSE),
4061     (1464, 'cont2', 'c',        oils_i18n_gettext('838', 'Catalogs', 'ccvm', 'value'), FALSE),
4062     (1465, 'cont2', 'd',        oils_i18n_gettext('839', 'Dictionaries', 'ccvm', 'value'), FALSE),
4063     (1466, 'cont2', 'e',        oils_i18n_gettext('840', 'Encyclopedias', 'ccvm', 'value'), FALSE),
4064     (1467, 'cont2', 'f',        oils_i18n_gettext('841', 'Handbooks', 'ccvm', 'value'), FALSE),
4065     (1468, 'cont2', 'g',        oils_i18n_gettext('842', 'Legal articles', 'ccvm', 'value'), FALSE),
4066     (1469, 'cont2', 'h',        oils_i18n_gettext('843', 'Biography', 'ccvm', 'value'), FALSE),
4067     (1470, 'cont2', 'i',        oils_i18n_gettext('844', 'Indexes', 'ccvm', 'value'), FALSE),
4068     (1471, 'cont2', 'j',        oils_i18n_gettext('845', 'Patent document', 'ccvm', 'value'), FALSE),
4069     (1472, 'cont2', 'k',        oils_i18n_gettext('846', 'Discographies', 'ccvm', 'value'), FALSE),
4070     (1473, 'cont2', 'l',        oils_i18n_gettext('847', 'Legislation', 'ccvm', 'value'), FALSE),
4071     (1474, 'cont2', 'm',        oils_i18n_gettext('848', 'Theses', 'ccvm', 'value'), FALSE),
4072     (1475, 'cont2', 'n',        oils_i18n_gettext('849', 'Surveys of the literature in a subject area', 'ccvm', 'value'), FALSE),
4073     (1476, 'cont2', 'o',        oils_i18n_gettext('850', 'Reviews', 'ccvm', 'value'), FALSE),
4074     (1477, 'cont2', 'p',        oils_i18n_gettext('851', 'Programmed texts', 'ccvm', 'value'), FALSE),
4075     (1478, 'cont2', 'q',        oils_i18n_gettext('852', 'Filmographies', 'ccvm', 'value'), FALSE),
4076     (1479, 'cont2', 'r',        oils_i18n_gettext('853', 'Directories', 'ccvm', 'value'), FALSE),
4077     (1480, 'cont2', 's',        oils_i18n_gettext('854', 'Statistics', 'ccvm', 'value'), FALSE),
4078     (1481, 'cont2', 't',        oils_i18n_gettext('855', 'Technical reports', 'ccvm', 'value'), FALSE),
4079     (1482, 'cont2', 'u',        oils_i18n_gettext('856', 'Standards/specifications', 'ccvm', 'value'), FALSE),
4080     (1483, 'cont2', 'v',        oils_i18n_gettext('857', 'Legal cases and case notes', 'ccvm', 'value'), FALSE),
4081     (1484, 'cont2', 'w',        oils_i18n_gettext('858', 'Law reports and digests', 'ccvm', 'value'), FALSE),
4082     (1485, 'cont2', 'x',        oils_i18n_gettext('859', 'Other reports', 'ccvm', 'value'), FALSE),
4083     (1486, 'cont2', 'y',        oils_i18n_gettext('860', 'Yearbooks', 'ccvm', 'value'), FALSE),
4084     (1487, 'cont2', 'z',        oils_i18n_gettext('861', 'Treaties', 'ccvm', 'value'), FALSE),
4085     (1488, 'cont2', '2',        oils_i18n_gettext('862', 'Offprints', 'ccvm', 'value'), FALSE),
4086     (1489, 'cont2', '5',        oils_i18n_gettext('863', 'Calendars', 'ccvm', 'value'), FALSE),
4087     (1490, 'cont2', '6',        oils_i18n_gettext('864', 'Comics/graphic novels', 'ccvm', 'value'), FALSE),
4088
4089     (1491, 'cont3', 'a',        oils_i18n_gettext('836', 'Abstracts/summaries', 'ccvm', 'value'), FALSE),
4090     (1492, 'cont3', 'b',        oils_i18n_gettext('837', 'Bibliographies', 'ccvm', 'value'), FALSE),
4091     (1493, 'cont3', 'c',        oils_i18n_gettext('838', 'Catalogs', 'ccvm', 'value'), FALSE),
4092     (1494, 'cont3', 'd',        oils_i18n_gettext('839', 'Dictionaries', 'ccvm', 'value'), FALSE),
4093     (1495, 'cont3', 'e',        oils_i18n_gettext('840', 'Encyclopedias', 'ccvm', 'value'), FALSE),
4094     (1496, 'cont3', 'f',        oils_i18n_gettext('841', 'Handbooks', 'ccvm', 'value'), FALSE),
4095     (1497, 'cont3', 'g',        oils_i18n_gettext('842', 'Legal articles', 'ccvm', 'value'), FALSE),
4096     (1498, 'cont3', 'h',        oils_i18n_gettext('843', 'Biography', 'ccvm', 'value'), FALSE),
4097     (1499, 'cont3', 'i',        oils_i18n_gettext('844', 'Indexes', 'ccvm', 'value'), FALSE),
4098     (1500, 'cont3', 'j',        oils_i18n_gettext('845', 'Patent document', 'ccvm', 'value'), FALSE),
4099     (1501, 'cont3', 'k',        oils_i18n_gettext('846', 'Discographies', 'ccvm', 'value'), FALSE),
4100     (1502, 'cont3', 'l',        oils_i18n_gettext('847', 'Legislation', 'ccvm', 'value'), FALSE),
4101     (1503, 'cont3', 'm',        oils_i18n_gettext('848', 'Theses', 'ccvm', 'value'), FALSE),
4102     (1504, 'cont3', 'n',        oils_i18n_gettext('849', 'Surveys of the literature in a subject area', 'ccvm', 'value'), FALSE),
4103     (1505, 'cont3', 'o',        oils_i18n_gettext('850', 'Reviews', 'ccvm', 'value'), FALSE),
4104     (1506, 'cont3', 'p',        oils_i18n_gettext('851', 'Programmed texts', 'ccvm', 'value'), FALSE),
4105     (1507, 'cont3', 'q',        oils_i18n_gettext('852', 'Filmographies', 'ccvm', 'value'), FALSE),
4106     (1508, 'cont3', 'r',        oils_i18n_gettext('853', 'Directories', 'ccvm', 'value'), FALSE),
4107     (1509, 'cont3', 's',        oils_i18n_gettext('854', 'Statistics', 'ccvm', 'value'), FALSE),
4108     (1510, 'cont3', 't',        oils_i18n_gettext('855', 'Technical reports', 'ccvm', 'value'), FALSE),
4109     (1511, 'cont3', 'u',        oils_i18n_gettext('856', 'Standards/specifications', 'ccvm', 'value'), FALSE),
4110     (1512, 'cont3', 'v',        oils_i18n_gettext('857', 'Legal cases and case notes', 'ccvm', 'value'), FALSE),
4111     (1513, 'cont3', 'w',        oils_i18n_gettext('858', 'Law reports and digests', 'ccvm', 'value'), FALSE),
4112     (1514, 'cont3', 'x',        oils_i18n_gettext('859', 'Other reports', 'ccvm', 'value'), FALSE),
4113     (1515, 'cont3', 'y',        oils_i18n_gettext('860', 'Yearbooks', 'ccvm', 'value'), FALSE),
4114     (1516, 'cont3', 'z',        oils_i18n_gettext('861', 'Treaties', 'ccvm', 'value'), FALSE),
4115     (1517, 'cont3', '2',        oils_i18n_gettext('862', 'Offprints', 'ccvm', 'value'), FALSE),
4116     (1518, 'cont3', '5',        oils_i18n_gettext('863', 'Calendars', 'ccvm', 'value'), FALSE),
4117     (1519, 'cont3', '6',        oils_i18n_gettext('864', 'Comics/graphic novels', 'ccvm', 'value'), FALSE),
4118
4119     (1520, 'cont4', 'a',        oils_i18n_gettext('836', 'Abstracts/summaries', 'ccvm', 'value'), FALSE),
4120     (1521, 'cont4', 'b',        oils_i18n_gettext('837', 'Bibliographies', 'ccvm', 'value'), FALSE),
4121     (1522, 'cont4', 'c',        oils_i18n_gettext('838', 'Catalogs', 'ccvm', 'value'), FALSE),
4122     (1523, 'cont4', 'd',        oils_i18n_gettext('839', 'Dictionaries', 'ccvm', 'value'), FALSE),
4123     (1524, 'cont4', 'e',        oils_i18n_gettext('840', 'Encyclopedias', 'ccvm', 'value'), FALSE),
4124     (1525, 'cont4', 'f',        oils_i18n_gettext('841', 'Handbooks', 'ccvm', 'value'), FALSE),
4125     (1526, 'cont4', 'g',        oils_i18n_gettext('842', 'Legal articles', 'ccvm', 'value'), FALSE),
4126     (1527, 'cont4', 'h',        oils_i18n_gettext('843', 'Biography', 'ccvm', 'value'), FALSE),
4127     (1528, 'cont4', 'i',        oils_i18n_gettext('844', 'Indexes', 'ccvm', 'value'), FALSE),
4128     (1529, 'cont4', 'j',        oils_i18n_gettext('845', 'Patent document', 'ccvm', 'value'), FALSE),
4129     (1530, 'cont4', 'k',        oils_i18n_gettext('846', 'Discographies', 'ccvm', 'value'), FALSE),
4130     (1531, 'cont4', 'l',        oils_i18n_gettext('847', 'Legislation', 'ccvm', 'value'), FALSE),
4131     (1532, 'cont4', 'm',        oils_i18n_gettext('848', 'Theses', 'ccvm', 'value'), FALSE),
4132     (1533, 'cont4', 'n',        oils_i18n_gettext('849', 'Surveys of the literature in a subject area', 'ccvm', 'value'), FALSE),
4133     (1534, 'cont4', 'o',        oils_i18n_gettext('850', 'Reviews', 'ccvm', 'value'), FALSE),
4134     (1535, 'cont4', 'p',        oils_i18n_gettext('851', 'Programmed texts', 'ccvm', 'value'), FALSE),
4135     (1536, 'cont4', 'q',        oils_i18n_gettext('852', 'Filmographies', 'ccvm', 'value'), FALSE),
4136     (1537, 'cont4', 'r',        oils_i18n_gettext('853', 'Directories', 'ccvm', 'value'), FALSE),
4137     (1538, 'cont4', 's',        oils_i18n_gettext('854', 'Statistics', 'ccvm', 'value'), FALSE),
4138     (1539, 'cont4', 't',        oils_i18n_gettext('855', 'Technical reports', 'ccvm', 'value'), FALSE),
4139     (1540, 'cont4', 'u',        oils_i18n_gettext('856', 'Standards/specifications', 'ccvm', 'value'), FALSE),
4140     (1541, 'cont4', 'v',        oils_i18n_gettext('857', 'Legal cases and case notes', 'ccvm', 'value'), FALSE),
4141     (1542, 'cont4', 'w',        oils_i18n_gettext('858', 'Law reports and digests', 'ccvm', 'value'), FALSE),
4142     (1543, 'cont4', 'x',        oils_i18n_gettext('859', 'Other reports', 'ccvm', 'value'), FALSE),
4143     (1544, 'cont4', 'y',        oils_i18n_gettext('860', 'Yearbooks', 'ccvm', 'value'), FALSE),
4144     (1545, 'cont4', 'z',        oils_i18n_gettext('861', 'Treaties', 'ccvm', 'value'), FALSE),
4145     (1546, 'cont4', '2',        oils_i18n_gettext('862', 'Offprints', 'ccvm', 'value'), FALSE),
4146     (1547, 'cont4', '5',        oils_i18n_gettext('863', 'Calendars', 'ccvm', 'value'), FALSE),
4147     (1548, 'cont4', '6',        oils_i18n_gettext('864', 'Comics/graphic novels', 'ccvm', 'value'), FALSE),
4148
4149     (1549, 'ltxt1', ' ',        oils_i18n_gettext('881', 'Item is a music sound recording', 'ccvm', 'value'), FALSE),
4150     (1550, 'ltxt1', 'a',        oils_i18n_gettext('882', 'Autobiography', 'ccvm', 'value'), FALSE),
4151     (1551, 'ltxt1', 'b',        oils_i18n_gettext('883', 'Biography', 'ccvm', 'value'), FALSE),
4152     (1552, 'ltxt1', 'c',        oils_i18n_gettext('884', 'Conference proceedings', 'ccvm', 'value'), FALSE),
4153     (1553, 'ltxt1', 'd',        oils_i18n_gettext('885', 'Drama', 'ccvm', 'value'), FALSE),
4154     (1554, 'ltxt1', 'e',        oils_i18n_gettext('886', 'Essays', 'ccvm', 'value'), FALSE),
4155     (1555, 'ltxt1', 'f',        oils_i18n_gettext('887', 'Fiction', 'ccvm', 'value'), FALSE),
4156     (1556, 'ltxt1', 'g',        oils_i18n_gettext('888', 'Reporting', 'ccvm', 'value'), FALSE),
4157     (1557, 'ltxt1', 'h',        oils_i18n_gettext('889', 'History', 'ccvm', 'value'), FALSE),
4158     (1558, 'ltxt1', 'i',        oils_i18n_gettext('890', 'Instruction', 'ccvm', 'value'), FALSE),
4159     (1559, 'ltxt1', 'j',        oils_i18n_gettext('891', 'Language instruction', 'ccvm', 'value'), FALSE),
4160     (1560, 'ltxt1', 'k',        oils_i18n_gettext('892', 'Comedy', 'ccvm', 'value'), FALSE),
4161     (1561, 'ltxt1', 'l',        oils_i18n_gettext('893', 'Lectures, speeches', 'ccvm', 'value'), FALSE),
4162     (1562, 'ltxt1', 'm',        oils_i18n_gettext('894', 'Memoirs', 'ccvm', 'value'), FALSE),
4163     (1563, 'ltxt1', 'n',        oils_i18n_gettext('895', 'Not applicable', 'ccvm', 'value'), FALSE),
4164     (1564, 'ltxt1', 'o',        oils_i18n_gettext('896', 'Folktales', 'ccvm', 'value'), FALSE),
4165     (1565, 'ltxt1', 'p',        oils_i18n_gettext('897', 'Poetry', 'ccvm', 'value'), FALSE),
4166     (1566, 'ltxt1', 'r',        oils_i18n_gettext('898', 'Rehearsals', 'ccvm', 'value'), FALSE),
4167     (1567, 'ltxt1', 's',        oils_i18n_gettext('899', 'Sounds', 'ccvm', 'value'), FALSE),
4168     (1568, 'ltxt1', 't',        oils_i18n_gettext('900', 'Interviews', 'ccvm', 'value'), FALSE),
4169     (1569, 'ltxt1', 'z',        oils_i18n_gettext('901', 'Other', 'ccvm', 'value'), FALSE),
4170
4171     (1570, 'ltxt2', 'a',        oils_i18n_gettext('882', 'Autobiography', 'ccvm', 'value'), FALSE),
4172     (1571, 'ltxt2', 'b',        oils_i18n_gettext('883', 'Biography', 'ccvm', 'value'), FALSE),
4173     (1572, 'ltxt2', 'c',        oils_i18n_gettext('884', 'Conference proceedings', 'ccvm', 'value'), FALSE),
4174     (1573, 'ltxt2', 'd',        oils_i18n_gettext('885', 'Drama', 'ccvm', 'value'), FALSE),
4175     (1574, 'ltxt2', 'e',        oils_i18n_gettext('886', 'Essays', 'ccvm', 'value'), FALSE),
4176     (1575, 'ltxt2', 'f',        oils_i18n_gettext('887', 'Fiction', 'ccvm', 'value'), FALSE),
4177     (1576, 'ltxt2', 'g',        oils_i18n_gettext('888', 'Reporting', 'ccvm', 'value'), FALSE),
4178     (1577, 'ltxt2', 'h',        oils_i18n_gettext('889', 'History', 'ccvm', 'value'), FALSE),
4179     (1578, 'ltxt2', 'i',        oils_i18n_gettext('890', 'Instruction', 'ccvm', 'value'), FALSE),
4180     (1579, 'ltxt2', 'j',        oils_i18n_gettext('891', 'Language instruction', 'ccvm', 'value'), FALSE),
4181     (1580, 'ltxt2', 'k',        oils_i18n_gettext('892', 'Comedy', 'ccvm', 'value'), FALSE),
4182     (1581, 'ltxt2', 'l',        oils_i18n_gettext('893', 'Lectures, speeches', 'ccvm', 'value'), FALSE),
4183     (1582, 'ltxt2', 'm',        oils_i18n_gettext('894', 'Memoirs', 'ccvm', 'value'), FALSE),
4184     (1583, 'ltxt2', 'n',        oils_i18n_gettext('895', 'Not applicable', 'ccvm', 'value'), FALSE),
4185     (1584, 'ltxt2', 'o',        oils_i18n_gettext('896', 'Folktales', 'ccvm', 'value'), FALSE),
4186     (1585, 'ltxt2', 'p',        oils_i18n_gettext('897', 'Poetry', 'ccvm', 'value'), FALSE),
4187     (1586, 'ltxt2', 'r',        oils_i18n_gettext('898', 'Rehearsals', 'ccvm', 'value'), FALSE),
4188     (1587, 'ltxt2', 's',        oils_i18n_gettext('899', 'Sounds', 'ccvm', 'value'), FALSE),
4189     (1588, 'ltxt2', 't',        oils_i18n_gettext('900', 'Interviews', 'ccvm', 'value'), FALSE),
4190     (1589, 'ltxt2', 'z',        oils_i18n_gettext('901', 'Other', 'ccvm', 'value'), FALSE),
4191
4192     (1590, 'relf1', ' ',        oils_i18n_gettext('965', 'No relief shown', 'ccvm', 'value'), FALSE),
4193     (1591, 'relf1', 'a',        oils_i18n_gettext('966', 'Contours', 'ccvm', 'value'), FALSE),
4194     (1592, 'relf1', 'b',        oils_i18n_gettext('967', 'Shading', 'ccvm', 'value'), FALSE),
4195     (1593, 'relf1', 'c',        oils_i18n_gettext('968', 'Gradient and bathymetric tints', 'ccvm', 'value'), FALSE),
4196     (1594, 'relf1', 'd',        oils_i18n_gettext('969', 'Hachures', 'ccvm', 'value'), FALSE),
4197     (1595, 'relf1', 'e',        oils_i18n_gettext('970', 'Bathymetry, soundings', 'ccvm', 'value'), FALSE),
4198     (1596, 'relf1', 'f',        oils_i18n_gettext('971', 'Form lines', 'ccvm', 'value'), FALSE),
4199     (1597, 'relf1', 'g',        oils_i18n_gettext('972', 'Spot heights', 'ccvm', 'value'), FALSE),
4200     (1598, 'relf1', 'i',        oils_i18n_gettext('973', 'Pictorially', 'ccvm', 'value'), FALSE),
4201     (1599, 'relf1', 'j',        oils_i18n_gettext('974', 'Land forms', 'ccvm', 'value'), FALSE),
4202     (1600, 'relf1', 'k',        oils_i18n_gettext('975', 'Bathymetry, isolines', 'ccvm', 'value'), FALSE),
4203     (1601, 'relf1', 'm',        oils_i18n_gettext('976', 'Rock drawings', 'ccvm', 'value'), FALSE),
4204     (1602, 'relf1', 'z',        oils_i18n_gettext('977', 'Other', 'ccvm', 'value'), FALSE),
4205
4206     (1603, 'relf2', 'a',        oils_i18n_gettext('966', 'Contours', 'ccvm', 'value'), FALSE),
4207     (1604, 'relf2', 'b',        oils_i18n_gettext('967', 'Shading', 'ccvm', 'value'), FALSE),
4208     (1605, 'relf2', 'c',        oils_i18n_gettext('968', 'Gradient and bathymetric tints', 'ccvm', 'value'), FALSE),
4209     (1606, 'relf2', 'd',        oils_i18n_gettext('969', 'Hachures', 'ccvm', 'value'), FALSE),
4210     (1607, 'relf2', 'e',        oils_i18n_gettext('970', 'Bathymetry, soundings', 'ccvm', 'value'), FALSE),
4211     (1608, 'relf2', 'f',        oils_i18n_gettext('971', 'Form lines', 'ccvm', 'value'), FALSE),
4212     (1609, 'relf2', 'g',        oils_i18n_gettext('972', 'Spot heights', 'ccvm', 'value'), FALSE),
4213     (1610, 'relf2', 'i',        oils_i18n_gettext('973', 'Pictorially', 'ccvm', 'value'), FALSE),
4214     (1611, 'relf2', 'j',        oils_i18n_gettext('974', 'Land forms', 'ccvm', 'value'), FALSE),
4215     (1612, 'relf2', 'k',        oils_i18n_gettext('975', 'Bathymetry, isolines', 'ccvm', 'value'), FALSE),
4216     (1613, 'relf2', 'm',        oils_i18n_gettext('976', 'Rock drawings', 'ccvm', 'value'), FALSE),
4217     (1614, 'relf2', 'z',        oils_i18n_gettext('977', 'Other', 'ccvm', 'value'), FALSE),
4218
4219     (1615, 'relf3', 'a',        oils_i18n_gettext('966', 'Contours', 'ccvm', 'value'), FALSE),
4220     (1616, 'relf3', 'b',        oils_i18n_gettext('967', 'Shading', 'ccvm', 'value'), FALSE),
4221     (1617, 'relf3', 'c',        oils_i18n_gettext('968', 'Gradient and bathymetric tints', 'ccvm', 'value'), FALSE),
4222     (1618, 'relf3', 'd',        oils_i18n_gettext('969', 'Hachures', 'ccvm', 'value'), FALSE),
4223     (1619, 'relf3', 'e',        oils_i18n_gettext('970', 'Bathymetry, soundings', 'ccvm', 'value'), FALSE),
4224     (1620, 'relf3', 'f',        oils_i18n_gettext('971', 'Form lines', 'ccvm', 'value'), FALSE),
4225     (1621, 'relf3', 'g',        oils_i18n_gettext('972', 'Spot heights', 'ccvm', 'value'), FALSE),
4226     (1622, 'relf3', 'i',        oils_i18n_gettext('973', 'Pictorially', 'ccvm', 'value'), FALSE),
4227     (1623, 'relf3', 'j',        oils_i18n_gettext('974', 'Land forms', 'ccvm', 'value'), FALSE),
4228     (1624, 'relf3', 'k',        oils_i18n_gettext('975', 'Bathymetry, isolines', 'ccvm', 'value'), FALSE),
4229     (1625, 'relf3', 'm',        oils_i18n_gettext('976', 'Rock drawings', 'ccvm', 'value'), FALSE),
4230     (1626, 'relf3', 'z',        oils_i18n_gettext('977', 'Other', 'ccvm', 'value'), FALSE),
4231
4232     (1627, 'relf4', 'a',        oils_i18n_gettext('966', 'Contours', 'ccvm', 'value'), FALSE),
4233     (1628, 'relf4', 'b',        oils_i18n_gettext('967', 'Shading', 'ccvm', 'value'), FALSE),
4234     (1629, 'relf4', 'c',        oils_i18n_gettext('968', 'Gradient and bathymetric tints', 'ccvm', 'value'), FALSE),
4235     (1630, 'relf4', 'd',        oils_i18n_gettext('969', 'Hachures', 'ccvm', 'value'), FALSE),
4236     (1631, 'relf4', 'e',        oils_i18n_gettext('970', 'Bathymetry, soundings', 'ccvm', 'value'), FALSE),
4237     (1632, 'relf4', 'f',        oils_i18n_gettext('971', 'Form lines', 'ccvm', 'value'), FALSE),
4238     (1633, 'relf4', 'g',        oils_i18n_gettext('972', 'Spot heights', 'ccvm', 'value'), FALSE),
4239     (1634, 'relf4', 'i',        oils_i18n_gettext('973', 'Pictorially', 'ccvm', 'value'), FALSE),
4240     (1635, 'relf4', 'j',        oils_i18n_gettext('974', 'Land forms', 'ccvm', 'value'), FALSE),
4241     (1636, 'relf4', 'k',        oils_i18n_gettext('975', 'Bathymetry, isolines', 'ccvm', 'value'), FALSE),
4242     (1637, 'relf4', 'm',        oils_i18n_gettext('976', 'Rock drawings', 'ccvm', 'value'), FALSE),
4243     (1638, 'relf4', 'z',        oils_i18n_gettext('977', 'Other', 'ccvm', 'value'), FALSE),
4244
4245     (1639, 'spfm1', ' ',        oils_i18n_gettext('978', 'No specified special format characteristics', 'ccvm', 'value'), FALSE),
4246     (1640, 'spfm1', 'e',        oils_i18n_gettext('979', 'Manuscript', 'ccvm', 'value'), FALSE),
4247     (1641, 'spfm1', 'j',        oils_i18n_gettext('980', 'Picture card, post card', 'ccvm', 'value'), FALSE),
4248     (1642, 'spfm1', 'k',        oils_i18n_gettext('981', 'Calendar', 'ccvm', 'value'), FALSE),
4249     (1643, 'spfm1', 'l',        oils_i18n_gettext('982', 'Puzzle', 'ccvm', 'value'), FALSE),
4250     (1644, 'spfm1', 'n',        oils_i18n_gettext('983', 'Game', 'ccvm', 'value'), FALSE),
4251     (1645, 'spfm1', 'o',        oils_i18n_gettext('984', 'Wall map', 'ccvm', 'value'), FALSE),
4252     (1646, 'spfm1', 'p',        oils_i18n_gettext('985', 'Playing cards', 'ccvm', 'value'), FALSE),
4253     (1647, 'spfm1', 'r',        oils_i18n_gettext('986', 'Loose-leaf', 'ccvm', 'value'), FALSE),
4254     (1648, 'spfm1', 'z',        oils_i18n_gettext('987', 'Other', 'ccvm', 'value'), FALSE),
4255
4256     (1649, 'spfm2', 'e',        oils_i18n_gettext('979', 'Manuscript', 'ccvm', 'value'), FALSE),
4257     (1650, 'spfm2', 'j',        oils_i18n_gettext('980', 'Picture card, post card', 'ccvm', 'value'), FALSE),
4258     (1651, 'spfm2', 'k',        oils_i18n_gettext('981', 'Calendar', 'ccvm', 'value'), FALSE),
4259     (1652, 'spfm2', 'l',        oils_i18n_gettext('982', 'Puzzle', 'ccvm', 'value'), FALSE),
4260     (1653, 'spfm2', 'n',        oils_i18n_gettext('983', 'Game', 'ccvm', 'value'), FALSE),
4261     (1654, 'spfm2', 'o',        oils_i18n_gettext('984', 'Wall map', 'ccvm', 'value'), FALSE),
4262     (1655, 'spfm2', 'p',        oils_i18n_gettext('985', 'Playing cards', 'ccvm', 'value'), FALSE),
4263     (1656, 'spfm2', 'r',        oils_i18n_gettext('986', 'Loose-leaf', 'ccvm', 'value'), FALSE),
4264     (1657, 'spfm2', 'z',        oils_i18n_gettext('987', 'Other', 'ccvm', 'value'), FALSE),
4265
4266     (1658, 'ills', ' ',         oils_i18n_gettext('1658', 'No Illustrations', 'ccvm', 'value'), FALSE),
4267     (1659, 'ills', 'a',         oils_i18n_gettext('1659', 'Illustrations', 'ccvm', 'value'), FALSE),
4268     (1660, 'ills', 'b',         oils_i18n_gettext('1660', 'Maps', 'ccvm', 'value'), FALSE),
4269     (1661, 'ills', 'c',         oils_i18n_gettext('1661', 'Portraits', 'ccvm', 'value'), FALSE),
4270     (1662, 'ills', 'd',         oils_i18n_gettext('1662', 'Charts', 'ccvm', 'value'), FALSE),
4271     (1663, 'ills', 'e',         oils_i18n_gettext('1663', 'Plans', 'ccvm', 'value'), FALSE),
4272     (1664, 'ills', 'f',         oils_i18n_gettext('1664', 'Plates', 'ccvm', 'value'), FALSE),
4273     (1665, 'ills', 'g',         oils_i18n_gettext('1665', 'Music', 'ccvm', 'value'), FALSE),
4274     (1666, 'ills', 'h',         oils_i18n_gettext('1666', 'Facsimiles', 'ccvm', 'value'), FALSE),
4275     (1667, 'ills', 'i',         oils_i18n_gettext('1667', 'Coats of arms', 'ccvm', 'value'), FALSE),
4276     (1668, 'ills', 'j',         oils_i18n_gettext('1668', 'Genealogical tables', 'ccvm', 'value'), FALSE),
4277     (1669, 'ills', 'k',         oils_i18n_gettext('1669', 'Forms', 'ccvm', 'value'), FALSE),
4278     (1670, 'ills', 'l',         oils_i18n_gettext('1670', 'Samples', 'ccvm', 'value'), FALSE),
4279     (1671, 'ills', 'm',         oils_i18n_gettext('1671', 'Phonodisc, phonowire, etc.', 'ccvm', 'value'), FALSE),
4280     (1672, 'ills', 'o',         oils_i18n_gettext('1672', 'Photographs', 'ccvm', 'value'), FALSE),
4281     (1673, 'ills', 'p',         oils_i18n_gettext('1673', 'Illuminations', 'ccvm', 'value'), FALSE),
4282
4283     (1674, 'ills1', ' ',        oils_i18n_gettext('1658', 'No Illustrations', 'ccvm', 'value'), FALSE),
4284     (1675, 'ills1', 'a',        oils_i18n_gettext('1659', 'Illustrations', 'ccvm', 'value'), FALSE),
4285     (1676, 'ills1', 'b',        oils_i18n_gettext('1660', 'Maps', 'ccvm', 'value'), FALSE),
4286     (1677, 'ills1', 'c',        oils_i18n_gettext('1661', 'Portraits', 'ccvm', 'value'), FALSE),
4287     (1678, 'ills1', 'd',        oils_i18n_gettext('1662', 'Charts', 'ccvm', 'value'), FALSE),
4288     (1679, 'ills1', 'e',        oils_i18n_gettext('1663', 'Plans', 'ccvm', 'value'), FALSE),
4289     (1680, 'ills1', 'f',        oils_i18n_gettext('1664', 'Plates', 'ccvm', 'value'), FALSE),
4290     (1681, 'ills1', 'g',        oils_i18n_gettext('1665', 'Music', 'ccvm', 'value'), FALSE),
4291     (1682, 'ills1', 'h',        oils_i18n_gettext('1666', 'Facsimiles', 'ccvm', 'value'), FALSE),
4292     (1683, 'ills1', 'i',        oils_i18n_gettext('1667', 'Coats of arms', 'ccvm', 'value'), FALSE),
4293     (1684, 'ills1', 'j',        oils_i18n_gettext('1668', 'Genealogical tables', 'ccvm', 'value'), FALSE),
4294     (1685, 'ills1', 'k',        oils_i18n_gettext('1669', 'Forms', 'ccvm', 'value'), FALSE),
4295     (1686, 'ills1', 'l',        oils_i18n_gettext('1670', 'Samples', 'ccvm', 'value'), FALSE),
4296     (1687, 'ills1', 'm',        oils_i18n_gettext('1671', 'Phonodisc, phonowire, etc.', 'ccvm', 'value'), FALSE),
4297     (1688, 'ills1', 'o',        oils_i18n_gettext('1672', 'Photographs', 'ccvm', 'value'), FALSE),
4298     (1689, 'ills1', 'p',        oils_i18n_gettext('1673', 'Illuminations', 'ccvm', 'value'), FALSE),
4299
4300     (1690, 'ills2', 'a',        oils_i18n_gettext('1659', 'Illustrations', 'ccvm', 'value'), FALSE),
4301     (1691, 'ills2', 'b',        oils_i18n_gettext('1660', 'Maps', 'ccvm', 'value'), FALSE),
4302     (1692, 'ills2', 'c',        oils_i18n_gettext('1661', 'Portraits', 'ccvm', 'value'), FALSE),
4303     (1693, 'ills2', 'd',        oils_i18n_gettext('1662', 'Charts', 'ccvm', 'value'), FALSE),
4304     (1694, 'ills2', 'e',        oils_i18n_gettext('1663', 'Plans', 'ccvm', 'value'), FALSE),
4305     (1695, 'ills2', 'f',        oils_i18n_gettext('1664', 'Plates', 'ccvm', 'value'), FALSE),
4306     (1696, 'ills2', 'g',        oils_i18n_gettext('1665', 'Music', 'ccvm', 'value'), FALSE),
4307     (1697, 'ills2', 'h',        oils_i18n_gettext('1666', 'Facsimiles', 'ccvm', 'value'), FALSE),
4308     (1698, 'ills2', 'i',        oils_i18n_gettext('1667', 'Coats of arms', 'ccvm', 'value'), FALSE),
4309     (1699, 'ills2', 'j',        oils_i18n_gettext('1668', 'Genealogical tables', 'ccvm', 'value'), FALSE),
4310     (1700, 'ills2', 'k',        oils_i18n_gettext('1669', 'Forms', 'ccvm', 'value'), FALSE),
4311     (1701, 'ills2', 'l',        oils_i18n_gettext('1670', 'Samples', 'ccvm', 'value'), FALSE),
4312     (1702, 'ills2', 'm',        oils_i18n_gettext('1671', 'Phonodisc, phonowire, etc.', 'ccvm', 'value'), FALSE),
4313     (1703, 'ills2', 'o',        oils_i18n_gettext('1672', 'Photographs', 'ccvm', 'value'), FALSE),
4314     (1704, 'ills2', 'p',        oils_i18n_gettext('1673', 'Illuminations', 'ccvm', 'value'), FALSE),
4315
4316     (1705, 'ills3', 'a',        oils_i18n_gettext('1659', 'Illustrations', 'ccvm', 'value'), FALSE),
4317     (1706, 'ills3', 'b',        oils_i18n_gettext('1660', 'Maps', 'ccvm', 'value'), FALSE),
4318     (1707, 'ills3', 'c',        oils_i18n_gettext('1661', 'Portraits', 'ccvm', 'value'), FALSE),
4319     (1708, 'ills3', 'd',        oils_i18n_gettext('1662', 'Charts', 'ccvm', 'value'), FALSE),
4320     (1709, 'ills3', 'e',        oils_i18n_gettext('1663', 'Plans', 'ccvm', 'value'), FALSE),
4321     (1710, 'ills3', 'f',        oils_i18n_gettext('1664', 'Plates', 'ccvm', 'value'), FALSE),
4322     (1711, 'ills3', 'g',        oils_i18n_gettext('1665', 'Music', 'ccvm', 'value'), FALSE),
4323     (1712, 'ills3', 'h',        oils_i18n_gettext('1666', 'Facsimiles', 'ccvm', 'value'), FALSE),
4324     (1713, 'ills3', 'i',        oils_i18n_gettext('1667', 'Coats of arms', 'ccvm', 'value'), FALSE),
4325     (1714, 'ills3', 'j',        oils_i18n_gettext('1668', 'Genealogical tables', 'ccvm', 'value'), FALSE),
4326     (1715, 'ills3', 'k',        oils_i18n_gettext('1669', 'Forms', 'ccvm', 'value'), FALSE),
4327     (1716, 'ills3', 'l',        oils_i18n_gettext('1670', 'Samples', 'ccvm', 'value'), FALSE),
4328     (1717, 'ills3', 'm',        oils_i18n_gettext('1671', 'Phonodisc, phonowire, etc.', 'ccvm', 'value'), FALSE),
4329     (1718, 'ills3', 'o',        oils_i18n_gettext('1672', 'Photographs', 'ccvm', 'value'), FALSE),
4330     (1719, 'ills3', 'p',        oils_i18n_gettext('1673', 'Illuminations', 'ccvm', 'value'), FALSE),
4331
4332     (1720, 'ills4', 'a',        oils_i18n_gettext('1659', 'Illustrations', 'ccvm', 'value'), FALSE),
4333     (1721, 'ills4', 'b',        oils_i18n_gettext('1660', 'Maps', 'ccvm', 'value'), FALSE),
4334     (1722, 'ills4', 'c',        oils_i18n_gettext('1661', 'Portraits', 'ccvm', 'value'), FALSE),
4335     (1723, 'ills4', 'd',        oils_i18n_gettext('1662', 'Charts', 'ccvm', 'value'), FALSE),
4336     (1724, 'ills4', 'e',        oils_i18n_gettext('1663', 'Plans', 'ccvm', 'value'), FALSE),
4337     (1725, 'ills4', 'f',        oils_i18n_gettext('1664', 'Plates', 'ccvm', 'value'), FALSE),
4338     (1726, 'ills4', 'g',        oils_i18n_gettext('1665', 'Music', 'ccvm', 'value'), FALSE),
4339     (1727, 'ills4', 'h',        oils_i18n_gettext('1666', 'Facsimiles', 'ccvm', 'value'), FALSE),
4340     (1728, 'ills4', 'i',        oils_i18n_gettext('1667', 'Coats of arms', 'ccvm', 'value'), FALSE),
4341     (1729, 'ills4', 'j',        oils_i18n_gettext('1668', 'Genealogical tables', 'ccvm', 'value'), FALSE),
4342     (1730, 'ills4', 'k',        oils_i18n_gettext('1669', 'Forms', 'ccvm', 'value'), FALSE),
4343     (1731, 'ills4', 'l',        oils_i18n_gettext('1670', 'Samples', 'ccvm', 'value'), FALSE),
4344     (1732, 'ills4', 'm',        oils_i18n_gettext('1671', 'Phonodisc, phonowire, etc.', 'ccvm', 'value'), FALSE),
4345     (1733, 'ills4', 'o',        oils_i18n_gettext('1672', 'Photographs', 'ccvm', 'value'), FALSE),
4346     (1734, 'ills4', 'p',        oils_i18n_gettext('1673', 'Illuminations', 'ccvm', 'value'), FALSE);
4347
4348
4349 -- Composite coded value maps, this way the "primary" fixed field can be used in advanced searches without a ton of ORs and extra work.
4350 -- Space is used as a filler for any position other than the first, so for something to actually have "No accompanying matter," for example, specifically accm1 must = ' '.
4351 -- Any other value has the same meaning in any position.
4352 INSERT INTO config.composite_attr_entry_definition (coded_value, definition) VALUES
4353     (1735, '{"_attr":"accm1","_val":" "}'),
4354     (713, '[{"_attr":"accm6","_val":"a"},{"_attr":"accm5","_val":"a"},{"_attr":"accm4","_val":"a"},{"_attr":"accm3","_val":"a"},{"_attr":"accm2","_val":"a"},{"_attr":"accm1","_val":"a"}]'),
4355     (714, '[{"_attr":"accm6","_val":"b"},{"_attr":"accm5","_val":"b"},{"_attr":"accm4","_val":"b"},{"_attr":"accm3","_val":"b"},{"_attr":"accm2","_val":"b"},{"_attr":"accm1","_val":"b"}]'),
4356     (715, '[{"_attr":"accm6","_val":"c"},{"_attr":"accm5","_val":"c"},{"_attr":"accm4","_val":"c"},{"_attr":"accm3","_val":"c"},{"_attr":"accm2","_val":"c"},{"_attr":"accm1","_val":"c"}]'),
4357     (716, '[{"_attr":"accm6","_val":"d"},{"_attr":"accm5","_val":"d"},{"_attr":"accm4","_val":"d"},{"_attr":"accm3","_val":"d"},{"_attr":"accm2","_val":"d"},{"_attr":"accm1","_val":"d"}]'),
4358     (717, '[{"_attr":"accm6","_val":"e"},{"_attr":"accm5","_val":"e"},{"_attr":"accm4","_val":"e"},{"_attr":"accm3","_val":"e"},{"_attr":"accm2","_val":"e"},{"_attr":"accm1","_val":"e"}]'),
4359     (718, '[{"_attr":"accm6","_val":"f"},{"_attr":"accm5","_val":"f"},{"_attr":"accm4","_val":"f"},{"_attr":"accm3","_val":"f"},{"_attr":"accm2","_val":"f"},{"_attr":"accm1","_val":"f"}]'),
4360     (719, '[{"_attr":"accm6","_val":"g"},{"_attr":"accm5","_val":"g"},{"_attr":"accm4","_val":"g"},{"_attr":"accm3","_val":"g"},{"_attr":"accm2","_val":"g"},{"_attr":"accm1","_val":"g"}]'),
4361     (720, '[{"_attr":"accm6","_val":"h"},{"_attr":"accm5","_val":"h"},{"_attr":"accm4","_val":"h"},{"_attr":"accm3","_val":"h"},{"_attr":"accm2","_val":"h"},{"_attr":"accm1","_val":"h"}]'),
4362     (721, '[{"_attr":"accm6","_val":"i"},{"_attr":"accm5","_val":"i"},{"_attr":"accm4","_val":"i"},{"_attr":"accm3","_val":"i"},{"_attr":"accm2","_val":"i"},{"_attr":"accm1","_val":"i"}]'),
4363     (722, '[{"_attr":"accm6","_val":"k"},{"_attr":"accm5","_val":"k"},{"_attr":"accm4","_val":"k"},{"_attr":"accm3","_val":"k"},{"_attr":"accm2","_val":"k"},{"_attr":"accm1","_val":"k"}]'),
4364     (723, '[{"_attr":"accm6","_val":"r"},{"_attr":"accm5","_val":"r"},{"_attr":"accm4","_val":"r"},{"_attr":"accm3","_val":"r"},{"_attr":"accm2","_val":"r"},{"_attr":"accm1","_val":"r"}]'),
4365     (724, '[{"_attr":"accm6","_val":"s"},{"_attr":"accm5","_val":"s"},{"_attr":"accm4","_val":"s"},{"_attr":"accm3","_val":"s"},{"_attr":"accm2","_val":"s"},{"_attr":"accm1","_val":"s"}]'),
4366     (725, '[{"_attr":"accm6","_val":"z"},{"_attr":"accm5","_val":"z"},{"_attr":"accm4","_val":"z"},{"_attr":"accm3","_val":"z"},{"_attr":"accm2","_val":"z"},{"_attr":"accm1","_val":"z"}]'),
4367
4368     (835, '{"_attr":"cont1","_val":" "}'),
4369     (836, '[{"_attr":"cont4","_val":"a"},{"_attr":"cont3","_val":"a"},{"_attr":"cont2","_val":"a"},{"_attr":"cont1","_val":"a"}]'),
4370     (837, '[{"_attr":"cont4","_val":"b"},{"_attr":"cont3","_val":"b"},{"_attr":"cont2","_val":"b"},{"_attr":"cont1","_val":"b"}]'),
4371     (838, '[{"_attr":"cont4","_val":"c"},{"_attr":"cont3","_val":"c"},{"_attr":"cont2","_val":"c"},{"_attr":"cont1","_val":"c"}]'),
4372     (839, '[{"_attr":"cont4","_val":"d"},{"_attr":"cont3","_val":"d"},{"_attr":"cont2","_val":"d"},{"_attr":"cont1","_val":"d"}]'),
4373     (840, '[{"_attr":"cont4","_val":"e"},{"_attr":"cont3","_val":"e"},{"_attr":"cont2","_val":"e"},{"_attr":"cont1","_val":"e"}]'),
4374     (841, '[{"_attr":"cont4","_val":"f"},{"_attr":"cont3","_val":"f"},{"_attr":"cont2","_val":"f"},{"_attr":"cont1","_val":"f"}]'),
4375     (842, '[{"_attr":"cont4","_val":"g"},{"_attr":"cont3","_val":"g"},{"_attr":"cont2","_val":"g"},{"_attr":"cont1","_val":"g"}]'),
4376     (843, '[{"_attr":"cont4","_val":"h"},{"_attr":"cont3","_val":"h"},{"_attr":"cont2","_val":"h"},{"_attr":"cont1","_val":"h"}]'),
4377     (844, '[{"_attr":"cont4","_val":"i"},{"_attr":"cont3","_val":"i"},{"_attr":"cont2","_val":"i"},{"_attr":"cont1","_val":"i"}]'),
4378     (845, '[{"_attr":"cont4","_val":"j"},{"_attr":"cont3","_val":"j"},{"_attr":"cont2","_val":"j"},{"_attr":"cont1","_val":"j"}]'),
4379     (846, '[{"_attr":"cont4","_val":"k"},{"_attr":"cont3","_val":"k"},{"_attr":"cont2","_val":"k"},{"_attr":"cont1","_val":"k"}]'),
4380     (847, '[{"_attr":"cont4","_val":"l"},{"_attr":"cont3","_val":"l"},{"_attr":"cont2","_val":"l"},{"_attr":"cont1","_val":"l"}]'),
4381     (848, '[{"_attr":"cont4","_val":"m"},{"_attr":"cont3","_val":"m"},{"_attr":"cont2","_val":"m"},{"_attr":"cont1","_val":"m"}]'),
4382     (849, '[{"_attr":"cont4","_val":"n"},{"_attr":"cont3","_val":"n"},{"_attr":"cont2","_val":"n"},{"_attr":"cont1","_val":"n"}]'),
4383     (850, '[{"_attr":"cont4","_val":"o"},{"_attr":"cont3","_val":"o"},{"_attr":"cont2","_val":"o"},{"_attr":"cont1","_val":"o"}]'),
4384     (851, '[{"_attr":"cont4","_val":"p"},{"_attr":"cont3","_val":"p"},{"_attr":"cont2","_val":"p"},{"_attr":"cont1","_val":"p"}]'),
4385     (852, '[{"_attr":"cont4","_val":"q"},{"_attr":"cont3","_val":"q"},{"_attr":"cont2","_val":"q"},{"_attr":"cont1","_val":"q"}]'),
4386     (853, '[{"_attr":"cont4","_val":"r"},{"_attr":"cont3","_val":"r"},{"_attr":"cont2","_val":"r"},{"_attr":"cont1","_val":"r"}]'),
4387     (854, '[{"_attr":"cont4","_val":"s"},{"_attr":"cont3","_val":"s"},{"_attr":"cont2","_val":"s"},{"_attr":"cont1","_val":"s"}]'),
4388     (855, '[{"_attr":"cont4","_val":"t"},{"_attr":"cont3","_val":"t"},{"_attr":"cont2","_val":"t"},{"_attr":"cont1","_val":"t"}]'),
4389     (856, '[{"_attr":"cont4","_val":"u"},{"_attr":"cont3","_val":"u"},{"_attr":"cont2","_val":"u"},{"_attr":"cont1","_val":"u"}]'),
4390     (857, '[{"_attr":"cont4","_val":"v"},{"_attr":"cont3","_val":"v"},{"_attr":"cont2","_val":"v"},{"_attr":"cont1","_val":"v"}]'),
4391     (858, '[{"_attr":"cont4","_val":"w"},{"_attr":"cont3","_val":"w"},{"_attr":"cont2","_val":"w"},{"_attr":"cont1","_val":"w"}]'),
4392     (859, '[{"_attr":"cont4","_val":"x"},{"_attr":"cont3","_val":"x"},{"_attr":"cont2","_val":"x"},{"_attr":"cont1","_val":"x"}]'),
4393     (860, '[{"_attr":"cont4","_val":"y"},{"_attr":"cont3","_val":"y"},{"_attr":"cont2","_val":"y"},{"_attr":"cont1","_val":"y"}]'),
4394     (861, '[{"_attr":"cont4","_val":"z"},{"_attr":"cont3","_val":"z"},{"_attr":"cont2","_val":"z"},{"_attr":"cont1","_val":"z"}]'),
4395     (862, '[{"_attr":"cont4","_val":"2"},{"_attr":"cont3","_val":"2"},{"_attr":"cont2","_val":"2"},{"_attr":"cont1","_val":"2"}]'),
4396     (863, '[{"_attr":"cont4","_val":"5"},{"_attr":"cont3","_val":"5"},{"_attr":"cont2","_val":"5"},{"_attr":"cont1","_val":"5"}]'),
4397     (864, '[{"_attr":"cont4","_val":"6"},{"_attr":"cont3","_val":"6"},{"_attr":"cont2","_val":"6"},{"_attr":"cont1","_val":"6"}]'),
4398
4399     (881, '{"_attr":"ltxt1","_val":" "}'),
4400     (882, '[{"_attr":"ltxt2","_val":"a"},{"_attr":"ltxt1","_val":"a"}]'),
4401     (883, '[{"_attr":"ltxt2","_val":"b"},{"_attr":"ltxt1","_val":"b"}]'),
4402     (884, '[{"_attr":"ltxt2","_val":"c"},{"_attr":"ltxt1","_val":"c"}]'),
4403     (885, '[{"_attr":"ltxt2","_val":"d"},{"_attr":"ltxt1","_val":"d"}]'),
4404     (886, '[{"_attr":"ltxt2","_val":"e"},{"_attr":"ltxt1","_val":"e"}]'),
4405     (887, '[{"_attr":"ltxt2","_val":"f"},{"_attr":"ltxt1","_val":"f"}]'),
4406     (888, '[{"_attr":"ltxt2","_val":"g"},{"_attr":"ltxt1","_val":"g"}]'),
4407     (889, '[{"_attr":"ltxt2","_val":"h"},{"_attr":"ltxt1","_val":"h"}]'),
4408     (890, '[{"_attr":"ltxt2","_val":"i"},{"_attr":"ltxt1","_val":"i"}]'),
4409     (891, '[{"_attr":"ltxt2","_val":"j"},{"_attr":"ltxt1","_val":"j"}]'),
4410     (892, '[{"_attr":"ltxt2","_val":"k"},{"_attr":"ltxt1","_val":"k"}]'),
4411     (893, '[{"_attr":"ltxt2","_val":"l"},{"_attr":"ltxt1","_val":"l"}]'),
4412     (894, '[{"_attr":"ltxt2","_val":"m"},{"_attr":"ltxt1","_val":"m"}]'),
4413     (895, '[{"_attr":"ltxt2","_val":"n"},{"_attr":"ltxt1","_val":"n"}]'),
4414     (896, '[{"_attr":"ltxt2","_val":"o"},{"_attr":"ltxt1","_val":"o"}]'),
4415     (897, '[{"_attr":"ltxt2","_val":"p"},{"_attr":"ltxt1","_val":"p"}]'),
4416     (898, '[{"_attr":"ltxt2","_val":"r"},{"_attr":"ltxt1","_val":"r"}]'),
4417     (899, '[{"_attr":"ltxt2","_val":"s"},{"_attr":"ltxt1","_val":"s"}]'),
4418     (900, '[{"_attr":"ltxt2","_val":"t"},{"_attr":"ltxt1","_val":"t"}]'),
4419     (901, '[{"_attr":"ltxt2","_val":"z"},{"_attr":"ltxt1","_val":"z"}]'),
4420
4421     (965, '{"_attr":"relf1","_val":" "}'),
4422     (966, '[{"_attr":"relf4","_val":"a"},{"_attr":"relf3","_val":"a"},{"_attr":"relf2","_val":"a"},{"_attr":"relf1","_val":"a"}]'),
4423     (967, '[{"_attr":"relf4","_val":"b"},{"_attr":"relf3","_val":"b"},{"_attr":"relf2","_val":"b"},{"_attr":"relf1","_val":"b"}]'),
4424     (968, '[{"_attr":"relf4","_val":"c"},{"_attr":"relf3","_val":"c"},{"_attr":"relf2","_val":"c"},{"_attr":"relf1","_val":"c"}]'),
4425     (969, '[{"_attr":"relf4","_val":"d"},{"_attr":"relf3","_val":"d"},{"_attr":"relf2","_val":"d"},{"_attr":"relf1","_val":"d"}]'),
4426     (970, '[{"_attr":"relf4","_val":"e"},{"_attr":"relf3","_val":"e"},{"_attr":"relf2","_val":"e"},{"_attr":"relf1","_val":"e"}]'),
4427     (971, '[{"_attr":"relf4","_val":"f"},{"_attr":"relf3","_val":"f"},{"_attr":"relf2","_val":"f"},{"_attr":"relf1","_val":"f"}]'),
4428     (972, '[{"_attr":"relf4","_val":"g"},{"_attr":"relf3","_val":"g"},{"_attr":"relf2","_val":"g"},{"_attr":"relf1","_val":"g"}]'),
4429     (973, '[{"_attr":"relf4","_val":"i"},{"_attr":"relf3","_val":"i"},{"_attr":"relf2","_val":"i"},{"_attr":"relf1","_val":"i"}]'),
4430     (974, '[{"_attr":"relf4","_val":"j"},{"_attr":"relf3","_val":"j"},{"_attr":"relf2","_val":"j"},{"_attr":"relf1","_val":"j"}]'),
4431     (975, '[{"_attr":"relf4","_val":"k"},{"_attr":"relf3","_val":"k"},{"_attr":"relf2","_val":"k"},{"_attr":"relf1","_val":"k"}]'),
4432     (976, '[{"_attr":"relf4","_val":"m"},{"_attr":"relf3","_val":"m"},{"_attr":"relf2","_val":"m"},{"_attr":"relf1","_val":"m"}]'),
4433     (977, '[{"_attr":"relf4","_val":"z"},{"_attr":"relf3","_val":"z"},{"_attr":"relf2","_val":"z"},{"_attr":"relf1","_val":"z"}]'),
4434
4435     (978, '{"_attr":"spfm1","_val":" "}'),
4436     (979, '[{"_attr":"spfm2","_val":"e"},{"_attr":"spfm1","_val":"e"}]'),
4437     (980, '[{"_attr":"spfm2","_val":"j"},{"_attr":"spfm1","_val":"j"}]'),
4438     (981, '[{"_attr":"spfm2","_val":"k"},{"_attr":"spfm1","_val":"k"}]'),
4439     (982, '[{"_attr":"spfm2","_val":"l"},{"_attr":"spfm1","_val":"l"}]'),
4440     (983, '[{"_attr":"spfm2","_val":"n"},{"_attr":"spfm1","_val":"n"}]'),
4441     (984, '[{"_attr":"spfm2","_val":"o"},{"_attr":"spfm1","_val":"o"}]'),
4442     (985, '[{"_attr":"spfm2","_val":"p"},{"_attr":"spfm1","_val":"p"}]'),
4443     (986, '[{"_attr":"spfm2","_val":"r"},{"_attr":"spfm1","_val":"r"}]'),
4444     (987, '[{"_attr":"spfm2","_val":"z"},{"_attr":"spfm1","_val":"z"}]'),
4445
4446     (1658, '{"_attr":"ills1","_val":" "}'),
4447     (1659, '[{"_attr":"ills4","_val":"a"},{"_attr":"ills3","_val":"a"},{"_attr":"ills2","_val":"a"},{"_attr":"ills1","_val":"a"}]'),
4448     (1660, '[{"_attr":"ills4","_val":"b"},{"_attr":"ills3","_val":"b"},{"_attr":"ills2","_val":"b"},{"_attr":"ills1","_val":"b"}]'),
4449     (1661, '[{"_attr":"ills4","_val":"c"},{"_attr":"ills3","_val":"c"},{"_attr":"ills2","_val":"c"},{"_attr":"ills1","_val":"c"}]'),
4450     (1662, '[{"_attr":"ills4","_val":"d"},{"_attr":"ills3","_val":"d"},{"_attr":"ills2","_val":"d"},{"_attr":"ills1","_val":"d"}]'),
4451     (1663, '[{"_attr":"ills4","_val":"e"},{"_attr":"ills3","_val":"e"},{"_attr":"ills2","_val":"e"},{"_attr":"ills1","_val":"e"}]'),
4452     (1664, '[{"_attr":"ills4","_val":"f"},{"_attr":"ills3","_val":"f"},{"_attr":"ills2","_val":"f"},{"_attr":"ills1","_val":"f"}]'),
4453     (1665, '[{"_attr":"ills4","_val":"g"},{"_attr":"ills3","_val":"g"},{"_attr":"ills2","_val":"g"},{"_attr":"ills1","_val":"g"}]'),
4454     (1666, '[{"_attr":"ills4","_val":"h"},{"_attr":"ills3","_val":"h"},{"_attr":"ills2","_val":"h"},{"_attr":"ills1","_val":"h"}]'),
4455     (1667, '[{"_attr":"ills4","_val":"i"},{"_attr":"ills3","_val":"i"},{"_attr":"ills2","_val":"i"},{"_attr":"ills1","_val":"i"}]'),
4456     (1668, '[{"_attr":"ills4","_val":"j"},{"_attr":"ills3","_val":"j"},{"_attr":"ills2","_val":"j"},{"_attr":"ills1","_val":"j"}]'),
4457     (1669, '[{"_attr":"ills4","_val":"k"},{"_attr":"ills3","_val":"k"},{"_attr":"ills2","_val":"k"},{"_attr":"ills1","_val":"k"}]'),
4458     (1670, '[{"_attr":"ills4","_val":"l"},{"_attr":"ills3","_val":"l"},{"_attr":"ills2","_val":"l"},{"_attr":"ills1","_val":"l"}]'),
4459     (1671, '[{"_attr":"ills4","_val":"m"},{"_attr":"ills3","_val":"m"},{"_attr":"ills2","_val":"m"},{"_attr":"ills1","_val":"m"}]'),
4460     (1672, '[{"_attr":"ills4","_val":"o"},{"_attr":"ills3","_val":"o"},{"_attr":"ills2","_val":"o"},{"_attr":"ills1","_val":"o"}]'),
4461     (1673, '[{"_attr":"ills4","_val":"p"},{"_attr":"ills3","_val":"p"},{"_attr":"ills2","_val":"p"},{"_attr":"ills1","_val":"p"}]');
4462
4463 SELECT evergreen.upgrade_deps_block_check('0968', :eg_version); -- jstompro/gmcharlt
4464
4465 --create hook for actor.usr.create_date
4466 INSERT INTO action_trigger.hook (key, core_type, description, passive)
4467     VALUES ('au.created', 'au', 'A user was created', 't');
4468
4469 --SQL to create event definition for new account creation notice
4470 --Inactive, owned by top of org tree by default.  Modify to suit needs.
4471
4472 INSERT INTO action_trigger.event_definition (
4473     active, owner, name, hook,
4474     validator, reactor, delay, delay_field,
4475     max_delay, template
4476 )  VALUES (
4477     'f', '1', 'New User Created Welcome Notice', 'au.created',
4478     'NOOP_True', 'SendEmail', '10 seconds', 'create_date',
4479     '1 day',
4480 $$
4481 [%- USE date -%]
4482 [%- user = target -%]
4483 [%- lib = target.home_ou -%]
4484 To: [%- params.recipient_email || user.email %]
4485 From: [%- helpers.get_org_setting(target.home_ou.id, 'org.bounced_emails') || lib.email || params.sender_email || default_sender %]
4486 Reply-To: [%- helpers.get_org_setting(target.home_ou.id, 'org.bounced_emails') || lib.email || params.sender_email || default_sender %]
4487 Subject: New Library Account Sign-up - Welcome!
4488 Auto-Submitted: auto-generated
4489
4490 Dear [% user.first_given_name %] [% user.family_name %],
4491
4492 Thank you for signing up for an account with the [% lib.name %] on [% user.create_date.substr(0, 10) %].
4493
4494 This email is your confirmation that your account is set up and ready as well as testing to see that we have your correct email address.
4495
4496 If you did not sign up for an account at the library and have received this email in error, please reply and let us know.
4497
4498 You can access your account online at http://catalog/eg/opac/login. From that site you can search the catalog, request materials, renew materials, leave comments, leave suggestions for titles you would like the library to purchase and update your account information.
4499
4500 Sincerely,
4501 [% lib.name %]
4502
4503 Contact your library for more information:
4504
4505 [% lib.name %]
4506 [%- SET addr = lib.mailing_address -%]
4507 [%- IF !addr -%] [%- SET addr = lib.billing_address -%] [%- END %]
4508 [% addr.street1 %] [% addr.street2 %]
4509 [% addr.city %], [% addr.state %]
4510 [% addr.post_code %]
4511 [% lib.phone %]
4512 [% lib.email %]
4513
4514 $$);
4515
4516 --insert environment values
4517 INSERT INTO action_trigger.environment (event_def, path) VALUES
4518     (CURRVAL('action_trigger.event_definition_id_seq'), 'home_ou.mailing_address'),
4519     (CURRVAL('action_trigger.event_definition_id_seq'), 'home_ou.billing_address');
4520
4521 SELECT evergreen.upgrade_deps_block_check('0969', :eg_version); -- jeffdavis/stompro
4522
4523 INSERT INTO config.org_unit_setting_type
4524     (name, grp, label, description, datatype)
4525     VALUES
4526         ('org.restrict_opt_to_depth',
4527          'sec',
4528          oils_i18n_gettext('org.restrict_opt_to_depth',
4529             'Restrict patron opt-in to home library and related orgs at specified depth',
4530             'coust', 'label'),
4531          oils_i18n_gettext('org.restrict_opt_to_depth',
4532             'Patrons at this library can only be opted-in at org units which are within the '||
4533             'library''s section of the org tree, at or below the depth specified by this setting. '||
4534             'They cannot be opted in at any other libraries.',
4535             'coust', 'description'),
4536         'integer');
4537
4538 SELECT evergreen.upgrade_deps_block_check('0970', :eg_version); -- Dyrcona/gmcharlt
4539
4540 CREATE OR REPLACE FUNCTION search.facets_for_record_set(ignore_facet_classes TEXT[], hits BIGINT[]) RETURNS TABLE (id INT, value TEXT, count BIGINT) AS $$
4541     SELECT id, value, count FROM (
4542         SELECT mfae.field AS id,
4543                mfae.value,
4544                COUNT(DISTINCT mmrsm.source),
4545                row_number() OVER (
4546                 PARTITION BY mfae.field ORDER BY COUNT(distinct mmrsm.source) DESC
4547                ) AS rownum
4548         FROM metabib.facet_entry mfae
4549         JOIN metabib.metarecord_source_map mmrsm ON (mfae.source = mmrsm.source)
4550         JOIN config.metabib_field cmf ON (cmf.id = mfae.field)
4551         WHERE mmrsm.source IN (SELECT * FROM unnest($2))
4552         AND cmf.facet_field
4553         AND cmf.field_class NOT IN (SELECT * FROM unnest($1))
4554         GROUP by 1, 2
4555     ) all_facets
4556     WHERE rownum <= (SELECT COALESCE((SELECT value::INT FROM config.global_flag WHERE name = 'search.max_facets_per_field' AND enabled), 1000));
4557 $$ LANGUAGE SQL;
4558
4559 CREATE OR REPLACE FUNCTION search.facets_for_metarecord_set(ignore_facet_classes TEXT[], hits BIGINT[]) RETURNS TABLE (id INT, value TEXT, count BIGINT) AS $$
4560     SELECT id, value, count FROM (
4561         SELECT mfae.field AS id,
4562                mfae.value,
4563                COUNT(DISTINCT mmrsm.metarecord),
4564                row_number() OVER (
4565                 PARTITION BY mfae.field ORDER BY COUNT(distinct mmrsm.metarecord) DESC
4566                ) AS rownum
4567         FROM metabib.facet_entry mfae
4568         JOIN metabib.metarecord_source_map mmrsm ON (mfae.source = mmrsm.source)
4569         JOIN config.metabib_field cmf ON (cmf.id = mfae.field)
4570         WHERE mmrsm.metarecord IN (SELECT * FROM unnest($2))
4571         AND cmf.facet_field
4572         AND cmf.field_class NOT IN (SELECT * FROM unnest($1))
4573         GROUP by 1, 2
4574     ) all_facets
4575     WHERE rownum <= (SELECT COALESCE((SELECT value::INT FROM config.global_flag WHERE name = 'search.max_facets_per_field' AND enabled), 1000));
4576 $$ LANGUAGE SQL;
4577
4578 COMMIT;
4579
4580 -- The following updates/inserts are allowed to fail
4581
4582 INSERT INTO config.index_normalizer (name, description, func, param_count) VALUES (
4583         'Number or NULL Normalize',
4584         'Normalize the value to NULL if it is not a number',
4585         'integer_or_null',
4586         0
4587 );
4588
4589 INSERT INTO config.index_normalizer (name, description, func, param_count) VALUES (
4590         'Approximate Low Date Normalize',
4591         'Normalize the value to the nearest date-ish value, rounding down',
4592         'approximate_low_date',
4593         0
4594 );
4595
4596 INSERT INTO config.index_normalizer (name, description, func, param_count) VALUES (
4597         'Approximate High Date Normalize',
4598         'Normalize the value to the nearest date-ish value, rounding up',
4599         'approximate_high_date',
4600         0
4601 );
4602
4603 INSERT INTO config.record_attr_index_norm_map (attr,norm,pos)
4604     SELECT  m.name, i.id, 0
4605       FROM  config.record_attr_definition m,
4606             config.index_normalizer i
4607       WHERE i.func IN ('integer_or_null')
4608             AND m.name IN ('date2', 'pubdate');
4609
4610 INSERT INTO config.record_attr_index_norm_map (attr,norm,pos)
4611     SELECT  m.name, i.id, 0
4612       FROM  config.record_attr_definition m,
4613             config.index_normalizer i
4614       WHERE i.func IN ('approximate_low_date')
4615             AND m.name IN ('date1');
4616
4617 INSERT INTO config.record_attr_index_norm_map (attr,norm,pos)
4618     SELECT  m.name, i.id, 0
4619       FROM  config.record_attr_definition m,
4620             config.index_normalizer i
4621       WHERE i.func IN ('approximate_high_date')
4622             AND m.name IN ('date2');
4623
4624 -- Get rid of bad date1 sorter values so we can avoid a reingest
4625 DELETE FROM metabib.record_sorter WHERE attr = 'pubdate' AND value !~ '^\d+$';
4626
4627 -- and these are reingests that are allowed be interrupted
4628 \qecho
4629 \qecho To use the new identifier|genre index, it is necessary to do
4630 \qecho a partial reingest of records that have a 655 tag. You can
4631 \qecho cancel out of this if you wish and run this and the following
4632 \qecho attribute reingest later.
4633 \qecho
4634 SELECT metabib.reingest_metabib_field_entries(record, FALSE, TRUE, FALSE)
4635 FROM metabib.real_full_rec
4636 WHERE tag IN ('655')
4637 GROUP BY record;
4638
4639 \qecho
4640 \qecho This is a record attribute reingest of your bib records.
4641 \qecho It will take a while.
4642 \qecho You may cancel now without losing the effect of the rest of the
4643 \qecho upgrade script, and arrange the reingest later.
4644 SELECT COUNT(metabib.reingest_record_attributes(id))
4645     FROM biblio.record_entry WHERE deleted IS FALSE;