4 INSERT INTO config.upgrade_log (version) VALUES ('0212');
6 CREATE OR REPLACE FUNCTION public.ingest_acq_marc ( ) RETURNS TRIGGER AS $function$
15 FOR adef IN SELECT *,tableoid FROM acq.lineitem_attr_definition LOOP
17 SELECT relname::TEXT INTO atype FROM pg_class WHERE oid = adef.tableoid;
19 IF (atype NOT IN ('lineitem_usr_attr_definition','lineitem_local_attr_definition')) THEN
20 IF (atype = 'lineitem_provider_attr_definition') THEN
21 SELECT provider INTO prov FROM acq.lineitem_provider_attr_definition WHERE id = adef.id;
22 CONTINUE WHEN NEW.provider IS NULL OR prov <> NEW.provider;
25 IF (atype = 'lineitem_provider_attr_definition') THEN
26 SELECT xpath INTO xpath_string FROM acq.lineitem_provider_attr_definition WHERE id = adef.id;
27 ELSIF (atype = 'lineitem_marc_attr_definition') THEN
28 SELECT xpath INTO xpath_string FROM acq.lineitem_marc_attr_definition WHERE id = adef.id;
29 ELSIF (atype = 'lineitem_generated_attr_definition') THEN
30 SELECT xpath INTO xpath_string FROM acq.lineitem_generated_attr_definition WHERE id = adef.id;
33 xpath_string := REGEXP_REPLACE(xpath_string,$re$//?text\(\)$$re$,'');
38 SELECT extract_acq_marc_field(id, xpath_string || '[' || pos || ']', adef.remove) INTO value FROM acq.lineitem WHERE id = NEW.id;
40 IF (value IS NOT NULL AND value <> '') THEN
41 INSERT INTO acq.lineitem_attr (lineitem, definition, attr_type, attr_name, attr_value)
42 VALUES (NEW.id, adef.id, atype, adef.code, value);
56 $function$ LANGUAGE PLPGSQL;