$ if p1.nes."" then filename :== 'p1' $ if filename.eqs."" then inquire/global filename "File" $ assign/user sys$command sys$input $ edit/edt 'filename'/command=com:pli.edt