Re: Question on HLASM - B to a DROP statement!?!

[David Spiegel]

Hi R'Shmuel AMV"SH,
I realize that DS 0H forces alignment. I was wondering if EQU * 
does/does not.


כתיבה וחתימה טובה

Regards,
David


On 2024-10-02 11:33, Seymour J Metz wrote:

It is still true that DS 0H forces alignment.

--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
עַם יִשְׂרָאֵל חַי
נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר




From: IBM Mainframe Discussion List  on behalf of David 
Spiegel <0468385049d1-dmarc-requ...@listserv.ua.edu>
Sent: Wednesday, October 2, 2024 9:07 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Question on HLASM - B to a DROP statement!?!

Caution: This email did not originate from George Mason’s mail system. Do not 
click links or open attachments unless you recognize the sender and know the 
content is safe.


Hi Allan,
As a rule, "DS 0H" used to be safer than "EQU *" since the former forces
half-word alignment.
(I do not know if that is still true.)

Regards,
David


On 2024-10-02 08:38, Allan Staller wrote:

Classification: Confidential

Suggested code change to resolve..

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Steve Thompson
Sent: Tuesday, October 1, 2024 4:29 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Question on HLASM - B to a DROP statement!?!

Suggested code change to resolve:

   B  DROPR11

DROPR11 EQU  *
   DROP R11
   LA   R1,x  (or something similar)
--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
::DISCLAIMER::

The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only. E-mail transmission is not guaranteed to be 
secure or error-free as information could be intercepted, corrupted, lost, 
destroyed, arrive late or incomplete, or may contain viruses in transmission. 
The e mail and its contents (with or without referred errors) shall therefore 
not attach any liability on the originator or HCL or its affiliates. Views or 
opinions, if any, presented in this email are solely those of the author and 
may not necessarily reflect the views or opinions of HCL or its affiliates. Any 
form of reproduction, dissemination, copying, disclosure, modification, 
distribution and / or publication of this message without the prior written 
consent of authorized representative of HCL is strictly prohibited. If you have 
received this email in error please delete it and notify the sender 
immediately. Before opening any email and/or attachments, please check them for 
viruses and other defects.


--
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


--
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: Question on HLASM - B to a DROP statement!?!

[David Spiegel]

Hi Allan,
As a rule, "DS 0H" used to be safer than "EQU *" since the former forces 
half-word alignment.

(I do not know if that is still true.)

Regards,
David


On 2024-10-02 08:38, Allan Staller wrote:

Classification: Confidential

Suggested code change to resolve..

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Steve Thompson
Sent: Tuesday, October 1, 2024 4:29 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Question on HLASM - B to a DROP statement!?!

Suggested code change to resolve:

  B  DROPR11

DROPR11 EQU  *
  DROP R11
  LA   R1,x  (or something similar)
--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
::DISCLAIMER::

The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only. E-mail transmission is not guaranteed to be 
secure or error-free as information could be intercepted, corrupted, lost, 
destroyed, arrive late or incomplete, or may contain viruses in transmission. 
The e mail and its contents (with or without referred errors) shall therefore 
not attach any liability on the originator or HCL or its affiliates. Views or 
opinions, if any, presented in this email are solely those of the author and 
may not necessarily reflect the views or opinions of HCL or its affiliates. Any 
form of reproduction, dissemination, copying, disclosure, modification, 
distribution and / or publication of this message without the prior written 
consent of authorized representative of HCL is strictly prohibited. If you have 
received this email in error please delete it and notify the sender 
immediately. Before opening any email and/or attachments, please check them for 
viruses and other defects.


--
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: Israel

[David Spiegel]

"...Please do not use this board to act as a conduit to spread Israel 
propaganda. ..." What an asinine remark! ... Maybe I should've said 
bovine instead? Maybe you'd prefer Hezbollah/Hamas/PFLP/ propaganda? SMH

On 2024-10-02 08:37, esmie moo wrote:

  Please do NOT weaponise this technical board.  Please do not use this board 
to act as a conduit to spread Israel propaganda.
 On Tuesday, October 1, 2024 at 11:32:45 a.m. EDT, Steve 
Beaver<050e0c375a14-dmarc-requ...@listserv.ua.edu> wrote:
  
  For the guys in Israel - please stay safe




Sent from my iPhone

No one said I could type with one thumb

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


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email tolists...@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: Mainframe FTP status

[David Spiegel]

Hi Charles,
Where is this design change documented?

Thanks and regards,
David

On 2024-09-25 16:56, Charles Mills wrote:

That was true once upon a time but has not been true since about 1995. IND$FILE uses a 
3270 sub-protocol called "structured fields" and can transfer up to 32K of 
binary data in a block.

It's still single-task and half-duplex, and layered into TSO, all of which 
makes it a lot slower than FTP, but it is NOT 3270 screen oriented.

Charles

On Wed, 25 Sep 2024 15:30:50 -0400, David Spiegel  
wrote:


Hi Gil,
If IND$FILE replaces FTP, it would be slow beyond belief.
The way that IND$FILE works is that it reads a screenfull (24*80=1920
Bytes) at a time and deals with the this buffer.
I cannot imagine the time it would take to Upload/Download a large TRS
Dataset.

--
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: Mainframe FTP status

[David Spiegel]

Hi Gil,
If IND$FILE replaces FTP, it would be slow beyond belief.
The way that IND$FILE works is that it reads a screenfull (24*80=1920 
Bytes) at a time and deals with the this buffer.
I cannot imagine the time it would take to Upload/Download a large TRS 
Dataset.


Regards,
David


On 2024-09-25 15:04, Paul Gilmartin wrote:

On Wed, 25 Sep 2024 12:26:54 -0500, Charles Mills  wrote:


I find it vanishingly unlikely that FTP would go away or have its functionality 
significantly reduced.
.

Replace it with an enhanced IND$FILE?



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

Re: Ubiquitous ZOS Tape Utility?

[David Spiegel]

Hi Steve,
TAPESCAN (CBT 102) and TAPEMAP (CBT 299).

Regards,
David


On 2024-09-16 09:43, Steve Estle wrote:

Hello Community,

We are having some issues with our VTS tape migration (I'm sparing vendor to 
protect the innocent) that necessitates us going and manually reading some tape 
numbers in question.  I am looking for some ubiquitous tape utility that might 
be out there that can help validate the health of tapes?  Ditto comes to mind 
but appears this might have been sunset - not sure?   Any others that come to 
mind from folks (maybe CBT related)?

Any suggestions / advice is appreciated.

Thanks,
Steve Estle
sest...@gmail.com

--
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: Smp receive error due to space

[David Spiegel]

Hi Peter,
Which z/OS are you running?
z/OS V2.5 does not support HFS (only zFS).

Regards,
David


On 2024-08-27 11:36, Peter wrote:

Hello

These are things I did

1 ) allocated zfs mulitvolume with each mod 27 as NON SMS(so extended data
class as this more than 4g) - Failed

2 ) allocated hfs as mulitvolume and it failed again without spanning

On Tue, 27 Aug 2024, 19:16 Keith Gooding, <
034af3894af4-dmarc-requ...@listserv.ua.edu> wrote:


Hi Peter
Remember that if you are expecting the ZFS to be automatically expanded
into secondary extents after initial formatting you must mount it with the
AGGGROW attribute.

Keith




On 27 Aug 2024, at 15:36, David Spiegel <

0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:

Hi Peter,
Yes, because, the Data Class needs to have Extended attribute.

Regards,
David



On 2024-08-27 01:49, Peter wrote:
I tried with zfs primary 1 and secondary 1 but still it fails

with

no space.

The multivolume works only in SMS managed ?

On Mon, 26 Aug 2024, 09:19 Brian Westerman, <
06ba4ed225c9-dmarc-requ...@listserv.ua.edu> wrote:


Increasing the dataset you are increasing (SMPNTS) is only necessary if
you run out of space when downloading the service from IBM, your

problem is

decompressing the compressed files that you already downloaded, so you

only

need to increase the //SMPWKDIR (defaults to /TMP) space.  The one you

use

for "normal" operation is just too small for the service you are
installing, and that happens a lot, especially with very large service

like

Java updates.

I always allocate a new ZFS for service related temp space and don't

use

the "normal" /tmp space (which is typically a tfs and not a "real" zfs
dataset anyway.)

Just create a ZFS at about the size of your normal SMPNTS zfs dataset,
then create a new USS directory (use permissions of 777) called "TEMP"

and

mount the new zfs to that directory, then in your receive order or

Receive

from NTS job, add the following DD.

//SMPWKDIR DD  PATHDISP=KEEP,PATH='/TEMP'   (use the original /tmp

ONLY if

extracts are small enough)

Typically I allocate the /TEMP ZFS as 10,000 primary and 10,000

secondary

CYLS, and call it "OMVS.TEMP.ZFS" which should be big enough for just

about

anything.

When you are done, just unmount and delete the new ZFS "OMVS.TEMP.ZFS".

It doesn't really matter what name you call the ZFS, so long as you

tell

SMPE that the //SMPWKDIR is to be allocated to the /TEMP directory

that you

mounted it to.  Then the service job will use that new "temporary" zfs

that

you created for decompression, instead of the (probably much smaller)

/tmp

dataset.

It's difficult to tell ahead of time how much temp space will be

necessary

to decompress the PTFs, that's why I always make a new one.  There is

no

reason to keep it around when you are done with it, it will just take

up

space that you can use for other things.  You especially don't want

HSM to

back it up or archive it because that will just waste resources.

Brian

--
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

--
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


--
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: Smp receive error due to space

[David Spiegel]

Hi Peter,
Yes, because, the Data Class needs to have Extended attribute.

Regards,
David


On 2024-08-27 01:49, Peter wrote:

I tried with zfs primary 1 and secondary 1 but still it fails with
no space.

The multivolume works only in SMS managed ?

On Mon, 26 Aug 2024, 09:19 Brian Westerman, <
06ba4ed225c9-dmarc-requ...@listserv.ua.edu> wrote:


Increasing the dataset you are increasing (SMPNTS) is only necessary if
you run out of space when downloading the service from IBM, your problem is
decompressing the compressed files that you already downloaded, so you only
need to increase the //SMPWKDIR (defaults to /TMP) space.  The one you use
for "normal" operation is just too small for the service you are
installing, and that happens a lot, especially with very large service like
Java updates.

I always allocate a new ZFS for service related temp space and don't use
the "normal" /tmp space (which is typically a tfs and not a "real" zfs
dataset anyway.)

Just create a ZFS at about the size of your normal SMPNTS zfs dataset,
then create a new USS directory (use permissions of 777) called "TEMP" and
mount the new zfs to that directory, then in your receive order or Receive
from NTS job, add the following DD.

//SMPWKDIR DD  PATHDISP=KEEP,PATH='/TEMP'   (use the original /tmp ONLY if
extracts are small enough)

Typically I allocate the /TEMP ZFS as 10,000 primary and 10,000 secondary
CYLS, and call it "OMVS.TEMP.ZFS" which should be big enough for just about
anything.

When you are done, just unmount and delete the new ZFS "OMVS.TEMP.ZFS".

It doesn't really matter what name you call the ZFS, so long as you tell
SMPE that the //SMPWKDIR is to be allocated to the /TEMP directory that you
mounted it to.  Then the service job will use that new "temporary" zfs that
you created for decompression, instead of the (probably much smaller) /tmp
dataset.

It's difficult to tell ahead of time how much temp space will be necessary
to decompress the PTFs, that's why I always make a new one.  There is no
reason to keep it around when you are done with it, it will just take up
space that you can use for other things.  You especially don't want HSM to
back it up or archive it because that will just waste resources.

Brian

--
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


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

Re: 3270 programming

[David Spiegel]

Hi Lennie,
When I became a SysProg in 1982, I became more familiar with the IBM 
alphabet soup entries PP, FDP and IUP.
In today's world, not having PDF is laughable. Back then it was slightly 
possible if corporations wanted to save money (and could live with only 
TSO).

BTW, SDSF started life as an FDP. (I supported (IUP) ADRS-II.)
Believe it or not, PCF (actually, PCF-II) still exists as TSO Command 
Limiting in ACF2. Some of my employers use it, even though it is 
completely useless. (I opened a case with Broadcom on this topic. They 
reluctantly agreed with me.)


Regards,
David

On 2024-08-18 06:24, Lennie Bradshaw wrote:

David,
Yes, I remember that name change too. The original scripting language used for 
SPF panels was way simpler than the sophistication we have now. Of course ISPF 
then split into two products, ISPF and PDF. I always felt that was a little 
silly. I never came across anyone who only had one of the products.

FDP stands for Field Developed Program. I think it referred to products 
developed in the field for specific customers rather than developed in software 
labs. Other FDPs I have encountered include PCF which provided controls over 
who could execute which TSO commands. This was in the days before RACF of 
course. I think maybe JES328x was also originally an FDP. You can find a short 
discussion about FDPs in this Wikipedia article.
https://en.wikipedia.org/wiki/IBM_Type-III_Library

Lennie

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
David Spiegel
Sent: 18 August 2024 02:41
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: 3270 programming

HI Lennie,
The "P" in ISPF was changed to "Productivity" (from "Programming").
I was still in university and had no clue what "FDP" meant.

Regards,
David

On 2024-08-16 19:34, Lennie Bradshaw wrote:

David,
Yes, I remember that. Was it an FDP? I used it on MVS 3.8. Its full-screen 
editing capabilities were a wonder after using TSO EDIT!
But this was after I had already written the 3270 programs.
ISPF followed on after the success of SPF.
Lennie

-Original Message-
From: IBM Mainframe Discussion List  On
Behalf Of David Spiegel
Sent: 16 August 2024 17:34
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: 3270 programming

Hi Lennie,
"... (in the late 1970s) I wrote some program for TSO using 3270 protocols. This was 
in the days before ISPF ..."
I Used ISPF's predecessor in the late '70s. (It was called SPF -- Structured 
Programming Facility).

Regards,
David

On 2024-08-16 09:13, Lennie Bradshaw wrote:

Seymour,
That is interesting. I was unaware the protocol had been externalised from IBM. 
I guess this absolves them of the responsibility of providing documentation as 
well.

Phil asked what was the original posters requirement. Well years ago (in the late 1970s) 
I wrote some program for TSO using 3270 protocols. This was in the days before ISPF and 
before the extended attribute support was available. I have been involved in such 
programs rarely since then, but have maintained some knowledge of the protocol. I have 
somewhere a "Green Book" which has all the tables and so on, but I have mislaid 
it. I had to make some changes to a VTAM USS table recently and was looking for the 
specifications for the control strings I could use. As I couldn't find my Green Book, I 
looked online and could not see where IBM had this documented.
Hence my questions.

The website that Sebastian found was really useful.

Many thanks to all who contributed. I will try and butt out now.
Lennie

-Original Message-
From: IBM Mainframe Discussion List  On
Behalf Of Seymour J Metz
Sent: 16 August 2024 12:56
To:IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: 3270 programming

I would start with  RFC 2355, TN3270
Enhancements<https://datatracker.ietf.org/doc/rfc2355/>

--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
עַם יִשְׂרָאֵל חַי
נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר




From: IBM Mainframe Discussion List  on
behalf of Mike Schwab<05962a42dc49-dmarc-requ...@listserv.ua.edu>
Sent: Thursday, August 15, 2024 11:12 PM To:IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: 3270 programming

https://www.ibm.com/docs/en/zos-basic-skills?topic=terminal-3270-data
-
stream
Specifically listed but no link,

On Thu, Aug 15, 2024 at 7:45 PM Tom Brennan  wrote:

I don't think TN3270/TN3270E protocols are related to this manual.
They're basically just a layer used to pass the binary 3270 data
stream back and forth.

But Lennie has a good point.  I have a printed copy -05 from 1990
and it's pretty beat up.  I seem to remember it on an IBM doc site
until
(guessing) 2005 or so, then it was suddenly gone.  Maybe someone
made a mistake in removing it, because it's certainly required for
anybody who wants to code their own 3720 screens, or simply wants to
know how things work.

On 8/15/2024 5:33 PM, K

Re: 3270 programming

[David Spiegel]

HI Lennie,
The "P" in ISPF was changed to "Productivity" (from "Programming").
I was still in university and had no clue what "FDP" meant.

Regards,
David

On 2024-08-16 19:34, Lennie Bradshaw wrote:

David,
Yes, I remember that. Was it an FDP? I used it on MVS 3.8. Its full-screen 
editing capabilities were a wonder after using TSO EDIT!
But this was after I had already written the 3270 programs.
ISPF followed on after the success of SPF.
Lennie

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
David Spiegel
Sent: 16 August 2024 17:34
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: 3270 programming

Hi Lennie,
"... (in the late 1970s) I wrote some program for TSO using 3270 protocols. This was 
in the days before ISPF ..."
I Used ISPF's predecessor in the late '70s. (It was called SPF -- Structured 
Programming Facility).

Regards,
David

On 2024-08-16 09:13, Lennie Bradshaw wrote:

Seymour,
That is interesting. I was unaware the protocol had been externalised from IBM. 
I guess this absolves them of the responsibility of providing documentation as 
well.

Phil asked what was the original posters requirement. Well years ago (in the late 1970s) 
I wrote some program for TSO using 3270 protocols. This was in the days before ISPF and 
before the extended attribute support was available. I have been involved in such 
programs rarely since then, but have maintained some knowledge of the protocol. I have 
somewhere a "Green Book" which has all the tables and so on, but I have mislaid 
it. I had to make some changes to a VTAM USS table recently and was looking for the 
specifications for the control strings I could use. As I couldn't find my Green Book, I 
looked online and could not see where IBM had this documented.
Hence my questions.

The website that Sebastian found was really useful.

Many thanks to all who contributed. I will try and butt out now.
Lennie

-Original Message-
From: IBM Mainframe Discussion List  On
Behalf Of Seymour J Metz
Sent: 16 August 2024 12:56
To:IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: 3270 programming

I would start with  RFC 2355, TN3270
Enhancements<https://datatracker.ietf.org/doc/rfc2355/>

--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
עַם יִשְׂרָאֵל חַי
נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר




From: IBM Mainframe Discussion List  on
behalf of Mike Schwab<05962a42dc49-dmarc-requ...@listserv.ua.edu>
Sent: Thursday, August 15, 2024 11:12 PM To:IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: 3270 programming

https://www.ibm.com/docs/en/zos-basic-skills?topic=terminal-3270-data-
stream
Specifically listed but no link,

On Thu, Aug 15, 2024 at 7:45 PM Tom Brennan  wrote:

I don't think TN3270/TN3270E protocols are related to this manual.
They're basically just a layer used to pass the binary 3270 data
stream back and forth.

But Lennie has a good point.  I have a printed copy -05 from 1990 and
it's pretty beat up.  I seem to remember it on an IBM doc site until
(guessing) 2005 or so, then it was suddenly gone.  Maybe someone made
a mistake in removing it, because it's certainly required for anybody
who wants to code their own 3720 screens, or simply wants to know how
things work.

On 8/15/2024 5:33 PM, Ken Bloom wrote:

3270 is supported via tn3270 and tn3270E.   That’s the protocol supported by 
IBM OSA or Visara CCA3074 etc.   You can probably find some old coax manuals 
for native 3270.

Ken


Kenneth A. Bloom
CEO
Avenir Technologies Inc
/d/b/a Visara International
203-984-2235
bl...@visara.com<mailto:bl...@visara.com>
http://www.visara.com/<http://www.visara.com/>


On Aug 15, 2024, at 8:22 PM, Lennie Bradshaw  
wrote:

So if the protocol is still supported, and still used, and still a valid 
programming interface, why is there no *current* manual available from IBM 
documenting it?

Lennie

-Original Message-
From: IBM Mainframe Discussion List  On
Behalf Of Jay Maynard
Sent: 15 August 2024 23:02
To:IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: 3270 programming

I think IBM still supports 3270 access, if not the 3270s themselves.

But if the data stream hasn't changed since the -7 manual was published, 
there's no need for an update...

On Thu, Aug 15, 2024 at 4:54 PM Paul Gilmartin 
<042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:

On Thu, 15 Aug 2024 15:16:15 -0500, Mike Schwab  wrote:

There have been no updates.

Does IBM continue to support the device?  If not, there's little
business case to provide user's manuals.

Regardless, some documentation is necessary as long as IBM products
depend on 3270 data streams.

--
gil


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



--
Jay Maynard

-

Re: 3270 programming

[David Spiegel]

Hi Lennie,
"... (in the late 1970s) I wrote some program for TSO using 3270 
protocols. This was in the days before ISPF ..."
I Used ISPF's predecessor in the late '70s. (It was called SPF -- 
Structured Programming Facility).


Regards,
David

On 2024-08-16 09:13, Lennie Bradshaw wrote:

Seymour,
That is interesting. I was unaware the protocol had been externalised from IBM. 
I guess this absolves them of the responsibility of providing documentation as 
well.

Phil asked what was the original posters requirement. Well years ago (in the late 1970s) 
I wrote some program for TSO using 3270 protocols. This was in the days before ISPF and 
before the extended attribute support was available. I have been involved in such 
programs rarely since then, but have maintained some knowledge of the protocol. I have 
somewhere a "Green Book" which has all the tables and so on, but I have mislaid 
it. I had to make some changes to a VTAM USS table recently and was looking for the 
specifications for the control strings I could use. As I couldn't find my Green Book, I 
looked online and could not see where IBM had this documented.
Hence my questions.

The website that Sebastian found was really useful.

Many thanks to all who contributed. I will try and butt out now.
Lennie

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Seymour J Metz
Sent: 16 August 2024 12:56
To:IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: 3270 programming

I would start with  RFC 2355, TN3270 
Enhancements

--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
עַם יִשְׂרָאֵל חַי
נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר




From: IBM Mainframe Discussion List  on behalf of Mike 
Schwab<05962a42dc49-dmarc-requ...@listserv.ua.edu>
Sent: Thursday, August 15, 2024 11:12 PM
To:IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: 3270 programming

https://www.ibm.com/docs/en/zos-basic-skills?topic=terminal-3270-data-stream
Specifically listed but no link,

On Thu, Aug 15, 2024 at 7:45 PM Tom Brennan  wrote:

I don't think TN3270/TN3270E protocols are related to this manual.
They're basically just a layer used to pass the binary 3270 data
stream back and forth.

But Lennie has a good point.  I have a printed copy -05 from 1990 and
it's pretty beat up.  I seem to remember it on an IBM doc site until
(guessing) 2005 or so, then it was suddenly gone.  Maybe someone made
a mistake in removing it, because it's certainly required for anybody
who wants to code their own 3720 screens, or simply wants to know how
things work.

On 8/15/2024 5:33 PM, Ken Bloom wrote:

3270 is supported via tn3270 and tn3270E.   That’s the protocol supported by 
IBM OSA or Visara CCA3074 etc.   You can probably find some old coax manuals 
for native 3270.

Ken


Kenneth A. Bloom
CEO
Avenir Technologies Inc
/d/b/a Visara International
203-984-2235
bl...@visara.com
http://www.visara.com/


On Aug 15, 2024, at 8:22 PM, Lennie Bradshaw  
wrote:

So if the protocol is still supported, and still used, and still a valid 
programming interface, why is there no *current* manual available from IBM 
documenting it?

Lennie

-Original Message-
From: IBM Mainframe Discussion List  On
Behalf Of Jay Maynard
Sent: 15 August 2024 23:02
To:IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: 3270 programming

I think IBM still supports 3270 access, if not the 3270s themselves.

But if the data stream hasn't changed since the -7 manual was published, 
there's no need for an update...

On Thu, Aug 15, 2024 at 4:54 PM Paul Gilmartin 
<042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:

On Thu, 15 Aug 2024 15:16:15 -0500, Mike Schwab  wrote:

There have been no updates.

Does IBM continue to support the device?  If not, there's little
business case to provide user's manuals.

Regardless, some documentation is necessary as long as IBM products
depend on 3270 data streams.

--
gil


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



--
Jay Maynard


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


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


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


--
For IBM-MAIN subscribe / signoff / archive access instructions, send
email tolists...@

Re: 3270 programming

[David Spiegel]

Hi David,
Can you please send me -07?
My email address is da...@ddstar.com

Thanks and regards,
David

On 2024-08-15 15:25, David Cole wrote:

I have a -07 of that manual. I'll send it to you privately.


At 03:54 PM 8/15/2024 +, Alexander Huemer wrote:

On Thu, Aug 15, 2024 at 03:49:34PM +, Lennie Bradshaw wrote:

Years back there used to be a manual which described how to program to

the 3270 standards. It contained the values and definitions of fields such
as,

Start Field,
Attribute byte,
Write control character,
and so on.
I think this was called something like "IBM 3270 Component reference".
Do IBM still publish the interface to 3270 formatting? If so where?

https://bitsavers.org/pdf/ibm/3270/GA23-0059-4_3270_Data_Stream_Programm
ers_Reference_Dec88.pdf

--
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


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

Re: SDSF - Save configuration

[David Spiegel]

Hi KB,
Logout?! ... Exiting ISPF cleanly is sufficient.

Regards,
David

On 2024-08-07 00:15, kekronbekron wrote:

Assuming you mean re-ordering columns, and sorting data within those columns...
In the menus at the top, you should be able to setup your sort/arrange.
Log out after you do, to ensure they're saved.
Then re-login to check if it works as you've setup.

-KB


On Wednesday, August 7th, 2024 at 03:30, גדי בן אבי  
wrote:


Hi,
It is possible to make many changes in the SDSF configuration using the ARR 
command and various SET commands.

Is there a way to save these changes without exiting SDSF?

Thanks

Gadi

--
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


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

Re: [External] : Re: AOPSTOP

[David Spiegel]

Hi Richard,
I asked the person who customized on V2.5.
He could not remember if he ran AOPSETUP or not.
My guess is that he didn't because the script CHMODs aopstop to 4754, 
but, the file has Permission Bits 750.


Regards,
David

On 2024-07-23 11:02, Richard McIntosh wrote:

Have you run the AOPSETUP to set the permissions for all the AOP files?

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
David Spiegel
Sent: Tuesday, July 23, 2024 9:55 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] : Re: AOPSTOP

Hi Michael,
No, it does not.

Thanks and regards,
David

On 2024-07-23 10:09, Michael Babcock wrote:

Does AOPSTC have access to BPX.SUPERUSER on the 2.5 system?

On Tue, Jul 23, 2024 at 8:43 AM David Spiegel <
0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:


Hi John,
Thank you for the suggestion.
Unfortunately, the only thing displayed was the Permission Bits.

$ getfacl /usr/lpp/Printsrv/bin/aopstop
#file:  /usr/lpp/Printsrv/bin/aopstop
#owner: OMVSKERN
#group: OMVSGRP
user::rwx
group::r-x
other::---

Thanks and regards,
David

On 2024-07-23 07:18, John S. Giltner, Jr. wrote:

If you have not you may want to see if somebody set a file ACL

getfacl /usr/lpp/Printsrv/bin/aopstop

On both systems and see if they are the same


On Mon, 22 Jul 2024 09:23:32 -0400, David Spiegel <

dspiegel...@hotmail.com> wrote:

Hi,
In z/OS V3.1, I issued (via SDSF) S AOPSTOP and it failed because
AOPSTC (taken from STDATA) has UID(1) and GID(24), and
/usr/lpp/Printsrv/bin/aopstop has its Permission Bits set to 750.
The file is owned bu UID(0) GID(1). This is expected.

On z/OS V2.5, however, AOPSTOP works (with the same STARTED Class
Profile and Permission Bits.) Can someone explain why it works on
2.5? (Based upon UID/GID and Permission Bits, it seems like it
shouldn't.) I looked at the DBSYNC output comparing the 2.5 and 3.1
RACF Databases and did not notice anything that would explain this
behaviour.

Thank you in advance.

Regards,
David

---
--- 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

-
- 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

--
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


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

Re: AOPSTOP

[David Spiegel]

Hi Michael,
No, it does not.

Thanks and regards,
David

On 2024-07-23 10:09, Michael Babcock wrote:

Does AOPSTC have access to BPX.SUPERUSER on the 2.5 system?

On Tue, Jul 23, 2024 at 8:43 AM David Spiegel <
0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:


Hi John,
Thank you for the suggestion.
Unfortunately, the only thing displayed was the Permission Bits.

$ getfacl /usr/lpp/Printsrv/bin/aopstop
#file:  /usr/lpp/Printsrv/bin/aopstop
#owner: OMVSKERN
#group: OMVSGRP
user::rwx
group::r-x
other::---

Thanks and regards,
David

On 2024-07-23 07:18, John S. Giltner, Jr. wrote:

If you have not you may want to see if somebody set a file ACL

getfacl /usr/lpp/Printsrv/bin/aopstop

On both systems and see if they are the same


On Mon, 22 Jul 2024 09:23:32 -0400, David Spiegel <

dspiegel...@hotmail.com> wrote:

Hi,
In z/OS V3.1, I issued (via SDSF) S AOPSTOP and it failed because AOPSTC
(taken from STDATA) has UID(1) and GID(24), and
/usr/lpp/Printsrv/bin/aopstop has its Permission Bits set to 750. The
file is owned bu UID(0) GID(1). This is expected.

On z/OS V2.5, however, AOPSTOP works (with the same STARTED Class
Profile and Permission Bits.)
Can someone explain why it works on 2.5? (Based upon UID/GID and
Permission Bits, it seems like it shouldn't.)
I looked at the DBSYNC output comparing the 2.5 and 3.1 RACF Databases
and did not notice anything that would explain this behaviour.

Thank you in advance.

Regards,
David

--
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

--
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


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

Re: AOPSTOP

[David Spiegel]

Hi John,
Thank you for the suggestion.
Unfortunately, the only thing displayed was the Permission Bits.

$ getfacl /usr/lpp/Printsrv/bin/aopstop
#file:  /usr/lpp/Printsrv/bin/aopstop
#owner: OMVSKERN
#group: OMVSGRP
user::rwx
group::r-x
other::---

Thanks and regards,
David

On 2024-07-23 07:18, John S. Giltner, Jr. wrote:

If you have not you may want to see if somebody set a file ACL

getfacl /usr/lpp/Printsrv/bin/aopstop

On both systems and see if they are the same


On Mon, 22 Jul 2024 09:23:32 -0400, David Spiegel  
wrote:


Hi,
In z/OS V3.1, I issued (via SDSF) S AOPSTOP and it failed because AOPSTC
(taken from STDATA) has UID(1) and GID(24), and
/usr/lpp/Printsrv/bin/aopstop has its Permission Bits set to 750. The
file is owned bu UID(0) GID(1). This is expected.

On z/OS V2.5, however, AOPSTOP works (with the same STARTED Class
Profile and Permission Bits.)
Can someone explain why it works on 2.5? (Based upon UID/GID and
Permission Bits, it seems like it shouldn't.)
I looked at the DBSYNC output comparing the 2.5 and 3.1 RACF Databases
and did not notice anything that would explain this behaviour.

Thank you in advance.

Regards,
David

--
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


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

Re: EXTERNAL Email: Re: World’s largest computer outage!

[David Spiegel]

Hi Jerry,
I never faced an issue that caused to use SMP/e to fix (outside of 
ACTIVATOR).

I also never faced issues like this with (OMEGAMON) CICAT or ParmGen.

Regards,
David

On 2024-07-22 13:39, Jerry Whitteridge wrote:

Dave
The key to Aggravator was understanding SMP/E enough that when things broke you 
could go around in back of it and repair using standard SMP/E

I didn't object to it but it certainly gave me aggravation at times.

Jerry Whitteridge
Sr Manager Managed Services
jerry.whitteri...@albertsons.com
480 578 7889

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
David Spiegel
Sent: Monday, July 22, 2024 10:24 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: EXTERNAL Email: Re: World’s largest computer outage!

Hi Jerry,
I actually liked CA-ACTIVATOR. The problem with CA's strategy was that
each product area supplied their own CA-90s code. For example, if ACF2
and CA-1 provided CA-90s modules, the results might change depending
upon the sequence of APPLYs.

When CA figured this out, CA-90s code was supplied only by the CA-90s
group. Alas, it was slightly too late.

Regards,
David

On 2024-07-22 11:56, Jerry Whitteridge wrote:

I really think the Windows folks deserve CA-Aggravator on top of their SMP/E

Jerry Whitteridge
Sr Manager Managed Services
jerry.whitteri...@albertsons.com
480 578 7889

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Phil Smith III
Sent: Sunday, July 21, 2024 10:15 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: EXTERNAL Email: Re: World’s largest computer outage!

Gil wrote:

But these things happen. I heard of a product that crashed
reproducibly at customer sites having 8 or more tape drives.
Who does that in a test lab!>

Exactly. The real problem here isn't that *gasp* there was a software problem: 
it's that nobody thought about how things could fail and how to back it out 
gracefully.

My recommendation: SMP/E for Windows! /s

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

   Warning: All e-mail sent to this address will be received by the corporate 
e-mail system, and is subject to archival and review by someone other than the 
recipient. This e-mail may contain proprietary information and is intended only 
for the use of the intended recipient(s). If the reader of this message is not 
the intended recipient(s), you are notified that you have received this message 
in error and that any review, dissemination, distribution or copying of this 
message is strictly prohibited. If you have received this message in error, 
please notify the sender immediately.


--
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

  Warning: All e-mail sent to this address will be received by the corporate 
e-mail system, and is subject to archival and review by someone other than the 
recipient. This e-mail may contain proprietary information and is intended only 
for the use of the intended recipient(s). If the reader of this message is not 
the intended recipient(s), you are notified that you have received this message 
in error and that any review, dissemination, distribution or copying of this 
message is strictly prohibited. If you have received this message in error, 
please notify the sender immediately.


--
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: EXTERNAL Email: Re: World’s largest computer outage!

[David Spiegel]

Hi Jerry,
I actually liked CA-ACTIVATOR. The problem with CA's strategy was that 
each product area supplied their own CA-90s code. For example, if ACF2 
and CA-1 provided CA-90s modules, the results might change depending 
upon the sequence of APPLYs.


When CA figured this out, CA-90s code was supplied only by the CA-90s 
group. Alas, it was slightly too late.


Regards,
David

On 2024-07-22 11:56, Jerry Whitteridge wrote:

I really think the Windows folks deserve CA-Aggravator on top of their SMP/E

Jerry Whitteridge
Sr Manager Managed Services
jerry.whitteri...@albertsons.com
480 578 7889

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Phil Smith III
Sent: Sunday, July 21, 2024 10:15 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: EXTERNAL Email: Re: World’s largest computer outage!

Gil wrote:

But these things happen. I heard of a product that crashed
reproducibly at customer sites having 8 or more tape drives.
Who does that in a test lab!>

Exactly. The real problem here isn't that *gasp* there was a software problem: 
it's that nobody thought about how things could fail and how to back it out 
gracefully.

My recommendation: SMP/E for Windows! /s

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

  Warning: All e-mail sent to this address will be received by the corporate 
e-mail system, and is subject to archival and review by someone other than the 
recipient. This e-mail may contain proprietary information and is intended only 
for the use of the intended recipient(s). If the reader of this message is not 
the intended recipient(s), you are notified that you have received this message 
in error and that any review, dissemination, distribution or copying of this 
message is strictly prohibited. If you have received this message in error, 
please notify the sender immediately.


--
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

AOPSTOP

[David Spiegel]

Hi,
In z/OS V3.1, I issued (via SDSF) S AOPSTOP and it failed because AOPSTC 
(taken from STDATA) has UID(1) and GID(24), and 
/usr/lpp/Printsrv/bin/aopstop has its Permission Bits set to 750. The 
file is owned bu UID(0) GID(1). This is expected.


On z/OS V2.5, however, AOPSTOP works (with the same STARTED Class 
Profile and Permission Bits.)
Can someone explain why it works on 2.5? (Based upon UID/GID and 
Permission Bits, it seems like it shouldn't.)
I looked at the DBSYNC output comparing the 2.5 and 3.1 RACF Databases 
and did not notice anything that would explain this behaviour.


Thank you in advance.

Regards,
David

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

Re: World’s largest computer outage!

[David Spiegel]

Hi Andrew,
I work with guys who do exactly that.
(In this shop, I'm not one of the MVS guys.)

Regards,
david

On 2024-07-21 20:42, Andrew Rowley wrote:

On 22/07/2024 10:26 am, David Spiegel wrote:

Hi Andrew,
You've just discovered the need for a 1-Pack (or 2-3 Pack) rescue 
system with minimal software.



I didn't just discover it, but how many sites regularly IPL and test it?

I'm sure a lot of sites assume that since they have multiple systems, 
there will always be an LPAR available to use for recovery. Maybe not 
always the case...




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

Re: World’s largest computer outage!

[David Spiegel]

Hi Tony,
I wouldn't bet on that and as Leslie Nielsen says: "Don't call me Shirley!"

Regards,
David

On 2024-07-21 21:09, Tony Harminc wrote:

On Sun, 21 Jul 2024 at 20:26, David Spiegel <
0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:


Hi Andrew,
You've just discovered the need for a 1-Pack (or 2-3 Pack) rescue system
with minimal software.


Surely every informed Windows user has a recovery USB stick handy... That's
the Windows equivalent of the 1-Pack system.

Tony H.

On 2024-07-21 19:58, Andrew Rowley wrote:

On 20/07/2024 9:31 am, Steve Beaver wrote:

We never had these problems until Windows showed up

You can't really blame Windows in this case.

If you had a linklisted, APF authorized product that hooked into
system functions and was remotely updateable by the vendor without a
system restart, they could equally bring down all z/OS systems
simultaneously. That's effectively the situation here.

If your auditor or CTO insisted you had to run Crowdstrike on the
mainframe, could you say no?

The biggest problem is the sheer number of systems affected. But
recovering mainframe systems could also be a challenge, if all your
systems are down. Time to launch your DR systems perhaps - but what if
the offending product is part of the real time data mirrored to the DR
site? And every customer is ringing the DR providor and declaring
disaster?


--
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


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

Re: World’s largest computer outage!

[David Spiegel]

Hi Andrew,
You've just discovered the need for a 1-Pack (or 2-3 Pack) rescue system 
with minimal software.


Regards,
David

On 2024-07-21 19:58, Andrew Rowley wrote:

On 20/07/2024 9:31 am, Steve Beaver wrote:

We never had these problems until Windows showed up


You can't really blame Windows in this case.

If you had a linklisted, APF authorized product that hooked into 
system functions and was remotely updateable by the vendor without a 
system restart, they could equally bring down all z/OS systems 
simultaneously. That's effectively the situation here.


If your auditor or CTO insisted you had to run Crowdstrike on the 
mainframe, could you say no?


The biggest problem is the sheer number of systems affected. But 
recovering mainframe systems could also be a challenge, if all your 
systems are down. Time to launch your DR systems perhaps - but what if 
the offending product is part of the real time data mirrored to the DR 
site? And every customer is ringing the DR providor and declaring  
disaster?




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

Re: World’s largest computer outage!

[David Spiegel]

Hi Phil,
With VSAM CSIs? ... Maybe you'd prefer SMP with CDS/CRQ PDSs? {:->}
(SMP4 PDSs could be mimicked by Directories/Files a lot easier than 
implementing (SMP/e) VSAM.)


Regards,
David

On 2024-07-21 13:14, Phil Smith III wrote:

Gil wrote:

But these things happen. I heard of a product that crashed
reproducibly at customer sites having 8 or more tape drives.
Who does that in a test lab!>

Exactly. The real problem here isn't that *gasp* there was a software problem: 
it's that nobody thought about how things could fail and how to back it out 
gracefully.

My recommendation: SMP/E for Windows! /s

--
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: IRXJCL with sequential SYSEXEC

[David Spiegel]

Hi Jack,
The Rexx comment is unnecessary if the Exec resides in the //SYSEXEC DD.

Regards,
David

On 2024-07-12 12:29, Jack Zukt wrote:

Hi
Shiuld it not begin with /* rexx */ ?

Regards
Jack

On Fri, Jul 12, 2024, 17:22 Schmitt, Michael 
wrote:


I'm on zOS 2.5 now, which has the new feature of allowing the exec for
PGM=IRXJCL to be a sequential file, rather than a member of a PDS. The DD
is still SYSEXEC.

The natural way to code this is:

//JS010   EXEC PGM=IRXJCL
//SYSTSIN   DD DUMMY,DISP=SHR
//SYSTSPRT  DD SYSOUT=*
//SYSEXEC   DD *
   SAY 'HELLO, WORLD!'
/*

Bzzt. Nope, that's a R3637.

Time to read the documentation, which is here:
https://www.ibm.com/docs/en/zos/2.5.0?topic=ir-using-irxjcl-run-rexx-exec-in-mvs-batch

What I'd expect to see is documentation of the PARM values, and
documentation for each of the DDs, including SYSEXEC. There isn't any; it
is just a narrative, which specifically says that the parm must:

 "Specify the member name of the exec and one argument you want to pass
to the exec in the PARM field on the EXEC statement. You can specify only
the name of a member of a PDS."

And for SYSEXEC (which actually could be a different DD name, determined
by the module name table) is only referred as pointing to a PDS.


What you're suppose to do is ignore what's in the "Using IRXJCL to run a
REXX exec in MVS batch" topic and read the next topic:


https://www.ibm.com/docs/en/zos/2.5.0?topic=routine-using-irxjcl-execute-in-stream-rexx-exec

which serves as kind of an errata to the previous topic. Here we learn
that to get this to work, you must code the PARM string, but with one to
eight x'00' for the member name field!


My questions are:

1. Why such an obscure method of saying that the SYSEXEC is sequential?
Why not, oh I don't know, process SYSEXEC as sequential if the organization
of SYSEXEC is sequential?

2. If it must be that it uses the PARM value to know that it is
sequential, why does it use a member name of x'00'? Can you think of ANY
other user-facing utility that works this way? I mean, something users put
in JCL, not some program API.

3. Why was the documentation not fully updated? This is documentation by
counter-example.

4. And, why doesn't the documentation for "Return code for IRXJCL routine"

https://www.ibm.com/docs/en/zos/2.5.0?topic=ir-return-codes

list 3637 as a return code and document what it means?  The meaning of
R3637 is documented in return code 20021, which you would only find if you
READ THE COMPLETE DESCRIPTION OF THE RETURN CODE YOU DIDN'T GET.

This makes no sense. The entire topic is about running IRXJCL in MVS
batch, so you're never going to see 20021. It should document the return
code you will get. If it wants to explain what you might get if running
IRXJCL a different way, then *that* should be in the Notes.


___
Michael Schmitt | DXC Apps Development | MassMutual
(737) 910-8248 | michael.schm...@dxc.com

--
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


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

Re: Mainframe history - 12 inch floppies?

[David Spiegel]

Ditto. (I started late '70s)

On 2024-07-12 08:51, Ed Jaffe wrote:

On 7/11/2024 9:00 AM, Radoslaw Skorupka wrote:
I just found information in some book that IBM mainframes used 12 
inch floppy diskettes. Late 70's.


Anybody heard about such diskettes?



When I first set foot in an IBM-mainframe computer room, the CPU and 
peripherals used 8"floppy diskettes for loading the internal code.


I never saw a 12" floppy diskette used.




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

Re: Off topic discussions

[David Spiegel]

Hi Darren,
Please forgive me i broke the rules by pointing out Dave Beagle's 
anti-Jewish "stationery".

What should I have done differently?

Thanks and regards,
David

On 2024-07-09 22:25, Darren Evans-Young wrote:

Please take the non-IBM-MAIN discussions offline.
I'm about to start removing folks from the list.

Darren

--
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: Alter z/OSMF Workflow Input?

[David Spiegel]

Hi Dave,
You're either naive or willfully misleading people.
Either way, this forum is for technical discussions, not, Mideast politics.
Please get that through your dense skull.

Regards,
David

On 2024-07-09 22:14, Dave Beagle wrote:

It has nothing to do with the destruction of Israel. And don’t hand me your BS. 
Bernie Sanders agrees with me. I maxed out donating to Bernie in 2016 and 
received an autographed copy of his book Our Revolution.


Sent from Yahoo Mail for iPhone


On Tuesday, July 9, 2024, 10:11 PM, Dave Beagle  wrote:

Then tell Metz to take his crap elsewhere too.


Sent from Yahoo Mail for iPhone


On Tuesday, July 9, 2024, 9:50 PM, David Spiegel 
<0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:

Hi Dave,
I Googled before I asked, but, wanted to give you the benefit of the
doubt in case I made a mistake.
According to Google Translate, it means "Freedom for Palestine".
This expression usually means that Israel should be destroyed as well.
You should be aware that this forum is not a platform for anti-Jewish
statements.
What is wrong with you?

Regards,
David

On 2024-07-09 21:04, Dave Beagle wrote:

Google it. And how come you haven’t asked about Metz’s political statement 
after his?


Sent from Yahoo Mail for iPhone


On Tuesday, July 9, 2024, 3:45 PM, rpinion865 
<042a019916dd-dmarc-requ...@listserv.ua.edu> wrote:

Fleegle, the legal beagle.



"Confidentially doc, I am the wabbit."

Bugs Bunny

Sent with Proton Mail secure email.

On Tuesday, July 9th, 2024 at 3:17 PM, David Spiegel 
<0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:


Hi Dave,
What does the Arabic after your name mean?

Thanks and regards,
David

On 2024-07-09 15:03, Dave Beagle wrote:


Proving the old adage you can’t teach an old dog new tricks.
Dave
الحريةلفلسطين

Sent from Yahoo Mail for iPhone

On Tuesday, July 9, 2024, 11:03 AM, Kurt Quackenbush ku...@us.ibm.com wrote:


Upstream in the process, agreed to HLQ of NEWMCAT.
Downstream in the process, edited JCL not to use NEWMCAT.
Now at the "Perform Workflows" stage.
Process complains that that my datasets do not exist in the catalog, etc. Of 
course...
z/OSMF expects to find the target data sets with the names defined in the 
deployment configuration. Unfortunately, you can not generate the workflow 
instances if the data sets are not found by those names. In my opinion the 
safest option is to cleanup and try again, but this time do NOT edit the 
generated JCL. If you don't like the default temporary catalog alias NEWMCAT, 
then change that in the configuration before generating the JCL.

Kurt Quackenbush
IBM | z/OS SMP/E and z/OSMF Software Management | ku...@us.ibm.com

Chuck Norris never uses CHECK when he applies PTFs.

--
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

--
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




--
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







--
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: Alter z/OSMF Workflow Input?

[David Spiegel]

Hi Dave,
I Googled before I asked, but, wanted to give you the benefit of the 
doubt in case I made a mistake.

According to Google Translate, it means "Freedom for Palestine".
This expression usually means that Israel should be destroyed as well.
You should be aware that this forum is not a platform for anti-Jewish 
statements.

What is wrong with you?

Regards,
David

On 2024-07-09 21:04, Dave Beagle wrote:

Google it. And how come you haven’t asked about Metz’s political statement 
after his?


Sent from Yahoo Mail for iPhone


On Tuesday, July 9, 2024, 3:45 PM, rpinion865 
<042a019916dd-dmarc-requ...@listserv.ua.edu> wrote:

Fleegle, the legal beagle.



"Confidentially doc, I am the wabbit."

Bugs Bunny

Sent with Proton Mail secure email.

On Tuesday, July 9th, 2024 at 3:17 PM, David Spiegel 
<0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:


Hi Dave,
What does the Arabic after your name mean?

Thanks and regards,
David

On 2024-07-09 15:03, Dave Beagle wrote:


Proving the old adage you can’t teach an old dog new tricks.
Dave
الحريةلفلسطين

Sent from Yahoo Mail for iPhone

On Tuesday, July 9, 2024, 11:03 AM, Kurt Quackenbush ku...@us.ibm.com wrote:


Upstream in the process, agreed to HLQ of NEWMCAT.
Downstream in the process, edited JCL not to use NEWMCAT.
Now at the "Perform Workflows" stage.
Process complains that that my datasets do not exist in the catalog, etc. Of 
course...
z/OSMF expects to find the target data sets with the names defined in the 
deployment configuration. Unfortunately, you can not generate the workflow 
instances if the data sets are not found by those names. In my opinion the 
safest option is to cleanup and try again, but this time do NOT edit the 
generated JCL. If you don't like the default temporary catalog alias NEWMCAT, 
then change that in the configuration before generating the JCL.

Kurt Quackenbush
IBM | z/OS SMP/E and z/OSMF Software Management | ku...@us.ibm.com

Chuck Norris never uses CHECK when he applies PTFs.

--
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


--
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




--
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: Alter z/OSMF Workflow Input?

[David Spiegel]

Hi Dave,
What does the Arabic after your name mean?

Thanks and regards,
David

On 2024-07-09 15:03, Dave Beagle wrote:

Proving the old adage you can’t teach an old dog new tricks.
Dave
الحريةلفلسطين


Sent from Yahoo Mail for iPhone


On Tuesday, July 9, 2024, 11:03 AM, Kurt Quackenbush  wrote:


Upstream in the process, agreed to HLQ of NEWMCAT.
Downstream in the process, edited JCL not to use NEWMCAT.
Now at the "Perform Workflows" stage.
Process complains that that my datasets do not exist in the catalog, etc.  Of 
course...

z/OSMF expects to find the target data sets with the names defined in the 
deployment configuration.  Unfortunately, you can not generate the workflow 
instances if the data sets are not found by those names.  In my opinion the 
safest option is to cleanup and try again, but this time do NOT edit the 
generated JCL.  If you don't like the default temporary catalog alias NEWMCAT, 
then change that in the configuration before generating the JCL.

Kurt Quackenbush
IBM  |  z/OS SMP/E and z/OSMF Software Management  |  ku...@us.ibm.com

Chuck Norris never uses CHECK when he applies PTFs.

--
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


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

Re: z/OS 3.1 Enhancements & Support News

[David Spiegel]

Hi Howard,
You said: "... G_d Rest his sole. ..."
Were his feet or shoes tired?

Regards,
David

On 2024-06-29 18:57, Howard Rifkind wrote:

I believe that being Rexx is a standard part on both z/OS & z/VM.  Correct me 
if I’m wrong but Python is not, only in a Linux or such OS.  I’ve been around over 
40 years using both OS’s and only my very old fashioned manager at Seton Hall 
University asked to have a quick Python thing written to run only once on the z/OS 
system.  G_d Rest his sole.

Sent from my iPhone


On Jun 28, 2024, at 17:02, David 
Crayford<0595a051454b-dmarc-requ...@listserv.ua.edu>  wrote:

I'd prefer to avoid another instance of Crayford criticizing REXX, but here's 
my take.

One major hurdle in adopting Python is its dependency on a UNIX environment. 
When I introduced Python to REXX programmers, I received feedback from seasoned 
professionals (like myself) who expressed reluctance due to their reliance on 
PDS data sets, TSO, and unfamiliarity with USS. Conversely, younger colleagues 
I work with rarely use TSO/ISPF.

REXX is notably inefficient—capital "I" inefficiency. I tested a Lua program 
for dataset I/O that completed in less than a second, whereas the equivalent REXX code 
took 12 seconds. Unfortunately, REXX's performance isn't likely to improve; it's also 
considered a language riddled with weaknesses.

Python, although not my preferred language, is significantly feature-rich. Many 
REXX programmers stick with REXX out of familiarity and resist learning 
something new. From a customer-oriented perspective, avoiding REXX is 
advisable. Even before Python or Java emerged, opting for offloads to zIIPs was 
a better choice. Python offers a generous 70% zIIP generosity factor.


On 29 Jun 2024, at 1:20 AM, Charles Mills  wrote:

@Timothy, is that a Yes or a No?

There has been a lot of discussion here about Rexx versus Python: "Why are you still using 
that old-fashioned Rexx when Python is so much more wonderful?" There are several answers, 
valid IMHO, including developer familiarity. But the key objection to Python, for third-party and 
similar software that is intended for use at multiple, often as-yet-unidentified sites, is the one 
I cite below: "if we write it in Python than any potential customer will have to download the 
Python run-time, and some customers are extremely reluctant to download and install non-standard 
(FSVO non-standard) software." (For Rexx, the run-time is a standard part of a z/OS install.)

Is it your opinion, is it the community's opinion, that that objection has now 
gone away or is going away as time passes by and more and more shops are on a 
post-7/1/2024 download of z/OS?

Charles


On Fri, 28 Jun 2024 04:10:13 +, Timothy Sipples  wrote:

Charles Mills wrote:

Am I reading this correctly that the "they would have to download
it and some shops won't do that" objection to the use of Python for
third-party software goes away, at least for customers with z/OS
systems ordered after July 1?

These 3 products are ?bypassable requisites? effective July 1, 2024. See 
Marna?s blog post for more details:

https://community.ibm.com/community/user/ibmz-and-linuxone/blogs/chandni-dinani2/2024/06/26/zos-modernization-new-bypassable-products?communityKey=200b84ba-972f-4f79-8148-21a723194f7f

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

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

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email tolists...@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: DFSORT Question regarding SORTOUT Library Member Statistics

[David Spiegel]

HI Cameron,
Another possibility ... Please look at (CBT File 93) PDSLOAD.

//PDSLOAD  EXEC PGM=PDSLOADW,PARM='UPDTE(./)'
//SYSPRINT  DD  SYSOUT=*
//STEPLIB   DD  DISP=SHR,DSN=FILE135.PDS
//SYSUT1    DD  DISP=SHR,DSN=SYSUT1.TXT
//SYSUT2    DD  DISP=SHR,DSN=MYPDS.CNTL

Here is a sample of SYSUT1:
./ ADD NAME=MEMBERR1 ...
* your code goes here
./ ADD NAME=MEMBER2 ...
* your code goes here
/*

Where (ADD Statement):
COL DESCRIPTION
1-20    ./ ADD NAME=
21  BLANK
22-71   VVMM-YYDDD-YYDDD-HHMM-N-N-N-UU
    VER CREATE LASTMODIFY  SIZE  INIT   MOD   ID

Regards,
David

On 2024-06-25 11:17, Cameron Conacher wrote:

Thanks.
I can try that.
Or just Enter/SAVE/F3 a couple of hundred times. 😊

Appreciate the information as always.


Thanks

…….Cameron


From: IBM Mainframe Discussion List  On Behalf Of Sri 
Hari Kolusu
Sent: Tuesday, June 25, 2024 11:01 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFSORT Question regarding SORTOUT Library Member Statistics


I want to know if I can include an option, or processing clause to ensure that 
Library statistics are generated for each new member as I create them. At the 
moment, I have a couple of hundred new Library Members that have no member



I want to know if I can include an option, or processing clause to ensure that 
Library statistics are generated for each new member as I create them.

At the moment, I have a couple of hundred new Library Members that have no 
member statistics at all (who last changed, when created when last changed, 
etc..).



Cameroon,



Unfortunately, DFSORT does NOT copy/generate member statistics when copying.  
However, if your shop has FILE-MANAGER, then you can use the following.



//STEP0100 EXEC PGM=FILEMGR

//SYSPRINT DD SYSOUT=*

//DDIN DD DISP=SHR,DSN=Your.input

//DDOUTDD DISP=OLD,DSN=your.output.pds(memname)

//SYSINDD *

$$FILEM DSC STATS=ON

/*



Thanks,

Kolusu

DFSORT Development

IBM Corporation







--

For IBM-MAIN subscribe / signoff / archive access instructions,

send email to lists...@listserv.ua.edu with 
the message: INFO IBM-MAIN


American Express made the following annotations

This e-mail was sent to you by a representative of Amex Bank of Canada, P.O. Box 3204, 
Station "F", Toronto, ON, M1W 3W7, http://www.americanexpress.ca/. If you no 
longer wish to receive these e-mails, please notify the sender by reply e-mail.

This e-mail is solely for the intended recipient and may contain confidential 
or privileged information. If you are not the intended recipient, any 
disclosure, copying, use, or distribution of the information included in this 
e-mail is prohibited. If you have received this e-mail in error, please notify 
the sender by reply e-mail and immediately and permanently delete this e-mail 
and any attachments. Thank you.

American Express a fait les remarques suivantes
Ce courriel vous a été envoyé par un représentant de la Banque Amex du Canada, 
C.P. 3204, succursale F, Toronto (Ontario) M1W 3W7, 
http://www.americanexpress.ca/. Si, par la suite, vous ne souhaitez plus 
recevoir ces courriels, veuillez en aviser les expéditeurs par courriel.

Ce courriel est réservé au seul destinataire indiqué et peut renfermer des 
renseignements confidentiels et privilégiés. Si vous n’êtes pas le destinataire 
prévu, toute divulgation, duplication, utilisation ou distribution du courriel 
est interdite. Si vous avez reçu ce courriel par erreur, veuillez en aviser 
l’expéditeur par courriel et détruire immédiatement le courriel et toute pièce 
jointe. Merci.

--
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: TSO PARMLIB command - Abend S047

[David Spiegel]

Hi Gadi,
What is the value of LNKAUTH in IEASYSxx?
If it is APFTAB, is SYS1.CMDLIB coded explicitly (with its proper 
VOLSER) in PROGxx?


Regards,
David

On 2024-06-18 02:53, גדי בן אבי wrote:

Hi,
In a new installation if z/OS v3.1, I am trying to use the TSO PARMLIB command.
I keep getting Abend S047.

The PARMLIB command is in SYS1.CMDLIB. I made sure that the library is in the 
APF list.

What else should I look at?

Thanks

Gadi


--
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: DB2 V12 RSU2403

[David Spiegel]

Hi Bill Johnson aka Dave Beagle,
You still can't spell my surname.

IIRC, you were kicked out of this group.
Is that why you resorted to this new nom de plume?

Regards,
David

On 2024-06-16 12:22, Dave Beagle wrote:

Speegil,So have many of us been using SMP/e and its predecessor since the 80’s 
or earlier. Plus, space errors are easy to recover from. Tell us how only 
Assembler programmers are true SPs again. I’m a huge fan of fairy tales.
Dave


Sent from Yahoo Mail for iPhone


On Sunday, June 16, 2024, 6:58 AM, David Spiegel 
<0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:

Hi Dave,
I have been using SMP/e since 1983 and  SMP4 before that.
Why would you think that I don't know about DDDEFs? I was responding to
your sample JCL which had none.
Finally, is it that difficult to spell my surname properly?

Regards,
David

On 2024-06-16 01:24, Dave Beagle wrote:

Speagle never heard of DDDEFS? Where space allocations can be made? Plus, 
running out of space isn’t that big a deal. An easy fix for even rookie SPs. 
What are May times?


Sent from Yahoo Mail for iPhone


On Sunday, June 16, 2024, 1:01 AM, rpinion865 
<042a019916dd-dmarc-requ...@listserv.ua.edu> wrote:

I have also found that using a PDSE for SMPWRK6 can speed up SMP/E processing.




Sent with Proton Mail secure email.

On Sunday, June 16th, 2024 at 12:50 AM, David Spiegel 
<0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:


Hi Dave,
You said: "but I know how you like to show everyone your special
intelligence ..." How do you know this? Have we ever met? I have seen
may times where SMP jobs failed because the default space Allocation for
SYSUTxs and SMPWRKxs was too small. My advice is practical, not
pedantic. Regards, David
On 2024-06-16 00:42, Dave Beagle wrote:


The sample I’ve provided was an actual RSU install. The exclude was PTF’s that needed 
to be excluded for various reasons. Most likely PTF’s in error. As for defaults that 
don’t need coded, who cares? Defaults are nice to show for people who aren’t privy to 
them. The other SMPWRK & SYSUT were most likely generated by SMP/e and meaningless 
to his question but I know how you like to show everyone your special intelligence. 
This example was from 2017 when I was installing & maintaining DB2.

Sent from Yahoo Mail for iPhone

On Sunday, June 16, 2024, 12:27 AM, Brian 
westermanbrian_wester...@syzygyinc.com wrote:

I agree with everything except the last part about selecting the PTFs individually. I do 
the same thing that the OP is doing. My reason is that I can get the ones the 
"need" to be excluded from the applychk, but since he is doing a RSU, he likely 
wants everything that is not going to fail because of failed or missing prereqs.

Coding defaults never hurts though.

As far as getting through the 134 PTF's you pretty much have to look at them 
all and see if the action is going to need you to do something that you can't 
or don't want to do or will affect something poorly in your system. It's 
difficult to tell you for sure without knowing anything about your site and if 
the required actions are going to present a problem for you.

If it helps, most of the actions are likely fairly benign things, but again, 
it's difficult to tell you without specific knowledge of the action items in 
question.

Brian

On Sat, 15 Jun 2024 23:00:55 -0400, David spiegeldspiegel...@hotmail.com wrote:


Hi Dave,
- RETRY(YES) and JCLINREPORT are defaults. There is no need to code them.
- The SYSUTx ALLOCATIONS might be too small
- The SMPWRKx Allocations could benefit from half-track blocking (i.e.
BLKSIZE=27920).
- Instead of PTFS and EXCLUDE, why not SELECT the 134 PTFs?

Regards,
David

On 2024-06-14 18:30, Dave Beagle wrote:


Depends on the holds. DOC holds are easily bypassed. Others not entirely 
bypass-able.(although most are) Some of them you might have to perform a bind 
to finish the installation. Here is a sample.
//WJJCAPCK JOB (3200,TBL1),'APCK DB2 MAINT',CLASS=8,MSGCLASS=Q,
// NOTIFY=&SYSUID,REGION=6M
/JOBPARM SYSAFF=BCWD
//
//S1 EXEC PGM=GIMSMP,
// PARM='PROCESS=WAIT',
// DYNAMNBR=120
//*
//* NOTE: THIS JCL CREATED BY THE COMMAND GENERATION DIALOGS.
//*
//* SMP ZONE-RELATED FILES ARE DYNAMICALLY ALLOCATED,
//* THIS INCLUDES THE SMPPTS, SMPLOG, AND SMPTLIB DATA SETS,
//* IF APPLICABLE.
//*
//* SMP FILES
//*
//SMPCSI DD DISP=SHR,DSN=SMPE.DB2V8R1.GLOBAL.CSI
//SMPOUT DD SYSOUT=*
//SMPRPT DD SYSOUT=*
//SMPLIST DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//*
//* UTILITY WORK DATA SETS IF REQUIRED FOR THE COMMAND
//* FOLLOW HERE.
//* INFORMATION FOR THE ALLOCATION OF THESE DATASETS IS
//* SET USING OPTION 0 (SETTINGS) FROM THE SMP/E PRIMARY
//* OPTION PANEL.
//*
//SYSUT1 DD UNIT=SYSDA,SPACE=(3120,(380,760))
//SYSUT2 DD UNIT=SYSDA,SPACE=(3120,(380,760))
//SYSUT3 DD UNIT=SYSDA,SPACE=(3120,(380,760))
//SYSUT4 DD UNIT=SYSDA,SPACE=(3120,(38,100))
//*
//* SMP TEMPORARY WOR

Re: DB2 V12 RSU2403

[David Spiegel]

Hi Dave,
I have been using SMP/e since 1983 and  SMP4 before that.
Why would you think that I don't know about DDDEFs? I was responding to 
your sample JCL which had none.

Finally, is it that difficult to spell my surname properly?

Regards,
David

On 2024-06-16 01:24, Dave Beagle wrote:

Speagle never heard of DDDEFS? Where space allocations can be made? Plus, 
running out of space isn’t that big a deal. An easy fix for even rookie SPs. 
What are May times?


Sent from Yahoo Mail for iPhone


On Sunday, June 16, 2024, 1:01 AM, rpinion865 
<042a019916dd-dmarc-requ...@listserv.ua.edu> wrote:

I have also found that using a PDSE for SMPWRK6 can speed up SMP/E processing.




Sent with Proton Mail secure email.

On Sunday, June 16th, 2024 at 12:50 AM, David Spiegel 
<0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:


Hi Dave,
You said: "but I know how you like to show everyone your special
intelligence ..." How do you know this? Have we ever met? I have seen
may times where SMP jobs failed because the default space Allocation for
SYSUTxs and SMPWRKxs was too small. My advice is practical, not
pedantic. Regards, David
On 2024-06-16 00:42, Dave Beagle wrote:


The sample I’ve provided was an actual RSU install. The exclude was PTF’s that needed 
to be excluded for various reasons. Most likely PTF’s in error. As for defaults that 
don’t need coded, who cares? Defaults are nice to show for people who aren’t privy to 
them. The other SMPWRK & SYSUT were most likely generated by SMP/e and meaningless 
to his question but I know how you like to show everyone your special intelligence. 
This example was from 2017 when I was installing & maintaining DB2.

Sent from Yahoo Mail for iPhone

On Sunday, June 16, 2024, 12:27 AM, Brian 
westermanbrian_wester...@syzygyinc.com wrote:

I agree with everything except the last part about selecting the PTFs individually. I do 
the same thing that the OP is doing. My reason is that I can get the ones the 
"need" to be excluded from the applychk, but since he is doing a RSU, he likely 
wants everything that is not going to fail because of failed or missing prereqs.

Coding defaults never hurts though.

As far as getting through the 134 PTF's you pretty much have to look at them 
all and see if the action is going to need you to do something that you can't 
or don't want to do or will affect something poorly in your system. It's 
difficult to tell you for sure without knowing anything about your site and if 
the required actions are going to present a problem for you.

If it helps, most of the actions are likely fairly benign things, but again, 
it's difficult to tell you without specific knowledge of the action items in 
question.

Brian

On Sat, 15 Jun 2024 23:00:55 -0400, David spiegeldspiegel...@hotmail.com wrote:


Hi Dave,
- RETRY(YES) and JCLINREPORT are defaults. There is no need to code them.
- The SYSUTx ALLOCATIONS might be too small
- The SMPWRKx Allocations could benefit from half-track blocking (i.e.
BLKSIZE=27920).
- Instead of PTFS and EXCLUDE, why not SELECT the 134 PTFs?

Regards,
David

On 2024-06-14 18:30, Dave Beagle wrote:


Depends on the holds. DOC holds are easily bypassed. Others not entirely 
bypass-able.(although most are) Some of them you might have to perform a bind 
to finish the installation. Here is a sample.
//WJJCAPCK JOB (3200,TBL1),'APCK DB2 MAINT',CLASS=8,MSGCLASS=Q,
// NOTIFY=&SYSUID,REGION=6M
/JOBPARM SYSAFF=BCWD
//
//S1 EXEC PGM=GIMSMP,
// PARM='PROCESS=WAIT',
// DYNAMNBR=120
//*
//* NOTE: THIS JCL CREATED BY THE COMMAND GENERATION DIALOGS.
//*
//* SMP ZONE-RELATED FILES ARE DYNAMICALLY ALLOCATED,
//* THIS INCLUDES THE SMPPTS, SMPLOG, AND SMPTLIB DATA SETS,
//* IF APPLICABLE.
//*
//* SMP FILES
//*
//SMPCSI DD DISP=SHR,DSN=SMPE.DB2V8R1.GLOBAL.CSI
//SMPOUT DD SYSOUT=*
//SMPRPT DD SYSOUT=*
//SMPLIST DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//*
//* UTILITY WORK DATA SETS IF REQUIRED FOR THE COMMAND
//* FOLLOW HERE.
//* INFORMATION FOR THE ALLOCATION OF THESE DATASETS IS
//* SET USING OPTION 0 (SETTINGS) FROM THE SMP/E PRIMARY
//* OPTION PANEL.
//*
//SYSUT1 DD UNIT=SYSDA,SPACE=(3120,(380,760))
//SYSUT2 DD UNIT=SYSDA,SPACE=(3120,(380,760))
//SYSUT3 DD UNIT=SYSDA,SPACE=(3120,(380,760))
//SYSUT4 DD UNIT=SYSDA,SPACE=(3120,(38,100))
//*
//* SMP TEMPORARY WORK DATA SETS
//*
//SMPWRK1 DD UNIT=SYSDA,
// SPACE=(3120,(364,380,500)),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//SMPWRK2 DD UNIT=SYSDA,
// SPACE=(3120,(364,380,500)),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//SMPWRK3 DD UNIT=SYSDA,
// SPACE=(3120,(364,380,500)),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//SMPWRK4 DD UNIT=SYSDA,
// SPACE=(3120,(364,380,500)),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//SMPWRK6 DD UNIT=SYSDA,
// SPACE=(3120,(364,380,500)),
// DCB=(RECFM=FB,BLKSIZE=3120)
//*
//*
//SMPCNTL DD *
SET BOUNDARY (DSN8TRG)
.
APPLY
PTFS
BYPASS (
HOLDSYSTEM
(
DOC
DB2BIND
IPL
ACTION
AO
DEP

Re: DB2 V12 RSU2403

[David Spiegel]

Hi Dave,
You said: "but I know how you like to show everyone your special 
intelligence ..." How do you know this? Have we ever met? I have seen 
may times where SMP jobs failed because the default space Allocation for 
SYSUTxs and SMPWRKxs was too small. My advice is practical, not 
pedantic. Regards, David

On 2024-06-16 00:42, Dave Beagle wrote:

The sample I’ve provided was an actual RSU install. The exclude was PTF’s that needed 
to be excluded for various reasons. Most likely PTF’s in error. As for defaults that 
don’t need coded, who cares? Defaults are nice to show for people who aren’t privy to 
them. The other SMPWRK & SYSUT were most likely generated by SMP/e and meaningless 
to his question but I know how you like to show everyone your special intelligence. 
This example was from 2017 when I was installing & maintaining DB2.


Sent from Yahoo Mail for iPhone


On Sunday, June 16, 2024, 12:27 AM, Brian 
Westerman  wrote:

I agree with everything except the last part about selecting the PTFs individually.  I do 
the same thing that the OP is doing.  My reason is that I can get the ones the 
"need" to be excluded from the applychk, but since he is doing a RSU, he likely 
wants everything that is not going to fail because of failed or missing prereqs.

Coding defaults never hurts though.

As far as getting through the 134 PTF's you pretty much have to look at them 
all and see if the action is going to need you to do something that you can't 
or don't want to do or will affect something poorly in your system.  It's 
difficult to tell you for sure without knowing anything about your site and if 
the required actions are going to present a problem for you.

If it helps, most of the actions are likely fairly benign things, but again, 
it's difficult to tell you without specific knowledge of the action items in 
question.

Brian

On Sat, 15 Jun 2024 23:00:55 -0400, David Spiegel  
wrote:


Hi Dave,
- RETRY(YES) and JCLINREPORT are defaults. There is no need to code them.
- The SYSUTx ALLOCATIONS might be too small
- The SMPWRKx Allocations could benefit from half-track blocking (i.e.
BLKSIZE=27920).
- Instead of PTFS and EXCLUDE, why not SELECT the 134 PTFs?

Regards,
David

On 2024-06-14 18:30, Dave Beagle wrote:

Depends on the holds. DOC holds are easily bypassed. Others not entirely 
bypass-able.(although most are) Some of them you might have to perform a bind 
to finish the installation. Here is a sample.
//WJJCAPCK JOB (3200,TBL1),'APCK DB2 MAINT',CLASS=8,MSGCLASS=Q,
// NOTIFY=&SYSUID,REGION=6M
/*JOBPARM SYSAFF=BCWD
//*
//S1   EXEC PGM=GIMSMP,
// PARM='PROCESS=WAIT',
// DYNAMNBR=120
//*
//* NOTE:  THIS JCL CREATED BY THE COMMAND GENERATION DIALOGS.
//*
//*    SMP ZONE-RELATED FILES ARE DYNAMICALLY ALLOCATED,
//*    THIS INCLUDES THE SMPPTS, SMPLOG, AND SMPTLIB DATA SETS,
//*    IF APPLICABLE.
//*
//* SMP FILES
//*
//SMPCSI   DD DISP=SHR,DSN=SMPE.DB2V8R1.GLOBAL.CSI
//SMPOUT   DD SYSOUT=*
//SMPRPT   DD SYSOUT=*
//SMPLIST  DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//*
//*  UTILITY WORK DATA SETS IF REQUIRED FOR THE COMMAND
//*  FOLLOW HERE.
//*  INFORMATION FOR THE ALLOCATION OF THESE DATASETS IS
//*  SET USING OPTION 0 (SETTINGS) FROM THE SMP/E PRIMARY
//*  OPTION PANEL.
//*
//SYSUT1   DD UNIT=SYSDA,SPACE=(3120,(380,760))
//SYSUT2   DD UNIT=SYSDA,SPACE=(3120,(380,760))
//SYSUT3   DD UNIT=SYSDA,SPACE=(3120,(380,760))
//SYSUT4   DD UNIT=SYSDA,SPACE=(3120,(38,100))
//*
//*  SMP TEMPORARY WORK DATA SETS
//*
//SMPWRK1  DD UNIT=SYSDA,
//    SPACE=(3120,(364,380,500)),
//    DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//SMPWRK2  DD UNIT=SYSDA,
//    SPACE=(3120,(364,380,500)),
//    DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//SMPWRK3  DD UNIT=SYSDA,
//    SPACE=(3120,(364,380,500)),
//    DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//SMPWRK4  DD UNIT=SYSDA,
//    SPACE=(3120,(364,380,500)),
//    DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//SMPWRK6  DD UNIT=SYSDA,
//    SPACE=(3120,(364,380,500)),
//    DCB=(RECFM=FB,BLKSIZE=3120)
//*
//*
//SMPCNTL  DD *
     SET    BOUNDARY (DSN8TRG)
     .
     APPLY
    PTFS
    BYPASS   (
      HOLDSYSTEM
       (
     DOC
     DB2BIND
     IPL
     ACTION
     AO
     DEP
     DELETE
       )
     )
    JCLINREPORT
    CHECK
    EXCLUDE  (
      UK16725
      UK16766
      UK17549
      UK17614
      UK17616
      UK17619
    

Re: DB2 V12 RSU2403

[David Spiegel]

Hi Dave,
- RETRY(YES) and JCLINREPORT are defaults. There is no need to code them.
- The SYSUTx ALLOCATIONS might be too small
- The SMPWRKx Allocations could benefit from half-track blocking (i.e. 
BLKSIZE=27920).

- Instead of PTFS and EXCLUDE, why not SELECT the 134 PTFs?

Regards,
David

On 2024-06-14 18:30, Dave Beagle wrote:

Depends on the holds. DOC holds are easily bypassed. Others not entirely 
bypass-able.(although most are) Some of them you might have to perform a bind 
to finish the installation. Here is a sample.
//WJJCAPCK JOB (3200,TBL1),'APCK DB2 MAINT',CLASS=8,MSGCLASS=Q,
// NOTIFY=&SYSUID,REGION=6M
/*JOBPARM SYSAFF=BCWD
//*
//S1   EXEC PGM=GIMSMP,
// PARM='PROCESS=WAIT',
// DYNAMNBR=120
//*
//* NOTE:  THIS JCL CREATED BY THE COMMAND GENERATION DIALOGS.
//*
//*    SMP ZONE-RELATED FILES ARE DYNAMICALLY ALLOCATED,
//*    THIS INCLUDES THE SMPPTS, SMPLOG, AND SMPTLIB DATA SETS,
//*    IF APPLICABLE.
//*
//* SMP FILES
//*
//SMPCSI   DD DISP=SHR,DSN=SMPE.DB2V8R1.GLOBAL.CSI
//SMPOUT   DD SYSOUT=*
//SMPRPT   DD SYSOUT=*
//SMPLIST  DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//*
//*  UTILITY WORK DATA SETS IF REQUIRED FOR THE COMMAND
//*  FOLLOW HERE.
//*  INFORMATION FOR THE ALLOCATION OF THESE DATASETS IS
//*  SET USING OPTION 0 (SETTINGS) FROM THE SMP/E PRIMARY
//*  OPTION PANEL.
//*
//SYSUT1   DD UNIT=SYSDA,SPACE=(3120,(380,760))
//SYSUT2   DD UNIT=SYSDA,SPACE=(3120,(380,760))
//SYSUT3   DD UNIT=SYSDA,SPACE=(3120,(380,760))
//SYSUT4   DD UNIT=SYSDA,SPACE=(3120,(38,100))
//*
//*  SMP TEMPORARY WORK DATA SETS
//*
//SMPWRK1  DD UNIT=SYSDA,
//    SPACE=(3120,(364,380,500)),
//    DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//SMPWRK2  DD UNIT=SYSDA,
//    SPACE=(3120,(364,380,500)),
//    DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//SMPWRK3  DD UNIT=SYSDA,
//    SPACE=(3120,(364,380,500)),
//    DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//SMPWRK4  DD UNIT=SYSDA,
//    SPACE=(3120,(364,380,500)),
//    DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//SMPWRK6  DD UNIT=SYSDA,
//    SPACE=(3120,(364,380,500)),
//    DCB=(RECFM=FB,BLKSIZE=3120)
//*
//*
//SMPCNTL  DD *
   SET    BOUNDARY (DSN8TRG)
   .
   APPLY
  PTFS
  BYPASS   (
    HOLDSYSTEM
     (
   DOC
   DB2BIND
   IPL
   ACTION
   AO
   DEP
   DELETE
     )
   )
  JCLINREPORT
  CHECK
  EXCLUDE  (
    UK16725
    UK16766
    UK17549
    UK17614
    UK17616
    UK17619
    UK17786
    UK17972
    UK18140
    UK18173
    UK18509
    UK18859
    UK19013
    UK19209
    UK19249
    UK19337
    UK19345
    UK19528
    UK19578
    UK19603
    UK20093
    UK20531
    UK20550
    UK20557
    UK20696
    UK21117
   )
  GROUPEXTEND
  RETRY(YES)
     .

Dave

Sent from Yahoo Mail for iPhone


On Friday, June 14, 2024, 9:19 AM, Steve Beaver 
<050e0c375a14-dmarc-requ...@listserv.ua.edu> wrote:

Upfront - I am not a DB2 SYSPROG, SYSADM, or Programmer

  


I have pulled in and applied DB2 V12 RSU2403.  That was the easy part.

  


There are 134 PTF's with HOLD ACTION and that is where  trouble is going to

Begin.

  


Does anyone have a Home Grown implementation document to help me get

Through these 134 PTF's with HOLD.

  


Thanks

  


Stev

  

  



--
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


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

Re: [EXTERNAL] Re: VTOCs vs. catalogs

[David Spiegel]

Hi Tony,
I meant that the (DEFINE) SPACE would be similar to a PDS and the 
SUBALLOCATED Clusters would be similar to  members

in that PDS (SPACE).

Regards,
David

On 2024-05-24 14:26, Tony Harminc wrote:

On Fri, 24 May 2024 at 11:31, David Spiegel <
0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:


Hi Rex,
VVDSs came with ICF. Before that, VSAM Clusters were ALLOCATED as either
SUBALLOCATION or UNIQUE.
SUBALLOCATION meant that the user ALLOCATED a "cloud" (i.e. DEFINE
SPACE) to hold 1 or more VSAM suballocated Dataset.


Yes, I was about to mention this. All the information for a non-UNIQUE VSAM
dataset was kept  in the VSAM catalogue. One advantage in those distant
days of mountable disk drives was that one could allocate or delete a VSAM
dataset with all its details while the disk pack was sitting on the shelf.
This could be seriously useful for production jobs where the packs were
mounted only when the job ran. But of course the down side - as mentioned
here in a slightly different context - was that the disk volume and the
catalogue could get out of sync if the disk failed, and with potentially
much worse results than just some datasets not being catalogued.

It was conceptually similar to a PDS and Members.
I'm not quite seeing that analogy... Have you ever met a PDS with members
on different volumes?



Regards,

David


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: [EXTERNAL] Re: VTOCs vs. catalogs

[David Spiegel]

Hi Rex,
VVDSs came with ICF. Before that, VSAM Clusters were ALLOCATED as either 
SUBALLOCATION or UNIQUE.
SUBALLOCATION meant that the user ALLOCATED a "cloud" (i.e. DEFINE 
SPACE) to hold 1 or more VSAM suballocated Dataset.

It was conceptually similar to a PDS and Members.

Regards,
David

On 2024-05-24 11:10, Pommier, Rex wrote:

David,

Since you are obviously my elder in the field, please enlighten me as to what 
the VVDS was before the ICF catalog came along.  When I started, VSAM catalogs 
were still a thing (as were CVOLs I think) but we never had them at my shop.  I 
was taught that the VVDS and BCS structures were the 2 components of an ICF 
catalog, created to overcome shortcomings of the VSAM catalog.  Did VVDS's 
exist before the ICF catalog or were they introduced with ICF?

Rex

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
David Spiegel
Sent: Friday, May 24, 2024 9:33 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [EXTERNAL] Re: VTOCs vs. catalogs

Hi Rex,
You said: "...I never worked with either CVOLs or VSAM catalogs ..." If I may take the 
Bible out of context, please see: DE 32:7 זְקֵנֶ֖יךָ וְיֹ֥אמְרוּ לָֽךְ "... Remember the days 
of old, Consider the years of ages past; Ask your parent, who will inform you, Your elders, who 
will tell you: ..."
Regards,. David
On 2024-05-24 10:12, Pommier, Rex wrote:

Hi David,

This is the part I was commenting on.  " Then came  VSAM  (and VVDS?) and VSAM 
Catalogs,...".  I took that comment as being Dave guessing that possibly the VVDS 
came along with VSAM catalogs which I believe were a stepping stone between CVOLs and ICF 
catalogs.  I never worked with either CVOLs or VSAM catalogs but I was pretty sure the 
VVDS came along with the ICF.

Rex

-Original Message-
From: IBM Mainframe Discussion List  On
Behalf Of David Spiegel
Sent: Friday, May 24, 2024 8:55 AM
To:IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: VTOCs vs. catalogs

Hi Rex,
"...Followed by SMS and VVDS for non-VSAM datasets ..."
This was meant (AFAIK) to state that VVDS for Non-VSAMs came into use with 
SMS-Controlled DASD Volumes.
It is also true that VVDSs were introduced with ICF Catalogs (circa 1981, 
recalled and re-released in 1982).

Regards,
David

On 2024-05-24 09:44, Pommier, Rex wrote:

Didn't the VVDS come along with the ICF catalog structure?

-Original Message-
From: IBM Mainframe Discussion List   On
Behalf Of Gibney, Dave
Sent: Thursday, May 23, 2024 10:32 PM To:IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: VTOCs vs. catalogs

All speculation on my part. One system with no DASD, you need neither.
On a system with only one, of just a few DASD volumes, a VTOC is required to 
say where on the volume a dataset is and the basic attributes of PS and PDS 
datasets.

Once you get to several always mounted DASSD volumes, it becomes a pain to need 
to remember and specify VOLSER in the JCL.

CVOLs where an early attempt to solve this problem. Then came  VSAM
(and VVDS?) and VSAM Catalogs, and somewhile later ECf/Catalogs.
Followed by SMS and VVDS for non-VSAM datasets


-Original Message-
From: IBM Mainframe Discussion List   On
Behalf Of Mike Schwab
Sent: Thursday, May 23, 2024 8:24 PM To:IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: VTOCs vs. catalogs

[EXTERNAL EMAIL]

For the most part the catalog lets you locate your dataset no matter
which volume you put it on.
For non-vsam, that is about all that is stored, dataset
characteristics are in the VTOC.
And with non-SMS volumes you can have uncataloged datasets on DASD
or tape.

VSAM came from the Future Systems development as a complete
replacement, Lynn Wheeler has posts about that.
It was cut back to be an addition to MVS, then combined with CVOL
catalogs to ICF.

On Thu, May 23, 2024 at 9:32 PM Phil Smith III   wrote:

I'm curious whether any of you old-timers can explain why we have
both VTOCs and catalogs. I'm guessing it comes down to (a) VTOCs
came first and catalogs were added to solve some problem (what?)
and/or (b) catalogs

were added to save some I/O and/or memory, back when a bit of those
mattered. But I'd like to understand. Anyone?

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

--
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?


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

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

-

Re: [EXTERNAL] Re: VTOCs vs. catalogs

[David Spiegel]

Hi Rex,
You said: "...I never worked with either CVOLs or VSAM catalogs ..." If 
I may take the Bible out of context, please see: DE 32:7 זְקֵנֶ֖יךָ וְיֹ֥אמְרוּ לָֽךְ

"... Remember the days of old,
Consider the years of ages past;
Ask your parent, who will inform you,
Your elders, who will tell you: ..."
Regards,. David
On 2024-05-24 10:12, Pommier, Rex wrote:

Hi David,

This is the part I was commenting on.  " Then came  VSAM  (and VVDS?) and VSAM 
Catalogs,...".  I took that comment as being Dave guessing that possibly the VVDS 
came along with VSAM catalogs which I believe were a stepping stone between CVOLs and ICF 
catalogs.  I never worked with either CVOLs or VSAM catalogs but I was pretty sure the 
VVDS came along with the ICF.

Rex

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
David Spiegel
Sent: Friday, May 24, 2024 8:55 AM
To:IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: VTOCs vs. catalogs

Hi Rex,
"...Followed by SMS and VVDS for non-VSAM datasets ..."
This was meant (AFAIK) to state that VVDS for Non-VSAMs came into use with 
SMS-Controlled DASD Volumes.
It is also true that VVDSs were introduced with ICF Catalogs (circa 1981, 
recalled and re-released in 1982).

Regards,
David

On 2024-05-24 09:44, Pommier, Rex wrote:

Didn't the VVDS come along with the ICF catalog structure?

-Original Message-
From: IBM Mainframe Discussion List   On
Behalf Of Gibney, Dave
Sent: Thursday, May 23, 2024 10:32 PM
To:IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: VTOCs vs. catalogs

All speculation on my part. One system with no DASD, you need neither.
On a system with only one, of just a few DASD volumes, a VTOC is required to 
say where on the volume a dataset is and the basic attributes of PS and PDS 
datasets.

Once you get to several always mounted DASSD volumes, it becomes a pain to need 
to remember and specify VOLSER in the JCL.

CVOLs where an early attempt to solve this problem. Then came  VSAM
(and VVDS?) and VSAM Catalogs, and somewhile later ECf/Catalogs.
Followed by SMS and VVDS for non-VSAM datasets


-Original Message-
From: IBM Mainframe Discussion List   On
Behalf Of Mike Schwab
Sent: Thursday, May 23, 2024 8:24 PM
To:IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: VTOCs vs. catalogs

[EXTERNAL EMAIL]

For the most part the catalog lets you locate your dataset no matter
which volume you put it on.
For non-vsam, that is about all that is stored, dataset
characteristics are in the VTOC.
And with non-SMS volumes you can have uncataloged datasets on DASD or
tape.

VSAM came from the Future Systems development as a complete
replacement, Lynn Wheeler has posts about that.
It was cut back to be an addition to MVS, then combined with CVOL
catalogs to ICF.

On Thu, May 23, 2024 at 9:32 PM Phil Smith III   wrote:

I'm curious whether any of you old-timers can explain why we have
both VTOCs and catalogs. I'm guessing it comes down to (a) VTOCs
came first and catalogs were added to solve some problem (what?)
and/or (b) catalogs

were added to save some I/O and/or memory, back when a bit of those
mattered. But I'd like to understand. Anyone?


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


--
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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

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

--
The information contained in this message is confidential, protected from 
disclosure and may be legally privileged. If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful. If you have received this 
communication in error, please notify us immediately by replying to this 
message and destroy the material in its entirety, whether in electronic or hard 
copy format. Thank you.


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

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email 

Re: VTOCs vs. catalogs

[David Spiegel]

Hi Rex,
"...Followed by SMS and VVDS for non-VSAM datasets ..."
This was meant (AFAIK) to state that VVDS for Non-VSAMs came into use 
with SMS-Controlled DASD Volumes.
It is also true that VVDSs were introduced with ICF Catalogs (circa 
1981, recalled and re-released in 1982).


Regards,
David

On 2024-05-24 09:44, Pommier, Rex wrote:

Didn't the VVDS come along with the ICF catalog structure?

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Gibney, Dave
Sent: Thursday, May 23, 2024 10:32 PM
To:IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: VTOCs vs. catalogs

All speculation on my part. One system with no DASD, you need neither.
On a system with only one, of just a few DASD volumes, a VTOC is required to 
say where on the volume a dataset is and the basic attributes of PS and PDS 
datasets.

Once you get to several always mounted DASSD volumes, it becomes a pain to need 
to remember and specify VOLSER in the JCL.

CVOLs where an early attempt to solve this problem. Then came  VSAM (and VVDS?) 
and VSAM Catalogs, and somewhile later ECf/Catalogs. Followed by SMS and VVDS 
for non-VSAM datasets


-Original Message-
From: IBM Mainframe Discussion List  On
Behalf Of Mike Schwab
Sent: Thursday, May 23, 2024 8:24 PM
To:IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: VTOCs vs. catalogs

[EXTERNAL EMAIL]

For the most part the catalog lets you locate your dataset no matter
which volume you put it on.
For non-vsam, that is about all that is stored, dataset
characteristics are in the VTOC.
And with non-SMS volumes you can have uncataloged datasets on DASD or
tape.

VSAM came from the Future Systems development as a complete
replacement, Lynn Wheeler has posts about that.
It was cut back to be an addition to MVS, then combined with CVOL
catalogs to ICF.

On Thu, May 23, 2024 at 9:32 PM Phil Smith III  wrote:

I'm curious whether any of you old-timers can explain why we have
both VTOCs and catalogs. I'm guessing it comes down to (a) VTOCs
came first and catalogs were added to solve some problem (what?)
and/or (b) catalogs

were added to save some I/O and/or memory, back when a bit of those
mattered. But I'd like to understand. Anyone?



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



--
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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

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

--
The information contained in this message is confidential, protected from 
disclosure and may be legally privileged. If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful. If you have received this 
communication in error, please notify us immediately by replying to this 
message and destroy the material in its entirety, whether in electronic or hard 
copy format. Thank you.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email tolists...@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: HLASM IDF ddnames

[David Spiegel]

Hi Bruce,
//SYSUT2 and //SYSUT3 are useless in the Assembler Step.
I would also change SYSDA to SYSALLDA (so that it will work in any shop).

Regards,
David

On 2024-05-17 00:16, Bruce Hewson wrote:

Hello Shmuel,

Below are my JCL for building ASMLANGX file and REXX exec to start IDF - along 
with PROFILE to setup session, I use 62x160 screen size.

Hope it helps.

Bruce


On Thu, 16 May 2024 11:24:25 +, Seymour J Metz  wrote:


Cross-posted to ASSEMBLER-LIST, IBM-MAIN.

Is there a list of all the ddnames used by IDF and their functions? The manual 
has a section on optional files, but it is missing, e.g., the macro library 
ASM. I tried checking the index, with no luck.

BTW, why did IBM drop the RCF e-mailadddress? It was an easy, robust way to 
submit comments.

--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
עַם יִשְׂרָאֵל חַי
נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר


//ITSXSA3M JOB (ACCT#),'BRUCE HEWSON',
// CLASS=U,
// MSGCLASS=W
//*
//*
//ASMLINK  PROC MBR=,LKPARM='LET,LIST,NCAL,MAP,TEST'
//*
//ASMOPT   EXEC PGM=ASMA90,PARM='OBJ,ADATA,TEST',COND=(0,NE)
//SYSPRINT DD  SYSOUT=*
//SYSUT1   DD  UNIT=SYSDA,SPACE=(1700,(600,100))
//SYSUT2   DD  UNIT=SYSDA,SPACE=(1700,(300,50))
//SYSUT3   DD  UNIT=SYSDA,SPACE=(1700,(300,50))
//SYSLIB   DD  DISP=SHR,DSN=ITSXSA3.USER.SOURCE
// DD  DISP=SHR,DSN=SYS1.SASMMAC2
// DD  DISP=SHR,DSN=SYS1.MACLIB
// DD  DISP=SHR,DSN=SYS1.MODGEN
// DD  DISP=SHR,DSN=ITSXSA3.USER.MACLIB
//SYSINDD  DISP=SHR,DSN=ITSXSA3.USER.SOURCE(&MBR.)
//SYSADATA DD  DISP=SHR,DSN=ITSXSA3.USER.SYSADATA(&MBR.)
//SYSPUNCH DD  DUMMY
//SYSLIN   DD  DISP=(NEW,PASS),DSN=&&OPTTBL,
// UNIT=SYSDA,SPACE=(80,(200,50))
//*
//LNKOPT   EXEC PGM=IEWL,PARM='&LKPARM.',COND=(8,LE,ASMOPT)
//SYSPRINT DD  SYSOUT=*
//SYSUT1   DD  UNIT=SYSDA,SPACE=(1700,(600,100))
//SYSLIB   DD  DISP=SHR,DSN=ITSXSA3.USER.LOAD
//SYSLMOD  DD  DISP=SHR,DSN=ITSXSA3.USER.LOAD(&MBR.)
//SYSLIN   DD  DISP=(OLD,DELETE),DSN=&&OPTTBL
//*
//*
//ASMLANGX EXEC PGM=ASMLANGX,
//   PARM='&MBR (ASM LOUD ERROR'
//SYSPRINT DD  SYSOUT=*
//SYSADATA DD  DISP=SHR,DSN=ITSXSA3.USER.SYSADATA
//ASMLANGX DD  DISP=SHR,DSN=ITSXSA3.USER.ASMLANGX
//STEPLIB  DD  DISP=SHR,DSN=SYS1.SASMMOD2
//*
// PEND
//*
//HOW  EXEC ASMLINK,MBR=HOW
//

REXX exec TESTHOW
/*>Insert your program name here<*/
  module_name = "HOW"
/*> <*/
  Parse Arg parmlist
   "ALLOC F(ASM)  DS(ASMIDF.PROFILE)SHR REUS"
   "ALLOC F(CMDLOG)   DS(ASMIDF.CMDLOG) SHR REUS"
   "ALLOC F(ASMLANGX) DS('ITSXSA3.USER.ASMLANGX')   SHR REUS"
   "ALLOC F(ASMLOADX) DS('ITSXSA3.USER.LOAD'   " ,
"  " ,
 ") SHR REUS"

   "ASMIDF" module_name ,

   "( AUTOLOAD LIBE ASMLOADX PATH CMDLOG PRO" module_name ,
   "/ " parmlist

   "FREE F(ASM CMDLOG ASMLANGX ASMLOADX)"

  Return

  BROWSEITSXSA3.ASMIDF.PROFILE(HOW)
* Top o
'OREGS'
'MOVE OREGS 1 80'
'REGS'
'OPTIONS'
'MOVE OPTIONS 9 80'
'DISASM'
'STMTSTEP'
'OPEN DUMP'
'MOVE DUMP 15 80'
'OPEN DUMP'
'MOVE =6 30 80'
'FOLLOW =5 R13'
'FOLLOW =6 R11'
'DBREAK (HOW) HOW+80 '
 Bottom

--
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: Mainframe performance tool replacement

[David Spiegel]

IZPCA is not exactly the same, but, is functionally equivalent.

On 2024-05-07 09:20, raji ece wrote:

Hello All,

Good Day!

We have been running with SAS and MICS software to analysis system
performance and to produce reports on daily basis.

There is a situation to come out of using SAS due to many reasons.

We would like to know the alternate product for this SAS and MICS.

Any suggestions please.

Regards,
Raji M

--
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: ./ ADD - which utility?

[David Spiegel]

Hi Gil,
Please see PDSLOAD (CBT File 093).

Regards,
David

On 2024-04-14 09:04, Paul Gilmartin wrote:

On Sat, 13 Apr 2024 20:01:50 -0500, Mike Schwab wrote:


You can set it up for a //SYSIN DD DATA,DLM='??' and add the
'??'
Card at the end.


That's not enough.  If the input PDS contains a member with a line
beginning with "./", which is likely in JCL with instream data,
IEBUPDTE will improperly treat it as a command, not data.

A similar problem arises if a data line begins with "??".

And no DLM is safe to use with instream XMIT output.




On Sat, Apr 13, 2024 at 6:52 PM Paul Gilmartin wrote:

On Sun, 14 Apr 2024 08:34:30 +1000, Wayne Bickerdike wrote:


I have some REXX code that extracts all members of a PDS and writes it to a
sequential file. Each member extracted is prefixed with the ./ADD card with
the original member name. Handy for moving a PDS to another system.
IEBUPDTE was the utility of choice when all we had was a card punch and
card reader. (1975).


Have you just rediscovered IEBPTPCH?

How does this work if your input PDS is a JCL library containing some
jobs with IEBUPDTE steps with instream commands?


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

Re: Program to split a jobs output

[David Spiegel]

Hi Bob,
They were going to let it go, but, apparently Triangle Systems bought it 
in November '23.

Sorry for any increase in blood pressure.

Regards,
David

On 2024-04-09 20:28, Bob Bridges wrote:

Ack!  When?  Why??  IOF was always my favorite, though I haven't seen it in a 
decade or two.

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* It would be nice to spend billions on schools and roads, but right now that 
money is desperately needed for political ads.  -Andy Borowitz */

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
David Spiegel
Sent: Tuesday, April 9, 2024 08:28

IOF - But it's going away

--- On 2024-04-09 08:15, Allan Staller wrote:

Several commercial products do this . CA-DELIVER, INFOPAC (probably a couple of 
more I am not familiar with.

--
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: Program to split a jobs output

[David Spiegel]

IOF - But it's going away

On 2024-04-09 08:15, Allan Staller wrote:

Classification: Confidential

Several commercial products do this . CA-DELIVER, INFOPAC (probably a couple of 
more I am not familiar with.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of ??? 
?? ???
Sent: Tuesday, April 9, 2024 3:43 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Program to split a jobs output

[CAUTION: This Email is from outside the Organization. Unless you trust the 
sender, Don't click links or open attachments as it may be a Phishing email, 
which can steal your Information and compromise your Computer.]

Hi,
Today I had to sent a jobs output to IBM to help determine a problem.
The jobs had 11 sysout datasets, and I wanted to send each one individually.

Does anyone know of a program to do this automagically, before I see how 
complicated it would be to write one?

Gadi

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

The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only. E-mail transmission is not guaranteed to be 
secure or error-free as information could be intercepted, corrupted, lost, 
destroyed, arrive late or incomplete, or may contain viruses in transmission. 
The e mail and its contents (with or without referred errors) shall therefore 
not attach any liability on the originator or HCL or its affiliates. Views or 
opinions, if any, presented in this email are solely those of the author and 
may not necessarily reflect the views or opinions of HCL or its affiliates. Any 
form of reproduction, dissemination, copying, disclosure, modification, 
distribution and / or publication of this message without the prior written 
consent of authorized representative of HCL is strictly prohibited. If you have 
received this email in error please delete it and notify the sender 
immediately. Before opening any email and/or attachments, please check them for 
viruses and other defects.


--
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: Slow FTP's

[David Spiegel]

Hi Max,
XMIT??? ... They would probably exceed some limit long before the 
transmission begins.


Regards,
David

On 2024-03-28 09:57, Massimo Biancucci wrote:

  Dave,

did you try the basic PING and TRACERTE to see if there's anything
different ?
Is it a basic FTP ? SFTP ? FTPS ?

Did you try with XMIT through JNE (if available) to measure any difference ?

Best regards.
Max

Il giorno gio 28 mar 2024 alle ore 14:54 Styles, Andy (CIO GS&S - Core
Infrastructure & IT Operations ) <
00d68f765d25-dmarc-requ...@listserv.ua.edu> ha scritto:


Classification: Public

Do you have access to any other kind of transfer mechanism, and if so,
does it happen with that too? (thinking Connect:Direct for example).
Is the target device of the transfer the same on fast vs slow?

Andy Styles
z/Series Systems Programmer

-Original Message-
From: IBM Mainframe Discussion List  On Behalf
Of Jousma, David
Sent: Thursday, March 28, 2024 1:14 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Slow FTP's

*** This email is from an external source - be careful of attachments and
links. Please report suspicious emails ***

There is, but same for all lpars involved.

Dave Jousma
Vice President | Director, Technology Engineering





From: IBM Mainframe Discussion List  on behalf
of Joe Monk <05971158733e-dmarc-requ...@listserv.ua.edu>
Date: Thursday, March 28, 2024 at 9:12 AM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Slow FTP's
Is there a firewall or switch in the path? Joe On Thu, Mar 28, 2024 at 8:
03 AM Jousma, David < 01a0403c5dc1-dmarc-request@ listserv. ua. edu>
wrote: > Joe, > > I had not, just did, worse yet > > EZA1485I 12902400 bytes


Is there a firewall or switch in the path?



Joe



On Thu, Mar 28, 2024 at 8:03 AM Jousma, David <

01a0403c5dc1-dmarc-requ...@listserv.ua.edu> wrote:




Joe,
I had not, just did, worse yet
EZA1485I 12902400 bytes transferred - 10 second interval rate 1281.27
KB/sec - Overall transfer rate 1281.27 KB/sec
EZA1485I 21381120 bytes transferred - 10 second interval rate 838.65
KB/sec - Overall transfer rate 1059.52 KB/sec
EZA1485I 29491200 bytes transferred - 10 second interval rate 791.23
KB/sec - Overall transfer rate 969.15 KB/sec
Dave Jousma
Vice President | Director, Technology Engineering
From: IBM Mainframe Discussion List  on
behalf
of Joe Monk <05971158733e-dmarc-requ...@listserv.ua.edu>
Date: Thursday, March 28, 2024 at 8:56 AM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Slow FTP's
Have you tried MODE S (streaming) and TYPE E? Joe On Thu, Mar 28, 2024
at
7: 31 AM Jousma, David < 01a0403c5dc1-dmarc-request@ listserv. ua.
edu> wrote: > All, > > Grasping at straws here, IBM support center is
baffled too. >
Have you tried MODE S (streaming) and TYPE E?
Joe
On Thu, Mar 28, 2024 at 7:31 AM Jousma, David <
01a0403c5dc1-dmarc-requ...@listserv.ua.edu> wrote:

All,
Grasping at straws here, IBM support center is baffled too.
To clone z/OS maintenance to various disconnected sysplex’s I do a
DFDSS
dump, and FTP it everywhere it needs to be.  Its roughly a 50Gb file
transfer.  There is some environmental issue causing slow file
transfers

to

some systems (40mb’s a sec) and fast file transfers (150Mb/sec) to
other
systems on the same CEC.With IBM support help, we’ve narrowed down

the

problem to the specification of MODE B and EBCDIC on the transfer
since

it

is a DSS dump.   Remove those, and the transfer is fast on the slow
systems, and still fast on the fast systems.  Obviously that isn’t a
solution though.
So, we are a GDPS shop.   The oddity is that all the “fast” transfers

are


to the K systems(control systems), and all the “slow” transfers are
to

the

traditional application systems.   TEST, DEV, PROD makes no difference,

nor

does LPAR busy or not busy.
It seems there is something configured differently on the “slow”
systems
that is affecting mode b, ebcdic file transfers, but for the life of
me,

I

cannot put my finger on what, nor can the support center, except
that the
issue is at the remote end, in that the OS cannot offload the data
fast
enough, so TCPIP/FTP is slowing the transfer pace.
A virtual adult beverage of choice to the one that can point in a
direction to look….
Dave Jousma
Vice President | Director, Technology Engineering
This e-mail transmission contains information that is confidential
and

may

be privileged.   It is intended only for the addressee(s) named above.

If


you receive this e-mail in error, please do not read, copy or
disseminate
it in any manner. If you are not the intended recipient, any
disclosure,
copying, distribution or use of the contents of this information is
prohibited. Please reply to the message immediately by informing the

sender

that the message was misdirected. After replying, please erase it
from

your

computer system. Your assistance in correcting this error is

appreciated.



--
For IBM-MAIN subscribe / signoff / archive access 

Re: Ideas for less-distruptive disruptions - Netmaster:Solve and CICS

[David Spiegel]

Hi Tom,
I logged in with SHARE Userid/Password before asking the question.

Regards,
David

On 2024-03-25 08:29, Tom Marchant wrote:

SHARE proceedings are available to SHARE members only. Log in with your SHARE 
user ID.



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

Re: Ideas for less-distruptive disruptions - Netmaster:Solve and CICS

[David Spiegel]

Hi Wayne,
I followed the link and saw the description.
How do I access the content?

Thanks and regards,
David

On 2024-03-25 01:26, Wayne Bickerdike wrote:

Tom Longfellow.

I presented a session at Share in Phoenix in 2019 on the subject of CICS
transactions written in REXX.

https://www.share.org/Events/Past-Events/Proceedings/Proceeding-Details/cics-and-rexx-some-useful-tips-and-tricks

The capability has been around for years. Just happens that nobody bothers
to install the feature (unless it's me, LOL).




On Fri, Mar 22, 2024 at 6:35 AM Sri Hari Kolusu  wrote:


I see a lot more research in my future.

Tom,

Here is something to get you started.

https://www.ibm.com/docs/en/cics-ts/beta?topic=server-rexxcics-commands

Thanks,
Kolusu

--
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: security and privacy for the 21st century

[David Spiegel]

Hi Dave,
Do you know Bill Johnson?
(Your scholastic experience sounds a lot like his.)

Regards,
David

On 2024-03-22 20:26, Dave Beagle wrote:

Kids in America are too busy playing video games to learn Math which requires 
effort. I have numerous awards for Algebra and Geometry from tests in Ohio in 
the early 70’s. Plus a Math and Computer Science degree in the late 70’s. It 
has served me well.

Just 7 percent of U.S. students scored at the highest levels in math, compared 
with 23 percent in Japan and South Korea, and 41 percent in Singapore, the 
top-performing country.


Sent from Yahoo Mail for iPhone


On Friday, March 22, 2024, 4:33 PM, David L. Craig 
<04bf64bb3334-dmarc-requ...@listserv.ua.edu> wrote:

On 24Mar22:1105-0400, Rick Troth wrote:


Why don't we teach the kids basic LOGIC in school??

Well, it seems math in general is being learned much less
well than decades ago in the USA.  Maybe the solution is
a gottah-beat-it math/logic skills-based computer game.


May the LORD God bless you exceedingly abundantly!

Dave_Craig__
"So the universe is not quite as you thought it was.
  You'd better rearrange your beliefs, then.
  Because you certainly can't rearrange the universe."
__--from_Nightfall_by_Asimov/Silverberg_

--
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


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

Re: TSO ALLOC with/wo unit

[David Spiegel]

Hi Leonard,
In the case of an uncataloged Dataset, it would be necessary.

Regards,
David

On 2024-03-20 04:44, Leonard D Woren wrote:
Specifying VOLUME more or less always requires specification of UNIT. 
Ignoring SMS altering the historic behavior, there is a "default 
unitname" associated with each userid.  For ALLOC VOL to work without 
UNIT, the VOL specified must be within the set of devices covered by 
that default unitname.


I think it doesn't matter that it's an existing data set.

Why are you specifying VOL for an existing data set???

/Leonard


Itschak Mugzach wrote on 3/20/2024 1:28 AM:

GAdi,

Does this rule apply to existing datasets? The allocation request was 
for

existing datasets not new.

*| **Itschak Mugzach | Director | SecuriTeam Software **|** IronSphere
Platform* *|* *Information Security Continuous Monitoring for Z/OS, 
zLinux

and IBM I **|  *

*|* *Email**: i_mugz...@securiteam.co.il **|* *Mob**: +972 522 986404 
**|*
*Skype**: ItschakMugzach **|* *Web**: 
http://www.securiteam.co.il/ 
**|*






On Wed, Mar 20, 2024 at 9:17 AM Gadi Ben-Avi  wrote:


As far as I know, If you do not specify a UNIT Type, it will look for
volumes that are STORAGE.
If there aren't any, the allocation will fail.

-Original Message-
From: IBM Mainframe Discussion List  On 
Behalf

Of ITschak Mugzach
Sent: יום ד 20 מרץ 2024 08:57
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: TSO ALLOC with/wo unit

[Some people who received this message don't often get email from
05a7ced721d8-dmarc-requ...@listserv.ua.edu. Learn why this is
important at https://aka.ms/LearnAboutSenderIdentification ]

I have a program in Rexx that allocates a dataset using dsname and 
volume

serial (1) . it works well in my shop but requires a unit type (2) in
another shop. Actually the error is msg "IKJ56241I SPECIFIED UNIT IS
UNDEFINED".
Why does 1 work here and fails in another shop?

    1. ALLOC F(XXX) DA('dsname') VOLUME(volser)
    2. ALLOC F(XXX) DA('dsname') VOLUME(volser) UNIT(390)

ITschak

ITschak Mugzach
*|** IronSphere Platform* *|* *Information Security Continuous 
Monitoring

for z/OS, x/Linux & IBM I **| z/VM coming soon  *

--
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


--
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


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

Re: TSO ALLOC with/wo unit

[David Spiegel]

HI Mike,
3390 (and SYSALLDA) do not depend upon HCD.
"I/O gen"? -- There has not been one since MVS/ESA V5. (MVS/ESA 4.3 was 
the last one to support it.)


Regards,
David

On 2024-03-20 04:52, Mike Schwab wrote:

UNIT is defined in the I/O gen and is customized by each site.  3390,
SYSDA, etc may or may not be present.

On Wed, Mar 20, 2024 at 1:57 AM ITschak Mugzach
<05a7ced721d8-dmarc-requ...@listserv.ua.edu> wrote:

I have a program in Rexx that allocates a dataset using dsname and volume
serial (1) . it works well in my shop but requires a unit type (2) in
another shop. Actually the error is msg "IKJ56241I SPECIFIED UNIT IS
UNDEFINED".
Why does 1 work here and fails in another shop?

1. ALLOC F(XXX) DA('dsname') VOLUME(volser)
2. ALLOC F(XXX) DA('dsname') VOLUME(volser) UNIT(390)

ITschak

ITschak Mugzach
*|** IronSphere Platform* *|* *Information Security Continuous Monitoring
for z/OS, x/Linux & IBM I **| z/VM coming soon  *

--
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: Learning one's tools

[David Spiegel]

Hi Tom,
Not new/difficult, but, must be used appropriately or it can cause 
performance issues.
When I worked at SIAC (NYSE) 2004-2010, one of the last mainframe 
activities I did was to look into why 6 Batch Jobs (run nightly) took 
over the machine to the point that TSO response time was painfully slow 
(after 1st period).  The original programmer decided to use UNSTRING to 
build CSV Data out of records from a KSDS. On a hunch, I rewrote the 
UNSTRING call in Assembler. The run times of these 6 (similar) Jobs went 
from 6 hours to just over a half hour.


Regards,
David

On 2024-03-15 16:55, Tom Harper wrote:

I used STRING / UNSTRING back in the early 1970s it’s not new nor difficult.

Unbelievable.

Tom Harper
Phoenix Software International

Sent from my iPhone


On Mar 15, 2024, at 4:20 PM, Farley, Peter 
<031df298a9da-dmarc-requ...@listserv.ua.edu> wrote:

+1 from me on continuing to learn the tools of our profession.  I use STRING 
and UNSTRING where they make sense, and I am still learning new things about 
their use every now and then.  Life-long learning is the only path to happiness 
and success.

I got the same ridiculous pushback from a senior manager one time on the use of 
“sophisticated” SORT verbs like JOIN because “. . . no one but you will know 
how to fix it when it breaks . . . let someone do it in COBOL instead . . .”.

Peter

From: IBM Mainframe Discussion List  On Behalf Of Bob 
Bridges
Sent: Friday, March 15, 2024 12:38 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Learning one's tools


To rant on a related subject, I once worked at a company that instituted code reviews; a 
new program would be gone over by a half-dozen coworkers to be sure it adhered to local 
standards.  This sort of thing is always painful to the coder, and nevertheless (I admit 
reluctantly) can have considerable value if done right.  One problem I had with it, 
though, is that the standards we created for ourselves admitted that there are times when 
exceptions should be made for special cases, and yet when those cases arose no exceptions 
were ever allowed; the team invariably flinched, leaned back in their seats and said 
"no, that's not according to our standards".



One particular example always rankled:  Whenever someone felt the need to use a 
STRING or UNSTRING command (I should have said we were COBOL developers), the 
team always struck it down on the grounds that STRING and UNSTRING are unusual 
commands and some COBOL coders would be unfamiliar with it.  My contention here 
is that that's absolutely true, and it's the job of the COBOL coder to ~learn~ 
the STRING and UNSTRING statements, as tools of his profession.  I never 
persuaded anyone to that view, though.



---



This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communic



This e-mail message, including any attachments, appended messages and the
information contained therein, is for the sole use of the intended
recipient(s). If you are not an intended recipient or have otherwise
received this email message in error, any use, dissemination, distribution,
review, storage or copying of this e-mail message and the information
contained therein is strictly prohibited. If you are not an intended
recipient, please contact the sender by reply e-mail and destroy all copies
of this email message and do not otherwise utilize or retain this email
message or any or all of the information contained therein. Although this
email message and any attachments or appended messages are believed to be
free of any virus or other defect that might affect any computer system into
which it is received and opened, it is the responsibility of the recipient
to ensure that it is virus free and no responsibility is accepted by the
sender for any loss or damage arising in any way from its opening or use.

--
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: SMP Packaging a PTF module replacement.

[David Spiegel]

Hi Joe,
Please list the messages too.

Regards,
David

On 2024-02-21 08:00, Joe DeChirico wrote:

Hi,

I have been trying to package a ptf using smpe and appear to be missing 
something, I have attached the job that I submitting Can anyone give me some 
idea about what I am doing wrong?



--
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: zsh for z/OS

[David Spiegel]

Hi Frank,
There's always that ubiquitous "or something". {;}->

Regards,
David

On 2024-02-16 16:35, Frank Swarbrick wrote:

Interesting.  So it looks like (just guessing!) bash isn't able to find 
external links when following the PATH.  Or something.

Frank

From: IBM Mainframe Discussion List  on behalf of Michael 
Babcock <05ad4e2d7232-dmarc-requ...@listserv.ua.edu>
Sent: Friday, February 16, 2024 1:51 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: zsh for z/OS

I can also cd into the bin directory and issue ./netstat and it works.

On Fri, Feb 16, 2024 at 2:33 PM Frank Swarbrick 
wrote:


Here's a bit of an off the wall question/request.

Do both 'netstat' and 'onetstat' work in zsh?

In bash, only 'onetstat' works.  I think that bash under z/OS is unable to
follow executables with the 'e' file type (external link).


ls -FalTHp /bin/netstat /bin/onetstat

 erwxrwxrwx 1 BPXROOT  OMVSGRP8 Jun  1
2021 /bin/netstat -> ONETSTAT

 lrwxrwxrwx 1 BPXROOT  OMVSGRP   29 Jun  1
2021 /bin/onetstat -> ../usr/lpp/tcpip/bin/onetstat

Frank


From: IBM Mainframe Discussion List  on behalf
of Ed Jaffe <05acc3c79bf7-dmarc-requ...@listserv.ua.edu>
Sent: Friday, February 16, 2024 12:48 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: zsh for z/OS

On 2/16/2024 11:33 AM, Frank Swarbrick wrote:

z/OS 3.1 added the Z Shell, zsh.  Is anyone using it?  How do you like

it.  What interesting features does it have over bash?

I'm only at 2.5, so can't use it.

I am using it. After all, what self-respecting z/OS advocate doesn't
want to use a shell called Z?

I'm not a power user. Not doing anything I couldn't also do in bash...

--
Phoenix Software International
Edward E. Jaffe
831 Parkview Drive North
El Segundo, CA 90245
https://www.phoenixsoftware.com/




This e-mail message, including any attachments, appended messages and the
information contained therein, is for the sole use of the intended
recipient(s). If you are not an intended recipient or have otherwise
received this email message in error, any use, dissemination, distribution,
review, storage or copying of this e-mail message and the information
contained therein is strictly prohibited. If you are not an intended
recipient, please contact the sender by reply e-mail and destroy all copies
of this email message and do not otherwise utilize or retain this email
message or any or all of the information contained therein. Although this
email message and any attachments or appended messages are believed to be
free of any virus or other defect that might affect any computer system
into
which it is received and opened, it is the responsibility of the recipient
to ensure that it is virus free and no responsibility is accepted by the
sender for any loss or damage arising in any way from its opening or use.

--
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


--
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


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

Re: Reading a scratch tape

[David Spiegel]

Hi Doug,
You said: "... Clearly this is going to ..."
If the user is PErmitted to use BLP (via the ESM and JES2 JOBCLASS) not 
so "clear".


Regards,
David

On 2024-02-07 10:00, Doug Fuerst wrote:
Clearly this is going to have to be marked as Master or User in the 
library and Control-M. RMM it is fairly easy, not sure about 
Control-M. The 7700 should also be no issue.


Doug Fuerst
d...@bkassociates.net


-- Original Message --

From "Gadi Ben-Avi" 

To IBM-MAIN@LISTSERV.UA.EDU
Date 2/7/2024 7:13:00 AM
Subject Re: Reading a scratch tape


When I did that, I got these messages:
IGD330I ERROR OCCURRED DURING CBRXLCS PROCESSING-
FOR DATA SET
VOLUME REQUESTED BY SPECIFIC VOLUME SERIAL IS A SCRATCH VOLUME
THE FAILING VOLSER IS P18488
IGD306I UNEXPECTED ERROR DURING ?CBRXLCS PROCESSING
RETURN CODE 8 REASON CODE 51

Gadi

-Original Message-
From: IBM Mainframe Discussion List  On 
Behalf Of Doug Fuerst

Sent: יום ד 07 פברואר 2024 14:05
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Reading a scratch tape

[You don't often get email from d...@bkassociates.net. Learn why this 
is important at https://aka.ms/LearnAboutSenderIdentification ]


Yes. Just use a VOL=SER reference for the tape, and refer to the file 
by DSN.
My guess is most of us has hit this issue, and it really is not that 
difficult. I've done it many times.


Doug Fuerst
d...@bkassociates.net


-- Original Message --
From "Gadi Ben-Avi" 
To IBM-MAIN@LISTSERV.UA.EDU
Date 2/7/2024 6:45:39 AM
Subject Reading a scratch tape


Hi,
We've been asked to attempt to read a file from a scratched tape.

We use Control-M/Tape as our tape management system.
The tapes are virtual 3490's stored on a TS7770.
The tape has many files, but we only need once specific one.
If it matters, the file is the output of DB/2 backup.

Is this possible?

Thanks

Gadi


--
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


--
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


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

Re: Reading a scratch tape

[David Spiegel]

Hi Gadi AMV"SH,
Assuming that your ESM and JES allow BLP, you could do something like,
//SYSUT1 DD DISP=SHR,
// UNIT=TAPE,
// VOL=SER=123456,
// LABEL=(n,BLP,EXPDT=98000),
// DSN=A,B

To calculate "n" ... (3*File Number) - 1
e.g. If you want File 1, n=2
If you want File 2, n=5

Chodesh Tov

Regards,
David

On 2024-02-07 06:45, Gadi Ben-Avi wrote:

Hi,
We've been asked to attempt to read a file from a scratched tape.

We use Control-M/Tape as our tape management system.
The tapes are virtual 3490's stored on a TS7770.
The tape has many files, but we only need once specific one.
If it matters, the file is the output of DB/2 backup.

Is this possible?

Thanks

Gadi


--
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: Antiquarian Curiosity: Pre-MVS/XA Mount Command for DASD Volumes

[David Spiegel]

Hi Michael,
M cuu,VOL=(SL,volser),USE=STORAGE (or PUBLIC, PRIVATE)

Regards,
David

On 2024-02-01 11:42, Michael Watkins wrote:

Before MVS/XA and RAID DASD, offline DASD volumes (e.g. 3330, 3350 & 3380 
units) had to be mounted instead of simply being varied online. The mount command 
used the volser of the offline DASD volume as a parameter.

Does anyone remember the format of the mount command?

Does anyone have the documentation in .pdf format?

--
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: How can I determine the User Name associated with the current Batch JOB RACF ID?

[David Spiegel]

Hi Cameron,
Can you please send me the source of your working program?
My email address is da...@ddstar.com

Thanks and regards,
David

On 2024-01-29 16:49, Cameron Conacher wrote:

Thanks everyone,
This is just what I needed.

Appreciate the help.


Thanks

…….Cameron

From: IBM Mainframe Discussion List  On Behalf Of 
Lars Höglund
Sent: Monday, January 29, 2024 11:10 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Sv: How can I determine the User Name associated with the current 
Batch JOB RACF ID?

Something like this Code Extract: LINKAGE SECTION. 01 CB1. 05 PTR1 POINTER 
OCCURS 512. 01 CVT. 05 CVT1 POINTER OCCURS 512. 01 CB2. 05 PTR2 POINTER OCCURS 
256. . . . SET ADDRESS OF CB2 TO PTR1(4) MOVE CB2(1: 8) TO WS-BJOBNAMN SET 
ADDRESS OF CB2


Something like this



Code Extract:



LINKAGE SECTION.



01 CB1.

   05 PTR1 POINTER OCCURS 512.

01 CVT.

   05 CVT1 POINTER OCCURS 512.

01 CB2.

   05 PTR2 POINTER OCCURS 256.

.

.

.

SET ADDRESS OF CB2  TO PTR1(4)

MOVE CB2(1:8)TO WS-BJOBNAMN

SET ADDRESS OF CB2  TO PTR1(46)

MOVE CB2(361:8)  TO WS-BPGM

SET ADDRESS OF CB2  TO PTR2(80)

MOVE CB2(13:8) TO  BJOBNR

SET ADDRESS OF CB1  TO NULL

SET ADDRESS OF CB1  TO PTR1(138)

SET ADDRESS OF CB2  TO PTR1(28)

MOVE CB2(193:8) TO WS-BUSER







-Ursprungligt meddelande-

Från: IBM Mainframe Discussion List 
mailto:IBM-MAIN@LISTSERV.UA.EDU>> För Cameron Conacher

Skickat: den 29 januari 2024 14:37

Till: IBM-MAIN@LISTSERV.UA.EDU

Ämne: How can I determine the User Name associated with the current Batch JOB 
RACF ID?



[Du f?r inte e-post ofta fr?n 
03cfc59146bb-dmarc-requ...@listserv.ua.edu.
 L?s om varf?r det h?r ?r viktigt p? 
https://aka.ms/LearnAboutSenderIdentification
 ]



Good Morning,

I know I can do this in CICS, but I am digging around to see if this can be 
done in a batch COBOL program.

Basically, I just want to include Fred's Name in a report I generate, where 
Fred is the RACF ID associate with the currently executing Batch JOB. (a COBOL 
program).

I could write something to call out to CICS (EXCI maybe) to get a name.

But I wanted to know if there is anyway to do this by calling some routines 
from my Batch COBOL program.



I am assuming right now, it is not possible since I have come up empty so far.



Thanks





Cameron Conacher

Senior Engineer



American Express Canada Inc.

GCICS

2225 Sheppard Avenue East, Toronto, ON  M2J 5C2



cameron.conac...@aexp.com>

Office: 1-437-836-5265

Mobile: 1-416-409-5147



https://amex.webex.com/join/cameron.conacher









American Express made the following annotations  This e-mail 
was sent to you by a representative of Amex Bank of Canada, P.O. Box 3204, Station 
"F", Toronto, ON, M1W 3W7, 
http://www.americanexpress.ca/.
 If you no longer wish to receive these e-mails, please notify the sender by reply e-mail.



This e-mail is solely for the intended recipient and may contain confidential 
or privileged information. If you are not the intended recipient, any 
disclosure, copying, use, or distribution of the information included in this 
e-mail is prohibited. If you have received this e-mail in error, please notify 
the sender by reply e-mail and immediately and permanently delete this e-mail 
and any attachments. Thank you.



American Express a fait les remarques suivantes Ce courriel vous a ?t? envoy? par un 
repr?sentant de la Banque Amex du Canada, C.P. 3204, succursale F, Toronto (Ontario) 
M1W 3W7, 
http://www.americanexpress.ca/.
 Si, par la suite, vous ne souhaitez plus recevoir ces courriels, veuillez en aviser 
les exp?diteurs par courriel.



Ce courriel est r?serv? au seul destinataire indiqu? et peut renfermer des 
renseignements confidentiels et privil?gi?s. Si vous n'?tes pas le destinataire 
pr?vu, toute divulgation, duplication, utilisation ou distribution du courriel 
est interdite. Si vous avez re?u ce courriel par erreur, veuillez en aviser 
l'exp?diteur par courriel et d?truire imm?diatement le courriel et toute pi?ce 
jointe. Merci.



--

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

Re: ADRDSSU COMPRESS and enq

[David Spiegel]

Hi Radek,
- Run ICKDSF to take the VTOC out of Indexed Format (BUILDOS)
- ZAP the VTOC  (i.e. FORMAT4.DSCB) to change the DSNAME to something 
innocuous.

- Compress via IEBCOPY
- ZAP the DSNAME to SYS1.LINKLIB
- Run ICKDSF to put the VTOC into Indexed Format (BUILDIX)

I've done this, but, not recently.

Here is an article where someone else came up with the same idea:
Deleting a File That Is “In Use” | Steve Baugh - The CICS Guy 
(wordpress.com) 



Regards,
David

On 2024-01-19 07:27, Radoslaw Skorupka wrote:
I want to compress some system datasets like SYS1.LINKLIB, but *not* 
real "live", rather offline copies.

DSS ends with RC8, because of failed serialization.
SETPROG LNKLST,UNALLOCATE will not solve all the enqueues, because 
some datasets are serialized by other entities like TSO users.


And I also want to CONSOLIDATE some datasets as well.


Any clue?



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

Re: Why do I have IEE159E MESSAGE WAITING

[David Spiegel]

Hi Jon,
Coding DEL=R gets rid of the console flooding (no matter the cause)

My point is that ROUTCODE(ALL) is not the only way to flood a console. 
It can also happen if a badly behaving JOB/STC/TSU frequently puts out 
too many WTOs/WTORs.


Regards,
David

On 2024-01-02 14:43, Jon Perryman wrote:

On Tue, 2 Jan 2024 12:55:37 -0500, David Spiegel  
wrote:


There are ways to flood the console other than ROUTCODE(ALL).

What is your point? Clearly, the OP doesn't understand console flooding 
otherwise he would not have ROUTCDE(ALL).
I gave the OP what he needs to learn to understand why he is getting the 
IEE159E.

ROUTCDE(ALL) is never used by tape drive operator consoles nor the main 
operator console. What hardware console finds ROUTCDE(ALL) useful. Starting an 
STC can generate 1,000 messages which take more than 1 minute to automatically 
clear from a ROUTCDE(ALL) console causing IEE159E  to be on the console for 1 
minute because of RTME(1).

For someone to be bothered by IEE159 caused by ROUTCDE(ALL), they are using it 
for something unusual. In this case, my guess is that he's testing generic 
abend recovery but instead of using SDSF SYSLOG, he's using a hardware console.

--
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: Why do I have IEE159E MESSAGE WAITING

[David Spiegel]

Hi Doug,
What makes you think that it was altered?

Regards,
David



From: IBM Mainframe Discussion List  on behalf of 
Doug 
Sent: January 2, 2024 12:25 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Why do I have IEE159E MESSAGE WAITING

Use the ‘K S’ command at the console to verify the parmlib setting has not been 
altered.
Doug
.

On Jan 2, 2024, at 12:11, Seymour J Metz  wrote:

What is the status of each message line? Or provide a screen shot.

--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
עַם יִשְׂרָאֵל חַי
נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר


From: IBM Mainframe Discussion List  on behalf of 
Joseph Reichman 
Sent: Tuesday, January 2, 2024 11:36 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Why do I have IEE159E MESSAGE WAITING

HI

I have the following message on the console

IEE612I CN=C908 DEVNUM=0908 SYS=S0W1





IEE163I MODE= RD   IEE159E MESSAGE
WAITING

Looking at my parmlib definition

I have CON(N) and DEL(RD)

Wondering why this happening

CONSOLE
 DEVNUM(908)
 AUTH(MASTER)
 CON(N)
 DEL(RD)
 MFORM(J,T)
 MONITOR(JOBNAMES-T)
 NAME(C908)
 PFKTAB(PFKTAB1)
 RNUM(19)
 ROUTCODE(ALL)
 RTME(1)
 SEG(14)


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

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


From: IBM Mainframe Discussion List  on behalf of 
Doug 
Sent: January 2, 2024 12:25 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Why do I have IEE159E MESSAGE WAITING

Use the ‘K S’ command at the console to verify the parmlib setting has not been 
altered.
Doug
.

On Jan 2, 2024, at 12:11, Seymour J Metz  wrote:

What is the status of each message line? Or provide a screen shot.

--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
עַם יִשְׂרָאֵל חַי
נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר


From: IBM Mainframe Discussion List  on behalf of 
Joseph Reichman 
Sent: Tuesday, January 2, 2024 11:36 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Why do I have IEE159E MESSAGE WAITING

HI

I have the following message on the console

IEE612I CN=C908 DEVNUM=0908 SYS=S0W1





IEE163I MODE= RD   IEE159E MESSAGE
WAITING

Looking at my parmlib definition

I have CON(N) and DEL(RD)

Wondering why this happening

CONSOLE
 DEVNUM(908)
 AUTH(MASTER)
 CON(N)
 DEL(RD)
 MFORM(J,T)
 MONITOR(JOBNAMES-T)
 NAME(C908)
 PFKTAB(PFKTAB1)
 RNUM(19)
 ROUTCODE(ALL)
 RTME(1)
 SEG(14)


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

--
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: Why do I have IEE159E MESSAGE WAITING

[David Spiegel]

Hi Jon,
There are ways to flood the console other than ROUTCODE(ALL).

Regards,
David

On 2024-01-02 12:49, Jon Perryman wrote:

On Tue, 2 Jan 2024 11:36:34 -0500, Joseph Reichman  
wrote:


I have CON(N) and DEL(RD). Wondering why this happening

The most likely cause is ROUTCODE(ALL) and RTME(1). How you solve this problem 
depends on why you need all messages to that console.

--
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: Why do I have IEE159E MESSAGE WAITING

[David Spiegel]

Hi Joe AMV"SH,
Because all messages on your screen need to be cleared manually, or, use 
DEL(R).


Regards,
David

On 2024-01-02 11:36, Joseph Reichman wrote:

HI

I have the following message on the console

IEE612I CN=C908 DEVNUM=0908 SYS=S0W1

  

  


IEE163I MODE= RD   IEE159E MESSAGE
WAITING

Looking at my parmlib definition

I have CON(N) and DEL(RD)

Wondering why this happening

CONSOLE
   DEVNUM(908)
   AUTH(MASTER)
   CON(N)
   DEL(RD)
   MFORM(J,T)
   MONITOR(JOBNAMES-T)
   NAME(C908)
   PFKTAB(PFKTAB1)
   RNUM(19)
   ROUTCODE(ALL)
   RTME(1)
   SEG(14)


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

Re: SMF Interval

[David Spiegel]

Hi Steve,
JWT too low would cause 522s, not 322s.

Regards,
David

On 2023-12-29 16:51, Steve Beaver wrote:

Sorry my bad. I was the thinking about JWT

Sent from my iPhone

No one said I could type with one thumb


On Dec 29, 2023, at 15:49, Steve Beaver  wrote:

Be careful setting in low. If TSO is
On that system you will have a lot
S322’s

Sent from my iPhone

No one said I could type with one thumb


On Dec 29, 2023, at 15:05, Ed Jaffe  wrote:

On 12/29/2023 1:46 AM, Colin Paice wrote:
With MQ some customers would set the interval to one minute for a period to
get granular statistics and accounting to help with problem determination.
The MQ accounting would report maximum response time for the interval.  If
you have a "spiky" problem,  being able to identify the minute it occurred
in, was very useful, and being able to correlate to other events.
Note:   This can produce a lot of data!

This sounds like something that would be done temporarily. No?

After that, they go back to "normal" and set it to: __ ?

--
Phoenix Software International
Edward E. Jaffe
831 Parkview Drive North
El Segundo, CA 90245
https://www.phoenixsoftware.com/



This e-mail message, including any attachments, appended messages and the
information contained therein, is for the sole use of the intended
recipient(s). If you are not an intended recipient or have otherwise
received this email message in error, any use, dissemination, distribution,
review, storage or copying of this e-mail message and the information
contained therein is strictly prohibited. If you are not an intended
recipient, please contact the sender by reply e-mail and destroy all copies
of this email message and do not otherwise utilize or retain this email
message or any or all of the information contained therein. Although this
email message and any attachments or appended messages are believed to be
free of any virus or other defect that might affect any computer system into
which it is received and opened, it is the responsibility of the recipient
to ensure that it is virus free and no responsibility is accepted by the
sender for any loss or damage arising in any way from its opening or use.

--
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


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

Re: Checking status of multiple datasets in CLIST and REXX

[David Spiegel]

Hi R'Shmuel AMV"SH.
Gut Voch. Ich Vil Dich Freigen Ein Kasho.
You said: "...TSOLIB inline. ..."
What does this mean and why is it better/easier to do this in CLIST than 
in Rexx?


Regards,
David

On 2023-12-29 16:13, Seymour J Metz wrote:

In my case there is a CLIST effectively called from the READY prompt, so the 
TSO environment should be fully initialized.

The reason that it's CLIST is so I can use TSOLIB inline.

--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
עַם יִשְׂרָאֵל חַי
נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר


From: IBM Mainframe Discussion List  on behalf of Paul 
Gilmartin<042bfe9c879d-dmarc-requ...@listserv.ua.edu>
Sent: Friday, December 29, 2023 1:29 PM
To:IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Checking status of multiple datasets in CLIST and REXX

On Fri, 29 Dec 2023 18:10:08 +, Seymour J Metz wrote:


I'm in an applications role and installing external software, e.g., PDS86, is 
not allowed.

I just discovered that I don't even have access to SYS1.SAMPLIB.


!?!?!?  What terrifies them?  "Need to know" gone berserk?  Fear of copyright 
infringement?


I should be able to use any BPXW... service that doesn't require dubbing.


Long ago it was reported here that BPXWDYN failed eary in startup, before a
descriptor not necessarily needed for messages could be created.  That
may have been fixed by APAR.

--
gil

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


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email tolists...@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: Checking status of multiple datasets in CLIST and REXX

[David Spiegel]

Hi KB,
CSI won't tell you anything about ALLOCATEd DDNAMES.

Regards,
David

On 2023-12-29 09:55, kekronbekron wrote:

There's a catalog search interface (CSI), and I think there's a sample REXX for 
using it in SAMPLIB.



On Friday, December 29th, 2023 at 20:17, Seymour J Metz  wrote:



I need to check whether any of a list of datasets exists and whether any of a 
list of ddnames is allocated. I'd rather not trap and parse the output of 
LISTALC and LISTCAT, and I'd rather not call LISTDSI for each one. Is there a 
simple way to do that in REXX, or would it be better to write a small service 
routine in assembler?

I don't have a requirement to handle XTIOT.

--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
עַם יִשְׂרָאֵל חַי
נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר

--
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


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

Re: What is the PDS command?

[David Spiegel]

Hi Gil,
Of course they do.
The PDS Command Processor, however, does it directly in the same Dataset 
without switching panels (REPR Command).


Regards,
David

On 2023-12-27 08:36, Paul Gilmartin wrote:

On Wed, 27 Dec 2023 05:57:03 -0500, David Spiegel wrote:


..,, the ability to copy members (with ISPF Stats) ...


Don't IEBCOPY and ISPF copy (LMMCOPY) both do that?



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

Re: Fwd: What is the PDS command?

[David Spiegel]

Hi Ed,
You and your programmer were not impressed?!
How can you not be impressed by the ability to add Directory Blocks (by 
moving members out of the way), the ability to generate JCL to LinkEdit 
PDS members, the ability to copy members (with ISPF Stats) or the 
ability to recover deleted members (with selection criteria)?

(There are a lot more features.)
SMH.

(I've been using the PDS Command Processor (File 182) for more than 40 
years.)


Regards,
David

On 2023-12-27 04:58, Edward Gould wrote:

HI Roger,
The PDS command as I remember it from 40 years ago did a lot more than 
scanning. It had lots of other capabilities, Some of them were updating (IIRC) 
link date, SSI, and fixed alias issues and about 10 other things. I think it is 
still on the CBTAPE still. My memory was from 40 years ago but I am sure at 
that time it did not support Panvalet. I played around with it for about a week 
and was not to impressed at the time. It may or may not have been updated in 
the last 40 years. I tried to get a programmer interested in it but he was not 
impressed.
Ed


Begin forwarded message:

From: Roger Bolan 
Subject: Re: What is the PDS command?
Date: December 15, 2023 at 6:11:25 PM CST
To: IBM-MAIN@LISTSERV.UA.EDU
Reply-To: IBM Mainframe Discussion List 

It's all built into ISPF nowadays.  I would suggest that it is worth your
time to go through the ISPF Tutorial every time you get a new release.  On
my systems the main ISPF panel has an option 11 for Workplace  ISPF
Object/Action Workplace.   You can also get to by the ISPF command DSLIST.
You can list datasets, append other datasets and save any lists you want.
I construct lots of lists for different projects.  Once I am displaying the
datasets in my list, I can use the SRCHFOR command to search inside all the
libraries in my list.  I can exclude libraries with the X (EXCLUDE) primary
command if I need to. I have the options for SRCHFOR set to default to
searching only the non-excluded libraries.  So, for example, if I want to
search through a list of 30 JCL libraries for all members that use AMBLIST,
it's easy.

On Fri, Dec 15, 2023 at 4:51 PM Paul Feller  wrote:


Greetings Bob,

I was looking through my old JCL library and ran across several examples of
scans using ISRSUPC.  Depending on what you want to do you could try
ISRSUPC.  If you have access to JOBSCAN you could try it.  If you client
has
DAF, you can use that to scan SMF records to see if any executing jobs are
touch the dataset.


//SEARCH02 EXEC PGM=ISRSUPC,PARM=('SRCHCMP,ANYC,LPSF')

//NEWDDDD DSN=D0PCPN.JCLLIB.CA7PROD,DISP=(SHR,KEEP,KEEP)

// DD DSN=D0PCPN.JCLLIB.OVERRIDE,DISP=(SHR,KEEP,KEEP)

// DD DSN=D0PCPN.JCLLIB.ALTERNAT,DISP=(SHR,KEEP,KEEP)

// DD DSN=D0PCPN.JCLLIB.FREEZE,DISP=(SHR,KEEP,KEEP)

// DD DSN=D0PCPN.JCLLIB.ABEND,DISP=(SHR,KEEP,KEEP)

//OUTDDDD SYSOUT=X

//SYSINDD *

SRCHFOR'UNIT=TAPE'

/*


Paul

-Original Message-
From: IBM Mainframe Discussion List  On Behalf
Of
John Pratt
Sent: Friday, December 15, 2023 5:09 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: What is the PDS command?

Hi Bob,

If I remember correctly =3.14 has a batch option and you can concatenate
all
your JCL libraries into the generated job.

John.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf
Of
Bob Bridges
Sent: Saturday, 16 December 2023 8:55 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: What is the PDS command?

Long ago I wrote - I'm pretty sure I wrote - a REXX exec that would do a
3.14 search through multiple libraries for a character string.  I'm looking
for it now, and I find one in my archives that uses the PDS command to do
the search.

But what's the PDS command?  I've a strong suspicion that I wrote this at a
client that had a popular CBTTAPE utility, and if so it's not appropriate
for my current location.  Can someone confirm?

If you care, what I really want to do is search through a list of JCL
libraries for certain DSN fragments.  There's a job we're probably going to
shut down, and I want to be sure the datasets it produces are not used
anywhere else in production.

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* "Bother", said the Borg, "we've assimilated a Pooh". */

--
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

--
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 a

Re: RACROUTE REQUEST=AUTH problem

[David Spiegel]

Hi Jon,
Muli-User *Single Address Space.

Regards,
David

On 2023-12-01 02:19, Jon Perryman wrote:

The one thing no one has mentioned is MUSASS configuration (Multi-User address 
spaces). Has the customer configured MUSASS changes like naming table, exits or 
???. For instance, is the STC jobname being appended to distinguish between 
production and test? Maybe a RACF trace would show the real resource name and 
results.

--
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

Combine Multiple SORTs into One Step

[David Spiegel]

Hi,
I have a Job with 5 SORT STEPs. I would like to combine them into one STEP.
Here is one of the STEPs:

//STEP001 EXEC PGM=SORT
//SYSOUT   DD  SYSOUT=*
//SORTMSG  DD  SYSOUT=*
//SORTIN   DD  DISP=SHR,DSN=SYSA.XML
//SYSB DD  DISP=SHR,DSN=SYSB.XML
//SYSIN    DD  *
   OPTION COPY
   INREC  FINDREP=(IN=C'SYSA',OUT=C'SYSB')
   OUTREC FINDREP=(IN=C'SYSA',OUT=C'SYSB'|
  OUTFIL FNAMES=SYSB

In SORTs 2-5 I change SYSA to SYSC, SYSA to SYSD, SYSA to SYSE and SYSA 
to SYSF respectively.


How can I combine these into one STEP (instead of 5 STEPs)?

Thanks and regards,
David



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

Re: Israel

[David Spiegel]

+1

On 2023-10-10 13:08, Lionel B. Dyck wrote:

It is not unreasonable to be concerned about the health and safety of the 
community here.


Lionel B. Dyck <><
Website: https://www.lbdsoftware.com/
Github: https://github.com/lbdyck

“Worry more about your character than your reputation. Character is what you 
are, reputation merely what others think you are.”   - - - John Wooden

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
esmie moo
Sent: Tuesday, October 10, 2023 12:06 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Israel

  It is too bad that Darrin did not purge your post from the outset.  Darren 
please do your job as administrator and stop this thread.
Elspeth
 On Tuesday, October 10, 2023 at 12:37:32 p.m. EDT, Steve Beaver 
<050e0c375a14-dmarc-requ...@listserv.ua.edu> wrote:
  
  I started this thread to see if Benyamin Disson was ok.


Let's stop this thread unless one of the guys in Israel gets hurt.

Steve




-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of willie bunter
Sent: Tuesday, October 10, 2023 11:19 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Israel

  Yes, of course it has.  The rules depend upon the "subject" being posted.  It 
may have nothing to do with technical information.

 On Monday, October 9, 2023 at 08:05:48 p.m. EDT, Dave Beagle 
<0525eaef6620-dmarc-requ...@listserv.ua.edu> wrote:
  
  Have the rules been suspended?



Sent from Yahoo Mail for iPhone


On Monday, October 9, 2023, 4:55 PM, esmie moo 
<012780d99c7b-dmarc-requ...@listserv.ua.edu> wrote:

  Enough please about politics.  This is a technical information board.  Daren 
please pull the plug on this thread.

 On Sunday, October 8, 2023 at 12:46:05 p.m. EDT, Steve Beaver 
<050e0c375a14-dmarc-requ...@listserv.ua.edu> wrote:
  
  Has anyone heard from Benyamin in Israel since the shit storm has started?


Sent from my iPhone

No one said I could type with one thumb

--
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




--
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

--
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

--
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: Creating USSMSG10 ASM code from Screen text using CLIST or REXX

[David Spiegel]

Hi Tom,
"... at least one terminal emulator ..."=Vista?

Thanks and regards,
David

On 2023-10-06 02:51, Tom Brennan wrote:
This isn't the answer you're looking for, but what I do is create an 
ISPF panel with the screen image and fields and colors that I want, 
then I use ISPF 7.2 to display the screen.


Then at least one terminal emulator I know of has a function that 
reads the last I/O buffer that arrived from the host (containing all 
the screen orders and things) and produces something like this that I 
can use in an assembler program:


STRING   DS    0F
 DC    X'01C3114040C5D5E3C5D9D7D9C9E2'
 DC    X'C540C4C1E3C140C3C5D5E3C5D9404040'
 DC    X'40E04040604040613C0033404B7A7A96'
 DC    X'3C003C7A4B3C005240E2E8E2E3C5D440'
 DC    X'D7D9D6C7D9C1D4D4C5D93C006D404DE0'
 ...

So basically I'm getting ISPF to do the hard work.  Any kind of I/O 
tracing should also show the raw data.


On 10/5/2023 3:50 PM, Mark Regan wrote:

Cross-posted to IBM-MAIN and IBMTCP-L


At one time, I had a CLIST or REXX code that would take the screen 
layout and turn it into the necessary USSMSG10 code. If anyone has 
that, I would appreciate it.



Example of source:


   ENTERPRISE DATA CENTER    \  _  /    .::o:.
   SYSTEM PROGRAMMER  (\o/)    .::::o:.
  TEST SYSTEM ---  / \  ---    :o:_    _:::
 HAPPY HOLIDAYS    >*< `:}_>()<_{:'
  >0<@< @ `'//\\'`    @
 >>>@<<*  @ # //  \\ # @
    >@>*<0<<< __#_#/''\#_#_
>*>>@<<<@<< _Y
>@>>0<<<*<<@< |=_- .-/\ /\ /\ /\--. =_-|
>*>>0<<@<<<@<<<    |-_= | \ \\ \\ \\ \ |-_=-|
>@>>*<<@<>*<<0<*<   |_=-=| / // // // / |_=-_|
  \*/ >0>>*<<@<>0><<*<@<<  |=_- |`-'`-'`-'`-'  |=_=-|
  ___\\U//___ >*>>@><0<<*>>@><*<0<< | =_-| o  o |_==_|
  |\\ | | \\| >@>>0<*<<0>>@<<0<<<*<@<|=_- | ! (    ! |=-_=|
  | \\| | _(UU)_ >((*))_>0><*<0><@<<<0<*<-,-=| !    ).    ! |-_-=|
  |\ \| || / //||.*.*.*.|>>@<<*<<@>><0<<<((=_| ! __(:')__ ! |=_==|
  |\\_|_|&&_// ||*.*.*.*|_\\db//__ (\_/)-|/5\=5=55=5=/5\| _=_|
  |'.'.'.|~~|.*.*.*| |_ =('Y')=//,.
  |'.'.'.|   55||>>|  ( ~~~ )/
   '`--'  `w---w` `'
Please note:  For everyone's mutual protection, ALL SYSTEM USE, 
including

electronic mail, MAY BE MONITORED to protect against unauthorized use.
Enter your application name ===> 




Regards,

Mark Regan

z/OS Network Systems Programmer (z NetView, z/OS Communications Server)





--
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


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

Re: Utility to Read from JES2 spool

[David Spiegel]

Hi Wayne,
That's the command I learned in the mid-'70s before I had access to SPF.
I've also used it at DR Sites when one or more PDSs in one or more of my 
ISPF concatenations has not yet been restored, leaving me stuck in TSO.


Regards,
David

On 2023-09-30 04:59, Wayne Bickerdike wrote:

For Dinosaurs:

OUT Jobxxx PR(FRED) HOLD KEEP

On Fri, Sep 29, 2023 at 9:03 PM Kirk Wolf  wrote:


FWIW, Co:Z SFTP has full support for JES spool files, but there are also
Co:Z shell commands for using JES2/3.

example:

*> todsn //intrdr < lsjes
*JobidJobname  OwnerStatus   Class Completion
JOB00853 BR14 KIRK OUTPUT   A RC=
JOB00852 KIRKTKIRK OUTPUT   A RC=
JOB00851 KIRKTKIRK OUTPUT   A RC=
...

*> fromdsn -JES.J853.all > j853.log*
fromdsn(KIRK.BR14.ALL)[N]: 39 records/2476 bytes read; 2515 bytes written
in 0.011 seconds (223.278 KBytes/sec).


Kirk Wolf
Dovetailed Technologies
http:// coztoolkit.com

PS>  Thanks to Darren's action, I'm following ibm-main again.

On Fri, Sep 29, 2023, at 2:12 PM, Paul Gilmartin wrote:

On Fri, 29 Sep 2023 15:27:37 +, Rob Scott wrote:


To generate sample SDSF REXX - issue the "RGEN X" command and choose an

example from the list - there are the following including :

Browse job output with EXECIO
Browse job output with ISFBROWSE
Browse job output with ISFBROWSE - groups of lines



+1

Based on examples in what was then the Admin Ref.  I wrote a Rexx script
that works in OMVS, IRXJCL, or ISPF and unloads (almost) all the spool
data sets of a job into a UNIX hierarchy.

My narrowminded co-workers deemed it useless.  ("UNIX!?")

I used IEBGENER rather than EXECIO.  SDSF allocates with (almost)
the right attributes (WAD) and i used alternate ddmame list to override
SYSUT1

"Almost all"?  There's a JES3 spool file that IEBGENER can't handle.
I bypassed it.

Residual wishlist items:
o Suss FILEDATA()?  I guessed according to DDNAME.
o Suss CCSID?  Why isn't that a spool data set attribute?  Idea?

--
gil

--
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





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

Re: PL/X

[David Spiegel]

Hi Peter,
I was generalizing the problem. Allowing access to PL/ wouyld also 
solve the lack of PDFs.


This reminds me of a joke.
Q: What does IBM Stand for?
A: Ich Bin M'shugoh

Regards,
David

On 2023-09-30 08:18, Peter Relson wrote:

There is another solution

What are you thinking the "problem" is for which you mention a "solution"? The first post 
I saw was asking about PDF's, not about access to PL/X. Was there a post that did not show up in the daily 
digest? The "access-to-PL/X ship" sailed long ago.

Peter Relson
z/OS Core Technology Design


--
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: PL/X

[David Spiegel]

Hi Peter,
There is another solution ... make PL/ available especially to 
students/enthusiasts/hobbyists.
While doing that, provide an "amateur" version of z/OS for the same 
crowd and allow *anyone* to run it on Hercules (or equivalent) on 
Intel/AMD hardware.
It's not yet (but almost) too late to stop the Big Iron golden goose 
from dying.
These 2 suggestions might cause a renewed interest for next generation 
mainframers.


(Unfortunately, however, it's 40 years too late to reverse the illogical 
OCO policy.)


Regards,
David

On 2023-09-29 12:54, Peter Relson wrote:

Regarding PL/X documentation, wouldn't sharing such information outside of IBM, in the 
absence of having some sort of license agreement, be "bad form" (or worse)?

Peter Relson
z/OS Core Technology Design


--
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: AI will surpass human intelligence!

[David Spiegel]

Yours included?

On 2023-09-14 13:29, Bill Johnson wrote:

AI will surpass human intelligence.

https://www.cnbc.com/2023/09/14/softbanks-masayoshi-son-says-tech-can-surpass-human-intelligence.html



--
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: AI expert hot new position.

[David Spiegel]

Hi Bill,
Never happen?
If you were a systems programmer and were doing a z/OS upgrade, you 
would probably have to repair some SMF, JES2 and Security Exits a lot 
more than "almost never".


Regards,
David

On 2023-09-12 08:56, Bill Johnson wrote:

Making up scenarios that never or almost never happen.


Sent from Yahoo Mail for iPhone


On Tuesday, September 12, 2023, 8:53 AM, David Spiegel 
<0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:

Hi Jon,
Now that you've mentioned DB2, please tell me how to write/maintain a
DB2 Secondary Authorization Exit WITHOUT Assembler.
Next time my customer asks me to amend it, I will be sure to give them
your answer. (I added logic to it to allow Informatica to authenticate
via ACF2.)

Regards,.
David

On 2023-09-12 08:04, Jon Butler wrote:

There will be a need for assembler programmers for quite a while, but mainly 
because over the last forty years, and long after even COBOL II added functions 
and a case construction in 1987, very, very  clever people decided they would 
write application modules in assembler... and not waste time with comments.  
Today, when companies are trying to make their systems Highly Available...or 
even convert to a cloud provider's service...no one has a clue what the modules 
do.  Many could have been easily replaced by COBOL's ADDRESS OF or LENGTH OF or 
PL/I Pointers, but of course that would have been way too easy.  Very few 
application programs need to control channels.

When I was interviewed by the Db2 Utilities group at the Santa Teresa lab in San Jose 
(Now Silicon Valley) in 2001, I said I suppose I needed to brush up on my assembler.  
They laughed and said "no one uses assembler any more."  All the Utilities were 
written in PL/S, now PL/X.

Not to denigrate assembler programmers, or those that decide to take up 
Sanskrit, but it is a dying art.

--
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




--
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: AI expert hot new position.

[David Spiegel]

Hi Jon,
Now that you've mentioned DB2, please tell me how to write/maintain a 
DB2 Secondary Authorization Exit WITHOUT Assembler.
Next time my customer asks me to amend it, I will be sure to give them 
your answer. (I added logic to it to allow Informatica to authenticate 
via ACF2.)


Regards,.
David

On 2023-09-12 08:04, Jon Butler wrote:

There will be a need for assembler programmers for quite a while, but mainly 
because over the last forty years, and long after even COBOL II added functions 
and a case construction in 1987, very, very  clever people decided they would 
write application modules in assembler... and not waste time with comments.  
Today, when companies are trying to make their systems Highly Available...or 
even convert to a cloud provider's service...no one has a clue what the modules 
do.  Many could have been easily replaced by COBOL's ADDRESS OF or LENGTH OF or 
PL/I Pointers, but of course that would have been way too easy.  Very few 
application programs need to control channels.

When I was interviewed by the Db2 Utilities group at the Santa Teresa lab in San Jose 
(Now Silicon Valley) in 2001, I said I suppose I needed to brush up on my assembler.  
They laughed and said "no one uses assembler any more."  All the Utilities were 
written in PL/S, now PL/X.

Not to denigrate assembler programmers, or those that decide to take up 
Sanskrit, but it is a dying art.

--
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: AI expert hot new position.

[David Spiegel]

Hi Jon,
In one paragraph, you're talking about application code. In another 
paragraph, you're discussing system-level  programming.
My argument has nothing to do with application code; I've always 
maintained that application code should be written in a High Level Language.
As to your second paragraph, those of us who work in the real world (I 
used to work at IBM) don't have the luxury of Internal Use Only software 
tools.

Your argument is very weak tea.

Regards,
David

On 2023-09-12 08:04, Jon Butler wrote:

There will be a need for assembler programmers for quite a while, but mainly 
because over the last forty years, and long after even COBOL II added functions 
and a case construction in 1987, very, very  clever people decided they would 
write application modules in assembler... and not waste time with comments.  
Today, when companies are trying to make their systems Highly Available...or 
even convert to a cloud provider's service...no one has a clue what the modules 
do.  Many could have been easily replaced by COBOL's ADDRESS OF or LENGTH OF or 
PL/I Pointers, but of course that would have been way too easy.  Very few 
application programs need to control channels.

When I was interviewed by the Db2 Utilities group at the Santa Teresa lab in San Jose 
(Now Silicon Valley) in 2001, I said I suppose I needed to brush up on my assembler.  
They laughed and said "no one uses assembler any more."  All the Utilities were 
written in PL/S, now PL/X.

Not to denigrate assembler programmers, or those that decide to take up 
Sanskrit, but it is a dying art.

--
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: AI expert hot new position.

[David Spiegel]

Hi Bill,
Nice job cherry picking.
Since you don't know Assembler, here is a fact you are (willfully) omitting.
PL/S, PL/X, PL/AS etc. has never been been made available to all IBM 
customers. (I know that select customers have successfully obtained a 
licence.)

Unless one works at IBM, there is still a need.

Regards,
David

On 2023-09-12 08:16, Bill Johnson wrote:

“ Not to denigrate assembler programmers, or those that decide to take up 
Sanskrit, but it is a dying art.”

Indeed.


Sent from Yahoo Mail for iPhone


On Tuesday, September 12, 2023, 8:04 AM, Jon Butler  
wrote:

There will be a need for assembler programmers for quite a while, but mainly 
because over the last forty years, and long after even COBOL II added functions 
and a case construction in 1987, very, very  clever people decided they would 
write application modules in assembler... and not waste time with comments.  
Today, when companies are trying to make their systems Highly Available...or 
even convert to a cloud provider's service...no one has a clue what the modules 
do.  Many could have been easily replaced by COBOL's ADDRESS OF or LENGTH OF or 
PL/I Pointers, but of course that would have been way too easy.  Very few 
application programs need to control channels.

When I was interviewed by the Db2 Utilities group at the Santa Teresa lab in San Jose 
(Now Silicon Valley) in 2001, I said I suppose I needed to brush up on my assembler.  
They laughed and said "no one uses assembler any more."  All the Utilities were 
written in PL/S, now PL/X.

Not to denigrate assembler programmers, or those that decide to take up 
Sanskrit, but it is a dying art.

--
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


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

Re: AI expert hot new position.

[David Spiegel]

Hi Bill,
Your claim of salary being equal to real SysProgs does not categorically 
prove that Assembler is useless.


It is very easy to destroy this vacuous argument.
Let's say you were employed in New York and your colleague (Assembler 
expert) was employed in West Virginia.
In this case, you might even earn more than your colleague, due to 
regional economics (nothing to do with technical ability).


Your logic, or lack thereof, gives away your real skill level.

Regards,
David

On 2023-09-11 23:00, Bill Johnson wrote:

Some “geniuses” here, at least some self proclaimed ones, think knowing assembler 
makes them real Systems Programmers. Well, I’ve been getting paid like one for 2 
decades. Anyone dumb enough to learn assembler in 2023, which is dying a slow 
tortuous death, deserves to be replaced by AI. (They will be) My best advice to 
anyone who is young enough to still be working in this profession 10 years from 
now, is learn AI & forget about assembler. You’ll be glad you did.


Sent from Yahoo Mail for iPhone


On Sunday, September 10, 2023, 4:37 PM, Bob T Roller 
<044ef325f6c3-dmarc-requ...@listserv.ua.edu> wrote:

Just go to the CNBC home page. It’s now the third story.

Sent from Proton Mail for iOS

On Sun, Sep 10, 2023 at 4:33 PM, Bob T Roller 
<[044ef325f6c3-dmarc-requ...@listserv.ua.edu](mailto:On Sun, Sep 10, 2023 at 4:33 
PM, Bob T Roller < wrote:


It’s from CNBC. It’s the lead story. I also checked the link after I got the 
email.

Sent from Proton Mail for iOS

On Sun, Sep 10, 2023 at 3:58 PM, Paul Gilmartin 
<[042bfe9c879d-dmarc-requ...@listserv.ua.edu](mailto:On Sun, Sep 10, 2023 at 3:58 
PM, Paul Gilmartin < wrote:


On Sun, 10 Sep 2023 17:23:10 +, Bob T Roller wrote:


AI will pay handsomely.

AI expert is a hot new position in the freelance jobs market
https://www.cnbc.com/2023/09/10/ai-expert-is-a-hot-new-position-in-the-freelance-jobs-market.html?__source=iosappshare%7Ccom.apple.UIKit.activity.CopyToPasteboard


That URL looked funny to me, so I asked on an Apple-centric forum and got:


The rest of the URL is critical. It means your copy/paste buffer is being sent 
over the internet. It could be benign, like a text to voice app, a grammar 
checker, a scanner program. Or, it could be what the last security update was 
all about.

You need to find out if the network location can be trusted, so look at the 
first part of the URL.
Sent from Proton Mail for iOS

--
gil

--
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

--
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


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

Re: What became of "mutually exclusive"?

[David Spiegel]

Hi Gil,
You said: "...I recall seeing in days of your ..." My? ... My what? {;}-> ?
I think that you meant "yore" instead of "your", n'est-ce pas?

Regards,
David

On 2023-09-11 14:21, Paul Gilmartin wrote:

In the JCL Ref, I recall seeing in days of your a matrix of mutually
exclusive parameters on the DD statement.  I no longer find it; instead
for various parameters see:
 Relationship to other parameters
 Do not code the following parameters with the ... parameter:

Does this mean they're mutually exclusive?  Earlier, I see:
• If you add a parameter that is mutually exclusive with a parameter
   on a procedure statement, the override operation automatically
   nullifies the procedure parameter.

Did the matrix just become too big to print?  Should there be a statement
somewhere that "Do not code the following parameters with" implies
"mutually exclusive", or is it sometimes merely advisory?



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

Re: Ray Mullins on Assembler demand.

[David Spiegel]

Hi Tony,
W2=T4.

Regards,
David

From: IBM Mainframe Discussion List  on behalf of 
Tony Harminc 
Sent: September 8, 2023 4:44 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Ray Mullins on Assembler demand.

On Fri, 8 Sept 2023 at 14:40, Steve Thompson  wrote:
>
>  From the recruiters I get contacting me, the end client, who
> ever that may be, wants someone to reverse engineer the ALC code
> they have into COBOL (uh how about the euphemism, modernize?).
[...]
> Then they want to pay ~$50/hr w2 for that expertise.

I assume w2 is something related to US income tax or employee vs
contractor status...?

But given that none of us old-timers is likely to do that work for
less than twice that wage (and maybe quite a bit more), who are these
recruiters actually getting to do it? Or is it just not getting done?

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: Is the IBM Assembler List still alive - Dumps - Early days

[David Spiegel]

Hi Bill,
You said: "... I still have the awards program ..."
Please translate this statement into English.

Regards,
David

From: IBM Mainframe Discussion List  on behalf of 
Bill Johnson <0047540adefe-dmarc-requ...@listserv.ua.edu>
Sent: September 7, 2023 6:59 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Is the IBM Assembler List still alive - Dumps - Early days

Ohio, I was at the top in Algebra and Geometry. Early 70’s. I still have the 
awards program. I’m very proud of it and my Math expertise paid off handsomely.


Sent from Yahoo Mail for iPhone


On Thursday, September 7, 2023, 6:50 PM, David Spiegel 
<0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:

Hi Bill,
You said: "... because it used less resources ..."
Shmegegge, you should've said "fewer". That is the correct usage.
For a guy who knows so much about about a multitude of topics, it
behooves you to write more correctly.
It might even increase your credibility.

Regards,
David

On 2023-09-07 16:05, Bill Johnson wrote:
> We used to use ROSCOE at a small shop in the 80’s because it used less 
> resources. I hated it.
>
>
> Sent from Yahoo Mail for iPhone
>
>
> On Thursday, September 7, 2023, 3:56 PM, Leonard D Woren 
>  wrote:
>
> What was the first OS that you had a 2 MB TSO region?  What hardware.
>
> MVT TSO on the 4 MB 360/91 at UCLA was about 3/4 MB .  There was a lot
> you could do, although it was slow.  I did experiment with overlay
> modules though.  Bleah.
>
> The reason you could do a lot in 3/4 MB is that it was done in
> efficient languages, like Assembler.  None of these modern bloatware
> languages that make every app on my phone 32 MB minimum, and often up
> to 500 MB.
>
> /Leonard
>
>
> Seymour J Metz wrote on 9/7/2023 3:32 AM:
>> I never had TSO in less than 2 MiB; 768 KiB gives me shudders.
>>
>> 
>> From: IBM Mainframe Discussion List  on behalf of 
>> Clem Clarke 
>> Sent: Wednesday, September 6, 2023 6:38 AM
>> To: IBM-MAIN@LISTSERV.UA.EDU
>> Subject: Re: Is the IBM Assembler List still alive - Dumps - Early days
>>
>>
>> Running TSO in 3/4 of a meg was interesting.  And VERY slow.
>>
> --
> 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

--
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

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

Re: Is the IBM Assembler List still alive - Dumps - Early days

[David Spiegel]

Hi Bill,
According to a recent study, Ohio ranked 36. I'm not so sure I would want to 
boast about that.

Please see: 2023’s States with the Best & Worst School Systems 
(wallethub.com)<https://wallethub.com/edu/e/states-with-the-best-schools/5335>

Regards,
David
[https://cdn.wallethub.com/wallethub/posts/94009/states-with-the-best-worst-school-systems.png]<https://wallethub.com/edu/e/states-with-the-best-schools/5335>
2023’s States with the Best & Worst School 
Systems<https://wallethub.com/edu/e/states-with-the-best-schools/5335>
wallethub.com


From: IBM Mainframe Discussion List  on behalf of 
Bill Johnson <0047540adefe-dmarc-requ...@listserv.ua.edu>
Sent: September 7, 2023 6:59 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Is the IBM Assembler List still alive - Dumps - Early days

Ohio, I was at the top in Algebra and Geometry. Early 70’s. I still have the 
awards program. I’m very proud of it and my Math expertise paid off handsomely.


Sent from Yahoo Mail for iPhone


On Thursday, September 7, 2023, 6:50 PM, David Spiegel 
<0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:

Hi Bill,
You said: "... because it used less resources ..."
Shmegegge, you should've said "fewer". That is the correct usage.
For a guy who knows so much about about a multitude of topics, it
behooves you to write more correctly.
It might even increase your credibility.

Regards,
David

On 2023-09-07 16:05, Bill Johnson wrote:
> We used to use ROSCOE at a small shop in the 80’s because it used less 
> resources. I hated it.
>
>
> Sent from Yahoo Mail for iPhone
>
>
> On Thursday, September 7, 2023, 3:56 PM, Leonard D Woren 
>  wrote:
>
> What was the first OS that you had a 2 MB TSO region?  What hardware.
>
> MVT TSO on the 4 MB 360/91 at UCLA was about 3/4 MB .  There was a lot
> you could do, although it was slow.  I did experiment with overlay
> modules though.  Bleah.
>
> The reason you could do a lot in 3/4 MB is that it was done in
> efficient languages, like Assembler.  None of these modern bloatware
> languages that make every app on my phone 32 MB minimum, and often up
> to 500 MB.
>
> /Leonard
>
>
> Seymour J Metz wrote on 9/7/2023 3:32 AM:
>> I never had TSO in less than 2 MiB; 768 KiB gives me shudders.
>>
>> 
>> From: IBM Mainframe Discussion List  on behalf of 
>> Clem Clarke 
>> Sent: Wednesday, September 6, 2023 6:38 AM
>> To: IBM-MAIN@LISTSERV.UA.EDU
>> Subject: Re: Is the IBM Assembler List still alive - Dumps - Early days
>>
>>
>> Running TSO in 3/4 of a meg was interesting.  And VERY slow.
>>
> --
> 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

--
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

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

Re: Is the IBM Assembler List still alive - Dumps - Early days

[David Spiegel]

Hi Bill,
You said: "... because it used less resources ..."
Shmegegge, you should've said "fewer". That is the correct usage.
For a guy who knows so much about about a multitude of topics, it 
behooves you to write more correctly.

It might even increase your credibility.

Regards,
David

On 2023-09-07 16:05, Bill Johnson wrote:

We used to use ROSCOE at a small shop in the 80’s because it used less 
resources. I hated it.


Sent from Yahoo Mail for iPhone


On Thursday, September 7, 2023, 3:56 PM, Leonard D Woren 
 wrote:

What was the first OS that you had a 2 MB TSO region?  What hardware.

MVT TSO on the 4 MB 360/91 at UCLA was about 3/4 MB .  There was a lot
you could do, although it was slow.  I did experiment with overlay
modules though.  Bleah.

The reason you could do a lot in 3/4 MB is that it was done in
efficient languages, like Assembler.  None of these modern bloatware
languages that make every app on my phone 32 MB minimum, and often up
to 500 MB.

/Leonard


Seymour J Metz wrote on 9/7/2023 3:32 AM:

I never had TSO in less than 2 MiB; 768 KiB gives me shudders.


From: IBM Mainframe Discussion List  on behalf of Clem 
Clarke 
Sent: Wednesday, September 6, 2023 6:38 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Is the IBM Assembler List still alive - Dumps - Early days


Running TSO in 3/4 of a meg was interesting.  And VERY slow.


--
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


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

Re: Simple request from chatGPT to write assembler program.

[David Spiegel]

Hi Bill,
Do you know the meaning of "non sequitur"?
What is the connection between my attention to detail, your mother's 
career and your winning awards?
Now that you're busy boasting, why don't you also tell us which state 
gave you the awards?


Since you're the self-proclaimed expert on the relevance of Assembler, 
please explain how  an installer like yourself would create an ICHRDSNT 
Exit (with appropriate SMP/e control cards).


Regards,
David

On 2023-09-06 08:11, Bill Johnson wrote:

LOL, good find Dave. I love how in your head I am. But, you won’t find many 
grammar or spelling errors. My mom was a teacher. Dave has relegated himself to 
spelling and grammar checks. Which takes me back to the state awards in Algebra 
and Geometry I received. At the top in those subjects.

Everything I said about assembler has rung true.

1. The assembler listserv is nearly dead.2. One of assemblers experts, Ray 
Mullins, stated unequivocally its market is getting smaller and smaller and is 
a niche product.3. Bernd said since 2005, there’s been little demand for 
assembler training.

Clearly assembler is not long for the mainframe world and just waiting for the 
grim reaper to arrive. And the dinosaurs here trying so hard to not become 
extinct.

Notice how the 20-30 experts can’t say, Bill Johnson is right. Because it makes 
them wrong and narcissists don’t like saying they were wrong.

Sent from Yahoo Mail for iPhone


On Tuesday, September 5, 2023, 9:14 PM, David Spiegel 
<0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:

Hi Bill,
You said: "...Your comprehension of basic English are terrible. ..."
Doorknob, it should have been "is terrible".

Another case of the pot calling the kettle black.
Open mouth, change feet.

Regards,
David

On 2023-09-05 20:46, Bill Johnson wrote:

I never once said it would assemble or run. I can see why you guys went into 
IT. Your comprehension of basic English are terrible.


Sent from Yahoo Mail for iPhone


On Tuesday, September 5, 2023, 8:22 PM, Tom Brennan 
 wrote:

Oh that's funny!  Then what are these notes from you I found in my trash
folder?  Sounds like you were sure it would assemble and run perfectly,
and also be able to take over someone's job today.

     Why do you doubt it? Is it because you hope it doesn’t? Certainly, one
     of you assembler geniuses could test it.

     Lol, how about going to chatgpt and asking the same question. So that
     cut and paste isn’t a factor.

     What are you afraid of? That a computer can do what you do? That your
     “skills” aren’t all that impressive and can be automated away?

On 9/5/2023 4:47 PM, Bill Johnson wrote:

I never presented it as a working model.

--
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

--
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


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

Re: Next SMP/E question

[David Spiegel]

Hi Phil,
That is true provided the DDDEFs are instead coded as JCL.

Regards,
David

On 2023-09-05 20:47, Phil Smith III wrote:

Mark Jacobs wrote:

Apply check doesn't open any target traditional datasets, or Unix
System Services paths, so it's WAD. Whether it should is a different
question.

And in my experience (limited, obviously) with traditional target data sets, 
you'll get a JCL error earlier. So this may just be How It Works, unless 
someone else has another idea.

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

Re: Simple request from chatGPT to write assembler program.

[David Spiegel]

Hi Bill,
You said: "...Your comprehension of basic English are terrible. ..."
Doorknob, it should have been "is terrible".

Another case of the pot calling the kettle black.
Open mouth, change feet.

Regards,
David

On 2023-09-05 20:46, Bill Johnson wrote:

I never once said it would assemble or run. I can see why you guys went into 
IT. Your comprehension of basic English are terrible.


Sent from Yahoo Mail for iPhone


On Tuesday, September 5, 2023, 8:22 PM, Tom Brennan 
 wrote:

Oh that's funny!  Then what are these notes from you I found in my trash
folder?  Sounds like you were sure it would assemble and run perfectly,
and also be able to take over someone's job today.

   Why do you doubt it? Is it because you hope it doesn’t? Certainly, one
   of you assembler geniuses could test it.

   Lol, how about going to chatgpt and asking the same question. So that
   cut and paste isn’t a factor.

   What are you afraid of? That a computer can do what you do? That your
   “skills” aren’t all that impressive and can be automated away?

On 9/5/2023 4:47 PM, Bill Johnson wrote:

I never presented it as a working model.

--
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


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

Re: Simple request from chatGPT to write assembler program.

[David Spiegel]

Hi Tom,
+1
You forget that it took Bill and 2 colleagues to modify IEFUSI.

Regards,
David

On 2023-09-05 20:21, Tom Brennan wrote:
Oh that's funny!  Then what are these notes from you I found in my 
trash folder?  Sounds like you were sure it would assemble and run 
perfectly, and also be able to take over someone's job today.


  Why do you doubt it? Is it because you hope it doesn’t? Certainly, one
  of you assembler geniuses could test it.

  Lol, how about going to chatgpt and asking the same question. So that
  cut and paste isn’t a factor.

  What are you afraid of? That a computer can do what you do? That your
  “skills” aren’t all that impressive and can be automated away?

On 9/5/2023 4:47 PM, Bill Johnson wrote:

I never presented it as a working model.


--
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: Simple request from chatGPT to write assembler program.

[David Spiegel]

Hi Tom,
It looks like ChatGPT is not aware of "Housekeeping".

Regards,
David

On 2023-09-05 13:47, Tom Brennan wrote:
GET and PUT use R14, so as Tom Marchant said, if the program managed 
to get that far it would never return to the OS.


On 9/5/2023 10:21 AM, Paul Gilmartin wrote:

On Tue, 5 Sep 2023 11:34:13 -0500, Tom Marchant  wrote:


    [if]  it made it to the BR 14, it would loop.

???  Rather, that appears to be one of the few correct instructions.  
If R14 hasn't

been modified since entry, it returns to caller.


   SR 15,15 Set return code to 0
   BR 14  Return to caller




--
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: Ray Mullins on Assembler demand.

[David Spiegel]

Hi Ray,
You said: "... SAMPLIB(IEEACTRT) ..."
Don't you mean SAMPLIB(SMFEXITS) //IEFACTRT?
(IEEx is Console-related; IEFx is SMF-related)

Regards,
David

On 2023-09-05 13:23, M. Ray Mullins wrote:
There's a bit of context that is lost here. I purposely said 
"invisible hand", playing on the imagery. But just because that's what 
the owner of the "invisible hand" wants doesn't necessarily mean 
that's happening.


Metal C in a JES2 environment is extremely difficult to implement, 
which is why you're now seeing the JES2 policy direction. IMHO if IBM 
had provided Metal C PROLOG/EPILOG for JES2 and z/OS exits, as well as 
APIs covering the common macros*, I think would have seen more Metal C 
take-up. I presented a few times at SHARE about converting 
SAMPLIB(IEEACTRT) to Metal C. I originally envisioned it as a 
"how-to", but it became instead a user experience, as my experience 
was mixed.


On 2023-09-05 09:39, Bill Johnson wrote:
Metal C, exactly what Mullins said is replacing assembler. In the 
end, my contention in the beginning is proving truer by the day. And 
you’re right, assembler isn’t that hard to learn and not hard to 
replace,



Sent from Yahoo Mail for iPhone


On Tuesday, September 5, 2023, 12:36 PM, Matt Hogstrom 
 wrote:


My take is that Assembler is just a language and honestly I don’t 
think its
all that hard to learn.  What it does require is more understanding 
of the

OS and the ability to setup for calls to other services.

The higher languages simply obscure, or encapsulate, those low level
services.

I use Metal C for new code as it is more easily understood by 
developers.

That said, there are times for pure assembler code and I enjoy it.  I
started out as a batch assembler programmer but I was drawn to 
understand
the OS and its structure.  Assembler was the way to interface and now 
there

are other options.

As an ISV we want Assembler programmers.  In a business, I’d focus on 
the

languages that the market understands.  The important thing is to not be
religious about a language.  Its just a tool.

On Tue, Sep 5, 2023 at 08:22 David Elliot  wrote:


Very little from what I see. What little
   there is is stupid stuff like reverse engineering code so that 
the client

can rewrite it in JAVA or whatever the language of the day is.





--
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: Simple request from chatGPT to write assembler program.

[David Spiegel]

Hi Bill,
I have a better idea.
Why don't you and the 2 buddies who helped you modify the IEFUSI fix it?
Probably because you don't have the wherewithal (even with 2 helpers).

Regards,
David

On 2023-09-05 12:04, Bill Johnson wrote:

Lol, how about going to chatgpt and asking the same question. So that cut and 
paste isn’t a factor.


Sent from Yahoo Mail for iPhone


On Tuesday, September 5, 2023, 12:02 PM, David Spiegel 
<0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:

Hi Steve,
It won't. The first executable statement is missing a comma between
operands.

Regards,
David

On 2023-09-05 11:43, Steve Thompson wrote:

I doubt it will assemble. And even if it does, the results are
unpredictable, other than it will probably ABEND for one reason or
another.

There are no DCB, OPEN, CLOSE macros while GET and PUT are being used.

Me thinks this AI system is confusing a few different assembly
languages together. I wonder how close they came for DOS I/O.
Steve Thompson



On 9/5/2023 11:20 AM, Tom Marchant wrote:

You're right, Tom. That is not a program. Certainly not one that will
do what it claims to do.

-- Tom Marchant On Mon, 4 Sep 2023 10:42:51 -0700, Tom Brennan
 wrote:

I can't be sure I formatted it properly, but after looking over the
code, I have nothing to say but WTF? 😄

   PRINT NOGEN
   TITLE 'Simple Addition Program'
** Define storage for input numbers and result
*
NUM1 DS    F First input number
NUM2 DS    F Second input number
RESULT   DS    F Result of addition
** Main program
*
MAIN C  0    NUM1   Check if NUM1 is zero
   BE ZERO    Branch to ZERO if true
** Read the first number from input
*
   GET    NUM1,NUMIN  Read NUM1 from input
   LA 0,NUM1  Load NUM1 into register
** Read the second number from input
*
   GET    NUM2,NUMIN  Read NUM2 from input
   A  NUM1,NUM2   Add NUM1 and NUM2
   ST NUM1,RESULT Store the result in RESULT
** Print the result
*
   PUT    RESULT,NUMOUT   Print the result
** Terminate the program
*
   SR 15,15   Set return code to 0
   BR 14  Return to caller
** Define input and output areas
*
NUMIN    DC    F'0'   Input buffer for numbers
NUMOUT   DC    F'0'   Output buffer for result
ZERO DC    F'0'   Constant zero
   END   MAIN    End of program

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email tolists...@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

--
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


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

Re: Simple request from chatGPT to write assembler program.

[David Spiegel]

Hi Steve,
It won't. The first executable statement is missing a comma between 
operands.


Regards,
David

On 2023-09-05 11:43, Steve Thompson wrote:
I doubt it will assemble. And even if it does, the results are 
unpredictable, other than it will probably ABEND for one reason or 
another.


There are no DCB, OPEN, CLOSE macros while GET and PUT are being used.

Me thinks this AI system is confusing a few different assembly 
languages together. I wonder how close they came for DOS I/O.

Steve Thompson



On 9/5/2023 11:20 AM, Tom Marchant wrote:
You're right, Tom. That is not a program. Certainly not one that will 
do what it claims to do.


-- Tom Marchant On Mon, 4 Sep 2023 10:42:51 -0700, Tom Brennan 
 wrote:

I can't be sure I formatted it properly, but after looking over the
code, I have nothing to say but WTF? 😄

  PRINT NOGEN
  TITLE 'Simple Addition Program'
** Define storage for input numbers and result
*
NUM1 DS    F First input number
NUM2 DS    F Second input number
RESULT   DS    F Result of addition
** Main program
*
MAIN C  0    NUM1   Check if NUM1 is zero
  BE ZERO    Branch to ZERO if true
** Read the first number from input
*
  GET    NUM1,NUMIN  Read NUM1 from input
  LA 0,NUM1  Load NUM1 into register
** Read the second number from input
*
  GET    NUM2,NUMIN  Read NUM2 from input
  A  NUM1,NUM2   Add NUM1 and NUM2
  ST NUM1,RESULT Store the result in RESULT
** Print the result
*
  PUT    RESULT,NUMOUT   Print the result
** Terminate the program
*
  SR 15,15   Set return code to 0
  BR 14  Return to caller
** Define input and output areas
*
NUMIN    DC    F'0'   Input buffer for numbers
NUMOUT   DC    F'0'   Output buffer for result
ZERO DC    F'0'   Constant zero
  END   MAIN    End of program

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email tolists...@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


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

Re: Is the IBM Assembler List still alive

[David Spiegel]

Hi Bill,
Besides showing arrogance, you're displaying your ignorance as well.
You said: "...Unless you work for IBM, you’re likely an installer ..."
For your information, I have a combined CompSci degree with business and 
mathematics from University of Toronto, the best school in Canada.


I've worked at IBM and other employers and have done Systems Programming 
at all of these shops.
My jobs all included programming Assembler for VM, VS/1 and MVS (OS/390, 
z/OS etc.).


Again, if you can't/won't program Assembler, you're simply not a 
SysProg. How sad.


Regards,.
David

On 2023-09-03 20:06, Bill Johnson wrote:

Degrees are never relevant to the non-degreed. Unless you work for IBM, you’re 
likely an installer of zOS.


Sent from Yahoo Mail for iPhone


On Sunday, September 3, 2023, 7:14 PM, g...@gabegold.com  
wrote:

None of "DB2 DBA, DASD Admin, contractor, programmer analyst, manager of operations, 
programmer, and Operations" are system programming -- so aren't relevant to this 
discussion.

Many people calling themselves system programmers are in fact 
installers/configurers/administrators. Those are all useful, but also aren't 
what most people consider system programming.

Without assembler skills, how do you program -- or even fully understand -- 
systems written in assembler?

What I described doing is what most people consider system programming -- 
maintaining/developing/enhancing system-level software -- and involved skills 
shared by all the others on my teams at Mitre and VMSG. Someone without 
assembler fluency would have been useless in both places.

Degrees aren't relevant -- that's...

The credentials fallacy is a logical fallacy that occurs when someone dismisses 
an argument by stating that whoever made it doesn't have proper credentials, so 
their argument must be wrong or unimportant.

...some of the best system programmers I've known had no degree. So good for 
you, degree in math and CS -- but so what?

In this discussion, you're downplaying yourself with uninformed comments.

As a system programmer without assembler skills, what did you DO? Not where did 
you work, what did you do that was system programming?

And resorting to name calling, the last resort of bad arguments?

On Sun, 3 Sep 2023 22:38:25 +, Bill Johnson  wrote:


Sure David, I’ve never been a Systems Programmer other than the last 19 years. 
Before that, I was a DB2 DBA, DASD Admin, contractor, programmer analyst, manager 
of operations, programmer, and Operations for one of the largest auto companies on 
the planet. I’ve worked in numerous industries, large and small companies, and have 
a Math & Computer Science degree. Not the idiotic 2 year tech degree that many 
colleges created to fast track kids into a burgeoning IT industry. But keep trying 
to downplay me idiot.


Sent from Yahoo Mail for iPhone


On Sunday, September 3, 2023, 5:24 PM, David Spiegel 
<0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:

HI Bill,
More vacuous and specious arguments.

You said: "... In fact, making changes to delivered software can be
dangerous. ..."
Writing/modifying Exits is not the same as your statement.

It is evident from what you've written, that you've never been a Systems
Programmer, the highest mainframe technical calling.
Yes, I am being elitist. People who can't/won't code Assembler should
know their place and should not be so arrogant in groups like this.
It almost seems like you're jealous of those of us who do this for a living.

It took 3 of you to  modify an IEFUSI?! Hah! How freaking "bush league".
Grow up and learn some Assembler.

Regards,
David

On 2023-09-03 12:37, Bill Johnson wrote:

1 persons experience doesn’t prove anything. The fact is assembler is becoming 
less and less important as a skillset. Anyone who thinks learning it now is a 
worthwhile exercise is a fool. Yeah, I went through college when Assembler was 
a mandatory course and COBOL was an elective. Guess which was infinitely more 
critical in my career! In college we coded almost exclusively in PL/I, which 
I’ll bet was in deference to IBM. Never used it once in the real world. Like I 
mentioned previously, one professor said there’s no reason to learn JCL because 
it will be obsolete soon. That was 1980. JCL was probably the most important 
skill of my career. I did make one misstatement earlier about never using 
Assembler. One time around 2010, we needed to change IEFUSI. Three of us were 
able to make the necessary adjustments.

In 40+ years in IT, 20+ in tech support, other than the one time mentioned 
above, none of my colleagues ever needed to make changes to assembler code. In 
fact, making changes to delivered software can be dangerous.


Sent from Yahoo Mail for iPhone


On Sunday, September 3, 2023, 11:45 AM, g...@gabegold.com  
wrote:

I've only had three jobs (3, 14, 6 years 

Re: Is the IBM Assembler List still alive

[David Spiegel]

HI Bill,
More vacuous and specious arguments.

You said: "... In fact, making changes to delivered software can be 
dangerous. ..."

Writing/modifying Exits is not the same as your statement.

It is evident from what you've written, that you've never been a Systems 
Programmer, the highest mainframe technical calling.
Yes, I am being elitist. People who can't/won't code Assembler should 
know their place and should not be so arrogant in groups like this.

It almost seems like you're jealous of those of us who do this for a living.

It took 3 of you to  modify an IEFUSI?! Hah! How freaking "bush league".
Grow up and learn some Assembler.

Regards,
David

On 2023-09-03 12:37, Bill Johnson wrote:

1 persons experience doesn’t prove anything. The fact is assembler is becoming 
less and less important as a skillset. Anyone who thinks learning it now is a 
worthwhile exercise is a fool. Yeah, I went through college when Assembler was 
a mandatory course and COBOL was an elective. Guess which was infinitely more 
critical in my career! In college we coded almost exclusively in PL/I, which 
I’ll bet was in deference to IBM. Never used it once in the real world. Like I 
mentioned previously, one professor said there’s no reason to learn JCL because 
it will be obsolete soon. That was 1980. JCL was probably the most important 
skill of my career. I did make one misstatement earlier about never using 
Assembler. One time around 2010, we needed to change IEFUSI. Three of us were 
able to make the necessary adjustments.

In 40+ years in IT, 20+ in tech support, other than the one time mentioned 
above, none of my colleagues ever needed to make changes to assembler code. In 
fact, making changes to delivered software can be dangerous.


Sent from Yahoo Mail for iPhone


On Sunday, September 3, 2023, 11:45 AM, g...@gabegold.com  
wrote:

I've only had three jobs (3, 14, 6 years duration) before switching to 
freelance writing/editing/consulting in 1994. But I'll chime in anyway with my 
experience using assembler as a critical part of my work. I learned and used it 
at IBM doing operating system development.

Second job was at Mitre Corporation in Virginia, where we installed early VM. I developed 
tools such as a system automation tool used widely in the VM community. Same for an early 
system performance monitor, also widely used. I enhanced the interface routine for IBM's 
OS-based GPSS simulation tool to support external calls to assembler code, needed by a 
user. I and other system programmers developed many other assembler-based tools which met 
the needs of our users, who worked on various government-sponsored projects. A noteworthy 
project for me was getting graphics software developed for CP/67 CMS  to work under 
VM/370 CMS, allowing a sophisticated simulation system to drive an IBM 2250 graphics 
display device. That application modeled air traffic control, allowing someone in the 
data center to "fly" a Linc Trainer small aircraft which interacted with 
simulated aircraft on 2250 screen to model different collision avoidance algorithms.  The 
graphic software was many thousand lines of assembler (with comments in French, since it 
had been developed at University of Grenoble). We also -- as did the rest of the VM 
community -- used assembler to understand, debug, fix, and enhance VM.

Third job was at VM Systems Group,  small vendor 
developing/marketing/selling/supporting enterprise software. Two early products 
allowed taking snap dumps of the system and intercepting and avoiding VM ABENDs 
-- written in assembler, of course, since they integrated into IBM supplied 
operating system code.

So assembler has been a lifelong part of what I consider to be system 
programming. And as others have noted, it's also occasionally essential in 
meeting application requirements. It also provides a good conceptual 
understanding of how things work at a lower level than that of high-level 
languages, so was helpful in understanding/explaining to users what was going 
in on in their applications.


On Fri, 1 Sep 2023 14:43:36 +, Bill Johnson  wrote:


Which proves my point from a prior thread that coding and using assembler is 
almost nonexistent.

--
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



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

Re: Is the IBM Assembler List still alive

[David Spiegel]

Hi Bill,
More nonsense!
If you were to support Exits and redo them when necessary, you wouldn't 
be making such broad generalizations.


Regards,
David

On 2023-09-01 10:43, Bill Johnson wrote:

Which proves my point from a prior thread that coding and using assembler is 
almost nonexistent.


Sent from Yahoo Mail for iPhone


On Friday, September 1, 2023, 10:39 AM, Steve Thompson  wrote:

Yes I have. It doesn't have a lot of traffic.

Steve Thompson

On 9/1/2023 10:28 AM, Robert Raicer wrote:

Hi folks;

It's been several months since I've received anything from
the IBM Assembler List Server.  The last I knew, the list server
e-mail address was: assembler-l...@listserv.uga.edu

Is this still correct?
Are any of you still getting e-mails from that list server?

Thanks for the help!

Bob Raicer

--

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




--
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: [EXTERNAL] Re: Is SMP/E needed for installs?

[David Spiegel]

Hi Michael,
What about //JOBLIB? ... That is not in any Step.

Regards,
David

On 2023-08-31 15:16, Schmitt, Michael wrote:

It they had used DD, imagine all the customer code that would break that parses JCL 
looking for DDs, and never expects to see a DD outside of a step. And all the code that 
*edits* DDs would have to say "except if PROCLIB". And you wouldn't be able to 
*have* a DD named PROCLIB. And certain code would break that currently *creates* a DD 
named PROCLIB from the proc concatenation.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Radoslaw Skorupka
Sent: Thursday, August 31, 2023 1:44 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [EXTERNAL] Re: Is SMP/E needed for installs?

W dniu 31.08.2023 o 19:48, Paul Gilmartin pisze:

On Thu, 31 Aug 2023 10:39:34 -0700, Tom Brennan wrote:

I thought ORDER= was done because you can code more than one dataset.


DD concatenation should have sufficed for that.

DD concatenation is better, because it may contain more entries. Yes,
ORDER parameter can be continued in next line, but it is much more error
prone than regular DD set.
DD is also better, because it can describe non-catalogued PDS(E)s.

I suspect the JCLLIB in that form was a way to force catalog as a must.
AFAIK it was introduced in MVS 4.1 along with IF/THEN/ELSE statements.
And TIME=NOLIMIT (not 1440).
Or maybe it was INCLUDE?

--
Radoslaw Skorupka
Lodz, Poland

--
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


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

Re: On-Prem to Cloud Mainframe Migration Experiences

[David Spiegel]

Clearly? ... If a few know-it-alls would stop spewing their hot air 
illogical theories, the temperature might come down a bit.


On 2023-08-30 09:18, Bill Johnson wrote:

Wow, clearly global warming is fact while there is zero evidence of any gods in 
the history of the world.


Sent from Yahoo Mail for iPhone


On Tuesday, August 29, 2023, 6:29 PM, David Elliot  
wrote:

Not seeing much in the way of responses to your question, Lance. Could be
you are asking an impossible question. like ' Is there a god?' or 'is
global warming real?' Were you expecting an outpouring of enthusiasm for
this  nebulous technology? What were your experiences? Did you get what you
were promised or what you deserved?




On Mon, Aug 21, 2023 at 11:23 AM Lance D. Jackson <
ljack...@pandrueassociates.com> wrote:


List,

Has anyone had experience (good or bad) with migrating their mainframe Db2
workload from on-prem to the cloud?

--
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




--
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: RPMs for installs and Maint: [WAS SMP/E needed for installs?]

[David Spiegel]

Hi David,
You said: "... he's been banging on ..."
This reminds me of a Yiddish expression that fits with this theme (and 
is said to the "bang"er): Hack Mir Nisht Kain Chainik!

(In English, Don't bang the tea kettle for me!  (i.e. stop blathering))

Regards,
David

On 2023-08-28 07:15, David Crayford wrote:

On 27/8/2023 11:05 am, Tom Brennan wrote:
A bigger problem is Jon says things like this with such conviction 
and authority that other people reading these posts, perhaps years 
from now, will think they are true.


Don't engage with him! There's no point in debating with a troll.

Lately, he's been banging on about the 99.99% availability on the 
z16. It's clear he's either deeply ignorant or gullible. In any case, 
it seems he missed the fine print: 
https://www.ibm.com/downloads/cas/0MZVKEYJ. 
(Who's willing to spend tens of millions of dollars to run a small 
Linux rack?)


"DISCLAIMER: IBM internal data based on measurements and projections 
was used in calculating the expected value. Necessary components 
include IBM z16; IBM z/VM V7.2 systems collected in a Single System 
Image, each running RHOCP 4.10 or above;
IBM Operations Manager; GDPS 4.5 for management of data recovery and 
virtual machine recovery across metro distance systems and storage, 
including Metro Multi-site workload and GDPS Global; and IBM DS8000 
series storage with IBM HyperSwap. A
MongoDB v4.2 workload was used. Necessary resiliency technology must 
be enabled, including z/VM Single System Image clustering, GDPS xDR 
Proxy for z/VM, and RedHat OpenShift Data Foundation (ODF) 4.10 for 
management of local storage devices.
Application-induced outages are not included in the above 
measurements. Other configurations (hardware or software) may provide 
different availability characteristics."


Could it be that Jon Perryman is actually Bill Johnson in disguise, 
using ChatGPT to compose his posts? Does he have a Linkedin profile 
where we can read he's credentials?




On 8/26/2023 7:31 PM, David Spiegel wrote:

Hi Jon,
You said: "...The M in SMP/e stands for Maintenance ..."
This statement has NEVER been true.
The M is an abbreviation of Modification and it has ALWAYS been this 
way.


Regards,
David



--
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


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