Re: End of several eras

[Dave Jones]

There is still an optional source code feature for z/VM and its components.
DJ

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: GTTERM assistance

[Tony Harminc]

On Wed, 2 Nov 2022 at 04:44, Seymour J Metz  wrote:

Doesn't Communications Controller for Linux (CCL) still support SDLC and
> SNA on the pipe?
>

I don't follow this area closely, but my impression was that CCL was long
gone. Is it still available?


> In practical terms, I'm confident that most SNA traffic these days is
> TN3270.
>

Agreed.

Is anybody still using APPC?
>

There are apps out there, but surely nobody is developing or enhancing
them.

Tony H.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: GTTERM assistance

[Seymour J Metz]

It needs a section on native VTAM, although TSO full screen is more common.


From: IBM Mainframe Discussion List  on behalf of 
Brian Chapman 
Sent: Wednesday, November 2, 2022 9:23 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: GTTERM assistance

All,

Thank you for the feedback.

I've been following the excellent write up by Greg Price (3270 Extended
Data Stream (prycroft6.com.au)
)
 for understanding 3270
datasteams. This write up and Tommy Sprinkle's (3270 Data Stream
Programming (tommysprinkle.com)
)
 are a gold mine.

I was following his coding example for checking if the terminal accepts a
Query, but I mistakenly overlooked the fact that this is only for TSO. I
planned to add the GTTERM early in the process of establishing the VTAM
terminal to determine if Read Partition - Query is acceptable. For a VTAM
application, is it safe to assume that all connecting terminals accept Read
Partition - Query?

1. Check for a 3270 terminal:
 GTSIZE   Determine terminal screen dimensions
 LTR   R0,R0  3270 screen?
 BZLINEMODE   No, cannot do full screen 3270 I/O

2. Check if Read Partition (Query) is allowed:
 GTTERM PRMSZE=PRIMSIZE,ALTSZE=ALTSIZE,ATTRIB=TERMATTR
 LTR   R15,R15Did GTTERM work?
 BZNOQUERYNo, VTAM must be pre-ACF/VTAM
 TMTERMATTR+3,X'01'   Query allowed?
 BNO   NOQUERYNo
   ...
   ...
PRIMSIZE DCAL1(0,0)   Primary screen size
ALTSIZE  DCAL1(0,0)   Alternate screen size
TERMATTR DCF'0'   Terminal attributes

3. Activate VTAM full screen mode without input data stream editing:
 STFSMODE ON,NOEDIT=YES

4. Issue Read Partition (Query):
 LAR1,RESETAID
 LAR0,L'RESETAID
 ICM   R1,8,=X'0B'Load TPUT FULLSCR,WAIT,HOLD flags
 TPUT  (1),(0),R  Reset the Attention IDentifier
 TPG   QUERY,L'QUERY,NOEDIT,WAIT   Issue Query
   ...
   ...
RESETAID DCX'27F5C3'  Escape, Erase/Write, WCC for resetting AID and
MDTs
QUERYDCX'F3000501FF02'Read Partition structured field



Thank you,

Brian Chapman


On Wed, Nov 2, 2022 at 4:36 AM Seymour J Metz  wrote:

> Yes, GTTERM is TSO only. For a direct VTAM application, you need to send a
> Read Partition - Query and parse the query reply.
>
> AFAIK, GTTERM is one of the macros where you don't need to initialize the
> parameter list.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
> of Michael Stein [m...@zlvfc.com]
> Sent: Tuesday, November 1, 2022 7:27 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: GTTERM assistance
>
> > Any assistance would be greatly appreciated.
> >
> > I am working on a SNA interface for a batch framework. This is mostly
> just
> > a massive learning exercise that will likely never be utilized, but I
> have
> > learned SO much while working on this project (currently 6 years in the
> > making).
>
> I'm confused about what this is part of.  Is this a TSO program
> or something else (saying SNA? VTAM APPL?).
>
> I ask that because as far as I know GTTERM is TSO only.  But
> you got return code 0 so perhaps the GTTERM is being issued
> from TSO.
>
> > The address space accepts terminals with MOD2 terminals and everything
>
> "Terminals" plural.  A TSO session with more than one?
>
> > I check register 15 after the SVC, and it is zero. But the SVC parameter
> > values are still zero.
>
> When using MF=L and MF=E macro forms, usually it's necessary to copy
> an MF=L list into the DSECT area before using the MF=E form...
>
> This is not true for all macros, but perhaps for GTTERM.
>
> So somewhere in the source 

Re: GTTERM assistance

[Michael Stein]

On Wed, Nov 02, 2022 at 09:23:59AM -0400, Brian Chapman wrote:
> I was following his coding example for checking if the terminal accepts a
> Query, but I mistakenly overlooked the fact that this is only for TSO. I
> planned to add the GTTERM early in the process of establishing the VTAM
> terminal to determine if Read Partition - Query is acceptable. For a VTAM
> application, is it safe to assume that all connecting terminals accept Read
> Partition - Query?

In my mind, it's not "correct" to assume that all 3270s accept Read
Partition Query, however it might be that today (as opposed to the
decades ago when I was doing this).  On the other hand, there still
might be some TCP/IP connected 3270 simulator programs which don't
support Read Partition Query.

You haven't shown any VTAM code, but there should be some part of the
original VTAM session establishment which provides information on 
the other end of the VTAM session to be.  In addition to checking
that the LU (VTAM logical unit) connecting is some sort of 3270, there is
somewhere a bit which says if it supports Read Partition Query.

This information about the device at a minimum includes the primary
and secondary screen sizes, as well as a bit about Read Partition Query
support.

You've seen the following sections?:

https://www.ibm.com/docs/en/zos/2.4.0?topic=programming-establishing-terminating-sessions-logical-units

https://www.ibm.com/docs/en/zos/2.4.0?topic=units-establishing-parameters-sessions

This might also help:

https://www.ibm.com/docs/en/zos/2.1.0?topic=programming-3270-information-display-system

https://www.ibm.com/docs/en/zos/2.1.0?topic=terminals-session-parameter
. mentions query support

So you need to keep in mind that there are different protocol levels
in your communications:

 a. VTAM (accepting a connection fron a LU, setting or accepting
VTAM session parameters, sending/receiving data etc)

 b. device commands (not 3270 data stream).  For a local 3270 this
was the CCW opcode, for remote the codes were different:
write local x'01', remote x'F1'
VTAM uses the remote codes (and translates them to local if
the target is a local 3270).

 c. the 3270 data stream

I believe all the following are TSO macros..
>  GTSIZE   Determine terminal screen dimensions
>  GTTERM PRMSZE=PRIMSIZE,ALTSZE=ALTSIZE,ATTRIB=TERMATTR
>  STFSMODE ON,NOEDIT=YES

Once you are connected to the 3270, the Read Partition is just
"normal" (from VTAM's point of view) communication with the LU/device.

> 4. Issue Read Partition (Query):

But TPUT and TPG are TSO macros.

>  TPUT  (1),(0),R  Reset the Attention IDentifier
>  TPG   QUERY,L'QUERY,NOEDIT,WAIT   Issue Query

The escape indicates that the next byte is the device command (pseudo-CCW
opcode) so this is level (b) info while the following bytes are 3270 data
stream.  The F5 below after the 27 is the remote code for erase write.
VTAM will translate this if needed for local 3270s.

> RESETAID DCX'27F5C3'  Escape, Erase/Write, WCC for resetting AID and
> MDTs

Hum... perhaps the F3 is level (b) and the escape isn't needed?

> QUERYDCX'F3000501FF02'Read Partition structured field

PS: All the mention of TSO/VTAM has lost the idea that there was
at one time TSO/TCAM which also supported the TSO 3270 related
macro calls.  So those are really TSO macros and VTAM just happens
how the connection is made inside of TSO.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: GTTERM assistance

[Seymour J Metz]

There is a bit in the BIND image that tells you whether extended data streams 
are supported. You can also get the primary and alternate screen size there if 
those are the only data that you need. I pretty much always want to use 
extended highlighting, so BIND isn't enough for me.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Brian Chapman [bchapma...@gmail.com]
Sent: Wednesday, November 2, 2022 9:23 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: GTTERM assistance

All,

Thank you for the feedback.

I've been following the excellent write up by Greg Price (3270 Extended
Data Stream (prycroft6.com.au)
)
 for understanding 3270
datasteams. This write up and Tommy Sprinkle's (3270 Data Stream
Programming (tommysprinkle.com)
)
 are a gold mine.

I was following his coding example for checking if the terminal accepts a
Query, but I mistakenly overlooked the fact that this is only for TSO. I
planned to add the GTTERM early in the process of establishing the VTAM
terminal to determine if Read Partition - Query is acceptable. For a VTAM
application, is it safe to assume that all connecting terminals accept Read
Partition - Query?

1. Check for a 3270 terminal:
 GTSIZE   Determine terminal screen dimensions
 LTR   R0,R0  3270 screen?
 BZLINEMODE   No, cannot do full screen 3270 I/O

2. Check if Read Partition (Query) is allowed:
 GTTERM PRMSZE=PRIMSIZE,ALTSZE=ALTSIZE,ATTRIB=TERMATTR
 LTR   R15,R15Did GTTERM work?
 BZNOQUERYNo, VTAM must be pre-ACF/VTAM
 TMTERMATTR+3,X'01'   Query allowed?
 BNO   NOQUERYNo
   ...
   ...
PRIMSIZE DCAL1(0,0)   Primary screen size
ALTSIZE  DCAL1(0,0)   Alternate screen size
TERMATTR DCF'0'   Terminal attributes

3. Activate VTAM full screen mode without input data stream editing:
 STFSMODE ON,NOEDIT=YES

4. Issue Read Partition (Query):
 LAR1,RESETAID
 LAR0,L'RESETAID
 ICM   R1,8,=X'0B'Load TPUT FULLSCR,WAIT,HOLD flags
 TPUT  (1),(0),R  Reset the Attention IDentifier
 TPG   QUERY,L'QUERY,NOEDIT,WAIT   Issue Query
   ...
   ...
RESETAID DCX'27F5C3'  Escape, Erase/Write, WCC for resetting AID and
MDTs
QUERYDCX'F3000501FF02'Read Partition structured field



Thank you,

Brian Chapman


On Wed, Nov 2, 2022 at 4:36 AM Seymour J Metz  wrote:

> Yes, GTTERM is TSO only. For a direct VTAM application, you need to send a
> Read Partition - Query and parse the query reply.
>
> AFAIK, GTTERM is one of the macros where you don't need to initialize the
> parameter list.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
> of Michael Stein [m...@zlvfc.com]
> Sent: Tuesday, November 1, 2022 7:27 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: GTTERM assistance
>
> > Any assistance would be greatly appreciated.
> >
> > I am working on a SNA interface for a batch framework. This is mostly
> just
> > a massive learning exercise that will likely never be utilized, but I
> have
> > learned SO much while working on this project (currently 6 years in the
> > making).
>
> I'm confused about what this is part of.  Is this a TSO program
> or something else (saying SNA? VTAM APPL?).
>
> I ask that because as far as I know GTTERM is TSO only.  But
> you got return code 0 so perhaps the GTTERM is being issued
> from TSO.
>
> > The address space accepts terminals with MOD2 terminals and everything
>
> "Terminals" plural.  A TSO session with more than one?
>
> > I check 

Re: GTTERM assistance

[Brian Chapman]

Michael,

I really appreciate the critiques. I agree that some of my comments are
misleading and need to be updated. I like the suggestion for MVCL.

I was not aware of the potential hazards with register 2. Using register 2
as a save register when acquiring a DSA is very common in all of my code.
I'll be more judicious with my usage of this register.

For the register equates, I've found myself reassigning register usages
often and having equates like "SESSREG  EQU   R5" have made that really
easy in the past. If I find that register 6 aligns more easily with a
particular instruction (MVCL for example), then updating the equate for
SESSREG is much easier than performing CHANGE ALL commands and
inadvertently changing a field name, literal, or some other string.



Thank you,

Brian Chapman


On Tue, Nov 1, 2022 at 7:28 PM Michael Stein  wrote:

> > Any assistance would be greatly appreciated.
> >
> > I am working on a SNA interface for a batch framework. This is mostly
> just
> > a massive learning exercise that will likely never be utilized, but I
> have
> > learned SO much while working on this project (currently 6 years in the
> > making).
>
> I'm confused about what this is part of.  Is this a TSO program
> or something else (saying SNA? VTAM APPL?).
>
> I ask that because as far as I know GTTERM is TSO only.  But
> you got return code 0 so perhaps the GTTERM is being issued
> from TSO.
>
> > The address space accepts terminals with MOD2 terminals and everything
>
> "Terminals" plural.  A TSO session with more than one?
>
> > I check register 15 after the SVC, and it is zero. But the SVC parameter
> > values are still zero.
>
> When using MF=L and MF=E macro forms, usually it's necessary to copy
> an MF=L list into the DSECT area before using the MF=E form...
>
> This is not true for all macros, but perhaps for GTTERM.
>
> So somewhere in the source should be a GTTERM MF=L and then it should
> be copied (MVC) into GTTLIST in the DSECT before issuing the GTTERM
> MF=(E,GTTLIST).  I'd suggest looking at the full expansion of the GTTERM
> (both MF=L and MF=E) to see if this is needed.
>
> Other points:
>
> > WORKREG  EQU   R3
> > SESSREG  EQU   R5
>
> I've only used 16 registers R0->R15.  You can do what you want but I'd
> be very careful that additional register equates didn't result in some
> duplicate register usage.  I saw some IBM source which had:
>
>   R15   EQU  R9
>
> I'd prefer better comments, or when trivial, no comment.   As an
> example:
>
> >  LRR2,R1   SAVE REGISTER 2
>
> This appears backwards, saving R1 in R2.   Also R2 is a problematic
> register as some hardware instructions alter it without it being specified
> (TRT translate and test at least).  I'd be careful when I used it and
> treat it as a bit less temporary than R0, R1, R14, R15.
>
> More comments on comments (& register usage):
>
> >  LRR6,WORKREG  LOAD REGISTER
> >  LAR8,0SET DUMMY FROM ADDRESS
> >  XRR9,R9   SET PADDING TO LOW VALUES
> >  MVCL  R6,R8   INITIALIZE AREA
>
> I'd suggest something like:
>
>LRR6,WORKREG  @ workarea to clear, len in R7
>SRR15,R15
>MVCL  R6,R14
>
> The contents of R14 don't matter for the MVCL as the length in R15 is zero.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: GTTERM assistance

[Brian Chapman]

All,

Thank you for the feedback.

I've been following the excellent write up by Greg Price (3270 Extended
Data Stream (prycroft6.com.au)
) for understanding 3270
datasteams. This write up and Tommy Sprinkle's (3270 Data Stream
Programming (tommysprinkle.com)
) are a gold mine.

I was following his coding example for checking if the terminal accepts a
Query, but I mistakenly overlooked the fact that this is only for TSO. I
planned to add the GTTERM early in the process of establishing the VTAM
terminal to determine if Read Partition - Query is acceptable. For a VTAM
application, is it safe to assume that all connecting terminals accept Read
Partition - Query?

1. Check for a 3270 terminal:
 GTSIZE   Determine terminal screen dimensions
 LTR   R0,R0  3270 screen?
 BZLINEMODE   No, cannot do full screen 3270 I/O

2. Check if Read Partition (Query) is allowed:
 GTTERM PRMSZE=PRIMSIZE,ALTSZE=ALTSIZE,ATTRIB=TERMATTR
 LTR   R15,R15Did GTTERM work?
 BZNOQUERYNo, VTAM must be pre-ACF/VTAM
 TMTERMATTR+3,X'01'   Query allowed?
 BNO   NOQUERYNo
   ...
   ...
PRIMSIZE DCAL1(0,0)   Primary screen size
ALTSIZE  DCAL1(0,0)   Alternate screen size
TERMATTR DCF'0'   Terminal attributes

3. Activate VTAM full screen mode without input data stream editing:
 STFSMODE ON,NOEDIT=YES

4. Issue Read Partition (Query):
 LAR1,RESETAID
 LAR0,L'RESETAID
 ICM   R1,8,=X'0B'Load TPUT FULLSCR,WAIT,HOLD flags
 TPUT  (1),(0),R  Reset the Attention IDentifier
 TPG   QUERY,L'QUERY,NOEDIT,WAIT   Issue Query
   ...
   ...
RESETAID DCX'27F5C3'  Escape, Erase/Write, WCC for resetting AID and
MDTs
QUERYDCX'F3000501FF02'Read Partition structured field



Thank you,

Brian Chapman


On Wed, Nov 2, 2022 at 4:36 AM Seymour J Metz  wrote:

> Yes, GTTERM is TSO only. For a direct VTAM application, you need to send a
> Read Partition - Query and parse the query reply.
>
> AFAIK, GTTERM is one of the macros where you don't need to initialize the
> parameter list.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
> of Michael Stein [m...@zlvfc.com]
> Sent: Tuesday, November 1, 2022 7:27 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: GTTERM assistance
>
> > Any assistance would be greatly appreciated.
> >
> > I am working on a SNA interface for a batch framework. This is mostly
> just
> > a massive learning exercise that will likely never be utilized, but I
> have
> > learned SO much while working on this project (currently 6 years in the
> > making).
>
> I'm confused about what this is part of.  Is this a TSO program
> or something else (saying SNA? VTAM APPL?).
>
> I ask that because as far as I know GTTERM is TSO only.  But
> you got return code 0 so perhaps the GTTERM is being issued
> from TSO.
>
> > The address space accepts terminals with MOD2 terminals and everything
>
> "Terminals" plural.  A TSO session with more than one?
>
> > I check register 15 after the SVC, and it is zero. But the SVC parameter
> > values are still zero.
>
> When using MF=L and MF=E macro forms, usually it's necessary to copy
> an MF=L list into the DSECT area before using the MF=E form...
>
> This is not true for all macros, but perhaps for GTTERM.
>
> So somewhere in the source should be a GTTERM MF=L and then it should
> be copied (MVC) into GTTLIST in the DSECT before issuing the GTTERM
> MF=(E,GTTLIST).  I'd suggest looking at the full expansion of the GTTERM
> (both MF=L and MF=E) to see if this is needed.
>
> Other points:
>
> > WORKREG  EQU   R3
> > SESSREG  EQU   R5
>
> I've only used 16 registers R0->R15.  You can do what you want but I'd
> be very careful that additional register equates didn't result in some
> duplicate register usage.  I saw some IBM source which had:
>
>   R15   EQU  R9
>
> I'd prefer better comments, or when trivial, no comment.   As an
> example:
>
> >  LRR2,R1   SAVE REGISTER 2
>
> This appears backwards, saving R1 in R2.   Also R2 is a problematic
> register as some hardware instructions alter it without it being specified
> (TRT translate and test at least).  I'd be careful when I used it and
> treat it as a bit less temporary than R0, R1, R14, R15.
>
> More comments on comments (& register usage):
>
> >  LRR6,WORKREG  LOAD REGISTER
> >  LAR8,0SET DUMMY FROM ADDRESS
> >  XRR9,R9   SET PADDING TO LOW VALUES
> >  MVCL  R6,R8   INITIALIZE AREA
>
> I'd 

Re: SPF/SE is available for free

[Paul Gilmartin]

On Tue, 1 Nov 2022 14:23:13 -0500, Jay Maynard wrote:

>Hm. According to the README on the Github site, the source code was stored
>encrypted...are the encrypted files still in existence? Perhaps they can be
>obtained and decrypted. It's a long shot, to be sure, but definitely worth
>a try.
>
For cases like this, is there a process where by an author can name a 
beneficiary
for the Github account.

This might be akin to having a beneficiary of a safe deposit box (which might
contain the key on a flash drive.)

(Hmmm... Do cryptocurrency wallets provide for beneficiaries?)

-- 
gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: SYSTEM REXX use

[Seymour J Metz]

If I issue a MODIFY AXR with a CART, are messages from the REXX address space 
associated with that CART?


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Dana Mitchell [mitchd...@gmail.com]
Sent: Tuesday, November 1, 2022 3:55 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SYSTEM REXX use

F AXR,REXXTEST
AXR0500I AXREXX OUTPUT DISPLAY 889
EXECNAME=REXXTEST REQTOKEN=4000DC57E5671A5C6E10
Test Message




On Tue, 1 Nov 2022 18:15:59 +, Seymour J Metz  wrote:

>Where does the output of say go?

Thanks

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

SYSTEM REXX use

[Kenneth J. Kripke]

A thank you note to all that responded to my inquiry. 

Thank you for clarifying the use of SYSTEM REXX. 

 

Kenneth J. Kripke

 

k.kri...@comcast.net    

 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: GTTERM assistance

[Seymour J Metz]

Doesn't Communications Controller for Linux (CCL) still support SDLC and SNA on 
the pipe?

In practical terms, I'm confident that most SNA traffic these days is TN3270.

Is anybody still using APPC?


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Tony Harminc [t...@harminc.net]
Sent: Tuesday, November 1, 2022 10:56 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: GTTERM assistance

On Tue, 1 Nov 2022 at 17:16, Colin Paice  wrote:

> I think I read that IBM was going to drop SNA in a future release os z/OS ,
> if so would it be wise to continue down this path?
>

I can't imagine that IBM is going to "drop SNA" any time soon - too much
still depends on it, and it's hard to see the upside. They might as well
drop JCL or TSO. Anything that talks to a 3270 (except local non-SNA
channel-attached) is using SNA. What they could do is to write a purely TCP
version of TCAS, and slide it in the same way TSO/VTAM existed in parallel
with TSO TCAM 40-ish years ago. But this would still have a bunch of the
SNA attributes to it.

What has for all practical purposes already been dropped is "SNA on the
wire". There are no more Front End Processors (3705 and descendants) , and
I haven't seen an actual LAN Channel Station (LCS) or even an emulation of
one for many years. I think the newer (OSA) interfaces till support SNA,
but is anyone using them that way?

So how does SNA traffic get onto a network in the modern world? I think the
only practical answer is encapsulating it in IP traffic, and I think that
means Enterprise Extender and such.

In any case, there's nothing wrong with writing SNA programs for fun. The
OP said nothing about marketing it.

Tony H.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: GTTERM assistance

[Seymour J Metz]

Yes, GTTERM is TSO only. For a direct VTAM application, you need to send a Read 
Partition - Query and parse the query reply.

AFAIK, GTTERM is one of the macros where you don't need to initialize the 
parameter list.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Michael Stein [m...@zlvfc.com]
Sent: Tuesday, November 1, 2022 7:27 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: GTTERM assistance

> Any assistance would be greatly appreciated.
>
> I am working on a SNA interface for a batch framework. This is mostly just
> a massive learning exercise that will likely never be utilized, but I have
> learned SO much while working on this project (currently 6 years in the
> making).

I'm confused about what this is part of.  Is this a TSO program
or something else (saying SNA? VTAM APPL?).

I ask that because as far as I know GTTERM is TSO only.  But
you got return code 0 so perhaps the GTTERM is being issued
from TSO.

> The address space accepts terminals with MOD2 terminals and everything

"Terminals" plural.  A TSO session with more than one?

> I check register 15 after the SVC, and it is zero. But the SVC parameter
> values are still zero.

When using MF=L and MF=E macro forms, usually it's necessary to copy
an MF=L list into the DSECT area before using the MF=E form...

This is not true for all macros, but perhaps for GTTERM.

So somewhere in the source should be a GTTERM MF=L and then it should
be copied (MVC) into GTTLIST in the DSECT before issuing the GTTERM
MF=(E,GTTLIST).  I'd suggest looking at the full expansion of the GTTERM
(both MF=L and MF=E) to see if this is needed.

Other points:

> WORKREG  EQU   R3
> SESSREG  EQU   R5

I've only used 16 registers R0->R15.  You can do what you want but I'd
be very careful that additional register equates didn't result in some
duplicate register usage.  I saw some IBM source which had:

  R15   EQU  R9

I'd prefer better comments, or when trivial, no comment.   As an
example:

>  LRR2,R1   SAVE REGISTER 2

This appears backwards, saving R1 in R2.   Also R2 is a problematic
register as some hardware instructions alter it without it being specified
(TRT translate and test at least).  I'd be careful when I used it and
treat it as a bit less temporary than R0, R1, R14, R15.

More comments on comments (& register usage):

>  LRR6,WORKREG  LOAD REGISTER
>  LAR8,0SET DUMMY FROM ADDRESS
>  XRR9,R9   SET PADDING TO LOW VALUES
>  MVCL  R6,R8   INITIALIZE AREA

I'd suggest something like:

   LRR6,WORKREG  @ workarea to clear, len in R7
   SRR15,R15
   MVCL  R6,R14

The contents of R14 don't matter for the MVCL as the length in R15 is zero.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN