AJ.SET.TERM.Dir
Return to the initial working catalogue of the program.
CALL AJ.SET.TERM.Dir()