TSO/ISPF Logoff Macro

[iadithot]

From a single TSO Session I frequently have 6 or more ISPF instances running. Typing =X a dozen plus times when I am ready to signoff for the day is a bit tedious. So I attempted to write a macro that would exit from all ISPF instances, no matter how many I am running, and then logoff TSO. When I execute the macro and perform the ISPEXEC END command, my current ISPF instance ends, but so does my macro. If I have to run the macro for each instance of ISPF, I might as well keep entering the =X command. So I created a keyboard script to continue entering the =X, but if I am in a view session that has been modified this approach does not work either. So know I am back to the Rexx macro approach.

Does anyone have any idea's as to how I could write a macro to accomplish this task?

Thanks for any help.

Kirby Haley

 

[rexxhead]

Because of the way ISPF manipulates the command stack, I don't think you'll get away with this.

One possible method is to queue a "LOGOFF" command and then ABEND ISPF. If it works it will be messy and it's possible your LOG files will be damaged.

Frank Clarke
Tampa Area REXX Programmers' Alliance
REXX Language Assn Listmaster

 

[iadithot]

Thanks for the quick response. Guess I keep doing it the manual way. Our IT Manager would have my head if I intentionally caused ISPF to abend daily. If I damaged the log files as well, he would have me transferred to our office in the middle of the of nowhere.

 

[rexxhead]

Well, you wouldn't be damaging anyone's LOG files except yours (and most people discard theirs anyway), and an ISPF ABEND doesn't actually show on the console log, so no one would know except you.


Frank Clarke
Tampa Area REXX Programmers' Alliance
REXX Language Assn Listmaster