$!+ $! Define pop :== @pop $! $! then '$ pop' will exit the current subprocess. $! $! Note that tpid was gotten with an f$getjpi in login.com $! so this won't work if you take login.com in your subprocesses $!- $ our_pid := 'f$getjpi(0, "PID") $ if our_pid .nes. tpid then $logout $ write sys$output "You are not in a subprocess" $ exit