Re: Where can a running TSO program get its terminal name

2015-06-04 Thread Gibney, David Allen,Jr
it there. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Shmuel Metz (Seymour J.) Sent: Thursday, June 04, 2015 9:43 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Where can a running TSO program get its terminal name

Re: Where can a running TSO program get its terminal name

2015-06-04 Thread Shmuel Metz (Seymour J.)
In 0de6a9840123e547b061ac5b6765c02617769...@exmb-05.ad.wsu.edu, on 06/02/2015 at 05:37 PM, Gibney, David Allen,Jr gib...@wsu.edu said: For some reason, which I can't make work Shmuel believes the In 000701d09bd1$1872a0e0$4957e2a0$@mcn.org, on 05/31/2015 He always includes is of value.

Re: Where can a running TSO program get its terminal name

2015-06-02 Thread Shmuel Metz (Seymour J.)
In 000701d09bd1$1872a0e0$4957e2a0$@mcn.org, on 05/31/2015 at 11:39 AM, Charles Mills charl...@mcn.org said: The master of the out-of-context quote. Not even close; the context was clearly IEABRCX. By all means use it blindly; it's not my dog. -- Shmuel (Seymour J.) Metz, SysProg and

Re: Where can a running TSO program get its terminal name

2015-06-02 Thread Gibney, David Allen,Jr
-MAIN@LISTSERV.UA.EDU] On Behalf Of Shmuel Metz (Seymour J.) Sent: Monday, June 01, 2015 4:57 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Where can a running TSO program get its terminal name In 000701d09bd1$1872a0e0$4957e2a0$@mcn.org, on 05/31/2015 at 11:39 AM, Charles Mills charl

Re: Where can a running TSO program get its terminal name

2015-05-31 Thread Shmuel Metz (Seymour J.)
In 03d701d09566$b22a3de0$167eb9a0$@mcn.org, on 05/23/2015 at 07:42 AM, Charles Mills charl...@mcn.org said: @Shmuel, MVS Assembler Services Guide says In what context and section? Is the reference to the AMODE24 flag in the load module or to the actual addressing mode? The AMODE24 pseudo-op

Re: Where can a running TSO program get its terminal name

2015-05-31 Thread Shmuel Metz (Seymour J.)
In 03fa01d09573$5a824990$0f86dcb0$@mcn.org, on 05/23/2015 at 09:13 AM, Charles Mills charl...@mcn.org said: Sorry to belabor this thread but for the sake of future Googlers felt I needed to say that a global IEABRCX DEFINE is probably a necessary part of this solution. Not if you use MF=.

Re: Where can a running TSO program get its terminal name

2015-05-31 Thread Charles Mills
The master of the out-of-context quote. Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Shmuel Metz (Seymour J.) Sent: Sunday, May 31, 2015 7:34 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Where can a running TSO program get

Re: Where can a running TSO program get its terminal name

2015-05-23 Thread Ed Jaffe
On 5/19/2015 5:56 AM, Charles Mills wrote: GTTERM is AMODE 24 only! IBM, really? We issue GTTERM all the time from programs that are AMODE(31) and RMODE(31). Only the 8-byte parameter must reside below 16MB. Put it next to your DCBs (if any) otherwise you'll need to acquire and free an

Re: Where can a running TSO program get its terminal name

2015-05-23 Thread Charles Mills
- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Ed Jaffe Sent: Saturday, May 23, 2015 3:37 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Where can a running TSO program get its terminal name On 5/19/2015 5:56 AM, Charles Mills wrote: GTTERM is AMODE 24 only! IBM

Re: Where can a running TSO program get its terminal name

2015-05-23 Thread Charles Mills
-MAIN@LISTSERV.UA.EDU Subject: Re: Where can a running TSO program get its terminal name Just using a relative branch alone doesn't work if the GTTERM being executed is above the line. You have to use MF=(E,address) for it to work in RMODE 31. I'm referring to running GTTERM directly from above

Re: Where can a running TSO program get its terminal name

2015-05-23 Thread Shmuel Metz (Seymour J.)
In 037f01d09233$366e4c90$a34ae5b0$@mcn.org, on 05/19/2015 at 05:56 AM, Charles Mills charl...@mcn.org said: GTTERM is AMODE 24 only! IBM, really? As long as it's not RMODE24, it's a reasonable retriction for a legacy macro. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO

Re: Where can a running TSO program get its terminal name

2015-05-23 Thread Bill Godfrey
(as IEABRCX does) or some cleverness with USING. Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Charles Mills Sent: Wednesday, May 20, 2015 5:14 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Where can a running TSO program get

Re: Where can a running TSO program get its terminal name

2015-05-23 Thread Bill Godfrey
can a running TSO program get its terminal name I doubt that a relative branch will help. Register 1 is expected to contain an address below the line. It works in RMODE 31, but only if MF=(E,address) is specified on GTTERM and the specified address is below the line. The macro expansion

Re: Where can a running TSO program get its terminal name

2015-05-23 Thread Charles Mills
program get its terminal name In 037f01d09233$366e4c90$a34ae5b0$@mcn.org, on 05/19/2015 at 05:56 AM, Charles Mills charl...@mcn.org said: GTTERM is AMODE 24 only! IBM, really? As long as it's not RMODE24, it's a reasonable retriction for a legacy macro

Re: Where can a running TSO program get its terminal name

2015-05-23 Thread Charles Mills
. No MF= anywhere in the picture. Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Bill Godfrey Sent: Saturday, May 23, 2015 9:46 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Where can a running TSO program get its terminal name

Re: Where can a running TSO program get its terminal name

2015-05-23 Thread Charles Mills
can a running TSO program get its terminal name Thanks all for your suggestions. In the hope of helping a future Googler, here is How to Use GTTERM from an AMODE 31 Program. I don't claim this method is novel or optimal, just that it works. BTW, I am using the GTTERM now primarily for the other

Re: Where can a running TSO program get its terminal name

2015-05-22 Thread Shmuel Metz (Seymour J.)
In 007f01d0935a$fdc4feb0$f94efc10$@mcn.org, on 05/20/2015 at 05:13 PM, Charles Mills charl...@mcn.org said: Thanks all for your suggestions. In the hope of helping a future Googler, here is How to Use GTTERM from an AMODE 31 Program. Why the complexity? As long a there's no RMODE24

Re: Where can a running TSO program get its terminal name

2015-05-22 Thread Charles Mills
Subject: Re: Where can a running TSO program get its terminal name In 007f01d0935a$fdc4feb0$f94efc10$@mcn.org, on 05/20/2015 at 05:13 PM, Charles Mills charl...@mcn.org said: Thanks all for your suggestions. In the hope of helping a future Googler, here is How to Use GTTERM from an AMODE 31

Re: Where can a running TSO program get its terminal name

2015-05-20 Thread Scott Ford
Of Bill Godfrey Sent: Tuesday, May 12, 2015 12:40 PM To: IBM-MAIN@LISTSERV.UA.EDU javascript:; Subject: Re: Where can a running TSO program get its terminal name Also the GTTERM macro. http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IKJ4B790/7.4 Bill

Re: Where can a running TSO program get its terminal name

2015-05-20 Thread Charles Mills
Thanks all for your suggestions. In the hope of helping a future Googler, here is How to Use GTTERM from an AMODE 31 Program. I don't claim this method is novel or optimal, just that it works. BTW, I am using the GTTERM now primarily for the other information it returns like the IP address. I

Re: Where can a running TSO program get its terminal name

2015-05-19 Thread Charles Mills
GTTERM is AMODE 24 only! IBM, really? Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Bill Godfrey Sent: Tuesday, May 12, 2015 12:40 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Where can a running TSO program get its

Re: Where can a running TSO program get its terminal name

2015-05-15 Thread Shmuel Metz (Seymour J.)
In 03a301d08cef$ad9c2bf0$08d483d0$@mcn.org, on 05/12/2015 at 01:10 PM, Charles Mills charl...@mcn.org said: I did not know that TSO was cognizant of any IP address. VTIOC picks the IP address out of an optional SNA CV. If you're using a session manager, verify that it is configured to support

Re: Where can a running TSO program get its terminal name

2015-05-15 Thread Shmuel Metz (Seymour J.)
In 036f01d08cd5$35873340$a09599c0$@mcn.org, on 05/12/2015 at 10:00 AM, Charles Mills charl...@mcn.org said: Subject line pretty much says it all. No. What is a terminal name these days? SMF30TSN or SMF30TID. They should match fields returned by GTTERM. -- Shmuel (Seymour J.) Metz,

Re: Where can a running TSO program get its terminal name

2015-05-12 Thread Tony Harminc
On 12 May 2015 at 13:00, Charles Mills charl...@mcn.org wrote: Subject line pretty much says it all. ASCBTSB-IKJTSB. Field TSBTRMID, and maybe others in TSBEXTNT-IKTTSBX. Both in fetch protected storage, iirc. Tony H. -- For

Where can a running TSO program get its terminal name

2015-05-12 Thread Charles Mills
Subject line pretty much says it all. Looking for data equivalent to SMF30TSN or SMF30TID. I'm willing to do control block chaining. I searched TSO data areas on Terminal but did not find anything promising. Thanks, Charles --

Re: Where can a running TSO program get its terminal name

2015-05-12 Thread Charles Mills
can a running TSO program get its terminal name Many years ago I had an MVS/ESA control block map from a course run by IMI. It got lost during a house move. -- For IBM-MAIN subscribe / signoff / archive access instructions, send

Re: Where can a running TSO program get its terminal name

2015-05-12 Thread Roger Suhr (gmail)
Of Charles Mills Sent: Tuesday, May 12, 2015 2:17 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Where can a running TSO program get its terminal name The z/OS MVS Data Areas manuals are available -- do you need more details? Charles -Original Message- From: IBM Mainframe Discussion List

Re: Where can a running TSO program get its terminal name

2015-05-12 Thread Charles Mills
TSO program get its terminal name Also the GTTERM macro. http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IKJ4B790/7.4 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists

Re: Where can a running TSO program get its terminal name

2015-05-12 Thread Bill Godfrey
-MAIN@LISTSERV.UA.EDU] On Behalf Of Leonardo Vaz Sent: Tuesday, May 12, 2015 11:23 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Where can a running TSO program get its terminal name This works for me: /* REXX */ ASCB = C2d(Storage(224,4)) ASXB

Re: Where can a running TSO program get its terminal name

2015-05-12 Thread Leonardo Vaz
] On Behalf Of Charles Mills Sent: Tuesday, May 12, 2015 2:17 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Where can a running TSO program get its terminal name The z/OS MVS Data Areas manuals are available -- do you need more details? Charles -Original Message- From: IBM Mainframe Discussion

Re: Where can a running TSO program get its terminal name

2015-05-12 Thread Gross, Randall [PRI-1PP]
@LISTSERV.UA.EDU Subject: Re: Where can a running TSO program get its terminal name In REXX, try: term_name = sysvar(SYSLTERM) Roger On 2015-05-12 2:22 PM, Leonardo Vaz wrote: This works for me: /* REXX */ ASCB = C2d(Storage(224,4)) ASXB = C2d(Storage(D2x(ASCB+108),4)) ACEE = C2d

Re: Where can a running TSO program get its terminal name

2015-05-12 Thread Roger Suhr (gmail)
of lines in the screen -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Roger Suhr (gmail) Sent: Tuesday, May 12, 2015 3:01 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Where can a running TSO program get its terminal name In REXX

Re: Where can a running TSO program get its terminal name

2015-05-12 Thread Rupert Reynolds
Many years ago I had an MVS/ESA control block map from a course run by IMI. It got lost during a house move. Does anyone know anything that could replace it, please? Even if it only goes as far as 24-bit MVS it would be a big help right now :-)

Re: Where can a running TSO program get its terminal name

2015-05-12 Thread Steve Coalbran
Hi Rupert In TSO REXX you can use a 'SYSVAR'... tid = SYSVAR(SYSTERMID) /Steve From: Rupert Reynolds rreyno...@cix.co.uk To: IBM-MAIN@LISTSERV.UA.EDU Date: 2015-05-12 19:59 Subject:Re: Where can a running TSO program get its terminal name Sent by:IBM Mainframe