Command To Check Current Subsystem

[Joe Giusto <JGiusto@xxxxxxxxxxxx>]

Is there a CL command that I can use to determine the current subsystem that
a job is running in?

I want to use it to change subsystems via TFRJOB in the initial signon
program.  The problem I am having is when I do the TFRJOB my initial program
starts again and I go into a loop.  If I could check the current subsystem,
I can skip the TFRJOB statement on the second pass.  

I tried using *LDA but that seems to be reset as well.

Thank you,

Joe Giusto II
Patuxent Publishing Company
10750 Little Patuxent Parkway
Columbia, MD 21044
mailto:JGiusto@patuxent.com <mailto:jgiusto@patuxent.com> 
http://www.lifegoeson.com <http://lifegoeson.com> 

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---