rule "Primo VE - Genre 655"
when
		MARC is "655"."a" AND
                MARC."655".ind"2" equals "7" AND
		(MARC."655"."2" match "lcgft" OR
		MARC."655"."2" match "gsafd" OR
		MARC."655"."2" match "gmgpc" OR
		MARC."655"."2" match "rbbin" OR
		MARC."655"."2" match "rbgenr" OR
		MARC."655"."2" match "rbmscv" OR
		MARC."655"."2" match "rbpap" OR
		MARC."655"."2" match "rbpri" OR
		MARC."655"."2" match "rbprov" OR
		MARC."655"."2" match "rbpub" OR
		MARC."655"."2" match "rbtyp")
then
		set TEMP"1" to MARC."655"."a"
                remove substring using regex (TEMP"1","\\.+$")
                create pnx."display"."genre" with TEMP"1"
end

rule "Primo VE - Genre 694"
	when
        MARC is "694"."a"
	then
        set TEMP"1" to MARC."694"."a"
                remove substring using regex (TEMP"1","\\.+$")
        create pnx."display"."genre" with TEMP"1"
end