Wie Baldur sagte.

In diesem Fall würde ich ein CRTDUPOBJ machen
CRTDUPOBJ MyFile *libl *file *Fromlib MyFileSave
und im RPG dann das Format umbenennen.
dcl-f MyFileSave Usage( *Output ) Rename( Formatname : Formatname_neu );

Gruß
Ronald