>Is there a function that resembles Program() in that it can return currently running Program() as well as who called the current program, ect. I know you can watch the call stack, but I was curius.

you can write your own from PROGRAM() or SYS(16), by simply watching the return from (Program(n)) starting it arbitrarily high, and then watching the length of the return; PROG(n) for n > callstack depth returns an empty string.