Re: Peter Relson Article

2019-11-12 Thread Vernooij, Kees (ITOP NM) - KLM
Great article, and yes, nice to see his face. 
He looks much friendlier than what I had in my mind from this list, where he 
was more the friendly but strict school teacher, correcting us patiently every 
time we were wrong.

Kees.


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jousma, David
Sent: 12 November 2019 20:11
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Peter Relson Article

Thanks for posting this!  If not for anything else, but to put a face with 
Peter's name!

_
Dave Jousma
AVP | Manager, Systems Engineering  

Fifth Third Bank  |  1830 East Paris Ave, SE  |  MD RSCB2H  |  Grand Rapids, MI 
49546
616.653.8429  |  fax: 616.653.2717



-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Dale R. Smith
Sent: Tuesday, November 12, 2019 2:08 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Peter Relson Article

**CAUTION EXTERNAL EMAIL**

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

Not sure how many people on the list read the Mainframe Edition of the IBM 
Systems Magazine, but I saw this article recently in the September/October 2019 
edition online:

https://ibmsystemsmag.com/IBM-Z/09/2019/peter-relson

I assume his outside-of-work passion has helped him deal with the "wildlife" on 
this list also!  :-)>

--
Dale R. Smith

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

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

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

For information, services and offers, please visit our web site: 
http://www.klm.com. This e-mail and any attachment may contain confidential and 
privileged material intended for the addressee only. If you are not the 
addressee, you are notified that no part of the e-mail or any attachment may be 
disclosed, copied or distributed, and that any other action related to this 
e-mail or attachment is strictly prohibited, and may be unlawful. If you have 
received this e-mail by error, please notify the sender immediately by return 
e-mail, and delete this message.

Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its 
employees shall not be liable for the incorrect or incomplete transmission of 
this e-mail or any attachments, nor responsible for any delay in receipt.
Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch 
Airlines) is registered in Amstelveen, The Netherlands, with registered number 
33014286



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


Re: Peter Relson Article

2019-11-12 Thread scott Ford
Mike,

Amen to that bro.

On Tue, Nov 12, 2019 at 7:22 PM Mike Schwab  wrote:

> Musicians make the best programmers and code breakers,
>
> On Tue, Nov 12, 2019 at 6:16 PM scott Ford  wrote:
> >
> > These are great I have ran across a lot of creative people in IT. Music
> and
> > photography. To mention a few.
> >
> > Scott
> >
> > On Tue, Nov 12, 2019 at 6:55 PM Bill Johnson <
> > 0047540adefe-dmarc-requ...@listserv.ua.edu> wrote:
> >
> > > Nice article. Wife and I are huge fans of this photographer and have
> some
> > > of his pieces. Think he’s the best, maybe ever, wildlife photographer.
> > > https://www.mangelsen.com/
> > > Bill Johnson
> > >
> > >
> > >
> > >
> > >
> > > Sent from Yahoo Mail for iPhone
> > >
> > >
> > > On Tuesday, November 12, 2019, 2:15 PM, Wayne Bickerdike <
> > > wayn...@gmail.com> wrote:
> > >
> > > Great article. It's that Peter gives the list so much of his knowledge.
> > > Muir Woods is a favourite of mine from the days I lived in California.
> > >
> > > A select few may know about the Anti-Ranger run held there in hilarious
> > > circumstances.
> > >
> > > On Wed, Nov 13, 2019 at 6:12 AM Jousma, David <
> > > 01a0403c5dc1-dmarc-requ...@listserv.ua.edu> wrote:
> > >
> > > > Thanks for posting this!  If not for anything else, but to put a face
> > > with
> > > > Peter's name!
> > > >
> > > >
> > > >
> > >
> _
> > > > Dave Jousma
> > > > AVP | Manager, Systems Engineering
> > > >
> > > > Fifth Third Bank  |  1830 East P
> > > <
> https://www.google.com/maps/search/Bank%C2%A0+%7C%C2%A0+1830+East+P?entry=gmail=g
> >aris
> > > Ave, SE  |  MD RSCB2H  |  Grand
> > > > Rapids, MI 49546
> > > > 616.653.8429  |  fax: 616.653.2717
> > > >
> > > >
> > > >
> > > > -Original Message-
> > > > From: IBM Mainframe Discussion List  On
> Behalf
> > > > Of Dale R. Smith
> > > > Sent: Tuesday, November 12, 2019 2:08 PM
> > > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > > Subject: Peter Relson Article
> > > >
> > > > **CAUTION EXTERNAL EMAIL**
> > > >
> > > > **DO NOT open attachments or click on links from unknown senders or
> > > > unexpected emails**
> > > >
> > > > Not sure how many people on the list read the Mainframe Edition of
> the
> > > IBM
> > > > Systems Magazine, but I saw this article recently in the
> > > September/October
> > > > 2019 edition online:
> > > >
> > > > https://ibmsystemsmag.com/IBM-Z/09/2019/peter-relson
> > > >
> > > > I assume his outside-of-work passion has helped him deal with the
> > > > "wildlife" on this list also!  :-)>
> > > >
> > > > --
> > > > Dale R. Smith
> > > >
> > > >
> --
> > > > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > > email
> > > > to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> **CAUTION
> > > > EXTERNAL EMAIL**
> > > >
> > > > **DO NOT open attachments or click on links from unknown senders or
> > > > unexpected emails**
> > > >
> > > > 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 instructions,
> > > > send email to lists...@listserv.ua.edu with the message: INFO
> IBM-MAIN
> > > >
> > >
> > >
> > > --
> > > Wayne V. Bickerdike
> > >
> > > --
> > > 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
> > >
> > --
> > Scott Ford
> > IDMWORKS
> > z/OS Development
> >
> > --
> > 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 

Re: Peter Relson Article

2019-11-12 Thread Mike Schwab
Musicians make the best programmers and code breakers,

On Tue, Nov 12, 2019 at 6:16 PM scott Ford  wrote:
>
> These are great I have ran across a lot of creative people in IT. Music and
> photography. To mention a few.
>
> Scott
>
> On Tue, Nov 12, 2019 at 6:55 PM Bill Johnson <
> 0047540adefe-dmarc-requ...@listserv.ua.edu> wrote:
>
> > Nice article. Wife and I are huge fans of this photographer and have some
> > of his pieces. Think he’s the best, maybe ever, wildlife photographer.
> > https://www.mangelsen.com/
> > Bill Johnson
> >
> >
> >
> >
> >
> > Sent from Yahoo Mail for iPhone
> >
> >
> > On Tuesday, November 12, 2019, 2:15 PM, Wayne Bickerdike <
> > wayn...@gmail.com> wrote:
> >
> > Great article. It's that Peter gives the list so much of his knowledge.
> > Muir Woods is a favourite of mine from the days I lived in California.
> >
> > A select few may know about the Anti-Ranger run held there in hilarious
> > circumstances.
> >
> > On Wed, Nov 13, 2019 at 6:12 AM Jousma, David <
> > 01a0403c5dc1-dmarc-requ...@listserv.ua.edu> wrote:
> >
> > > Thanks for posting this!  If not for anything else, but to put a face
> > with
> > > Peter's name!
> > >
> > >
> > >
> > _
> > > Dave Jousma
> > > AVP | Manager, Systems Engineering
> > >
> > > Fifth Third Bank  |  1830 East P
> > aris
> > Ave, SE  |  MD RSCB2H  |  Grand
> > > Rapids, MI 49546
> > > 616.653.8429  |  fax: 616.653.2717
> > >
> > >
> > >
> > > -Original Message-
> > > From: IBM Mainframe Discussion List  On Behalf
> > > Of Dale R. Smith
> > > Sent: Tuesday, November 12, 2019 2:08 PM
> > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > Subject: Peter Relson Article
> > >
> > > **CAUTION EXTERNAL EMAIL**
> > >
> > > **DO NOT open attachments or click on links from unknown senders or
> > > unexpected emails**
> > >
> > > Not sure how many people on the list read the Mainframe Edition of the
> > IBM
> > > Systems Magazine, but I saw this article recently in the
> > September/October
> > > 2019 edition online:
> > >
> > > https://ibmsystemsmag.com/IBM-Z/09/2019/peter-relson
> > >
> > > I assume his outside-of-work passion has helped him deal with the
> > > "wildlife" on this list also!  :-)>
> > >
> > > --
> > > Dale R. Smith
> > >
> > > --
> > > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > email
> > > to lists...@listserv.ua.edu with the message: INFO IBM-MAIN **CAUTION
> > > EXTERNAL EMAIL**
> > >
> > > **DO NOT open attachments or click on links from unknown senders or
> > > unexpected emails**
> > >
> > > 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 instructions,
> > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> > >
> >
> >
> > --
> > Wayne V. Bickerdike
> >
> > --
> > 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
> >
> --
> Scott Ford
> IDMWORKS
> z/OS Development
>
> --
> 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: Peter Relson Article

2019-11-12 Thread scott Ford
These are great I have ran across a lot of creative people in IT. Music and
photography. To mention a few.

Scott

On Tue, Nov 12, 2019 at 6:55 PM Bill Johnson <
0047540adefe-dmarc-requ...@listserv.ua.edu> wrote:

> Nice article. Wife and I are huge fans of this photographer and have some
> of his pieces. Think he’s the best, maybe ever, wildlife photographer.
> https://www.mangelsen.com/
> Bill Johnson
>
>
>
>
>
> Sent from Yahoo Mail for iPhone
>
>
> On Tuesday, November 12, 2019, 2:15 PM, Wayne Bickerdike <
> wayn...@gmail.com> wrote:
>
> Great article. It's that Peter gives the list so much of his knowledge.
> Muir Woods is a favourite of mine from the days I lived in California.
>
> A select few may know about the Anti-Ranger run held there in hilarious
> circumstances.
>
> On Wed, Nov 13, 2019 at 6:12 AM Jousma, David <
> 01a0403c5dc1-dmarc-requ...@listserv.ua.edu> wrote:
>
> > Thanks for posting this!  If not for anything else, but to put a face
> with
> > Peter's name!
> >
> >
> >
> _
> > Dave Jousma
> > AVP | Manager, Systems Engineering
> >
> > Fifth Third Bank  |  1830 East P
> aris
> Ave, SE  |  MD RSCB2H  |  Grand
> > Rapids, MI 49546
> > 616.653.8429  |  fax: 616.653.2717
> >
> >
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List  On Behalf
> > Of Dale R. Smith
> > Sent: Tuesday, November 12, 2019 2:08 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Peter Relson Article
> >
> > **CAUTION EXTERNAL EMAIL**
> >
> > **DO NOT open attachments or click on links from unknown senders or
> > unexpected emails**
> >
> > Not sure how many people on the list read the Mainframe Edition of the
> IBM
> > Systems Magazine, but I saw this article recently in the
> September/October
> > 2019 edition online:
> >
> > https://ibmsystemsmag.com/IBM-Z/09/2019/peter-relson
> >
> > I assume his outside-of-work passion has helped him deal with the
> > "wildlife" on this list also!  :-)>
> >
> > --
> > Dale R. Smith
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions, send
> email
> > to lists...@listserv.ua.edu with the message: INFO IBM-MAIN **CAUTION
> > EXTERNAL EMAIL**
> >
> > **DO NOT open attachments or click on links from unknown senders or
> > unexpected emails**
> >
> > 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 instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
>
> --
> Wayne V. Bickerdike
>
> --
> 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
>
-- 
Scott Ford
IDMWORKS
z/OS Development

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


Experience on migrating TS7700 to EMC DLM

2019-11-12 Thread Peter
Hi

Is there anyone who has done the migration from IBM VTL to EMC DLM ?

Generally i would like to know how was your experience and if there are
gotchas that you can share with me.

Regards
Peter

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


Re: Sort in a multitasking address space

2019-11-12 Thread Paul Gilmartin
On Tue, 12 Nov 2019 12:43:26 -0600, John McKown wrote:
>On Tue, Nov 12, 2019 at 12:18 PM Tom Marchant wrote:
>
>> We have a multitasking address space in which we would like to
>> call sort to sort somewhere around a half a million entries.
>> There is a possibility that more than one task might need to
>> call sort. Will this cause a problem if one task calls sort
>> while sort is active for another task? A customer could be
>> using any of the available sort products.
>
>IIRC, with DFSORT, you can do that. But each must: 1) use a separate set of
>DDs for SORTWORK; 
>
Won't DFSORT manage the SORTWORKs?

>2) use different DDs for SORTIN, SORTOUT and perhaps
>DFSPARM (if used).; 3) If you use any exit(s) in differents, the exit code
>will need to be truly RE-ENTRANT; 4) The address space must have
>enough virtual storage. BTW - do you mean sort 1_000_000 entries, or
>1_000_000 invocations of DFSORT? I think the same restrictions will be in
>effect for SYNCSORT as well.
> 
Is BPX1FRK or BPX1EXM to create additional address spaces a possible 
alternative?
o It avoids the virtual storage constraint.
o It avoids DDNAME collision.
o But allocations must be performed anew for child processes.

-- gil

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


Re: Peter Relson Article

2019-11-12 Thread Wayne Bickerdike
Great article. It's that Peter gives the list so much of his knowledge.
Muir Woods is a favourite of mine from the days I lived in California.

A select few may know about the Anti-Ranger run held there in hilarious
circumstances.

On Wed, Nov 13, 2019 at 6:12 AM Jousma, David <
01a0403c5dc1-dmarc-requ...@listserv.ua.edu> wrote:

> Thanks for posting this!  If not for anything else, but to put a face with
> Peter's name!
>
>
> _
> Dave Jousma
> AVP | Manager, Systems Engineering
>
> Fifth Third Bank  |  1830 East Paris Ave, SE  |  MD RSCB2H  |  Grand
> Rapids, MI 49546
> 616.653.8429  |  fax: 616.653.2717
>
>
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Dale R. Smith
> Sent: Tuesday, November 12, 2019 2:08 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Peter Relson Article
>
> **CAUTION EXTERNAL EMAIL**
>
> **DO NOT open attachments or click on links from unknown senders or
> unexpected emails**
>
> Not sure how many people on the list read the Mainframe Edition of the IBM
> Systems Magazine, but I saw this article recently in the September/October
> 2019 edition online:
>
> https://ibmsystemsmag.com/IBM-Z/09/2019/peter-relson
>
> I assume his outside-of-work passion has helped him deal with the
> "wildlife" on this list also!  :-)>
>
> --
> Dale R. Smith
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to lists...@listserv.ua.edu with the message: INFO IBM-MAIN **CAUTION
> EXTERNAL EMAIL**
>
> **DO NOT open attachments or click on links from unknown senders or
> unexpected emails**
>
> 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 instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


-- 
Wayne V. Bickerdike

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


Re: Sort in a multitasking address space

2019-11-12 Thread David Betten
DB2 Utilities are a good example of this.  They often execute multiple
concurrent sorts.  You use SORTDD= in the parameter lists to pass a
separate prefix for each sort.  For example you might pass SORTDD=SRT1 for
the first one, SORDD=SRT2 for the second, etc.  That way each will allocate
SRT1WK*, SRT2WK*, etc. and you can pass control statements via SRT1CNTL,
SRT2CNTL, etc.  In the parameter list you might also want to include a
separate MSGDDN for each sort so the sort messages aren't all written to
the same SYSOUT DD.


Have a nice day,
Dave Betten
z/OS Performance Specialist
Cloud and Systems Performance
IBM Corporation
email:  bet...@us.ibm.com

IBM Mainframe Discussion List  wrote on
11/12/2019 01:43:26 PM:

> From: John McKown 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 11/12/2019 01:44 PM
> Subject: [EXTERNAL] Re: Sort in a multitasking address space
> Sent by: IBM Mainframe Discussion List 
>
> On Tue, Nov 12, 2019 at 12:18 PM Tom Marchant <
> 000a2a8c2020-dmarc-requ...@listserv.ua.edu> wrote:
>
> > We have a multitasking address space in which we would like to
> > call sort to sort somewhere around a half a million entries.
> > There is a possibility that more than one task might need to
> > call sort. Will this cause a problem if one task calls sort
> > while sort is active for another task? A customer could be
> > using any of the available sort products.
> >
>
> IIRC, with DFSORT, you can do that. But each must: 1) use a separate set
of
> DDs for SORTWORK; 2) use different DDs for SORTIN, SORTOUT and perhaps
> DFSPARM (if used).; 3) If you use any exit(s) in differents, the exit
code
> will need to be truly RE-ENTRANT; 4) The address space must have
> enough virtual storage. BTW - do you mean sort 1_000_000 entries, or
> 1_000_000 invocations of DFSORT? I think the same restrictions will be in
> effect for SYNCSORT as well.
>
>
>
> >
> > --
> > Tom Marchant
> >
>
> --
> People in sleeping bags are the soft tacos of the bear world.
> Maranatha! <><
> John McKown
>
> --
> 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: Peter Relson Article

2019-11-12 Thread Jousma, David
Thanks for posting this!  If not for anything else, but to put a face with 
Peter's name!

_
Dave Jousma
AVP | Manager, Systems Engineering  

Fifth Third Bank  |  1830 East Paris Ave, SE  |  MD RSCB2H  |  Grand Rapids, MI 
49546
616.653.8429  |  fax: 616.653.2717



-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Dale R. Smith
Sent: Tuesday, November 12, 2019 2:08 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Peter Relson Article

**CAUTION EXTERNAL EMAIL**

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

Not sure how many people on the list read the Mainframe Edition of the IBM 
Systems Magazine, but I saw this article recently in the September/October 2019 
edition online:

https://ibmsystemsmag.com/IBM-Z/09/2019/peter-relson

I assume his outside-of-work passion has helped him deal with the "wildlife" on 
this list also!  :-)>

--
Dale R. Smith

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

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

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


Peter Relson Article

2019-11-12 Thread Dale R. Smith
Not sure how many people on the list read the Mainframe Edition of the IBM 
Systems Magazine, but I saw this article recently in the September/October 2019 
edition online:

https://ibmsystemsmag.com/IBM-Z/09/2019/peter-relson

I assume his outside-of-work passion has helped him deal with the "wildlife" on 
this list also!  :-)>

-- 
Dale R. Smith

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


Re: WTO

2019-11-12 Thread Seymour J Metz
It's an obvious place, but it doesn't contain the information.


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



From: IBM Mainframe Discussion List  on behalf of 
Steve Smith 
Sent: Tuesday, November 12, 2019 9:30 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: WTO

If you need this in black & white, see chapter 1 of the MVS Assembler
Services Reference.

btw, it seems like an "obvious" place to me.

sas

On Tue, Nov 12, 2019 at 8:00 AM Peter Relson  wrote:

> 
> FSVO is; that is where the information on the responsibilities of
> user-written subroutines is. Perhaps it was supposed to say that system
> services are written to do the same thing, but it doesn't.
> 
>
> It should not need to "say" that.  Linkage conventions do not apply only
> to interfaces between what you consider a "user" and another user or the
> system.
>
> 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
>


--
sas

--
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: Sort in a multitasking address space

2019-11-12 Thread John McKown
On Tue, Nov 12, 2019 at 12:18 PM Tom Marchant <
000a2a8c2020-dmarc-requ...@listserv.ua.edu> wrote:

> We have a multitasking address space in which we would like to
> call sort to sort somewhere around a half a million entries.
> There is a possibility that more than one task might need to
> call sort. Will this cause a problem if one task calls sort
> while sort is active for another task? A customer could be
> using any of the available sort products.
>

IIRC, with DFSORT, you can do that. But each must: 1) use a separate set of
DDs for SORTWORK; 2) use different DDs for SORTIN, SORTOUT and perhaps
DFSPARM (if used).; 3) If you use any exit(s) in differents, the exit code
will need to be truly RE-ENTRANT; 4) The address space must have
enough virtual storage. BTW - do you mean sort 1_000_000 entries, or
1_000_000 invocations of DFSORT? I think the same restrictions will be in
effect for SYNCSORT as well.



>
> --
> Tom Marchant
>

-- 
People in sleeping bags are the soft tacos of the bear world.
Maranatha! <><
John McKown

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


Re: Dynamically detect if CBLQDA is active from a COBOL program?

2019-11-12 Thread Farley, Peter x23353
And a follow-up question: If I have to chase control blocks, it is possible for 
a COBOL program to determine the CAA address without using an assembler 
subroutine?

If it matters, COBOL version here is currently 5.2, 6.x is coming soon.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Farley, Peter x23353
Sent: Tuesday, November 12, 2019 1:28 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Dynamically detect if CBLQDA is active from a COBOL program?

Is it possible for a COBOL program to dynamically detect if LE option CBLQDA is 
active?

I have reviewed the LE callable subroutines and don't see an existing service 
which returns that information.

Do I have to chase the LE control blocks to determine this information? (CAA -> 
CEECAAEDB -> CEEEDBOPTCB -> CEEOCB_CBLQDA)  If so, what bit determines if it is 
currently turned on (I don't care where it came from, just whether it is active 
or not)?  Would that be CEEOCB_CBLQDA_ON = "X'80'"?

z/OS release is 2.2 if that matters.

Peter
--
 

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 communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.

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


Re: Sort in a multitasking address space

2019-11-12 Thread Seymour J Metz

If you provide non-conflicting ddname lists then I would expect it to work, 
storage permitting.

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



From: IBM Mainframe Discussion List  on behalf of Tom 
Marchant <000a2a8c2020-dmarc-requ...@listserv.ua.edu>
Sent: Tuesday, November 12, 2019 1:18 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Sort in a multitasking address space

We have a multitasking address space in which we would like to
call sort to sort somewhere around a half a million entries.
There is a possibility that more than one task might need to
call sort. Will this cause a problem if one task calls sort
while sort is active for another task? A customer could be
using any of the available sort products.

--
Tom Marchant

--
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: Sort in a multitasking address space

2019-11-12 Thread Martin Packer
30 years ago I wrote something that ATTACHed multiple TCBs, each calling 
ICEMAN. This worked fine but I needed to

1) Create the control cards appropriately
2) Make sure there weren't any data set collisions

In fact my use case was read the same SORTIN and sort it different ways - 
in parallel.

Oh...

3) Manage the virtual and real memory appropriately.

So, yes, I think multiple tasks invoking ICEMAN in a single job step can 
be done.

Cheers, Martin

Martin Packer

zChampion, Systems Investigator & Performance Troubleshooter, IBM

+44-7802-245-584

email: martin_pac...@uk.ibm.com

Twitter / Facebook IDs: MartinPacker

Blog: 
https://www.ibm.com/developerworks/mydeveloperworks/blogs/MartinPacker

Podcast Series (With Marna Walle): https://developer.ibm.com/tv/mpt/or 
  
https://itunes.apple.com/gb/podcast/mainframe-performance-topics/id1127943573?mt=2


Youtube channel: https://www.youtube.com/channel/UCu_65HaYgksbF6Q8SQ4oOvA



From:   Tom Marchant <000a2a8c2020-dmarc-requ...@listserv.ua.edu>
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   12/11/2019 18:18
Subject:[EXTERNAL] Sort in a multitasking address space
Sent by:IBM Mainframe Discussion List 



We have a multitasking address space in which we would like to 
call sort to sort somewhere around a half a million entries. 
There is a possibility that more than one task might need to 
call sort. Will this cause a problem if one task calls sort 
while sort is active for another task? A customer could be 
using any of the available sort products.

-- 
Tom Marchant

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




Unless stated otherwise above:
IBM United Kingdom Limited - Registered in England and Wales with number 
741598. 
Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU


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


Dynamically detect if CBLQDA is active from a COBOL program?

2019-11-12 Thread Farley, Peter x23353
Is it possible for a COBOL program to dynamically detect if LE option CBLQDA is 
active?

I have reviewed the LE callable subroutines and don't see an existing service 
which returns that information.

Do I have to chase the LE control blocks to determine this information? (CAA -> 
CEECAAEDB -> CEEEDBOPTCB -> CEEOCB_CBLQDA)  If so, what bit determines if it is 
currently turned on (I don't care where it came from, just whether it is active 
or not)?  Would that be CEEOCB_CBLQDA_ON = "X'80'"?

z/OS release is 2.2 if that matters.

Peter
--



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 communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.

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


Sort in a multitasking address space

2019-11-12 Thread Tom Marchant
We have a multitasking address space in which we would like to 
call sort to sort somewhere around a half a million entries. 
There is a possibility that more than one task might need to 
call sort. Will this cause a problem if one task calls sort 
while sort is active for another task? A customer could be 
using any of the available sort products.

-- 
Tom Marchant

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


Re: SYNCSORT Question: JFY a numeric field with leading zeroes?

2019-11-12 Thread Farley, Peter x23353
Thanks for your reply.  I was actually able to use UFF with an edit pattern 
successfully.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Alan Young
Sent: Monday, November 11, 2019 7:58 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SYNCSORT Question: JFY a numeric field with leading zeroes?

One way I did it was using FINDREP= with STARTPOS and ENDPOS to change space to 
zero. You can make multiple passes on the output record with multiple 
IFTHEN=(WHEN=INIT statements - BUILD first then FINDREP or other manipulation 
after the build.

If you have a more recent version that supports the UFF format, use OVERLAY and 
that format to reprocess the field and apply an EDIT= mask to result. You might 
be able to do it directly in the BUILD instead of using JFY.

Alan

-Original Message-
>From: "Farley, Peter x23353" 
>Sent: Nov 11, 2019 5:08 PM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: SYNCSORT Question: JFY a numeric field with leading zeroes?
>
>We currently use SYNCSORT and need to parse an input CSV file with a trailing 
>number that we need to right-justify in a fixed-length field with leading 
>zeroes instead of leading blanks.
>
>So far I have not been able to find an example that shows how to write out 
>that trailing field as a right-justified number with leading zeroes instead of 
>leading blanks.
>
>Current SORT control cards look like the below.  Please don't take the size of 
>the input fields literally, they can be smaller.  I have just shown the 
>example input line with maximum expected input field lengths.
>
>OPTION COPY
>OUTREC PARSE=(%00=(ENDBEFR=C',',FIXLEN=9),
>   %01=(ENDBEFR=C',',FIXLEN=7),
>   %02=(ENDBEFR=C',',FIXLEN=8),
>   %03=(ENDBEFR=C' ',FIXLEN=10)),
>   BUILD=(%00,%01,%02,%03,JFY=(SHIFT=RIGHT),
>  15X),CONVERT
>
>Input file is RECFM=VB,LRECL=259, output file is RECFM=FB,LRECL=49
>
>Sample input line:
>
>ABCDEFGH0,ABCDEF1,20190731,1000
>
>Current output line using above control cards:
>
>ABCDEFGH0ABCDEF120190731  1000
>
>Desired output line (15 trailing blanks):
>
>ABCDEFGH0ABCDEF120190731001000
>
>TIA for any advice or RTFM pointer you can provide.
>
>Peter
>--
--

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 communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.


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


Re: SYNCSORT Question: JFY a numeric field with leading zeroes?

2019-11-12 Thread Farley, Peter x23353
Thanks for your reply.  I was actually able to use UFF with that edit pattern 
successfully.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Massimo Biancucci
Sent: Tuesday, November 12, 2019 3:50 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SYNCSORT Question: JFY a numeric field with leading zeroes?

Hi,

maybe this two ways can solve the problem:

OPTION COPY
 OUTREC PARSE=(%00=(ENDBEFR=C',',FIXLEN=9),
   %01=(ENDBEFR=C',',FIXLEN=7),
   %02=(ENDBEFR=C',',FIXLEN=8),
   %03=(ENDBEFR=C' ',FIXLEN=10)),
  BUILD=(%00,%01,%02,%03,JFY=(SHIFT=RIGHT,LEAD=C'00'),
 15X),CONVERT

or

OPTION COPY
INREC PARSE=(%00=(ENDBEFR=C',',FIXLEN=9),
 %01=(ENDBEFR=C',',FIXLEN=7),
 %02=(ENDBEFR=C',',FIXLEN=8),
 %03=(ENDBEFR=C' ',FIXLEN=10)),
 BUILD=(1,4,%00,%01,%02,%03)
OUTFIL FNAMES=SORTOUT,VTOF,
 OUTREC=(5,9,14,7,21,8,29,10,SFF,EDIT=('TT'),15X)

In both case the output if FB 49.

Best regards.
Max


Il giorno mar 12 nov 2019 alle ore 01:09 Farley, Peter x23353 < 
peter.far...@broadridge.com> ha scritto:

> We currently use SYNCSORT and need to parse an input CSV file with a 
> trailing number that we need to right-justify in a fixed-length field 
> with leading zeroes instead of leading blanks.
>
> So far I have not been able to find an example that shows how to write 
> out that trailing field as a right-justified number with leading 
> zeroes instead of leading blanks.
>
> Current SORT control cards look like the below.  Please don't take the 
> size of the input fields literally, they can be smaller.  I have just 
> shown the example input line with maximum expected input field lengths.
>
> OPTION COPY
> OUTREC PARSE=(%00=(ENDBEFR=C',',FIXLEN=9),
>%01=(ENDBEFR=C',',FIXLEN=7),
>%02=(ENDBEFR=C',',FIXLEN=8),
>%03=(ENDBEFR=C' ',FIXLEN=10)),
>BUILD=(%00,%01,%02,%03,JFY=(SHIFT=RIGHT),
>   15X),CONVERT
>
> Input file is RECFM=VB,LRECL=259, output file is RECFM=FB,LRECL=49
>
> Sample input line:
>
> ABCDEFGH0,ABCDEF1,20190731,1000
>
> Current output line using above control cards:
>
> ABCDEFGH0ABCDEF120190731  1000
>
> Desired output line (15 trailing blanks):
>
> ABCDEFGH0ABCDEF120190731001000
>
> TIA for any advice or RTFM pointer you can provide.
>
> Peter
> --
--

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 communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.


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


Re: Is there an MVS service that will list IDENTIFYed entry points?

2019-11-12 Thread Charles Mills
By "I see the loaded names but not any IDENTIFY names" I meant that in the
particular dump I was looking at every CDE was for a loaded module, which
left me wondering whether IDENTIFY would be represented or not. (NOT
alleging some defect in which IDENTIFY names were omitted.)

By "entry name is not in the CDE list and that is the answer" I meant and
that is the answer to my question, which was "did module A do an IDENTIFY
for FOO?" And the answer is "it did not (because it's not in the CDE list)"
which is a good answer.

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Peter Relson
Sent: Tuesday, November 12, 2019 4:43 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Is there an MVS service that will list IDENTIFYed entry points?


In a SYSUDUMP I can see the names of loaded modules, but not (unless I am
missing something) any names added by IDENTIFY. Is there a service that 
will
return to me the names of all entry points added with IDENTIFY?


This seems really unlikely. I don't know where you "see the names" but 
perhaps you should consider using SYSMDUMP.
Everything is captured within a CDE. And most things that format module 
lists simply run through all the CDEs.

If you're asking how to tell something that was IDENTIFYed as opposed to 
LOADed (for example), that's a different question.

CSVINFO is the intended way to loop through all the modules (basically 
looping through all the CDEs on the job pack queue).


And the CDE list does indeed contain the answer. The entrypoint is not
there, but that is my answer.

That cannot be the case. If you have the CDE, then you have the name and 
you have the entry point.

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: Gerhard Postpischil ז״ל

2019-11-12 Thread Aled Hughes
My sympathies and condolences to you and to Gerhard's family. He was a stalwart 
of IBM-MAIN, and will be sorely missed by all. 

Best regards
Aled L Hughes
 
 
 
-Original Message-
From: Seymour J Metz 
To: IBM-MAIN 
Sent: Tue, 12 Nov 2019 4:01
Subject: Gerhard Postpischil ז״ל

It is with deep regret that I announce the death of my friend and colleague 
Gerhard Postpischil, whom some of you may know from here, CBTTAPE.ORG or 
Hercules. Someone told his son Eric "You sound like your father." - I can think 
of no greater compliment. Gerhard was a stickler for accuracy and always strove 
to write 
tight code. He was also a good friend to me and my children, and we will miss 
him.



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


Re: COBOL Migration v4 to v6.1 - CONDITIONS OF INITIALIZATION

2019-11-12 Thread George, William@FTB
Thanks, we have moved on by identifying the groups with the issue and dealing 
with them.  


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tom Ross
Sent: Friday, November 08, 2019 12:11 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: COBOL Migration v4 to v6.1 - CONDITIONS OF INITIALIZATION

>Since migrating from COBOL v4 to COBOL v6.1 a few runtime abends have occur=
>red which seem to have a root cause of data items not being initialized.   =
>These data-items seem to be under a group level where the group level 
>is in= itialized.

>The compile's diagnostic errors listing shows al warning messages of:
>IGYPS2047-W   "INITIALIZE" STATEMENT OPERAND  DID NOT MEET CON=
>DITIONS FOR INITIALIZATION  WAS NOT INITIALIZED.

Sorry to be so late on this...

Could you post the description of the group item and the INITIALIZE statement?
It would appear that none of the items under the group were of a type that 
could be initialized, but I would like to take a look, if you have not already 
moved on frmo this problem!

Also, I would be surprised if the behavior of COBOL V4 was different from COBOL 
V6, I do not think that have not changed this code in the compiler!

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

__
CONFIDENTIALITY NOTICE: This email from the State of California is for the sole 
use of the intended recipient and may contain confidential and privileged 
information. Any unauthorized review or use, including disclosure or 
distribution, is prohibited. If you are not the intended recipient, please 
contact the sender and destroy all copies of this email.

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


Re: WTO

2019-11-12 Thread Steve Smith
If you need this in black & white, see chapter 1 of the MVS Assembler
Services Reference.

btw, it seems like an "obvious" place to me.

sas

On Tue, Nov 12, 2019 at 8:00 AM Peter Relson  wrote:

> 
> FSVO is; that is where the information on the responsibilities of
> user-written subroutines is. Perhaps it was supposed to say that system
> services are written to do the same thing, but it doesn't.
> 
>
> It should not need to "say" that.  Linkage conventions do not apply only
> to interfaces between what you consider a "user" and another user or the
> system.
>
> 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
>


-- 
sas

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


Re: High halves, ARs and old vs. new expectations (Was "WTO")

2019-11-12 Thread Peter Relson

The C or COBOL expects high halves and ARs to be preserved. The assembler
routine is ignorant of them. It calls a z/OS function which alters some 
high
halves. Is there a problem?

I am tending to think not. The z/OS function (hopefully!) does not alter
anything that the modern C or COBOL expects to be preserved. Am I right?


Let's be precise. Neither C nor COBOL expects exactly what you wrote. They 
expect what the linkage conventions say they can expect. So, for example, 
they expect that high halves 2-14 and ARs 2-14 to be preserved (and they 
expect that low halves 2-13 are preserved).

The z/OS function, whatever it is, will conform to its documentation which 
in turn relies on the base being what the linkage conventions say.

I think that by "alter" you mean both that it alters and also that it does 
not restore.

No function would change to do so. That would be incompatible. New 
functionality could choose to do so (and document so). Then it would be up 
to the exploiter of that new function to accommodate that. Here too no 
harm is done to code that is ignorant of high halves (in this case, code 
using the new function cannot be considered to be ignorant). 

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


Re: WTO

2019-11-12 Thread Peter Relson

FSVO is; that is where the information on the responsibilities of 
user-written subroutines is. Perhaps it was supposed to say that system 
services are written to do the same thing, but it doesn't. 


It should not need to "say" that.  Linkage conventions do not apply only 
to interfaces between what you consider a "user" and another user or the 
system.

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


Re: Is there an MVS service that will list IDENTIFYed entry points?

2019-11-12 Thread Peter Relson

In a SYSUDUMP I can see the names of loaded modules, but not (unless I am
missing something) any names added by IDENTIFY. Is there a service that 
will
return to me the names of all entry points added with IDENTIFY?


This seems really unlikely. I don't know where you "see the names" but 
perhaps you should consider using SYSMDUMP.
Everything is captured within a CDE. And most things that format module 
lists simply run through all the CDEs.

If you're asking how to tell something that was IDENTIFYed as opposed to 
LOADed (for example), that's a different question.

CSVINFO is the intended way to loop through all the modules (basically 
looping through all the CDEs on the job pack queue).


And the CDE list does indeed contain the answer. The entrypoint is not
there, but that is my answer.

That cannot be the case. If you have the CDE, then you have the name and 
you have the entry point.

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


Re: Gerhard Postpischil ז״ל

2019-11-12 Thread John Dawes
 Condolences to you and the Postpischil family.  Gerhard will be remembered by 
his intelligent posts and advice.
On Monday, 11 November 2019, 07:31:20 pm UTC, Seymour J Metz 
 wrote:  
 
 It is with deep regret that I announce the death of my friend and colleague 
Gerhard Postpischil, whom some of you may know from here, CBTTAPE.ORG or 
Hercules. Someone told his son Eric "You sound like your father." - I can think 
of no greater compliment. Gerhard was a stickler for accuracy and always strove 
to write 
tight code. He was also a good friend to me and my children, and we will miss 
him.



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


Re: SYNCSORT Question: JFY a numeric field with leading zeroes?

2019-11-12 Thread Massimo Biancucci
Hi,

maybe this two ways can solve the problem:

OPTION COPY
 OUTREC PARSE=(%00=(ENDBEFR=C',',FIXLEN=9),
   %01=(ENDBEFR=C',',FIXLEN=7),
   %02=(ENDBEFR=C',',FIXLEN=8),
   %03=(ENDBEFR=C' ',FIXLEN=10)),
  BUILD=(%00,%01,%02,%03,JFY=(SHIFT=RIGHT,LEAD=C'00'),
 15X),CONVERT

or

OPTION COPY
INREC PARSE=(%00=(ENDBEFR=C',',FIXLEN=9),
 %01=(ENDBEFR=C',',FIXLEN=7),
 %02=(ENDBEFR=C',',FIXLEN=8),
 %03=(ENDBEFR=C' ',FIXLEN=10)),
 BUILD=(1,4,%00,%01,%02,%03)
OUTFIL FNAMES=SORTOUT,VTOF,
 OUTREC=(5,9,14,7,21,8,29,10,SFF,EDIT=('TT'),15X)

In both case the output if FB 49.

Best regards.
Max


Il giorno mar 12 nov 2019 alle ore 01:09 Farley, Peter x23353 <
peter.far...@broadridge.com> ha scritto:

> We currently use SYNCSORT and need to parse an input CSV file with a
> trailing number that we need to right-justify in a fixed-length field with
> leading zeroes instead of leading blanks.
>
> So far I have not been able to find an example that shows how to write out
> that trailing field as a right-justified number with leading zeroes instead
> of leading blanks.
>
> Current SORT control cards look like the below.  Please don't take the
> size of the input fields literally, they can be smaller.  I have just shown
> the example input line with maximum expected input field lengths.
>
> OPTION COPY
> OUTREC PARSE=(%00=(ENDBEFR=C',',FIXLEN=9),
>%01=(ENDBEFR=C',',FIXLEN=7),
>%02=(ENDBEFR=C',',FIXLEN=8),
>%03=(ENDBEFR=C' ',FIXLEN=10)),
>BUILD=(%00,%01,%02,%03,JFY=(SHIFT=RIGHT),
>   15X),CONVERT
>
> Input file is RECFM=VB,LRECL=259, output file is RECFM=FB,LRECL=49
>
> Sample input line:
>
> ABCDEFGH0,ABCDEF1,20190731,1000
>
> Current output line using above control cards:
>
> ABCDEFGH0ABCDEF120190731  1000
>
> Desired output line (15 trailing blanks):
>
> ABCDEFGH0ABCDEF120190731001000
>
> TIA for any advice or RTFM pointer you can provide.
>
> Peter
> --
>
>
>
> 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 communication in error, please notify us immediately by
> e-mail and delete the message and any attachments from your system.
>
> --
> 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