>OK, thanks i got it with sys(16,2)
Be careful with this.
SYS(16,2) will always return the 2nd program in the callstack, which may not necessarily be the program that called the current program.
Also, I was wrong, so I may have misled you. Terribly sorry.
SYS(16,-1) returns the first program in the call stack.
Use SYS(16,PROGRAM(-1)-1) to get the calling program, regardless of the call stack position.
Insanity: Doing the same thing over and over and expecting different results.