-- Evergreen DB patch 0729.vr_format_value_maps.sql -- BEGIN; -- check whether patch can be applied SELECT evergreen.upgrade_deps_block_check('0729', :eg_version); CREATE OR REPLACE FUNCTION config.update_coded_value_map(in_ctype TEXT, in_code TEXT, in_value TEXT, in_description TEXT DEFAULT NULL, in_opac_visible BOOL DEFAULT NULL, in_search_label TEXT DEFAULT NULL, in_is_simple BOOL DEFAULT NULL, add_only BOOL DEFAULT FALSE) RETURNS VOID AS $f$ DECLARE current_row config.coded_value_map%ROWTYPE; BEGIN -- Look for a current value SELECT INTO current_row * FROM config.coded_value_map WHERE ctype = in_ctype AND code = in_code; -- If we have one.. IF FOUND AND NOT add_only THEN -- Update anything we were handed current_row.value := COALESCE(current_row.value, in_value); current_row.description := COALESCE(current_row.description, in_description); current_row.opac_visible := COALESCE(current_row.opac_visible, in_opac_visible); current_row.search_label := COALESCE(current_row.search_label, in_search_label); current_row.is_simple := COALESCE(current_row.is_simple, in_is_simple); UPDATE config.coded_value_map SET value = current_row.value, description = current_row.description, opac_visible = current_row.opac_visible, search_label = current_row.search_label, is_simple = current_row.is_simple WHERE id = current_row.id; ELSE INSERT INTO config.coded_value_map(ctype, code, value, description, opac_visible, search_label, is_simple) VALUES (in_ctype, in_code, in_value, in_description, COALESCE(in_opac_visible, TRUE), in_search_label, COALESCE(in_is_simple, FALSE)); END IF; END; $f$ LANGUAGE PLPGSQL; SELECT config.update_coded_value_map('vr_format', 'a', 'Beta', add_only := TRUE); SELECT config.update_coded_value_map('vr_format', 'b', 'VHS', add_only := TRUE); SELECT config.update_coded_value_map('vr_format', 'c', 'U-matic', add_only := TRUE); SELECT config.update_coded_value_map('vr_format', 'd', 'EIAJ', add_only := TRUE); SELECT config.update_coded_value_map('vr_format', 'e', 'Type C', add_only := TRUE); SELECT config.update_coded_value_map('vr_format', 'f', 'Quadruplex', add_only := TRUE); SELECT config.update_coded_value_map('vr_format', 'g', 'Laserdisc', add_only := TRUE); SELECT config.update_coded_value_map('vr_format', 'h', 'CED videodisc', add_only := TRUE); SELECT config.update_coded_value_map('vr_format', 'i', 'Betacam', add_only := TRUE); SELECT config.update_coded_value_map('vr_format', 'j', 'Betacam SP', add_only := TRUE); SELECT config.update_coded_value_map('vr_format', 'k', 'Super-VHS', add_only := TRUE); SELECT config.update_coded_value_map('vr_format', 'm', 'M-II', add_only := TRUE); SELECT config.update_coded_value_map('vr_format', 'o', 'D-2', add_only := TRUE); SELECT config.update_coded_value_map('vr_format', 'p', '8 mm.', add_only := TRUE); SELECT config.update_coded_value_map('vr_format', 'q', 'Hi-8 mm.', add_only := TRUE); SELECT config.update_coded_value_map('vr_format', 's', 'Blu-ray disc', add_only := TRUE); SELECT config.update_coded_value_map('vr_format', 'u', 'Unknown', add_only := TRUE); SELECT config.update_coded_value_map('vr_format', 'v', 'DVD', add_only := TRUE); SELECT config.update_coded_value_map('vr_format', 'z', 'Other', add_only := TRUE); SELECT config.update_coded_value_map('vr_format', ' ', 'Unspecified', add_only := TRUE); COMMIT;