Hi Folks,
Almost ever since I started using TSO, if I wanted to see who else
was logged on, I would use the USERS command. It was second nature.
At one point, maybe ten years ago, I started looking around for the
source code for USERS. And I couldn't find it. It wasn't on the CBT
Tape, or in any of my archives. So I disassembled the load module, and
kept the disassembled source around, just in case......
There was another good program which served the same purpose:
DUSER on CBT File 300. So I started using that program instead.
Recently, (like last night), I got around to looking at the
disassembled source and tried to get it to work properly. I was always
wondering why the main CSECT in USERS was not called USERS, but it was
called ACTIVE. Not only did I get it to work and assemble, but I
discovered that if you gave the load module an alias of ACTIVE, you'd
get a "Display Active" display, whereas if you ran the program as USERS,
you'd see the TSO users who were logged on. So my mind was relieved,
and even though the source code doesn't have labels, I fixed the ACTIVE
command to be AMODE 31 and to display the right stuff. You can now find
the result as members USERS and USERSACT on CBT File 300.
There are better programs. The DA command on File 300 (I think)
shows a better "Display Active" type display (and it can show the TSO
users with a parm of T). The DUSER command (also on File 300) shows a
fine TSO users display. But my old "buddy" the USERS command now has a
semblance of correct source code to support it. Gives me a "sense of
security" inside, and I'm going to start using it again.
So for those of you who have the same nostalgia, the USERS command
is now available in "assemblable source" on CBT File 300 on the Updates
page. Have fun...!!!
All the best of everything to all of you.
Sincerely, Sam
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
