Re: JCL checkers?

[Jeffrey Holst]

Like several others we use JCLCHECK from Broadcom/CA. We were using JCLSCAN, 
but we had a new requirement that we be able to check JCL intended to run on a 
different sysplex. (We create our production JCL on a test sysplex.) JCLCHECK 
has a feature that does this.

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

lost mainframe info

[Stan Saraczewski]

The host where my client has rented time and stored software is now
unreachable. Used to get a standard VTAM large logo proclaiming MTI-1 and a
list of apps below, like CICS and TSO to select from.

Can anyone provide contact info or at least the name of the company ?

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

Re: lost mainframe info

[Jeremy Nicoll]

On Fri, 12 Mar 2021, at 13:31, Stan Saraczewski wrote:
> The host where my client has rented time and stored software is now
> unreachable. Used to get a standard VTAM large logo proclaiming MTI-1 and a
> list of apps below, like CICS and TSO to select from.
> 
> Can anyone provide contact info or at least the name of the company ?

If your client /rented/ facilities surely they had a contract of some sort, and
thus must know the company name etc?

How did they logon?  Was there an ip address involved?

-- 
Jeremy Nicoll - my opinions are my own.

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

Re: lost mainframe info

[Itschak Mugzach]

Do you have an ip address? Who own it?

בתאריך יום ו׳, 12 במרץ 2021, 15:32, מאת Stan Saraczewski ‏<
stansaraczew...@gmail.com>:

> The host where my client has rented time and stored software is now
> unreachable. Used to get a standard VTAM large logo proclaiming MTI-1 and a
> list of apps below, like CICS and TSO to select from.
>
> Can anyone provide contact info or at least the name of the company ?
>
> --
> 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: lost mainframe info

[Stan Saraczewski]

The owner recently is deceased and his wife does not know. Yes an IP addr
but that is pretty useless using WHOIS.

On Fri, Mar 12, 2021 at 5:42 AM Jeremy Nicoll 
wrote:

> On Fri, 12 Mar 2021, at 13:31, Stan Saraczewski wrote:
> > The host where my client has rented time and stored software is now
> > unreachable. Used to get a standard VTAM large logo proclaiming MTI-1
> and a
> > list of apps below, like CICS and TSO to select from.
> >
> > Can anyone provide contact info or at least the name of the company ?
>
> If your client /rented/ facilities surely they had a contract of some
> sort, and
> thus must know the company name etc?
>
> How did they logon?  Was there an ip address involved?
>
> --
> Jeremy Nicoll - my opinions are my own.
>
> --
> 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: lost mainframe info

[Stan Saraczewski]

Yes,  AT+T. Not sure if they would share customer  info.

On Fri, Mar 12, 2021 at 5:43 AM Itschak Mugzach <
0305158ad67d-dmarc-requ...@listserv.ua.edu> wrote:

> Do you have an ip address? Who own it?
>
> בתאריך יום ו׳, 12 במרץ 2021, 15:32, מאת Stan Saraczewski ‏<
> stansaraczew...@gmail.com>:
>
> > The host where my client has rented time and stored software is now
> > unreachable. Used to get a standard VTAM large logo proclaiming MTI-1
> and a
> > list of apps below, like CICS and TSO to select from.
> >
> > Can anyone provide contact info or at least the name of the company ?
> >
> > --
> > 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: AMODE issue

[Binyamin Dissen]

Wow. I am trying to figure this out.

In general, I would expect that File-Aid wants the program calling
data-masking to be compiled at amode31, which should be pretty much all modern
compilers, especially those LE enabled.

The "remote" user is a fly in the ointment. I don't see why remote should be
relevant.

On Thu, 11 Mar 2021 13:12:45 -0600 Bill Giannelli 
wrote:

:>we use the product File - Aid for Data Masking. A user is trying to connect 
remotely and is getting an error CEE0374C CONDITION=CEE3250. The vendor wants 
us to use amode 31. I have no idea where that is either specified or setup.
:>Can anyone advise me?
:>thanks
:>Bill
:>
:>--
:>For IBM-MAIN subscribe / signoff / archive access instructions,
:>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
Binyamin Dissen 
http://www.dissensoftware.com

Director, Dissen Software, Bar & Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

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

Re: lost mainframe info

[Binyamin Dissen]

Unreachable or the credentials do not work?

On Fri, 12 Mar 2021 05:31:30 -0800 Stan Saraczewski
 wrote:

:>The host where my client has rented time and stored software is now
:>unreachable. Used to get a standard VTAM large logo proclaiming MTI-1 and a
:>list of apps below, like CICS and TSO to select from.

:>Can anyone provide contact info or at least the name of the company ?

--
Binyamin Dissen 
http://www.dissensoftware.com

Director, Dissen Software, Bar & Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

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

Re: lost mainframe info

[Jeremy Nicoll]

On Fri, 12 Mar 2021, at 13:44, Stan Saraczewski wrote:
> The owner recently is deceased and his wife does not know. Yes an IP addr
> but that is pretty useless using WHOIS.

At least you should know the country involved, though.

How about however payment was made?  Surely there's an account number
or (if by eg PayPal) an email address?

Were there no support emails?

-- 
Jeremy Nicoll - my opinions are my own.

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

Re: LISTCAT output information in XML or JSON

[David Purdy]

It took my previous company two tries, and the last try was complete in the 
sixth year of a two year project.

David

-Original Message-
From: John McKown 
To: IBM-MAIN@LISTSERV.UA.EDU
Sent: Thu, Mar 11, 2021 8:05 am
Subject: Re: LISTCAT output information in XML or JSON

Thanks. Interesting. Too bad it's not on 1.12. We're really back level and
have been "getting off of the mainframe real soon now" for about 15 years.
And we are on our 3rd or 4th try.

On Wed, Mar 10, 2021, 15:48 Steve Horein  wrote:

> Maybe this?
>
> https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.3.0/com.ibm.zos.v2r3.ieac100/ieac1-cwe-json.htm
>
>
> I personally haven't used it for anything beyond the little airport/weather
> sample they provide.
>
> On Wed, Mar 10, 2021 at 8:15 AM John McKown 
> wrote:
>
> > Does anyone out there know of any program, possibly based on IGGCSI00,
> > which will work like the normal IDCAMS LISTCAT command, but give the
> output
> > in XML or JSON format? I like to use UNIX utilities on Linux to produce
> > reports and parsing the normal LISTCAT output is bothersome. What would
> be
> > even better would be a way  to do an SQL query using a z/OS catalog as
> the
> > data source.
> >
> > --
> > 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: lost mainframe info

[Stan Saraczewski]

Searching for the info is in progress now.

On Fri, Mar 12, 2021 at 6:21 AM Jeremy Nicoll 
wrote:

> On Fri, 12 Mar 2021, at 13:44, Stan Saraczewski wrote:
> > The owner recently is deceased and his wife does not know. Yes an IP addr
> > but that is pretty useless using WHOIS.
>
> At least you should know the country involved, though.
>
> How about however payment was made?  Surely there's an account number
> or (if by eg PayPal) an email address?
>
> Were there no support emails?
>
> --
> Jeremy Nicoll - my opinions are my own.
>
> --
> 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: lost mainframe info

[Stan Saraczewski]

Using a 3270 emulator get a never ending 'connecting'. That is my
description of 'unreachable'.

On Fri, Mar 12, 2021 at 6:16 AM Binyamin Dissen 
wrote:

> Unreachable or the credentials do not work?
>
> On Fri, 12 Mar 2021 05:31:30 -0800 Stan Saraczewski
>  wrote:
>
> :>The host where my client has rented time and stored software is now
> :>unreachable. Used to get a standard VTAM large logo proclaiming MTI-1
> and a
> :>list of apps below, like CICS and TSO to select from.
>
> :>Can anyone provide contact info or at least the name of the company ?
>
> --
> Binyamin Dissen 
> http://www.dissensoftware.com
>
> Director, Dissen Software, Bar & Grill - Israel
>
>
> Should you use the mailblocks package and expect a response from me,
> you should preauthorize the dissensoftware.com domain.
>
> I very rarely bother responding to challenge/response systems,
> especially those from irresponsible companies.
>
> --
> 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: lost mainframe info

[Seymour J Metz]

You might try a whois on the domain name, although that may not help.


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


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Stan Saraczewski [stansaraczew...@gmail.com]
Sent: Friday, March 12, 2021 8:31 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: lost mainframe info

The host where my client has rented time and stored software is now
unreachable. Used to get a standard VTAM large logo proclaiming MTI-1 and a
list of apps below, like CICS and TSO to select from.

Can anyone provide contact info or at least the name of the company ?

--
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: lost mainframe info

[Jeremy Nicoll]

On Fri, 12 Mar 2021, at 14:25, Stan Saraczewski wrote:
> Using a 3270 emulator get a never ending 'connecting'. That is my
> description of 'unreachable'.

Do you know if your client was likely to have had some sort of 
official arrangement with some site with a real machine etc, or 
could this be as basic as someone running either Hercules (an
emulator) on a PC?  Or the IBM equivalent of that?

If it's a PC-based emulation of real kit, then - especially if it has
been run by someone other than a business, it might just not be
running at the moment.

If they're not in your part of the world, then you might have to 
try again in the middle of the night.


Your definition of "unreachable" is not altogether helpful.  What 
happens if you ping or tracert that ip address?


You also mentioned what the VTAM login screen looked like.
Do you have a screenshot?  Apart from the "MTI-1" literal you 
mentioned, do any of the listed services have any clues at all 
in their names? 

-- 
Jeremy Nicoll - my opinions are my own.

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

Re: lost mainframe info

[Seymour J Metz]

I assume that you mean a TN3270 client. Is it possible that they've moved their 
TN3270 server?


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


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Stan Saraczewski [stansaraczew...@gmail.com]
Sent: Friday, March 12, 2021 9:25 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: lost mainframe info

Using a 3270 emulator get a never ending 'connecting'. That is my
description of 'unreachable'.

On Fri, Mar 12, 2021 at 6:16 AM Binyamin Dissen 
wrote:

> Unreachable or the credentials do not work?
>
> On Fri, 12 Mar 2021 05:31:30 -0800 Stan Saraczewski
>  wrote:
>
> :>The host where my client has rented time and stored software is now
> :>unreachable. Used to get a standard VTAM large logo proclaiming MTI-1
> and a
> :>list of apps below, like CICS and TSO to select from.
>
> :>Can anyone provide contact info or at least the name of the company ?
>
> --
> Binyamin Dissen 
> http://secure-web.cisco.com/1ksEO0q_87DZp9s5P9n4ICIpPleW0aOAiTX9Y6rsOdz184wGt2ELMEC5jFpsfsnmpoFVr1iO7-oAuqw5hLULLg9Mhlkfuvh0xwO_XSIUnswEp0K_Yy_Zj9L_SOZ91uTmE5lkRdwuyQ465NkwWVxUXvF56MVlXg3lwJskiQLIRmOzooP9BUqbYjcsEpyfbyA3T1gZfXEZbLrMU-PMrthiub4q-gC_o-BWMqKofRQShos5ZGzVmWZICyNh2VJc7SeS8jzjX2vqSe_kyn3FFcKoRZHSGBHzmKKo9YjOgrzczslXMig-rebUlSonxa78k-D709vH_nGpNraqwLhQISBS-VGOVeIaf_tm09OWo7Iv5rHCnRXSA9U5up-9Fl18c-N7SdueuMxzM0yp_5eIiGZtMaX0DXTeopdpynqZPUCYL4wWQCWCVF1cZcl-_7C2Skvyc/http%3A%2F%2Fwww.dissensoftware.com
>
> Director, Dissen Software, Bar & Grill - Israel
>
>
> Should you use the mailblocks package and expect a response from me,
> you should preauthorize the dissensoftware.com domain.
>
> I very rarely bother responding to challenge/response systems,
> especially those from irresponsible companies.
>
> --
> 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: lost mainframe info

[Stan Saraczewski]

Yes hence the request for contact info.

On Fri, Mar 12, 2021 at 6:56 AM Seymour J Metz  wrote:

> I assume that you mean a TN3270 client. Is it possible that they've moved
> their TN3270 server?
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
> of Stan Saraczewski [stansaraczew...@gmail.com]
> Sent: Friday, March 12, 2021 9:25 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: lost mainframe info
>
> Using a 3270 emulator get a never ending 'connecting'. That is my
> description of 'unreachable'.
>
> On Fri, Mar 12, 2021 at 6:16 AM Binyamin Dissen <
> bdis...@dissensoftware.com>
> wrote:
>
> > Unreachable or the credentials do not work?
> >
> > On Fri, 12 Mar 2021 05:31:30 -0800 Stan Saraczewski
> >  wrote:
> >
> > :>The host where my client has rented time and stored software is now
> > :>unreachable. Used to get a standard VTAM large logo proclaiming MTI-1
> > and a
> > :>list of apps below, like CICS and TSO to select from.
> >
> > :>Can anyone provide contact info or at least the name of the company ?
> >
> > --
> > Binyamin Dissen 
> >
> http://secure-web.cisco.com/1ksEO0q_87DZp9s5P9n4ICIpPleW0aOAiTX9Y6rsOdz184wGt2ELMEC5jFpsfsnmpoFVr1iO7-oAuqw5hLULLg9Mhlkfuvh0xwO_XSIUnswEp0K_Yy_Zj9L_SOZ91uTmE5lkRdwuyQ465NkwWVxUXvF56MVlXg3lwJskiQLIRmOzooP9BUqbYjcsEpyfbyA3T1gZfXEZbLrMU-PMrthiub4q-gC_o-BWMqKofRQShos5ZGzVmWZICyNh2VJc7SeS8jzjX2vqSe_kyn3FFcKoRZHSGBHzmKKo9YjOgrzczslXMig-rebUlSonxa78k-D709vH_nGpNraqwLhQISBS-VGOVeIaf_tm09OWo7Iv5rHCnRXSA9U5up-9Fl18c-N7SdueuMxzM0yp_5eIiGZtMaX0DXTeopdpynqZPUCYL4wWQCWCVF1cZcl-_7C2Skvyc/http%3A%2F%2Fwww.dissensoftware.com
> >
> > Director, Dissen Software, Bar & Grill - Israel
> >
> >
> > Should you use the mailblocks package and expect a response from me,
> > you should preauthorize the dissensoftware.com domain.
> >
> > I very rarely bother responding to challenge/response systems,
> > especially those from irresponsible companies.
> >
> > --
> > 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: lost mainframe info

[Charles Mills]

I know the service bureau in question. They recently moved. I have sent your 
information to my contact there.

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Stan Saraczewski
Sent: Friday, March 12, 2021 6:26 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: lost mainframe info

Using a 3270 emulator get a never ending 'connecting'. That is my
description of 'unreachable'.

On Fri, Mar 12, 2021 at 6:16 AM Binyamin Dissen 
wrote:

> Unreachable or the credentials do not work?
>
> On Fri, 12 Mar 2021 05:31:30 -0800 Stan Saraczewski
>  wrote:
>
> :>The host where my client has rented time and stored software is now
> :>unreachable. Used to get a standard VTAM large logo proclaiming MTI-1
> and a
> :>list of apps below, like CICS and TSO to select from.
>
> :>Can anyone provide contact info or at least the name of the company ?
>
> --
> Binyamin Dissen 
> http://www.dissensoftware.com
>
> Director, Dissen Software, Bar & Grill - Israel
>
>
> Should you use the mailblocks package and expect a response from me,
> you should preauthorize the dissensoftware.com domain.
>
> I very rarely bother responding to challenge/response systems,
> especially those from irresponsible companies.
>
> --
> 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: lost mainframe info

[Stan Saraczewski]

Ok thanks for all the questions and tips. If no one recognizes the logo I
may just have to abandon the question.

On Fri, Mar 12, 2021 at 6:40 AM Jeremy Nicoll 
wrote:

> On Fri, 12 Mar 2021, at 14:25, Stan Saraczewski wrote:
> > Using a 3270 emulator get a never ending 'connecting'. That is my
> > description of 'unreachable'.
>
> Do you know if your client was likely to have had some sort of
> official arrangement with some site with a real machine etc, or
> could this be as basic as someone running either Hercules (an
> emulator) on a PC?  Or the IBM equivalent of that?
>
> If it's a PC-based emulation of real kit, then - especially if it has
> been run by someone other than a business, it might just not be
> running at the moment.
>
> If they're not in your part of the world, then you might have to
> try again in the middle of the night.
>
>
> Your definition of "unreachable" is not altogether helpful.  What
> happens if you ping or tracert that ip address?
>
>
> You also mentioned what the VTAM login screen looked like.
> Do you have a screenshot?  Apart from the "MTI-1" literal you
> mentioned, do any of the listed services have any clues at all
> in their names?
>
> --
> Jeremy Nicoll - my opinions are my own.
>
> --
> 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: lost mainframe info

[Stan Saraczewski]

That is wonderful and thank you for your help. Is it possible for you to
send contact info to me ?  Privately is fine...

On Fri, Mar 12, 2021 at 7:06 AM Charles Mills  wrote:

> I know the service bureau in question. They recently moved. I have sent
> your information to my contact there.
>
> Charles
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Stan Saraczewski
> Sent: Friday, March 12, 2021 6:26 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: lost mainframe info
>
> Using a 3270 emulator get a never ending 'connecting'. That is my
> description of 'unreachable'.
>
> On Fri, Mar 12, 2021 at 6:16 AM Binyamin Dissen <
> bdis...@dissensoftware.com>
> wrote:
>
> > Unreachable or the credentials do not work?
> >
> > On Fri, 12 Mar 2021 05:31:30 -0800 Stan Saraczewski
> >  wrote:
> >
> > :>The host where my client has rented time and stored software is now
> > :>unreachable. Used to get a standard VTAM large logo proclaiming MTI-1
> > and a
> > :>list of apps below, like CICS and TSO to select from.
> >
> > :>Can anyone provide contact info or at least the name of the company ?
> >
> > --
> > Binyamin Dissen 
> > http://www.dissensoftware.com
> >
> > Director, Dissen Software, Bar & Grill - Israel
> >
> >
> > Should you use the mailblocks package and expect a response from me,
> > you should preauthorize the dissensoftware.com domain.
> >
> > I very rarely bother responding to challenge/response systems,
> > especially those from irresponsible companies.
> >
> > --
> > 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

IBM Open Enterprise SDK for Go is now available!

[Yuan Jie Song]

IBM Open Enterprise SDK for Go makes available the popular and 
industry-standard Go (or Golang) programming language to z/OS users.  Go is a 
general-purpose programming language for building large-scale complex software, 
and is the language of cloud infrastructure such as Kubernetes, Open Container 
Initiative, and OpenShift.  Go contains a powerful standard library of packages 
and built-in functions to support application development. It is also an 
open-source project with active open community participation which supports the 
rapid transformation in new technologies that businesses need.

Why Go for z/OS?
As clients embark on their cloud native journey on z/OS, Go is essential for 
enabling new cloud workloads and connecting z/OS to their private cloud, 
accelerating their digital transformation and journey to hybrid cloud.  As 
global economic conditions continue to accelerate the need for businesses to 
focus on digital transformation, the demand for fast, secure, and modern cloud 
native applications on the platform continues to increase.

Combining the performance and agility of Go with the security of IBM Z, IBM 
Open Enterprise SDK for Go allows clients to colocate Go applications with 
critical assets on z/OS for greater data proximity, reduce response time and 
increase throughput for greater efficiency, run popular Go applications on IBM 
Z hardware for greater security, and take advantage of great features supported 
by a large open source community for greater agility. Due to Go's easy to learn 
syntax, IBM Open Enterprise SDK for Go also gives z/OS clients access to a wide 
variety of new talent for application development and modernization.

Download Go today and take advantage of this enormously popular and growing 
technology on IBM Z to power your organization's digital transformation!

How to obtain IBM Open Enterprise SDK for Go?
IBM Open Enterprise SDK for Go is available for zero license charge through 
Shopz (5655-GOZ) SMP/E, or you can download the PAX 
https://www.ibm.com/account/reg/signup?formid=urx-49659. Optional world-class 
IBM Software Subscription and Support is available with your order through 
Shopz (5655-GOS).
Supporting Links:
IBM Open Enterprise SDK for Go product page: 
https://www.ibm.com/products/open-enterprise-sdk-go-zos
For additional information on installation, troubleshooting and packages 
included in this offering please visit the IBM Knowledge Center: 
https://www.ibm.com/support/knowledgecenter/SS3PB8

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

Re: DFHSM Backups using DFDSS - Enqueues

[Shaffer, Terri]

Hi Sorry, No.. I opened an issue with IBM, and they told me DFHSM will 
eventually backup the file, Because I did a List BCDS on the dataset and it was 
backed up.

They just fill the logs with failures, instead of giving a RC=4, Warning about 
the backup.

Ms Terri E Shaffer
Senior Systems Engineer,
z/OS Support:
ACIWorldwide – Telecommuter
H(412-766-2697) C(412-519-2592)
terri.shaf...@aciworldwide.com

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Glenn Wilcock
Sent: Friday, March 5, 2021 12:32 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFHSM Backups using DFDSS - Enqueues

External Email


Hi Terri,

You have the correct HSM setting - INUSE(...)  HSM traps on the ADR412 message 
to know that DSS failed serialization and that it should be retried.  Do you 
see a subsequent DSS Dump for the data sets that initially failed (a retry w/o 
serialization)?

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

 [https://go.aciworldwide.com/rs/030-ROK-804/images/aci-footer.jpg] 

This email message and any attachments may contain confidential, proprietary or 
non-public information. The information is intended solely for the designated 
recipient(s). If an addressing or transmission error has misdirected this 
email, please notify the sender immediately and destroy this email. Any review, 
dissemination, use or reliance upon this information by unintended recipients 
is prohibited. Any opinions expressed in this email are those of the author 
personally.

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

Re: COBOL V6.2 possible change in behavior with recent patch level

[Clark Morris]

[Default] On 11 Mar 2021 11:52:56 -0800, in bit.listserv.ibm-main
frank.swarbr...@outlook.com (Frank Swarbrick) wrote:

>We recently applied patches up through September 2020 to our Enterprise COBOL 
>V6.2 compiler.  Prior to this we had patches through September 2019.  This 
>appears to have changed how some code is generate, even though the compiler 
>options have not changed.
>
>Take the following example:
>
> 01  ipt.
> 05  as-char   pic xx.
> 88  as-char-10value '10'.
> 05  as-nums   redefines as-char
>   pic 99.
> 88  as-num-10 value 10.
>
>Code checking the as-num-10 condition is generating the following code with 
>the "current" patch level:

If as-nums is PIC 99 and not PIC S99, the generated code is flat out
wrong.  The field can only be x'F1F0" and x'F1C0' would be in error.

Clark Morris 
>
>COBOL V6.2 NUMPROC(NOPFD) ZONEDATA(MIG)
>
>21:  002200 if as-num-10
>   0001C8  F211 D138 9018 21PACK312(2,R13),24(2,R9)   
> #  AS-NUMS
>   0001CE  F911 D138 31EC 21CP  312(2,R13),492(2,R3)  
> #   +492
>   0001D4  A764 0016  21JNE L0006
>
>This causes a situation where if "as-nums" is not a valid zoned-decimal field 
>it's causing a data exception (S0C7) on the CP instruction.
>While acknowledging that the code is "bad", or the data is bad (depending on 
>how you look at it), we're still wondering what changed with the recent 
>patches.
>
>While I can't (easily) recover the compiler to the previous level, I did test 
>with our COBOL V5.2 compiler, which is out of service and did not receive any 
>recent patches.  The same code compiles to this:
>
>COBOL V5.2 NUMPROC(NOPFD) ZONEDATA(MIG)
>
>21:  002200 if as-num-10
>   00019E  E300 8028 0095 21LLH R0,40(,R8)
> #  AS-NUMS
>   0001A4  C00D  F0F0 21OILFR0,X'F0F0'
>   0001AA  A70E F1F0  21CHI R0,0xf1f0
>   0001AE  A764 000C  21JNE L0007
>
>My guess is that prior to the patches COBOL V6.2 would have done something 
>similar.  As you can see, it's using a CHI instead of a CP, and thus no S0C7.
>It seems like V6.2 should not have changed its behavior in this regard.
>Thoughts?  Is this a new "bug" in COBOL V6.2?
>
>Frank
>
>--
>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: IBM Open Enterprise SDK for Go is now available!

[Tom Conley]

On 3/12/2021 10:14 AM, Yuan Jie Song wrote:

IBM Open Enterprise SDK for Go makes available the popular and 
industry-standard Go (or Golang) programming language to z/OS users.  Go is a 
general-purpose programming language for building large-scale complex software, 
and is the language of cloud infrastructure such as Kubernetes, Open Container 
Initiative, and OpenShift.  Go contains a powerful standard library of packages 
and built-in functions to support application development. It is also an 
open-source project with active open community participation which supports the 
rapid transformation in new technologies that businesses need.


Yuan,

This is good news.  Please also bring back Swift.

Regards,
Tom Conley

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

COBOL V6.2 possible change in behavior with recent patch level

[Tom Ross]

>We recently applied patches up through September 2020 to our Enterprise COB=
>OL V6.2 compiler.  Prior to this we had patches through September 2019.  Th=
>is appears to have changed how some code is generate, even though the compi=
>ler options have not changed.

Frank, this is unfortunate, but I have to say, we do not recommend running
COBOL programs with invalid data, and we do not recommend using ZONEDATA
with other than (PFD) as the sub option.  We keep finding new ways that
older COBOL behaved differently than new COBOL with invalid data, and in
the case you mention we had a customer complaining that the example you
posted ABENDed with COBOL V4 but not COBOL V6 with ZONEDATA(MIG), so we
changed the code.  The intention of ZONEDATA(other than PFD) is to mimic
COBOL V4, and this is a little bit of an ongoing process.  We, of course,
NEVER used to test with invalid data (data that does not match the PICTURE
and USAGE) so this is a challenging job!

The best way to go is to correct your programs and data to follow the rules.
For example, we had a customer recompile all programs in an application
with COBOL V6.1, but they did NOT folow our 2-compile 2-test migration process
to find and clean up invalid data.  The results o their regression tests
were OK, so they went into production!  All was well until they moved to
COBOL V6.2 to compile with ARCH(12) and exploit z14.  At that point they
discovered they had some invalid data processing that started causing new
ABENDs with Vector Packed Decimal instructions.

I recommend cleaning things up before declaring migration to COBOL V6 complete!

Cheers,
TomR  >> COBOL is the Language of the Future! <<

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

Re: COBOL V6.2 possible change in behavior with recent patch level

[Frank Swarbrick]

Thanks for this info.  Makes me feel better (for whatever reason).
We actually had some guesses that the issue was caused by migrating from COBOL 
V4 to V6, even though that was done months ago.  (The "bad code" was added 
after the migration, and thus had never run under COBOL V4).

The unfortunate thing is (this is my understanding, anyway), the bug in the 
application showed up in testing but was ignored/bypassed as an "environment 
issue", which of course was a bad assumption.

We're now discussing using the NUMCHECK option in development, and I think that 
will turn up a lot of these cases.  Which is a good thing.

Frank



From: IBM Mainframe Discussion List  on behalf of 
Dylan Perry <0300eb0a0e16-dmarc-requ...@listserv.ua.edu>
Sent: Thursday, March 11, 2021 10:32 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: COBOL V6.2 possible change in behavior with recent patch level

ZONEDATA(MIG) is meant to provide compatibility with the NUMPROC(MIG) option in 
pre-V5 versions. COBOL 4.2 with NUMPROC(MIG) abends with a S0C7 with the 
following instructions:-

001154  IF
   0004CC  4DE0 9152   BAS   14,338(0,9) TGT TEST 
INFORMATION AREA +10
   0004D0 GN=19EQU   *
   0004D0  F211 D110 8010  PACK  272(2,13),16(2,8)   TS2=0  
   AS-NUMS
   0004D6  F911 D110 A0B2  CP272(2,13),178(2,10) TS2=0  
   PGMLIT AT +162

This APAR explains that in versions 5 to just before the recent 6.2 fix it was 
"incorrectly" fixing the S0C7:-

https://www.ibm.com/support/pages/apar/PH28379

--
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: COBOL V6.2 possible change in behavior with recent patch level

[Frank Swarbrick]

Thanks for the input, Tom.  I agree with everything you say.

A somewhat ironic thing is it technically isn't "bad data".  Rather, it's good 
data but only under certain circumstances.  That is, there is a redefines 
(several, actually), and the condition should have been evaluated only in cases 
where another field had a certain value.  The code has, of course, no been 
fixed to check the other field before treating the field in question as numeric.

If only COBOL had "tagged redefines" (see also "tagged unions", "sum types", 
"variant types" and many other names for the same idea).

Frank


From: IBM Mainframe Discussion List  on behalf of Tom 
Ross 
Sent: Friday, March 12, 2021 9:44 AM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: COBOL V6.2 possible change in behavior with recent patch level

>We recently applied patches up through September 2020 to our Enterprise COB=
>OL V6.2 compiler.  Prior to this we had patches through September 2019.  Th=
>is appears to have changed how some code is generate, even though the compi=
>ler options have not changed.

Frank, this is unfortunate, but I have to say, we do not recommend running
COBOL programs with invalid data, and we do not recommend using ZONEDATA
with other than (PFD) as the sub option.  We keep finding new ways that
older COBOL behaved differently than new COBOL with invalid data, and in
the case you mention we had a customer complaining that the example you
posted ABENDed with COBOL V4 but not COBOL V6 with ZONEDATA(MIG), so we
changed the code.  The intention of ZONEDATA(other than PFD) is to mimic
COBOL V4, and this is a little bit of an ongoing process.  We, of course,
NEVER used to test with invalid data (data that does not match the PICTURE
and USAGE) so this is a challenging job!

The best way to go is to correct your programs and data to follow the rules.
For example, we had a customer recompile all programs in an application
with COBOL V6.1, but they did NOT folow our 2-compile 2-test migration process
to find and clean up invalid data.  The results o their regression tests
were OK, so they went into production!  All was well until they moved to
COBOL V6.2 to compile with ARCH(12) and exploit z14.  At that point they
discovered they had some invalid data processing that started causing new
ABENDs with Vector Packed Decimal instructions.

I recommend cleaning things up before declaring migration to COBOL V6 complete!

Cheers,
TomR  >> COBOL is the Language of the Future! <<

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

IPL from SCSI DVD or via NVMe

[Ed Jaffe]

I'd like to IPL stand-alone tape-based utilities from SCSI DVD or via 
NVMe instead of mainframe tape. Is it possible?


Has anyone done this?

Thanks,

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

Re: JCL checkers?

[Mitch Mccluhan]

 Folks,
As an FYI, J-MAN makes it possible to work on a "reference model",  from which 
the tool automatically creates as many target environments as you need, based 
on "rules" that describe how to modify the jobs to make them effective for the 
specific target environments. Every single keyword of the job, every file name, 
every parameter can be automatically changed, including the structure itself of 
the job can be changed.
Mitch
 
 
-Original Message-
From: Jeffrey Holst <02366bf64af9-dmarc-requ...@listserv.ua.edu>
To: IBM-MAIN@LISTSERV.UA.EDU
Sent: Fri, Mar 12, 2021 6:45 am
Subject: Re: JCL checkers?

Like several others we use JCLCHECK from Broadcom/CA. We were using JCLSCAN, 
but we had a new requirement that we be able to check JCL intended to run on a 
different sysplex. (We create our production JCL on a test sysplex.) JCLCHECK 
has a feature that does this.

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

Strasbourg data center fire

[Mike Schwab]

https://www.datacenterdynamics.com/en/news/ovh-fire-update-four-halls-sbg1-destroyed-well-all-sbg2/

-- 
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 to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Strasbourg data center fire

[Charles Mills]

Is there a mainframe relevance? Not being snarky; inquiring minds want to know.

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Mike Schwab
Sent: Friday, March 12, 2021 1:02 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Strasbourg data center fire

https://www.datacenterdynamics.com/en/news/ovh-fire-update-four-halls-sbg1-destroyed-well-all-sbg2/

-- 
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 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: Strasbourg data center fire

[Ed Jaffe]

On 3/12/2021 3:28 PM, Charles Mills wrote:

Is there a mainframe relevance? Not being snarky; inquiring minds want to know.


Plenty!

Quite a few mainframe shops are using TCT (Transparent Cloud Tiering) to 
back their data up the cloud (instead of tape) directly from their IBM, 
EMC or Hitachi DASD controllers using near-zero CPU cycles because, 
despite the command to do so coming from the mainframe, no data passes 
through the IBM Z itself.


OVH is one of the more popular providers of this service...


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

Re: Strasbourg data center fire

[Mike Schwab]

https://twitter.com/wizardofzos/status/1370465804702076932?s=20

Mainframe.community in building SBG3, of 360,000 domain names.

On Fri, Mar 12, 2021 at 5:28 PM Charles Mills  wrote:
>
> Is there a mainframe relevance? Not being snarky; inquiring minds want to 
> know.
>
> Charles
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of Mike Schwab
> Sent: Friday, March 12, 2021 1:02 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Strasbourg data center fire
>
> https://www.datacenterdynamics.com/en/news/ovh-fire-update-four-halls-sbg1-destroyed-well-all-sbg2/
>
> --
> 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 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



-- 
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 to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: JCL checkers?

[Don Leahy]

I am a big fan or Pro/JCL.   Especially the feature that lets you simulate
the execution of an entire job stream.  It’s an easy way to check that your
DSNs are consistent from job to job, without actually running them.

On Fri, Mar 12, 2021 at 15:28 Mitch Mccluhan <
005d889cebf0-dmarc-requ...@listserv.ua.edu> wrote:

>  Folks,
> As an FYI, J-MAN makes it possible to work on a "reference model",  from
> which the tool automatically creates as many target environments as you
> need, based on "rules" that describe how to modify the jobs to make them
> effective for the specific target environments. Every single keyword of the
> job, every file name, every parameter can be automatically changed,
> including the structure itself of the job can be changed.
> Mitch
>
>
> -Original Message-
> From: Jeffrey Holst <02366bf64af9-dmarc-requ...@listserv.ua.edu>
> To: IBM-MAIN@LISTSERV.UA.EDU
> Sent: Fri, Mar 12, 2021 6:45 am
> Subject: Re: JCL checkers?
>
> Like several others we use JCLCHECK from Broadcom/CA. We were using
> JCLSCAN, but we had a new requirement that we be able to check JCL intended
> to run on a different sysplex. (We create our production JCL on a test
> sysplex.) JCLCHECK has a feature that does this.
>
> --
> 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: COBOL V6.2 possible change in behavior with recent patch level

[Clark Morris]

[Default] On 12 Mar 2021 09:34:42 -0800, in bit.listserv.ibm-main
frank.swarbr...@outlook.com (Frank Swarbrick) wrote:

>Thanks for this info.  Makes me feel better (for whatever reason).
>We actually had some guesses that the issue was caused by migrating from COBOL 
>V4 to V6, even though that was done months ago.  (The "bad code" was added 
>after the migration, and thus had never run under COBOL V4).
>
>The unfortunate thing is (this is my understanding, anyway), the bug in the 
>application showed up in testing but was ignored/bypassed as an "environment 
>issue", which of course was a bad assumption.

Are you sure that as-num is defined as PIC 99 as opposed to S99.  The
code you show is valid for PIC S99 but not PIC 99.

Clark Morris
>
>We're now discussing using the NUMCHECK option in development, and I think 
>that will turn up a lot of these cases.  Which is a good thing.
>
>Frank
>
>
>
>From: IBM Mainframe Discussion List  on behalf of 
>Dylan Perry <0300eb0a0e16-dmarc-requ...@listserv.ua.edu>
>Sent: Thursday, March 11, 2021 10:32 PM
>To: IBM-MAIN@LISTSERV.UA.EDU 
>Subject: Re: COBOL V6.2 possible change in behavior with recent patch level
>
>ZONEDATA(MIG) is meant to provide compatibility with the NUMPROC(MIG) option 
>in pre-V5 versions. COBOL 4.2 with NUMPROC(MIG) abends with a S0C7 with the 
>following instructions:-
>
>001154  IF
>   0004CC  4DE0 9152   BAS   14,338(0,9) TGT TEST 
> INFORMATION AREA +10
>   0004D0 GN=19EQU   *
>   0004D0  F211 D110 8010  PACK  272(2,13),16(2,8)   TS2=0 
> AS-NUMS
>   0004D6  F911 D110 A0B2  CP272(2,13),178(2,10) TS2=0 
> PGMLIT AT +162
>
>This APAR explains that in versions 5 to just before the recent 6.2 fix it was 
>"incorrectly" fixing the S0C7:-
>
>https://www.ibm.com/support/pages/apar/PH28379
>
>--
>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: COBOL V6.2 possible change in behavior with recent patch level

[Paul Gilmartin]

On Fri, 12 Mar 2021 17:43:05 +, Frank Swarbrick wrote:
>...
>If only COBOL had "tagged redefines" (see also "tagged unions", "sum types", 
>"variant types" and many other names for the same idea).
> 
Like ALGOL 68 conforms-to-and-becomes?
>
>
>From: Tom Ross 
>Sent: Friday, March 12, 2021 9:44 AM
>...  We, of course,
>NEVER used to test with invalid data (data that does not match the PICTURE
>and USAGE) so this is a challenging job!
>
Think "Fuzz Testing".  The past tense "used to" seems laudable.  I often
imagined grabbing a fistful of cards (yes, those) from the wasetbasket
and using them as "//SYSIN DD *" to test error handling.

-- gil

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

Re: LISTCAT output information in XML or JSON

[Salva Carrasco]

I wrote an assembler UDTF for Db2 that retrieve list of cataloged datasets 
based on mask/type using the CSI.

Can share it if you are interested.

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

Re: EXTERNAL: COBOL V6.2 possible change in behavior with recent patch level

[Savor, Thomas]

Mr Ross,

I'm not sure that you guys at IBM have realized that you have created a 
nightmare out there in the field for a lot of customers and especially vendors 
of COBOL applications.  I'm a part of many that support/write Assembler/Cobol 
code for a giant Credit Software system.  We have 5+ million lines of code.

Now as a vendor, we also have "many" processing centers around the World 
running our software.  Some sites we run, some sites IBM runs.  Do you think 
that each and every site has the same box, same Z/os level, same compiler , 
same maintenance level , same ARCH level or use same OPT setting ??  All the 
application folks can do is recommend.  But Management and Systems Programmers 
tend to do what they want.

If I'm directed that my Test box is a Z13 (and is), but my Production box is a 
Z15 (it's a Z14 at this very moment).  Then I'm NEVER testing code that goes 
into Production EVER.  And this has caused problemssome in the form of 
abends, some in the form of added run times.  Its very unrealistic to think 
that I have to regression test 5+ million lines of code every time maintenance 
to the compiler is applied, let alone go from 6.2 to the next Cobol 
release...who the hell is going to pay for this ??  The application folks NEVER 
know when maintenance is going in or when the next compiler release goes 
in.until after the fact.

IBM and even System Programmers need to stop hiding behind "fix your crap 
code", how about "stop changing the behavior of our programs on a whim".

Last year we had a little very small program cause much grief after 30+ years 
of NO PROBLEMS.  Our release goes out to a good customer and run time goes from 
10 minutes to 1.5 hours on a transaction edit process of 1+ million 
recordsterrible.  We found out from our customer thru STROBE that 95% of 
the time was spent in Abend Recovery because a Leap Year date calculation 
routine that couldn't care less about the result of a division compute 
statement...only the remainder.  But because the result was too small, program 
blew up, went into Abend Recovery and continued on.  Testing and UAT had no 
idea.  This was because of the sensitivity of the Vector Packed Decimal 
instructions that were on a Z14 box.  We were able to reproduce error on a Z13 
with OPT(2)but had no idea of the ramifications.

Personally, I wish we could just stay on COBOL 4.2...but no such luck.

Thanks,

Tom





-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Tom 
Ross
Sent: Friday, March 12, 2021 11:45 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: EXTERNAL: COBOL V6.2 possible change in behavior with recent patch 
level

CAUTION: This email originated from outside of the company. Do not click links 
or open attachments unless you recognize the sender and know the content is 
safe.



>We recently applied patches up through September 2020 to our Enterprise
>COB= OL V6.2 compiler.  Prior to this we had patches through September
>2019.  Th= is appears to have changed how some code is generate, even
>though the compi= ler options have not changed.

Frank, this is unfortunate, but I have to say, we do not recommend running 
COBOL programs with invalid data, and we do not recommend using ZONEDATA with 
other than (PFD) as the sub option.  We keep finding new ways that older COBOL 
behaved differently than new COBOL with invalid data, and in the case you 
mention we had a customer complaining that the example you posted ABENDed with 
COBOL V4 but not COBOL V6 with ZONEDATA(MIG), so we changed the code.  The 
intention of ZONEDATA(other than PFD) is to mimic COBOL V4, and this is a 
little bit of an ongoing process.  We, of course, NEVER used to test with 
invalid data (data that does not match the PICTURE and USAGE) so this is a 
challenging job!

The best way to go is to correct your programs and data to follow the rules.
For example, we had a customer recompile all programs in an application with 
COBOL V6.1, but they did NOT folow our 2-compile 2-test migration process to 
find and clean up invalid data.  The results o their regression tests were OK, 
so they went into production!  All was well until they moved to COBOL V6.2 to 
compile with ARCH(12) and exploit z14.  At that point they discovered they had 
some invalid data processing that started causing new ABENDs with Vector Packed 
Decimal instructions.

I recommend cleaning things up before declaring migration to COBOL V6 complete!

Cheers,
TomR  >> COBOL is the Language of the Future! <<

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
The information contained in this message is proprietary and/or confidential. 
If you are not the intended recipient, please: (i) delete the message and all 
copies; (ii) do not disclose, distribute or use the message in any manner; and 
(iii) n