$defdir = f$environment("DEFAULT")
$submit /noprint/notify psidir:rpsi1eht.com /param=('p1','defdir') -
   /que=psique/log='defdir'psi1eht.log