rule "Primo VE - Lds52"
 when
 MARC.control is "001"
 then
  set TEMP"1" to MARC.control."001"
  return list using regex (TEMP"2",TEMP"1",".*2901")
  create pnx."display"."lds52" with list TEMP"2"
end