Hallo,
hab das so gemacht, bekomme aber Umwandlungsfehler, weil der Feldname des Key's angeblich nicht definiert ist:
Falpcpy90fmcf e workstn

Fsavebvrep if e k disk prefix(save)
Fzzbvrel0 uf e k disk prefix(ori)

dsavebvrepds e ds extname(savebvrep) prefix(save)
dzzbvrel0ds e ds extname(zzbvrel0) prefix(ori)