Re: DFSORT - a quick way to compare two huge files

[Farley, Peter x23353]

Last time I checked SUPERC (even the "advanced" version delivered in the HLASM 
Toolkit) is pretty useless beyond LRECL=200.  It wouldn't even show the 
differences in bytes beyond 176, IIRC.  It seems to me that SUPERC's design 
point is source-code file comparisons, and even there not so much for 
really-long-line-length-allowed languages.

The commercial compare products (Comparex, INSYNC, FileMaster, etc.) do a 
pretty good job even on really large data files, if your employer is already 
paying for them.  Comparex was always my favorite for the ability to compare 
files with random-order (or at least not fully sorted) keys.

But Sri's DFSORT example is impressive, as usual.

Peter

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of retired mainframer
Sent: Friday, July 6, 2018 10:58 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFSORT - a quick way to compare two huge files

EXTERNAL EMAIL

Is there some reason SUPERC is not appropriate for this task?

> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of R.S.
> Sent: Friday, July 06, 2018 4:04 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: DFSORT - a quick way to compare two huge files
> 
> We have two output files, rather huge ones (rather gigabytes than MB's)
> with LRECL~1500, FB.
> The goal is to compare them and find different records.
> While I have some ideas how to do it (even ISPF Compare or ICETOOL) I
> don't think it would effective.
--


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: SUSE splits from Microfocus

[Bill Johnson]

I worked for Packard Electric in Warren, Ohio when GM bought EDS. They 
transitioned most of us to the Charlotte data center. Took a couple of years. I 
was in Ops at the time but transitioned to development staying in Warren, 
graduated from college, and left EDS in 1988. Been a long and winding road 
since.


Sent from Yahoo Mail for iPhone


On Friday, July 6, 2018, 7:44 PM, Mike Shaw  wrote:

On 7/6/2018 7:18 PM, Bill Johnson wrote:
> Holy crap, now there is a blast from my EDS past. I was a member of the first 
> GM/EDS transition back in Feb 23, 1986.
> 

I am ex-EDS too...1976 to 1978, back when Ross Perot still gave a speech 
to each graduating SED class...

...I would like to know who owns WAAPDSUT now...EDS sold it for a while 
under the name STANFAST utilities...

Mike Shaw
MVS/QuickRef Support Group
Chicago-Soft, Ltd.

--
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: SUSE splits from Microfocus

[Phil Smith III]

Another note re EDS/HP/HPE/DXC: there's a road near me called EDS Drive
(which at least one GPS vocalizes as "Ed's Drive", which makes me laugh).
There's a big building there that was EDS (doh). Then it was HP. Then it was
HPE. Then it was DXC. 

 

Last time I drove by, the DXC logo that had been put up was gone; still
trying to find out what the story is. Wondering if they shrunk so much that
they either moved or are no longer the sole tenant. Or there was some
speculation that the DXC logo was in trouble with one of the
Daimler-Chrysler logos, which is visually similar; just hard to believe
Daimler would care anymore, since they sold off Chrysler.

 

Check 'em out:

Daimler-Chrysler: https://trademarks.justia.com/785/82/dxc-78582057.html

DXC:
https://events.economist.com/events-conferences/emea/manufacturing-transform
ation 


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

Re: SUSE splits from Microfocus

[Mike Shaw]

On 7/6/2018 7:18 PM, Bill Johnson wrote:

Holy crap, now there is a blast from my EDS past. I was a member of the first 
GM/EDS transition back in Feb 23, 1986.



I am ex-EDS too...1976 to 1978, back when Ross Perot still gave a speech 
to each graduating SED class...


...I would like to know who owns WAAPDSUT now...EDS sold it for a while 
under the name STANFAST utilities...


Mike Shaw
MVS/QuickRef Support Group
Chicago-Soft, Ltd.

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

Re: SUSE splits from Microfocus

[Bill Johnson]

Holy crap, now there is a blast from my EDS past. I was a member of the first 
GM/EDS transition back in Feb 23, 1986.


Sent from Yahoo Mail for iPhone


On Friday, July 6, 2018, 5:55 PM, Steve Smith  wrote:

What a long strange journey for EDS.  Who owns WAAPDSUT now?

TGIF,
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: Running TSO TEST in Background

[Field, Alan]

I do it frequently for example:

//TSO EXEC PGM=IKJEFT01,REGION=8M,DYNAMNBR=75
//SYSOUT   DD SYSOUT=*   
//SYSOUC   DD SYSOUT=*   
//SYSPRINT DD SYSOUT=*,RECFM=FB,LRECL=80 
//SYSTSPRT DD SYSOUT=*   
//SYSTSIN  DD *  
TEST TEST(TEMP8) 
EQ T .TEMP8  
AT T+7C (L 0R:15R; L 15R?+130 XC L(8); GO)   
AT T+84 (L 0R:15R; L 15R?+130 XC L(8); GO)   
AT T+F4 (L 15R?+14D XC L(10); GO)
LB   
GO   
W
END  
/*   

Alan 

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Joseph Reichman
Sent: Friday, July 06, 2018 12:39 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Running TSO TEST in Background

CAUTION:  This email originated outside of the organization.
DO NOT CLICK links or open attachments unless you recognize the sender and know 
the content is safe.

__
Hi

 

Would any one know if you can run TSO TEST as a background Job on either 
IKJEFTSOEV or IKJEFT01

 

thanks  


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


This email and any files transmitted with it are confidential and intended 
solely for the use of the individual or entity to whom they are addressed. If 
you are not the named addressee you must not disseminate, distribute or copy 
this e-mail. Please notify the sender immediately by e-mail if you have 
received this e-mail by mistake and delete this e-mail from your system. If you 
are not the intended recipient you are notified that disclosing, copying, 
distributing or taking any action in reliance on the contents of this 
information is strictly prohibited.

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

Re: SUSE splits from Microfocus

[Steve Smith]

What a long strange journey for EDS.  Who owns WAAPDSUT now?

TGIF,
sas

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

Re: SUSE splits from Microfocus

[Alan Young]

And some have gone on to become Perspecta. It is a merger of Vencore, Keypoint 
and the USPS part of DXC.



From: Phil Smith III 
Sent: Friday, July 6, 2018 10:35
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SUSE splits from Microfocus

R.S. wrote: 

>What about EDS? 
>To my knowledge EDS was bought by HP before HP - HPE split and it was part 
of HPE. Is it now part of DXC? 



Right. All the (surviving) ex-EDS folks went to HPE and then to DXC. 


-- 
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: Running TSO TEST in Background

[Walt Farrell]

On Fri, 6 Jul 2018 13:38:45 -0400, Joseph Reichman  
wrote:

>Would any one know if you can run TSO TEST as a background Job on either
>IKJEFTSOEV or IKJEFT01

I would expect it to work under IKJEFT01 (and I vaguely recall doing that in 
the distant past), but probably it would not work in an environment established 
by  IKJTSOEV.

-- 
Walt

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

Re: Running TSO TEST in Background

[Jim Ruddy]

No, but your question has me intrigued what you want to accomplish. Random
question or do you have some details?

Jim

On Fri, Jul 6, 2018 at 10:38 AM, Joseph Reichman 
wrote:

> Hi
>
>
>
> Would any one know if you can run TSO TEST as a background Job on either
> IKJEFTSOEV or IKJEFT01
>
>
>
> thanks
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

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

Re: DFHSM QUESTION - RECALLING SMS DSNS TO A SPECIFIC SMS MANAGED DISK

[Gibney, Dave]

There are bypass options, given sufficient authority. Of course, with 
sufficient authority, the ACS routines could be tweaked for the specific case 
during recall. :)

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> On Behalf Of Allan Staller
> Sent: Friday, July 06, 2018 11:50 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: DFHSM QUESTION - RECALLING SMS DSNS TO A SPECIFIC SMS
> MANAGED DISK
> 
> I don't think ADRDSSU will override the SMS specifications.
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> On Behalf Of Gibney, Dave
> Sent: Friday, July 6, 2018 1:43 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: DFHSM QUESTION - RECALLING SMS DSNS TO A SPECIFIC SMS
> MANAGED DISK
> 
> 1. Pull it back. 2. Move it with ADDRDSSU
> 
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> > On Behalf Of Mike Schwab
> > Sent: Friday, July 06, 2018 11:24 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: DFHSM QUESTION - RECALLING SMS DSNS TO A SPECIFIC SMS
> > MANAGED DISK
> >
> > If that dataset needs a large allocation, quiesce a/that volume,
> > migrate the select volume to move unallocated datasets on it, defrag
> > to create larger extents, then recall it.  If no active volume has
> > enough space, it would go there.
> > On Fri, Jul 6, 2018 at 10:07 AM John Dawes <00ff0e22811f-dmarc-
> > requ...@listserv.ua.edu> wrote:
> > >
> > >  Allan,
> > > Thanks for your suggestion.  I looked at that option however being
> > > in the
> > Production cycle window I cannot do so because jobs could abend if I
> > do a DISNEW.
> > > On Friday, 6 July 2018, 11:00:02 am GMT-4, Allan Staller
> >  wrote:
> > >
> > >  AFAIK, Guaranteed Space only (IMO) acceptable way to accomplish
> > > what
> > you've described.
> > >
> > > You could place all of the other volumes in the pool in QUIESCE or
> > > DISNEW
> > for the duration (IMO, not acceptable).
> > > You could make the ACS routine and SMS update to place the desired
> > > volume in its own SG, restore your data, and reverse the process.
> > > (Waaay tooo much work!)
> > >
> > > HTH,
> > >
> > > -Original Message-
> > > From: IBM Mainframe Discussion List
> > > [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of John Dawes
> > > Sent: Friday, July 6, 2018 9:48 AM
> > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > Subject: DFHSM QUESTION - RECALLING SMS DSNS TO A SPECIFIC SMS
> > MANAGED
> > > DISK
> > >
> > > G'Day,
> > > Because of storage considerations I would like to recall some ML2
> > > SMS
> > managed dsns to a specific SMS managed disk.  I tried a few things e.g.
> > :HSEND RECALL 'CICSV2.XPD2.A7060.ZFE1' VOLUME(ZFE315) -  UNIT(3390)
> > However the dsn was not recalled to the desired disk.  I thought of
> > using the GUARANTEED SPACE storage class option as a work around.  I
> > checked the doc (DFSMShsm Storage Administration Guide) but I could
> > not find an example.  Is this possible to do?  If so, would anyone
> > have an example to share?
> > > Thanks.
> > >
> > > 
> > > -- For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to lists...@listserv.ua.edu with the message: INFO
> > > IBM-MAIN
> > > ::DISCLAIMER::
> > > 
> > > --
> > > 
> > > --
> > > 
> > > --
> > > 
> > > The contents of this e-mail and any attachment(s) are confidential
> > > and
> > intended for the named recipient(s) only. E-mail transmission is not
> > guaranteed to be secure or error-free as information could be
> > intercepted, corrupted, lost, destroyed, arrive late or incomplete, or
> > may contain viruses in transmission. The e mail and its contents (with
> > or without referred errors) shall therefore not attach any liability on the
> originator or HCL or its affiliates.
> > Views or opinions, if any, presented in this email are solely those of
> > the author and may not necessarily reflect the views or opinions of
> > HCL or its affiliates. Any form of reproduction, dissemination,
> > copying, disclosure, modification, distribution and / or publication
> > of this message without the prior written consent of authorized
> > representative of HCL is strictly prohibited. If you have received
> > this email in error please delete it and notify the sender
> > immediately. Before opening any email and/or attachments, please check
> them for viruses and other defects.
> > > 
> > > --
> > > 
> > > --
> > > 

Re: DFHSM QUESTION - RECALLING SMS DSNS TO A SPECIFIC SMS MANAGED DISK

[Allan Staller]

I don't think ADRDSSU will override the SMS specifications.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Gibney, Dave
Sent: Friday, July 6, 2018 1:43 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFHSM QUESTION - RECALLING SMS DSNS TO A SPECIFIC SMS MANAGED DISK

1. Pull it back. 2. Move it with ADDRDSSU

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 
> On Behalf Of Mike Schwab
> Sent: Friday, July 06, 2018 11:24 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: DFHSM QUESTION - RECALLING SMS DSNS TO A SPECIFIC SMS 
> MANAGED DISK
> 
> If that dataset needs a large allocation, quiesce a/that volume, 
> migrate the select volume to move unallocated datasets on it, defrag 
> to create larger extents, then recall it.  If no active volume has 
> enough space, it would go there.
> On Fri, Jul 6, 2018 at 10:07 AM John Dawes <00ff0e22811f-dmarc- 
> requ...@listserv.ua.edu> wrote:
> >
> >  Allan,
> > Thanks for your suggestion.  I looked at that option however being 
> > in the
> Production cycle window I cannot do so because jobs could abend if I 
> do a DISNEW.
> > On Friday, 6 July 2018, 11:00:02 am GMT-4, Allan Staller
>  wrote:
> >
> >  AFAIK, Guaranteed Space only (IMO) acceptable way to accomplish 
> > what
> you've described.
> >
> > You could place all of the other volumes in the pool in QUIESCE or 
> > DISNEW
> for the duration (IMO, not acceptable).
> > You could make the ACS routine and SMS update to place the desired 
> > volume in its own SG, restore your data, and reverse the process.
> > (Waaay tooo much work!)
> >
> > HTH,
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List 
> > [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of John Dawes
> > Sent: Friday, July 6, 2018 9:48 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: DFHSM QUESTION - RECALLING SMS DSNS TO A SPECIFIC SMS
> MANAGED
> > DISK
> >
> > G'Day,
> > Because of storage considerations I would like to recall some ML2 
> > SMS
> managed dsns to a specific SMS managed disk.  I tried a few things e.g.
> :HSEND RECALL 'CICSV2.XPD2.A7060.ZFE1' VOLUME(ZFE315) -  UNIT(3390) 
> However the dsn was not recalled to the desired disk.  I thought of 
> using the GUARANTEED SPACE storage class option as a work around.  I 
> checked the doc (DFSMShsm Storage Administration Guide) but I could 
> not find an example.  Is this possible to do?  If so, would anyone 
> have an example to share?
> > Thanks.
> >
> > 
> > -- For IBM-MAIN subscribe / signoff / archive access instructions, 
> > send email to lists...@listserv.ua.edu with the message: INFO 
> > IBM-MAIN
> > ::DISCLAIMER::
> > 
> > --
> > 
> > --
> > 
> > --
> > 
> > The contents of this e-mail and any attachment(s) are confidential 
> > and
> intended for the named recipient(s) only. E-mail transmission is not 
> guaranteed to be secure or error-free as information could be 
> intercepted, corrupted, lost, destroyed, arrive late or incomplete, or 
> may contain viruses in transmission. The e mail and its contents (with 
> or without referred errors) shall therefore not attach any liability on the 
> originator or HCL or its affiliates.
> Views or opinions, if any, presented in this email are solely those of 
> the author and may not necessarily reflect the views or opinions of 
> HCL or its affiliates. Any form of reproduction, dissemination, 
> copying, disclosure, modification, distribution and / or publication 
> of this message without the prior written consent of authorized 
> representative of HCL is strictly prohibited. If you have received 
> this email in error please delete it and notify the sender 
> immediately. Before opening any email and/or attachments, please check them 
> for viruses and other defects.
> > 
> > --
> > 
> > --
> > 
> > --
> > 
> >
> > 
> > -- For IBM-MAIN subscribe / signoff / archive access instructions, 
> > send email to lists...@listserv.ua.edu with the message: INFO 
> > IBM-MAIN
> >
> >
> > 
> > -- For IBM-MAIN subscribe / signoff / archive access instructions, 
> > send email to lists...@listserv.ua.edu with the message: INFO 
> > IBM-MAIN
> 
> 
> 
> --
> Mike A Schwab, 

Re: DFHSM QUESTION - RECALLING SMS DSNS TO A SPECIFIC SMS MANAGED DISK

[Gibney, Dave]

1. Pull it back. 2. Move it with ADDRDSSU

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> On Behalf Of Mike Schwab
> Sent: Friday, July 06, 2018 11:24 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: DFHSM QUESTION - RECALLING SMS DSNS TO A SPECIFIC SMS
> MANAGED DISK
> 
> If that dataset needs a large allocation, quiesce a/that volume, migrate the
> select volume to move unallocated datasets on it, defrag to create larger
> extents, then recall it.  If no active volume has enough space, it would go
> there.
> On Fri, Jul 6, 2018 at 10:07 AM John Dawes <00ff0e22811f-dmarc-
> requ...@listserv.ua.edu> wrote:
> >
> >  Allan,
> > Thanks for your suggestion.  I looked at that option however being in the
> Production cycle window I cannot do so because jobs could abend if I do a
> DISNEW.
> > On Friday, 6 July 2018, 11:00:02 am GMT-4, Allan Staller
>  wrote:
> >
> >  AFAIK, Guaranteed Space only (IMO) acceptable way to accomplish what
> you've described.
> >
> > You could place all of the other volumes in the pool in QUIESCE or DISNEW
> for the duration (IMO, not acceptable).
> > You could make the ACS routine and SMS update to place the desired
> > volume in its own SG, restore your data, and reverse the process.
> > (Waaay tooo much work!)
> >
> > HTH,
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> > On Behalf Of John Dawes
> > Sent: Friday, July 6, 2018 9:48 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: DFHSM QUESTION - RECALLING SMS DSNS TO A SPECIFIC SMS
> MANAGED
> > DISK
> >
> > G'Day,
> > Because of storage considerations I would like to recall some ML2 SMS
> managed dsns to a specific SMS managed disk.  I tried a few things e.g.
> :HSEND RECALL 'CICSV2.XPD2.A7060.ZFE1' VOLUME(ZFE315) -  UNIT(3390)
> However the dsn was not recalled to the desired disk.  I thought of using the
> GUARANTEED SPACE storage class option as a work around.  I checked the
> doc (DFSMShsm Storage Administration Guide) but I could not find an
> example.  Is this possible to do?  If so, would anyone have an example to
> share?
> > Thanks.
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> > ::DISCLAIMER::
> > --
> > --
> > --
> > 
> > The contents of this e-mail and any attachment(s) are confidential and
> intended for the named recipient(s) only. E-mail transmission is not
> guaranteed to be secure or error-free as information could be intercepted,
> corrupted, lost, destroyed, arrive late or incomplete, or may contain viruses
> in transmission. The e mail and its contents (with or without referred errors)
> shall therefore not attach any liability on the originator or HCL or its 
> affiliates.
> Views or opinions, if any, presented in this email are solely those of the
> author and may not necessarily reflect the views or opinions of HCL or its
> affiliates. Any form of reproduction, dissemination, copying, disclosure,
> modification, distribution and / or publication of this message without the
> prior written consent of authorized representative of HCL is strictly
> prohibited. If you have received this email in error please delete it and 
> notify
> the sender immediately. Before opening any email and/or attachments,
> please check them for viruses and other defects.
> > --
> > --
> > --
> > 
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> 
> 
> 
> --
> 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 

AW: Re: Friday - off topic - human factors and TN3270

[Peter Hunkeler]

>I use a white background with colors that are more or less the way they are
described. The exceptions are white, which I have set to be black, and yellow,
which I have set to a shade of brown. I find this to be much more pleasing to
my eyes. It doesn't matter so much at 24 x 80, but at 88 x 142, it makes a
big difference.


Been working with just about these colors for the last 20+ years. I find it 
much more relaxing, especially when swapping between office suite windows and 
3270 windows.


--
Peter Hunkeler




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

Re: DFHSM QUESTION - RECALLING SMS DSNS TO A SPECIFIC SMS MANAGED DISK

[Mike Schwab]

If that dataset needs a large allocation, quiesce a/that volume,
migrate the select volume to move unallocated datasets on it, defrag
to create larger extents, then recall it.  If no active volume has
enough space, it would go there.
On Fri, Jul 6, 2018 at 10:07 AM John Dawes
<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:
>
>  Allan,
> Thanks for your suggestion.  I looked at that option however being in the 
> Production cycle window I cannot do so because jobs could abend if I do a 
> DISNEW.
> On Friday, 6 July 2018, 11:00:02 am GMT-4, Allan Staller 
>  wrote:
>
>  AFAIK, Guaranteed Space only (IMO) acceptable way to accomplish what you've 
> described.
>
> You could place all of the other volumes in the pool in QUIESCE or DISNEW for 
> the duration (IMO, not acceptable).
> You could make the ACS routine and SMS update to place the desired volume in 
> its own SG, restore your data, and reverse the process. (Waaay tooo much 
> work!)
>
> HTH,
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of John Dawes
> Sent: Friday, July 6, 2018 9:48 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: DFHSM QUESTION - RECALLING SMS DSNS TO A SPECIFIC SMS MANAGED DISK
>
> G'Day,
> Because of storage considerations I would like to recall some ML2 SMS managed 
> dsns to a specific SMS managed disk.  I tried a few things e.g. :HSEND RECALL 
> 'CICSV2.XPD2.A7060.ZFE1' VOLUME(ZFE315) -  UNIT(3390) 
>However the dsn was not recalled to the desired disk.  I 
> thought of using the GUARANTEED SPACE storage class option as a work around.  
> I checked the doc (DFSMShsm Storage Administration Guide) but I could not 
> find an example.  Is this possible to do?  If so, would anyone have an 
> example to share?
> Thanks.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
> lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> ::DISCLAIMER::
> --
> The contents of this e-mail and any attachment(s) are confidential and 
> intended for the named recipient(s) only. E-mail transmission is not 
> guaranteed to be secure or error-free as information could be intercepted, 
> corrupted, lost, destroyed, arrive late or incomplete, or may contain viruses 
> in transmission. The e mail and its contents (with or without referred 
> errors) shall therefore not attach any liability on the originator or HCL or 
> its affiliates. Views or opinions, if any, presented in this email are solely 
> those of the author and may not necessarily reflect the views or opinions of 
> HCL or its affiliates. Any form of reproduction, dissemination, copying, 
> disclosure, modification, distribution and / or publication of this message 
> without the prior written consent of authorized representative of HCL is 
> strictly prohibited. If you have received this email in error please delete 
> it and notify the sender immediately. Before opening any email and/or 
> attachments, please check them for viruses and other defects.
> --
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



-- 
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: Friday - off topic - human factors and TN3270

[Tom Marchant]

On Fri, 6 Jul 2018 14:45:21 +, Dyck, Lionel B. (RavenTek) wrote:

>For years I was used to the default TN3270 client having a black background . 
>. .

I use a white background with colors that are more or less the way they are 
described. The exceptions are white, which I have set to be black, and yellow, 
which I have set to a shade of brown. I find this to be much more pleasing to 
my eyes. It doesn't matter so much at 24 x 80, but at 88 x 142, it makes a 
big difference.

-- 
Tom Marchant

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

Re: The Tandem successors are now with HPE was Re: SUSE splits from Microfocus

[Phil Smith III]

Clark Morris wrote:

>The Tandem series successors are now on Intel Xeon or Itanium chips

>depending on the line and with HPE as of today, July 5, 2018.

 

Correct. The HPE NonStop X is the Xeon version. Easy for us IBM old-timers
to remember: X = x86. The Itanium Kittson was the last version of IA64,
released in 2017.

 

Too bad-Itanium was interesting, just turned out to be the answer to a
question nobody asked.

 

And:

>I'm surprised that HPE/non-stop hasn't gotten a larger market share.

 

Well, they're also the answer to a question most people haven't asked. Those
who have seem mostly to be as committed to the platform as the average IBM Z
shop. I've been to some NonStop user group meetings (still often with the
"T" in the name, like MATUG - formerly Mid-Atlantic Tandem User Group, now
"Technology" instead of "Tandem") and they feel just like mainframe groups:
buncha old guys like me sitting around, all have known each other for
decades. The only difference was that I had even less idea than usual what
they were talking about!


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

Running TSO TEST in Background

[Joseph Reichman]

Hi

 

Would any one know if you can run TSO TEST as a background Job on either
IKJEFTSOEV or IKJEFT01

 

thanks  


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

Re: SUSE splits from Microfocus

[Phil Smith III]

R.S. wrote:

>What about EDS?
>To my knowledge EDS was bought by HP before HP - HPE split and it was part
of HPE. Is it now part of DXC?

 

Right. All the (surviving) ex-EDS folks went to HPE and then to DXC.


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

Re: Friday - off topic - human factors and TN3270

[Paul Gilmartin]

(Oops!  I pasted the wrong link)

On Fri, 6 Jul 2018 11:31:04 -0500, Paul Gilmartin wrote:

>On Fri, 6 Jul 2018 11:45:30 -0400, David Purdy wrote:
>
>>When I worked at Tektronix in the '80s, their display folks found a blue 
>>backgound with yellow letters provided good contrast with the least 
>>eyestrain.  I've used that combination ever since. YMMV with newer monitors 
>>and drivers.
>> 
>That sounds perilously close to "vibration":
>https://www.ece.cmu.edu/~ganger/712.fall02/papers/p761-thompson.pdf
> 
Should have been:

https://webdesign.tutsplus.com/articles/why-you-should-avoid-vibrating-color-combinations--cms-25621

>Examples from that page:
>
> https://cms-assets.tutsplus.com/uploads/users/30/posts/25621/image/vomit.svg

-- gil

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

Re: Friday - off topic - human factors and TN3270

[Paul Gilmartin]

On Fri, 6 Jul 2018 11:45:30 -0400, David Purdy wrote:

>When I worked at Tektronix in the '80s, their display folks found a blue 
>backgound with yellow letters provided good contrast with the least eyestrain. 
> I've used that combination ever since. YMMV with newer monitors and drivers.
> 
That sounds perilously close to "vibration":
https://www.ece.cmu.edu/~ganger/712.fall02/papers/p761-thompson.pdf

Examples from that page:
https://cms-assets.tutsplus.com/uploads/users/30/posts/25621/image/vomit.svg

-- gil

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

Re: Sysplex between two hardware

[Jesse 1 Robinson]

We all have lots of questions about your goals here, but the short answer to 
your question is Yes, sysplex is the answer. I assume that your two boxes are 
already connected in some way as to share access to data. Turning such a 
configuration into a sysplex may require some additional hardware, but not a 
lot. 

-- If you want a full-function parallel sysplex, you would need to create an 
internal coupling facility LPAR (ICF) in each CEC. 

-- You would need CF links to connect each ICF to the opposite CEC. 

-- I think you would also need server timing protocol (STP) to keep clocks in 
synch; I have not tried running without STP. 


.
.
J.O.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
323-715-0595 Mobile
626-543-6132 Office ⇐=== NEW
robin...@sce.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Timothy Sipples
Sent: Friday, July 06, 2018 5:39 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: Sysplex between two hardware

Peter wrote:
>We are looking up for a solution where we need a LPAR to have a hot
standby
>in other LPAR running in a different machine .
>As we are trying to create a sysplex relationship between two LPARS
running
>in a different machines .
>Apology for my ignorance and is it possible ?

Yes, it's certainly possible and common.

Here are a couple questions:

1. How far apart (in fiber distance) are these two physical machines?

2. What workload types would you like to configure across the two LPARs?
Examples: MQ, Db2, CICS, IMS TM, IMS DB, WebSphere Application Server?

3. What goal(s) are you trying to accomplish? Are you trying to improve service 
levels, for example? Or perhaps trying to move workloads from one machine to 
another while minimizing (or eliminating) an outage? Something else?


Timothy Sipples
IT Architect Executive, Industry Solutions, IBM Z & LinuxONE, Multi-Geography
E-Mail: sipp...@sg.ibm.com


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

Re: Linklist and APF

[Paul Gilmartin]

On Fri, 6 Jul 2018 07:31:51 -0700, Charles Mills wrote:

>Let me put on my security preacher hat for a moment.
>
>Yes, what Eileen says is a fact: there is no z/OS "enforcement" of RENT unless 
>the program is from an APF library. You can easily get surprised by "where did 
>that S0C4 come from?"
> 
There's also REFRPROT nowadays.  But that should have never been needed as an
option; it should have been the universal behaior ab ovo.  How much extra would
it have cost to load user programs as well as system programs into 
write-protected
storage?

>But that is not the big issue.
>
>If you are getting "surprised" by "oh gosh, look at that, it's getting loaded 
>from an APF library" then you do not have proper controls over what is 
>probably THE most critical aspect of mainframe integrity,  ...

-- gil

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

Re: Friday - off topic - human factors and TN3270

[David Purdy]

When I worked at Tektronix in the '80s, their display folks found a blue 
backgound with yellow letters provided good contrast with the least eyestrain.  
I've used that combination ever since. YMMV with newer monitors and drivers.

David



On Friday, July 6, 2018 Dyck, Lionel B. (RavenTek) (RavenTek) 
 wrote:
For years I was used to the default TN3270 client having a black background and 
colors that seemed to glow at times. Then I found that I could adjust the 
colors and found that a grey (or is it gray) background worked better for my 
viewing experience and I adjusted the other colors accordingly and made them 
more muted where possible. Now I'm using Reflections and am using the Ice theme 
with some slight modifications and it works great. When I'm using Vista TN3270 
I have adjusted all the colors for a grey background as well.

With Reflections there are many other color themes and I'm sure other TN3270 
products also support them in varying ways of completeness.

Has anyone does any human factor studies on optimizing screen colors?

Thoughts/comments for a Friday

--
Lionel B. Dyck (Contractor) <
Mainframe Systems Programmer - RavenTek Solution Partners



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

RMF RMFM3B Wrokflow

[saurabh khandelwal]

Hello Group,

I setup  RMFM3B  started task and its capturing workflow/Exception screen
and keeping it in SYSOUT.

I tried adding below exception in ReportOption/Action Panel and I see these
exception in workflow/exceptions panel and SYSPUT and SYSLOG as well

But I unable to find the way to get these message like below when DASD
activity rate goes above limit on operator console, So that operator can
monitor and take action.

I read about WTO command, but I am not sure, where and what to add to get
this dasd activity alert on operator console

Can you please suggest way of achieving this task .


+RMF100I 3B: Processing WFEX Report...
+RMF100I 3B: Name Reason Critical val.
+RMF100I 3B: --
+RMF102I 3B: *STOR ONLXF < 16K 0 frames
+RMF102I 3B: OSPCAT DAR > 5 9.000 /sec
+RMF102I 3B: OSPRES DAR > 5 7.300 /sec

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

Re: DFHSM QUESTION - RECALLING SMS DSNS TO A SPECIFIC SMS MANAGED DISK

[John Dawes]

 Allan,
Thanks for your suggestion.  I looked at that option however being in the 
Production cycle window I cannot do so because jobs could abend if I do a 
DISNEW.
On Friday, 6 July 2018, 11:00:02 am GMT-4, Allan Staller 
 wrote:  
 
 AFAIK, Guaranteed Space only (IMO) acceptable way to accomplish what you've 
described.

You could place all of the other volumes in the pool in QUIESCE or DISNEW for 
the duration (IMO, not acceptable).
You could make the ACS routine and SMS update to place the desired volume in 
its own SG, restore your data, and reverse the process. (Waaay tooo much work!)

HTH,

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John Dawes
Sent: Friday, July 6, 2018 9:48 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: DFHSM QUESTION - RECALLING SMS DSNS TO A SPECIFIC SMS MANAGED DISK

G'Day,
Because of storage considerations I would like to recall some ML2 SMS managed 
dsns to a specific SMS managed disk.  I tried a few things e.g. :HSEND RECALL 
'CICSV2.XPD2.A7060.ZFE1' VOLUME(ZFE315) -  UNIT(3390)                           
                 However the dsn was not recalled to the desired disk.  I 
thought of using the GUARANTEED SPACE storage class option as a work around.  I 
checked the doc (DFSMShsm Storage Administration Guide) but I could not find an 
example.  Is this possible to do?  If so, would anyone have an example to share?
Thanks.

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

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

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

Re: REXX as JCL replacement

[Seymour J Metz]

The issue is not doing simultaneous ENQs; the issue is getting Allocation to do 
them, correctly and in a safe fashion. The major names in question are 
protected, to say nothing of the need for the ENQ to be done against the 
Initiator TCB.

IBM could certainly provide such a service, but we're not talking about 50 or a 
100 lines of code; it's not intractable, but neither is it trivial.


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


From: IBM Mainframe Discussion List  on behalf of 
Charles Mills 
Sent: Thursday, July 5, 2018 4:29 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: REXX as JCL replacement

I have not really thought it through but I just cannot picture how building 
some combination of Rexx or whatever + assembler one could not do 'n' 
simultaneous ENQs. The facilities are there in MVS for the asking:

"ENQ assigns control of one or more serially reusable resources to a task. If 
any of
the resources are not available, the task might be placed in a wait condition 
until
all of the requested resources are available."

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Hobart Spitz
Sent: Thursday, July 5, 2018 11:24 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: REXX as JCL replacement

I think a more encompassing approach would be for JOL to be a function,
command or environment which could be invoked from REXX.  That way, you
don't have to reinvent or do without all the things that REXX brings to the
table, both as a language and as something that interfaces with many parts
of z/OS.  I.e., DB2, JES, ISPF, TSO, etc.

I think CA also has a similar product.  I don't know anything about it, or
if it is used much.

The existence of JOL and the CA product suggest that there is a wider need
than realized to upgrade z/OS batch processing to more modern methods.
Historically, IBM has had more scripting languages than platforms (z/OS:
REXX, CLIST, JCL.  z/VM: EXEC, EXEC2, REXX.  AS/400: OCL.), and z/OS is the
only major platform where the batch scripting language (JCL) can't run in
foreground, and the foreground scripting languages can be useful in
background, but aren't.  z/VM has never had a separate batch scripting
language, and it still can do things that z/OS was never designed for.

I think Ward's question was well answered.  I might add a few things later
that were missed.  (I have a long draft that is mostly redundant.)

All that said, I'd like to come back to the primary, perhaps only, reason
why REXX is not used more in batch:  "Parallel ENQs", or the lack thereof.
I use quotation marks because I am skeptical that anything like this can
actually be truly simultaneous.  On the other hand, the time scale on which
ENQs are typically held means that near simultaneous is fast enough.

BTW, if all updatable application data is stored in DB2 tables (e.g.)
and/or all DISPs are SHR, there is no reason not to use REXX in batch.  If
DISP=OLD is never used there can be no deadly embrace.  This is not
theory.  In the early 1990s, I did just such a project, replacing more than
300 JOB streams with less than 10 much smarter ones that began by invoking
a REXX program.  All updated data was in DB2, and we used a REXX-to-DB2
interface.

Let's consider what a "Parallel ENQ" routine might look like.  This should
allow the approach to be explored and refined, proving/disproving the
concept to site management and vendors, and help formulate the most
appropriate RFE.

Here a first draft, untested, for an external, preferably compiled routine:


*AllocMlt:*

*/* REXX - Allocate dataset(s) to files(s).  Retry and recover if needed.
*/*

*/* Arg syntax:  DDName BeforeDisp[","NormDisp] Dataset... [")" options]
*/*

*/* Abnormal Disp to be handled by return code check and FREE in caller.
*/*

*/* We let ALLOC report problems with ENQs of concatenated datasets.
*/*

*/* Stop on the first failure; if we could send msgs. in fut., keep
going.*/ *



*Alloced. = 0   /* Track successes
*/*























*do iA = 1 to arg() until RC <> 0parse upper value arg(iA) with DDName
Disp DSN/* Code RecFM, LRecL, DataClas, Space, etc. after DSN and ")".
 *//* ALLOC allows concatenation via a list of dataset names.
 */  /* DSN may be a list if Disp not NEW or MOD. */parse var
Disp BeforeDisp "," NormDisp /* Like JCL. */Status = sysdsn(word(DSN,
1))if BeforeDisp = "ASIS" then BeforeDisp = word("new old",
(Status = "OK") + 1)/* Allows skipping archaic use of IEFBR14. */
  if wordpos(BeforeDisp, "OLD SHR") > 0 thendo iTry = 1 to 5 while
Status = "DATASET UNAVAILABLE"say time() DSN "unavailable,
retrying."/* Would be important to send message to ENQ holder,
esp. TSU. */call sleep "10 sec" /* SLEEP may need to be
written. */Status = sysdsn(word(DSN, 1))end iTry
select

Re: DFHSM QUESTION - RECALLING SMS DSNS TO A SPECIFIC SMS MANAGED DISK

[Allan Staller]

AFAIK, Guaranteed Space only (IMO) acceptable way to accomplish what you've 
described.

You could place all of the other volumes in the pool in QUIESCE or DISNEW for 
the duration (IMO, not acceptable).
You could make the ACS routine and SMS update to place the desired volume in 
its own SG, restore your data, and reverse the process. (Waaay tooo much work!)

HTH,

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John Dawes
Sent: Friday, July 6, 2018 9:48 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: DFHSM QUESTION - RECALLING SMS DSNS TO A SPECIFIC SMS MANAGED DISK

G'Day,
Because of storage considerations I would like to recall some ML2 SMS managed 
dsns to a specific SMS managed disk.  I tried a few things e.g. :HSEND RECALL 
'CICSV2.XPD2.A7060.ZFE1' VOLUME(ZFE315) -   UNIT(3390)  
  However the dsn was not recalled to the desired disk.  I 
thought of using the GUARANTEED SPACE storage class option as a work around.  I 
checked the doc (DFSMShsm Storage Administration Guide) but I could not find an 
example.  Is this possible to do?  If so, would anyone have an example to share?
Thanks.

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

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

Re: DFSORT - a quick way to compare two huge files

[retired mainframer]

Is there some reason SUPERC is not appropriate for this task?

> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of R.S.
> Sent: Friday, July 06, 2018 4:04 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: DFSORT - a quick way to compare two huge files
> 
> We have two output files, rather huge ones (rather gigabytes than MB's)
> with LRECL~1500, FB.
> The goal is to compare them and find different records.
> While I have some ideas how to do it (even ISPF Compare or ICETOOL) I
> don't think it would effective.

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

Re: Linklist and APF

[Seymour J Metz]

Actually, there is no enforcement of RENT, period. A module linked with RENT 
can be shared between tasks, even if it updates common data without proper 
serialization. It didn't help thet Fetch ignored REFR.

BTW. OS/360 had some reentrant modules that were not refreshable. IMHO that is 
extremely bad form. AFAIK all of those have been cleaned up.

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


From: IBM Mainframe Discussion List  on behalf of 
Charles Mills 
Sent: Friday, July 6, 2018 10:31 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: Linklist and APF

Let me put on my security preacher hat for a moment.

Yes, what Eileen says is a fact: there is no z/OS "enforcement" of RENT unless 
the program is from an APF library. You can easily get surprised by "where did 
that S0C4 come from?"

But that is not the big issue.

If you are getting "surprised" by "oh gosh, look at that, it's getting loaded 
from an APF library" then you do not have proper controls over what is probably 
THE most critical aspect of mainframe integrity, and as Barry Schrager observed 
at the dawn of mainframe security, without integrity there is no security. APF 
libraries are the keys to the kingdom. If I worked for you, and I were a 
malicious programmer, and I observed that if I did X and Y and Z then my 
program would end up in an APF library without any management or security 
review, then I OWN your mainframe. An APF-authorized program can do ANYTHING. 
Ray Overby and others have demonstrated at SHARE that just a few lines of 
obscure binary in an authorized program can give the user RACF SPECIAL and/or 
OPERATIONS/PRIVILEGED with NO AUDIT TRAIL WHATSOEVER, and from there on out the 
sky is the limit.

There are two pieces to APF authorization, AC=1 and the library. There are no 
controls over AC=1 -- any programmer can do it. It is up to you to control APF 
libraries rigorously.

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Barkow, Eileen
Sent: Friday, July 6, 2018 6:59 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Linklist and APF

I  am  not sure if this is still true, but a while ago we had  a problem 
whereby a program would only work from  steplib  and not a linklib.
It turned out that certain options such as RENT were only enforced if the 
module resided in an apf authorized linklib.
So our module had been link-edited with the RENT option but was not really 
reentrant, so it abended when the RENT attribute was enforced.

--
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: REXX as JCL replacement

[Seymour J Metz]

MDS in JES3 handles some waiting, but that doesn't apply to JES2 and IAC the 
Initiator will still do the ENQ.

Be careful what you ask for; you might get it. A separate module to do the ENQ 
might not behave in a fashion that you like.


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


From: IBM Mainframe Discussion List  on behalf of 
Charles Mills 
Sent: Thursday, July 5, 2018 6:35 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: REXX as JCL replacement

Right. And I don't believe "JCL" does. I think think the scheduling component 
of JESx or something similar either waits or polls.

Anyway, you are reading about SVC 99. I meant a separate module to do the ENQs. 
I would guess that SVC 99 does a RET=HAVE so there would be no harm in a 
pre-ENQ.

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Paul Gilmartin
Sent: Thursday, July 5, 2018 2:48 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: REXX as JCL replacement

On Thu, 5 Jul 2018 13:29:01 -0700, Charles Mills wrote:

>I have not really thought it through but I just cannot picture how building 
>some combination of Rexx or whatever + assembler one could not do 'n' 
>simultaneous ENQs. The facilities are there in MVS for the asking:
>
>"ENQ assigns control of one or more serially reusable resources to a task. If 
>any of
>the resources are not available, the task might be placed in a wait condition 
>until
>all of the requested resources are available."
>
From: z/OS IBM MVS Programming: Authorized Assembler Services Guide
Version 2 Release 3 SA23-1371-30
Chapter 25. Dynamic allocation
Requesting a data set that is in use:
Rather than wait for another user to release a data set, volume, or 
device to
obtain use of it, dynamic allocation fails a request by an unauthorized 
program.
If an authorized program specifically requests a wait, dynamic 
allocation will wait.

The designers were dedicated and capable.  There's no way to wait for a 
dynamically
allocated resource without introducing the hazard of a deadlock.

-- gil

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

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

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

Friday - off topic - human factors and TN3270

[Dyck, Lionel B. (RavenTek)]

For years I was used to the default TN3270 client having a black background and 
colors that seemed to glow at times. Then I found that I could adjust the 
colors and found that a grey (or is it gray) background worked better for my 
viewing experience and I adjusted the other colors accordingly and made them 
more muted where possible. Now I'm using Reflections and am using the Ice theme 
with some slight modifications and it works great. When I'm using Vista TN3270 
I have adjusted all the colors for a grey background as well.

With Reflections there are many other color themes and I'm sure other TN3270 
products also support them in varying ways of completeness.

Has anyone does any human factor studies on optimizing screen colors?

Thoughts/comments for a Friday

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners



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

Re: [External] Re: remove bad GDG entry from GDG base

[Nelson, Judith]

We tried, - it errors on duplicate data set name. 

Judith Nelson  | Senior Systems Programmer 
Sammons® Financial Group Member Companies
One Sammons Plaza  | Sioux Falls, SD 57193 
Phone: (605) 373-2321 
jnel...@sfgmembers.com 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jim Beck
Sent: Friday, July 6, 2018 9:28 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: remove bad GDG entry from GDG base

How about trying DEFINE NVSAM(NAME(.) DEVT() VOL(..) RECATALOG ?  I 
saw a post where a define nvsam failed with already cataloged.  I have seen 
RECATALOG sometimes clean things up, but don't remember using it on a GDG.

Jim

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


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

Re: DFSORT - a quick way to compare two huge files

[Elardus Engelbrecht]

Sri h Kolusu wrote:

>Yes it can. Here is an example (assuming the compare key is 10 bytes)

Thanks. Your example is excellent. I like the amazing combination of JOINKEY, 
REFORMAT, BUILD and OVERLAY!


>The output from the above job is

>ELARDUS   IS RECORD # 4 IN FILE 1 AND IN FILE 2, IT IS RECORD # 3
>GIL   IS RECORD # 1 IN FILE 1 AND IN FILE 2, IT IS RECORD # 4
>KOLUSUIS RECORD # 5 IN FILE 1 AND IN FILE 2, IT IS RECORD # 5
>MARTINIS RECORD # 2 IN FILE 1 AND IN FILE 2, IT IS RECORD # 1
>PAUL  IS RECORD # 3 IN FILE 1 AND IN FILE 2, IT IS RECORD # 2

Uh-oh, are you SORTing me out? ;-D

I like that example where you build up a singe record from two sources. 
(Similar to Frank Yaeger's example where you list from IRRDBU00 the 0200 and 
0220 record types, thus combining the basic RACF details of ids with the TSO 
Segment of the same id into one output line).

Groete / Greetings
Elardus Engelbrecht

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

Re: DYNALLOC

[Seymour J Metz]

These two commands are quite different:

ERASE CMS EXEC
EXEC CMS ERASE

The fastest PA1 in the west.


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


From: IBM Mainframe Discussion List  on behalf of Ed 
Jaffe 
Sent: Friday, July 6, 2018 9:51 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: DYNALLOC

On 7/6/2018 6:23 AM, Bill Ogden wrote:
>
> A minute AFTER I hit "send" for my message I saw the error.

I do my best proofreading *after* I press the  key...

--
Phoenix Software International
Edward E. Jaffe
831 Parkview Drive North
El Segundo, CA 90245
https://secure-web.cisco.com/1k_Zs8z-_9uUfmqbgc7vpW3YAkqiWJQ1-dkwoiAwQx7LD3a0Coc4yPIG5ZXYEMOi00sSQ59hBTz4hNr3eRpaQHQlzE9RzxaivWpz35VJfMmdeVXdVeaVsMYbcZxXRb4gtsBdRfdjfwMsSeet4ArvKC5KMigrb56GIz7HVWoH7fC1m5T_jx103WaA9zuEAxkR_4dcSf5s9e1IlCSGOmc4jKs-jd4jNFiB_w7RYMjpDiANarD4NLHFCQz-lcoytFqn00QGpir1eeyFqvT5eZTAxvRpiwHTCNp2cR5MeRVTS3jvZgU1uI7MOgSwQuRarQUSi7Fr2-Up7ZwX7yviMTpQP2hp7DqNPJhq8I0t6O4uk2Jgb4jIQ-jkw_SaRP5DAiVznk4NOzUDUcGO3pJDxAZI6kcbj2kCOiTU1Aqnr-WqX1WJdnegdzfTPVwmCoqDhyJPb/https%3A%2F%2Fwww.phoenixsoftware.com%2F


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

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

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

Re: Linklist and APF

[Charles Mills]

Let me put on my security preacher hat for a moment.

Yes, what Eileen says is a fact: there is no z/OS "enforcement" of RENT unless 
the program is from an APF library. You can easily get surprised by "where did 
that S0C4 come from?"

But that is not the big issue.

If you are getting "surprised" by "oh gosh, look at that, it's getting loaded 
from an APF library" then you do not have proper controls over what is probably 
THE most critical aspect of mainframe integrity, and as Barry Schrager observed 
at the dawn of mainframe security, without integrity there is no security. APF 
libraries are the keys to the kingdom. If I worked for you, and I were a 
malicious programmer, and I observed that if I did X and Y and Z then my 
program would end up in an APF library without any management or security 
review, then I OWN your mainframe. An APF-authorized program can do ANYTHING. 
Ray Overby and others have demonstrated at SHARE that just a few lines of 
obscure binary in an authorized program can give the user RACF SPECIAL and/or 
OPERATIONS/PRIVILEGED with NO AUDIT TRAIL WHATSOEVER, and from there on out the 
sky is the limit.

There are two pieces to APF authorization, AC=1 and the library. There are no 
controls over AC=1 -- any programmer can do it. It is up to you to control APF 
libraries rigorously. 

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Barkow, Eileen
Sent: Friday, July 6, 2018 6:59 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Linklist and APF

I  am  not sure if this is still true, but a while ago we had  a problem 
whereby a program would only work from  steplib  and not a linklib.
It turned out that certain options such as RENT were only enforced if the 
module resided in an apf authorized linklib.
So our module had been link-edited with the RENT option but was not really 
reentrant, so it abended when the RENT attribute was enforced.

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

Re: [External] Re: remove bad GDG entry from GDG base

[Jim Beck]

How about trying DEFINE NVSAM(NAME(.) DEVT() VOL(..) RECATALOG ?  I 
saw a post where a define nvsam failed with already cataloged.  I have seen 
RECATALOG sometimes clean things up, but don't remember using it on a GDG.

Jim

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

Re: [External] Re: remove bad GDG entry from GDG base

[Tom Marchant]

On Fri, 6 Jul 2018 13:42:02 +, Wissink, Brad wrote:

>That is what we are going to do and have already began testing the process 
>out.   I would like to thank everyone for the help.

Please let us know what you do how it goes.

-- 
Tom Marchant

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

Re: DFSORT - a quick way to compare two huge files

[Sri h Kolusu]

> Does it report if the two files contain the same records but in different
order?

Gil,

Yes it can. Here is an example (assuming the compare key is 10 bytes)

//STEP0100 EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*
//INA  DD *
GIL
MARTIN
PAUL
ELARDUS
KOLUSU
//INB  DD *
MARTIN
PAUL
ELARDUS
GIL
KOLUSU
//SORTOUT  DD SYSOUT=*
//SYSINDD *
  OPTION COPY
  JOINKEYS F1=INA,FIELDS=(1,10,A)
  JOINKEYS F2=INB,FIELDS=(1,10,A)
  REFORMAT FIELDS=(F1:1,15,F2:11,5)
  INREC BUILD=(01,10,
   C'IS RECORD # ',
   11,05,
   C' IN FILE 1 AND IN FILE 2, IT IS RECORD # ',
   16,05)
/*
//JNF1CNTL DD *
  INREC OVERLAY=(11:SEQNUM,5,FS)
/*
//JNF2CNTL DD *
  INREC OVERLAY=(11:SEQNUM,5,FS)
/*

The output from the above job is

ELARDUS   IS RECORD # 4 IN FILE 1 AND IN FILE 2, IT IS RECORD # 3
GIL   IS RECORD # 1 IN FILE 1 AND IN FILE 2, IT IS RECORD # 4
KOLUSUIS RECORD # 5 IN FILE 1 AND IN FILE 2, IT IS RECORD # 5
MARTINIS RECORD # 2 IN FILE 1 AND IN FILE 2, IT IS RECORD # 1
PAUL  IS RECORD # 3 IN FILE 1 AND IN FILE 2, IT IS RECORD # 2

Further if you have any questions please let me know

Thanks,
Kolusu
DFSORT Development
IBM Corporation

IBM Mainframe Discussion List  wrote on
07/06/2018 06:34:39 AM:

> From: Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu>
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 07/06/2018 06:36 AM
> Subject: Re: DFSORT - a quick way to compare two huge files
> Sent by: IBM Mainframe Discussion List 
>
> On Fri, 6 Jul 2018 06:49:38 -0500, Elardus Engelbrecht wrote:
> >
> >The example I posted may help you, but please note, the contents
> are first sorted and then records which are the same in both files
> are copied into one file and records which appear once in either
> will be copied to the right output.
> >
> Does it report if the two files contain the same records but in
> different order?
> This may or may not matter to the OP.
>
> >>Since you don't say what will happens when you get a record which
> appears in file 1 or file 2 or in both files, look at
> >>
> >>https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/
> com.ibm.zos.v2r1.icea100/ice2ca_Example_3_-
> _Create_files_with_matching_and_non-matching_records.htm
> >>
> >>I quote from above URL:
> >>
> >>This example shows how you can match records in input data sets 1
> and 2 to produce three output data sets with:
> >>
> >>ON fields that appear in both input data set 1 and input data set 2
> >>ON fields that appear only in input data set 1
> >>ON fields that appear only in input data set 2
>
> -- gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

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

Re: DYNALLOC

[Elardus Engelbrecht]

Ed Jaffe wrote:

>On 7/6/2018 6:23 AM, Bill Ogden wrote:
>> A minute AFTER I hit "send" for my message I saw the error.

>I do my best proofreading *after* I press the  key...

Or, AFTER you pressed that famous key "ENTER", you see you are making a career 
ending 6-letter-word mistake...

After you (and your boss) see horrible output in a job/screen/Syslog, then you 
wish you have PROOFREAD that intended command before running it...

Oh, BTW, I once send a somewhat naugthy dirty joke in a wrong WhatsApp group. 
Oooops...

I believe it is Friday today... ;-)

Groete / Greetings
Elardus Engelbrecht

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

Re: DFSORT - a quick way to compare two huge files

[R.S.]

W dniu 2018-07-06 o 15:46, Elardus Engelbrecht pisze:

Paul Gilmartin wrote:


The example I posted may help you, but please note, the contents are first 
sorted and then records which are the same in both files are copied into one 
file and records which appear once in either will be copied to the right output.
  

Does it report if the two files contain the same records but in different order?
This may or may not matter to the OP.

Thanks Paul. You are 101% correct. I have mentioned this caveat.

Other question - does the OP want to compare the WHOLE lines or not. Or are 
some columns selected for comparision?

Whole lines.
Records in both files are in the same order, so the comparison can be 
done record by record.




--
Radoslaw Skorupka
Lodz, Poland




==


   --
Treść tej wiadomości może zawierać informacje prawnie chronione Banku 
przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być jedynie 
jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś adresatem 
niniejszej wiadomości lub pracownikiem upoważnionym do jej przekazania 
adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne działanie o podobnym charakterze jest prawnie zabronione i może być 
karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, prosimy niezwłocznie 
zawiadomić nadawcę wysyłając odpowiedź oraz trwale usunąć tę wiadomość 
włączając w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is 
intended solely for business use of the addressee. This e-mail may only be 
received by the addressee and may not be disclosed to any third parties. If you 
are not the intended addressee of this e-mail or the employee authorized to 
forward it to the addressee, be advised that any dissemination, copying, 
distribution or any other similar activity is legally prohibited and may be 
punishable. If you received this e-mail by mistake please advise the sender 
immediately by using the reply facility in your e-mail software and delete 
permanently this e-mail including any copies of it either printed or saved to 
hard drive.

mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa, 
www.mBank.pl, e-mail: kont...@mbank.plsąd Rejonowy dla m. st. Warszawy XII 
Wydział Gospodarczy Krajowego Rejestru Sądowego, nr rejestru przedsiębiorców 
KRS 025237, NIP: 526-021-50-88. Według stanu na dzień 01.01.2018 r. kapitał 
zakładowy mBanku S.A. (w całości wpłacony) wynosi 169.248.488 złotych.
   


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

Re: DFSORT - a quick way to compare two huge files

[R.S.]

W dniu 2018-07-06 o 15:34, Paul Gilmartin pisze:

On Fri, 6 Jul 2018 06:49:38 -0500, Elardus Engelbrecht wrote:

The example I posted may help you, but please note, the contents are first 
sorted and then records which are the same in both files are copied into one 
file and records which appear once in either will be copied to the right output.


Does it report if the two files contain the same records but in different order?
This may or may not matter to the OP.


No, The records are to be intended in the same order.
In other words first record in FILEA has to be the same as first record 
in FILEB and second record in FILEA has to be the same as second record 
in FILEB, etc.
The intended result is RC=00 for idencital files and RC>00 for 
mismatches (and non-matching records on the output).


We plan to perform comparisons on several files, all of them are FB, but 
LRECL is different for every file. Of course files being compared are 
the same in terms of DCB.




--
Radoslaw Skorupka
Lodz, Poland




==


   --
Treść tej wiadomości może zawierać informacje prawnie chronione Banku 
przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być jedynie 
jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś adresatem 
niniejszej wiadomości lub pracownikiem upoważnionym do jej przekazania 
adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne działanie o podobnym charakterze jest prawnie zabronione i może być 
karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, prosimy niezwłocznie 
zawiadomić nadawcę wysyłając odpowiedź oraz trwale usunąć tę wiadomość 
włączając w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is 
intended solely for business use of the addressee. This e-mail may only be 
received by the addressee and may not be disclosed to any third parties. If you 
are not the intended addressee of this e-mail or the employee authorized to 
forward it to the addressee, be advised that any dissemination, copying, 
distribution or any other similar activity is legally prohibited and may be 
punishable. If you received this e-mail by mistake please advise the sender 
immediately by using the reply facility in your e-mail software and delete 
permanently this e-mail including any copies of it either printed or saved to 
hard drive.

mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa, 
www.mBank.pl, e-mail: kont...@mbank.plsąd Rejonowy dla m. st. Warszawy XII 
Wydział Gospodarczy Krajowego Rejestru Sądowego, nr rejestru przedsiębiorców 
KRS 025237, NIP: 526-021-50-88. Według stanu na dzień 01.01.2018 r. kapitał 
zakładowy mBanku S.A. (w całości wpłacony) wynosi 169.248.488 złotych.
   


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

Re: DFSORT - a quick way to compare two huge files

[Elardus Engelbrecht]

Paul Gilmartin wrote:

>>The example I posted may help you, but please note, the contents are first 
>>sorted and then records which are the same in both files are copied into one 
>>file and records which appear once in either will be copied to the right 
>>output.
 
>Does it report if the two files contain the same records but in different 
>order?
>This may or may not matter to the OP.

Thanks Paul. You are 101% correct. I have mentioned this caveat.

Other question - does the OP want to compare the WHOLE lines or not. Or are 
some columns selected for comparision?

Just like Sri, we all need more details before we can help out where we can.

Groete / Greetings
Elardus Engelbrecht

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

Re: [External] Re: remove bad GDG entry from GDG base

[Wissink, Brad]

That is what we are going to do and have already began testing the process out. 
  I would like to thank everyone for the help.

Brad Wissink| Sr. Systems Programmer
Sammons® Financial Group Member Companies
4350 Westown Pkwy | West Des Moines | IA 50266
Phone 515-267-2735 | ext. 33735 | Cell: 515-231-1511 

bwiss...@sfgmembers.com  | www.SammonsFinancialGroup.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tom Marchant
Sent: Friday, July 06, 2018 8:34 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: remove bad GDG entry from GDG base

On Fri, 6 Jul 2018 13:15:12 +, Wissink, Brad wrote:

>Tried that too.

You might be down to DEL GDG RECOVERY followed by DEF GDG.

I have never done that, so I can't vouch for how it works, so if I were you, I 
would create a GDG with several GDSes and experiment with that.

If that works the way we would hope, you may feel comfortable with doing it on 
your problem GDG.

--
Tom Marchant

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


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

Re: DFSORT - a quick way to compare two huge files

[Paul Gilmartin]

On Fri, 6 Jul 2018 06:49:38 -0500, Elardus Engelbrecht wrote:
>
>The example I posted may help you, but please note, the contents are first 
>sorted and then records which are the same in both files are copied into one 
>file and records which appear once in either will be copied to the right 
>output.
> 
Does it report if the two files contain the same records but in different order?
This may or may not matter to the OP.

>>Since you don't say what will happens when you get a record which appears in 
>>file 1 or file 2 or in both files, look at 
>>
>>https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.icea100/ice2ca_Example_3_-_Create_files_with_matching_and_non-matching_records.htm
>>
>>I quote from above URL: 
>>
>>This example shows how you can match records in input data sets 1 and 2 to 
>>produce three output data sets with:
>>
>>ON fields that appear in both input data set 1 and input data set 2
>>ON fields that appear only in input data set 1
>>ON fields that appear only in input data set 2

-- gil

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

Re: [External] Re: remove bad GDG entry from GDG base

[Tom Marchant]

On Fri, 6 Jul 2018 13:15:12 +, Wissink, Brad wrote:

>Tried that too.

You might be down to DEL GDG RECOVERY followed by DEF GDG.

I have never done that, so I can't vouch for how it works, so if I were 
you, I would create a GDG with several GDSes and experiment with that.

If that works the way we would hope, you may feel comfortable with 
doing it on your problem GDG.

-- 
Tom Marchant

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

Task Flow Recorder for CICS

[Cameron Conacher]

Is anyone out there using IBM’s Task Flow Recorder for CICS?

Could you share anything? Experience. Initial costs. Licensing costs? Benefits? 
Limitations seen?

Thanks
...Cameron

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

Re: DYNALLOC

[Bill Ogden]

>Date:Thu, 5 Jul 2018 09:48:03 -0500
>From:Bill Godfrey 
>
>Your A(TU1) should be A(TUPL), and TUPL should look like this:
>
>TUPL DCA(TU1,TU2,TU3,TU4,TU5,TU6,TU7,TU8+X'8000)

Thank you!

IBM-MAIN is magical. A minute AFTER I hit "send" for my message I saw
the error. If the magic could be improved to work a minute BEFORE
hitting "send" it would be even better. 

Bill


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

Re: [External] Re: remove bad GDG entry from GDG base

[Allan Staller]

The only other thing I can think of is to re-copy all of the existing GDG 
members until the bad entry drops off the GDS list.

A PMR for CATALOG/DFSMS (?) might be in order

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Wissink, Brad
Sent: Friday, July 6, 2018 8:15 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: remove bad GDG entry from GDG base

Tried that too.

 DELETE PTP.DP.TRMS.ARCH999.X3.G0308V00 NSCR   
IDC3012I ENTRY PTP.DP.TRMS.ARCH999.X3.G0308V00 NOT FOUND
IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEG-42  
IDC0551I ** ENTRY PTP.DP.TRMS.ARCH999.X3.G0308V00 NOT DELETED   
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 8   

IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 8   

Brad Wissink| Sr. Systems Programmer
Sammons® Financial Group Member Companies
4350 Westown Pkwy | West Des Moines | IA 50266 Phone 515-267-2735 | ext. 33735 
| Cell: 515-231-1511 

bwiss...@sfgmembers.com  | 
https://apac01.safelinks.protection.outlook.com/?url=www.SammonsFinancialGroup.com=02%7C01%7Callan.staller%40HCL.COM%7C2361fa203fe7493bf31a08d5e342a1e4%7C189de737c93a4f5a8b686f4ca9941912%7C0%7C1%7C636664797712588779=2nGjBYx90%2B8tFV7SP4hc37XqSNC7%2BHWV2csz02e7%2BgI%3D=0

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Allan Staller
Sent: Friday, July 06, 2018 7:16 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: remove bad GDG entry from GDG base

DEL entryname NSCR?

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jackson, Rob
Sent: Thursday, July 5, 2018 6:03 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: remove bad GDG entry from GDG base

That's because if the original attempt was tape, there's definitely no NVR.

Sorry, when I mentioned IEHPROGM earlier, I was actually thinking of the CATLG 
command, as in CATLG DSNAME=dataset,VOL=3390=whocares (disk doesn't matter, 
because you just want an entry you can actually delete).  I thought about 
IEHPROGM, because it's still sort of "dumb," and just does what it's told, and 
I hoped it might just make the entry in the catalog.  If it does, the base 
already has it rolled in, and you can simply delete it with noscratch.  I'm not 
sure your IEHPROGM results so far indicate anything other than there is no 
complete catalog entry.

That's a shame about rename giving you a 040842CD, which says duplicate catalog 
entry exists.  It makes me think the IEHPROGM CATLG won't work either, despite 
being old school.  It depends upon which interfaces IEHPROGM does not respect 
(but which ISPF clearly does).

First Tennessee Bank
Mainframe Technical Support

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Nelson, Judith
Sent: Thursday, July 05, 2018 5:59 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: remove bad GDG entry from GDG base

[External Email]

We tried. :(



   DELETE PTP.DP.TRMS.ARCH999.X3.G0308V00 FILE(VOL2) NVR

IDC3014I CATALOG ERROR

IDC3009I ** VSAM CATALOG RETURN CODE IS 50 - REASON CODE IS IGG0CLE3-92

IDC0551I ** ENTRY PTP.DP.TRMS.ARCH999.X3.G0308V00 NOT DELETED

IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 8


Judith Nelson  | Senior Systems Programmer Sammons® Financial Group Member 
Companies One Sammons Plaza  | Sioux Falls, SD 57193
Phone: (605) 373-2321
jnel...@sfgmembers.com



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tom Marchant
Sent: Thursday, July 5, 2018 10:05 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] Re: remove bad GDG entry from GDG base



On Thu, 5 Jul 2018 09:27:07 -0500, Brad Wissink wrote:



>We need to remove a GDG entry from a GDG base, but the catalog entry

>doesn't exist.  What happened was that during the creation of the GDG

>(PTP.DP.TRMS.ARCH999.X3.G0308V00) the user catalog filled up and could

>not extend.



I suspect that the NVR was created in the VVDS. I would try DELETE NVR, 
followed by DEFINE.



--

Tom Marchant



--

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 confidential, protected from 
disclosure and may be legally privileged.  If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in 

Re: [External] Re: remove bad GDG entry from GDG base

[Wissink, Brad]

Tried that too.

 DELETE PTP.DP.TRMS.ARCH999.X3.G0308V00 NSCR   
IDC3012I ENTRY PTP.DP.TRMS.ARCH999.X3.G0308V00 NOT FOUND
IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEG-42  
IDC0551I ** ENTRY PTP.DP.TRMS.ARCH999.X3.G0308V00 NOT DELETED   
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 8   

IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 8   

Brad Wissink| Sr. Systems Programmer
Sammons® Financial Group Member Companies
4350 Westown Pkwy | West Des Moines | IA 50266
Phone 515-267-2735 | ext. 33735 | Cell: 515-231-1511 

bwiss...@sfgmembers.com  | www.SammonsFinancialGroup.com

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Allan Staller
Sent: Friday, July 06, 2018 7:16 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: remove bad GDG entry from GDG base

DEL entryname NSCR?

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jackson, Rob
Sent: Thursday, July 5, 2018 6:03 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: remove bad GDG entry from GDG base

That's because if the original attempt was tape, there's definitely no NVR.

Sorry, when I mentioned IEHPROGM earlier, I was actually thinking of the CATLG 
command, as in CATLG DSNAME=dataset,VOL=3390=whocares (disk doesn't matter, 
because you just want an entry you can actually delete).  I thought about 
IEHPROGM, because it's still sort of "dumb," and just does what it's told, and 
I hoped it might just make the entry in the catalog.  If it does, the base 
already has it rolled in, and you can simply delete it with noscratch.  I'm not 
sure your IEHPROGM results so far indicate anything other than there is no 
complete catalog entry.

That's a shame about rename giving you a 040842CD, which says duplicate catalog 
entry exists.  It makes me think the IEHPROGM CATLG won't work either, despite 
being old school.  It depends upon which interfaces IEHPROGM does not respect 
(but which ISPF clearly does).

First Tennessee Bank
Mainframe Technical Support

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Nelson, Judith
Sent: Thursday, July 05, 2018 5:59 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: remove bad GDG entry from GDG base

[External Email]

We tried. :(



   DELETE PTP.DP.TRMS.ARCH999.X3.G0308V00 FILE(VOL2) NVR

IDC3014I CATALOG ERROR

IDC3009I ** VSAM CATALOG RETURN CODE IS 50 - REASON CODE IS IGG0CLE3-92

IDC0551I ** ENTRY PTP.DP.TRMS.ARCH999.X3.G0308V00 NOT DELETED

IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 8


Judith Nelson  | Senior Systems Programmer Sammons® Financial Group Member 
Companies One Sammons Plaza  | Sioux Falls, SD 57193
Phone: (605) 373-2321
jnel...@sfgmembers.com



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tom Marchant
Sent: Thursday, July 5, 2018 10:05 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] Re: remove bad GDG entry from GDG base



On Thu, 5 Jul 2018 09:27:07 -0500, Brad Wissink wrote:



>We need to remove a GDG entry from a GDG base, but the catalog entry

>doesn't exist.  What happened was that during the creation of the GDG

>(PTP.DP.TRMS.ARCH999.X3.G0308V00) the user catalog filled up and could

>not extend.



I suspect that the NVR was created in the VVDS. I would try DELETE NVR, 
followed by DEFINE.



--

Tom Marchant



--

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


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

Confidentiality notice:
This e-mail message, including any attachments, may contain legally privileged 
and/or confidential information. If you are not the intended recipient(s), or 

Re: Sysplex between two hardware

[Timothy Sipples]

Peter wrote:
>We are looking up for a solution where we need a LPAR to have a hot
standby
>in other LPAR running in a different machine .
>As we are trying to create a sysplex relationship between two LPARS
running
>in a different machines .
>Apology for my ignorance and is it possible ?

Yes, it's certainly possible and common.

Here are a couple questions:

1. How far apart (in fiber distance) are these two physical machines?

2. What workload types would you like to configure across the two LPARs?
Examples: MQ, Db2, CICS, IMS TM, IMS DB, WebSphere Application Server?

3. What goal(s) are you trying to accomplish? Are you trying to improve
service levels, for example? Or perhaps trying to move workloads from one
machine to another while minimizing (or eliminating) an outage? Something
else?


Timothy Sipples
IT Architect Executive, Industry Solutions, IBM Z & LinuxONE,
Multi-Geography
E-Mail: sipp...@sg.ibm.com

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

Re: [External] Re: remove bad GDG entry from GDG base

[PINION, RICHARD W.]

Maybe you can try this, note the use of GDG, RECOVERY, and FORCE.

GENERATIONDATAGROUP
specifies that the entry to be deleted is a generation data group (GDG)
entry. To delete a generation data group that is not empty, you must
specify either the FORCE or the RECOVERY parameter. When FORCE is
used, all SMS-managed generation data sets pointed to by the GDG base
are scratched. Generation data sets are also removed from the catalog
when you use FORCE.
For both SMS-managed and non-SMS-managed GDGs, if you use
RECOVERY, the GDG entry is deleted from the catalog and generation
data sets remain unaffected in the VTOC. To delete a GDG using
RECOVERY or FORCE, you must specify both
GENERATIONDATAGROUP and RECOVERY or
GENERATIONDATAGROUP and FORCE.
The FORCE and RECOVERY generation data set parameters require RACF
FACILITY class authorization. For information concerning RACF
authorization levels, see Appendix A, “Security Authorization Levels,” on
page 385.


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Allan Staller
Sent: Friday, July 06, 2018 8:16 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: remove bad GDG entry from GDG base

[External Email]

DEL entryname NSCR?

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jackson, Rob
Sent: Thursday, July 5, 2018 6:03 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: remove bad GDG entry from GDG base

That's because if the original attempt was tape, there's definitely no NVR.

Sorry, when I mentioned IEHPROGM earlier, I was actually thinking of the CATLG 
command, as in CATLG DSNAME=dataset,VOL=3390=whocares (disk doesn't matter, 
because you just want an entry you can actually delete).  I thought about 
IEHPROGM, because it's still sort of "dumb," and just does what it's told, and 
I hoped it might just make the entry in the catalog.  If it does, the base 
already has it rolled in, and you can simply delete it with noscratch.  I'm not 
sure your IEHPROGM results so far indicate anything other than there is no 
complete catalog entry.

That's a shame about rename giving you a 040842CD, which says duplicate catalog 
entry exists.  It makes me think the IEHPROGM CATLG won't work either, despite 
being old school.  It depends upon which interfaces IEHPROGM does not respect 
(but which ISPF clearly does).

First Tennessee Bank
Mainframe Technical Support

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Nelson, Judith
Sent: Thursday, July 05, 2018 5:59 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: remove bad GDG entry from GDG base

[External Email]

We tried. :(



   DELETE PTP.DP.TRMS.ARCH999.X3.G0308V00 FILE(VOL2) NVR

IDC3014I CATALOG ERROR

IDC3009I ** VSAM CATALOG RETURN CODE IS 50 - REASON CODE IS IGG0CLE3-92

IDC0551I ** ENTRY PTP.DP.TRMS.ARCH999.X3.G0308V00 NOT DELETED

IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 8


Judith Nelson  | Senior Systems Programmer Sammons® Financial Group Member 
Companies One Sammons Plaza  | Sioux Falls, SD 57193
Phone: (605) 373-2321
jnel...@sfgmembers.com



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tom Marchant
Sent: Thursday, July 5, 2018 10:05 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] Re: remove bad GDG entry from GDG base



On Thu, 5 Jul 2018 09:27:07 -0500, Brad Wissink wrote:



>We need to remove a GDG entry from a GDG base, but the catalog entry

>doesn't exist.  What happened was that during the creation of the GDG

>(PTP.DP.TRMS.ARCH999.X3.G0308V00) the user catalog filled up and could

>not extend.



I suspect that the NVR was created in the VVDS. I would try DELETE NVR, 
followed by DEFINE.



--

Tom Marchant



--

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


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

Confidentiality notice:

Re: [External] Re: remove bad GDG entry from GDG base

[Allan Staller]

DEL entryname NSCR?

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jackson, Rob
Sent: Thursday, July 5, 2018 6:03 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: remove bad GDG entry from GDG base

That's because if the original attempt was tape, there's definitely no NVR.

Sorry, when I mentioned IEHPROGM earlier, I was actually thinking of the CATLG 
command, as in CATLG DSNAME=dataset,VOL=3390=whocares (disk doesn't matter, 
because you just want an entry you can actually delete).  I thought about 
IEHPROGM, because it's still sort of "dumb," and just does what it's told, and 
I hoped it might just make the entry in the catalog.  If it does, the base 
already has it rolled in, and you can simply delete it with noscratch.  I'm not 
sure your IEHPROGM results so far indicate anything other than there is no 
complete catalog entry.

That's a shame about rename giving you a 040842CD, which says duplicate catalog 
entry exists.  It makes me think the IEHPROGM CATLG won't work either, despite 
being old school.  It depends upon which interfaces IEHPROGM does not respect 
(but which ISPF clearly does).

First Tennessee Bank
Mainframe Technical Support

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Nelson, Judith
Sent: Thursday, July 05, 2018 5:59 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] Re: remove bad GDG entry from GDG base

[External Email]

We tried. :(



   DELETE PTP.DP.TRMS.ARCH999.X3.G0308V00 FILE(VOL2) NVR

IDC3014I CATALOG ERROR

IDC3009I ** VSAM CATALOG RETURN CODE IS 50 - REASON CODE IS IGG0CLE3-92

IDC0551I ** ENTRY PTP.DP.TRMS.ARCH999.X3.G0308V00 NOT DELETED

IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 8


Judith Nelson  | Senior Systems Programmer Sammons® Financial Group Member 
Companies One Sammons Plaza  | Sioux Falls, SD 57193
Phone: (605) 373-2321
jnel...@sfgmembers.com



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tom Marchant
Sent: Thursday, July 5, 2018 10:05 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] Re: remove bad GDG entry from GDG base



On Thu, 5 Jul 2018 09:27:07 -0500, Brad Wissink wrote:



>We need to remove a GDG entry from a GDG base, but the catalog entry

>doesn't exist.  What happened was that during the creation of the GDG

>(PTP.DP.TRMS.ARCH999.X3.G0308V00) the user catalog filled up and could

>not extend.



I suspect that the NVR was created in the VVDS. I would try DELETE NVR, 
followed by DEFINE.



--

Tom Marchant



--

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


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

Confidentiality notice:
This e-mail message, including any attachments, may contain legally privileged 
and/or confidential information. If you are not the intended recipient(s), or 
the employee or agent responsible for delivery of this message to the intended 
recipient(s), you are hereby notified that any dissemination, distribution, or 
copying of this e-mail message is strictly prohibited. If you have received 
this message in error, please immediately notify the sender and delete this 
e-mail message from your computer.


--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
::DISCLAIMER::
--
The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only. E-mail transmission is not guaranteed to be 
secure or error-free as information 

Re: DFSORT - a quick way to compare two huge files

[Elardus Engelbrecht]

Radoslaw, 

I forgot to ask these questions:


Do you want a line by line comparision (same output as with ISPF compare)?

Could you be kind to post a sample input and output? Also show how you want the 
differences to be handled.

This is to enable IBM-MAIN members to select the best solution for you.

The example I posted may help you, but please note, the contents are first 
sorted and then records which are the same in both files are copied into one 
file and records which appear once in either will be copied to the right output.

Groete / Greetings
Elardus Engelbrecht


>Radoslaw Skorupka wrote:
>
>>We have two output files, rather huge ones (rather gigabytes than MB's) with 
>>LRECL~1500, FB.
>>The goal is to compare them and find different records.
>>While I have some ideas how to do it (even ISPF Compare or ICETOOL) I don't 
>>think it would effective.
>
>>Any clues?
>
>Since you don't say what will happens when you get a record which appears in 
>file 1 or file 2 or in both files, look at 
>
>https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.icea100/ice2ca_Example_3_-_Create_files_with_matching_and_non-matching_records.htm
>
>I quote from above URL: 
>
>This example shows how you can match records in input data sets 1 and 2 to 
>produce three output data sets with:
>
>ON fields that appear in both input data set 1 and input data set 2
>ON fields that appear only in input data set 1
>ON fields that appear only in input data set 2
>
>HTH! 
>
>Groete / Greetings
>Elardus Engelbrecht
>
>--
>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: DFSORT - a quick way to compare two huge files

[Elardus Engelbrecht]

Radoslaw Skorupka wrote:

>We have two output files, rather huge ones (rather gigabytes than MB's) with 
>LRECL~1500, FB.
>The goal is to compare them and find different records.
>While I have some ideas how to do it (even ISPF Compare or ICETOOL) I don't 
>think it would effective.

>Any clues?

Since you don't say what will happens when you get a record which appears in 
file 1 or file 2 or in both files, look at 

https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.icea100/ice2ca_Example_3_-_Create_files_with_matching_and_non-matching_records.htm

I quote from above URL: 

This example shows how you can match records in input data sets 1 and 2 to 
produce three output data sets with:

ON fields that appear in both input data set 1 and input data set 2
ON fields that appear only in input data set 1
ON fields that appear only in input data set 2

HTH! 

Groete / Greetings
Elardus Engelbrecht

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

DFSORT - a quick way to compare two huge files

[R.S.]

We have two output files, rather huge ones (rather gigabytes than MB's) 
with LRECL~1500, FB.

The goal is to compare them and find different records.
While I have some ideas how to do it (even ISPF Compare or ICETOOL) I 
don't think it would effective.


Any clues?

--
Radoslaw Skorupka
Lodz, Poland




==


   --
Treść tej wiadomości może zawierać informacje prawnie chronione Banku 
przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być jedynie 
jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś adresatem 
niniejszej wiadomości lub pracownikiem upoważnionym do jej przekazania 
adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne działanie o podobnym charakterze jest prawnie zabronione i może być 
karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, prosimy niezwłocznie 
zawiadomić nadawcę wysyłając odpowiedź oraz trwale usunąć tę wiadomość 
włączając w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is 
intended solely for business use of the addressee. This e-mail may only be 
received by the addressee and may not be disclosed to any third parties. If you 
are not the intended addressee of this e-mail or the employee authorized to 
forward it to the addressee, be advised that any dissemination, copying, 
distribution or any other similar activity is legally prohibited and may be 
punishable. If you received this e-mail by mistake please advise the sender 
immediately by using the reply facility in your e-mail software and delete 
permanently this e-mail including any copies of it either printed or saved to 
hard drive.

mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa, 
www.mBank.pl, e-mail: kont...@mbank.plsąd Rejonowy dla m. st. Warszawy XII 
Wydział Gospodarczy Krajowego Rejestru Sądowego, nr rejestru przedsiębiorców 
KRS 025237, NIP: 526-021-50-88. Według stanu na dzień 01.01.2018 r. kapitał 
zakładowy mBanku S.A. (w całości wpłacony) wynosi 169.248.488 złotych.
   


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

Re: Linklist and APF

[Jantje.]

On Thu, 5 Jul 2018 17:18:24 +0200, R.S.  wrote:


>
>The job works when all 3 libraries are in steplib concatenation. When I
>remove LIB1 and LIB2 it doesn't work. 

Maybe there is a same-name-different-content module in one of the other libs in 
linklist before lib1 and 2 ?


Jantje.

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

Re: SUSE splits from Microfocus

[R.S.]

W dniu 2018-07-03 o 23:56, Phil Smith III pisze:

OK, kids, pay attention, because this will be on the exam.

  


In the beginning, there was Hewlett-Packard, or HP. And HP was formless and
huge, and darkness was upon the stock.

  


And the Board made a decision: split the company! And thus was born Hewlett
Packard Enterprise (HPE)-no hyphen, and please don't call us "HP
Enterprise", not sure why, even though some of the internal URLs were at
www.hpenterprise.com  . HP remained, as "HP
Inc." (HPQ), selling the consumer stuff: laptops, desktops, printers. HPE
took the "S" stuff: Servers, Services, and Software.

  


A few months after the split, HPE announced that they were doing a
"spin/merge": the Services were going to be split off and merging with what
was left of CSC, forming a new entity called DXC.

  


And a while after that, HPE announced that they were selling another "S":
the Software was being sold off to Micro Focus.

  


So some folks went: HP==>HPE==>DXC; some went HP==>HPE==>Micro Focus; some
went just HP==>HPE; and some even stayed as HP the whole time.

  


Employee counts are maybe interesting-these are numbers I've seen, don't
blame me if they're wrong:

HP originally: 300,000

HPE originally, after the split: 70,000

HPE without Services: 11,000

DXC: 170,500 (that "500" is oddly precise; with 170K, you'd think it would
fluctuate that much on a monthly/weekly/daily basis)

But HP now: 50,000 (a lot are missing, eh?)

Micro Focus now: 15,000 (including SUSE and HPE)

  


If you've been confused by all this, don't feel badly-the bloody trade press
can't keep it straight, and that's their job! I've seen references to Meg
Whitman as being "CEO of HP" within the last couple of months, and yes, she
went to HPE. Like, two years ago. So there's no excuse for (them) getting
that wrong.

  


Thus endeth the lesson.


Professor,
What about EDS?
To my knowledge EDS was bought by HP before HP - HPE split and it was 
part of HPE. Is it now part of DXC?



Regards
--
Radoslaw Skorupka
Lodz, Poland




==


   --
Treść tej wiadomości może zawierać informacje prawnie chronione Banku 
przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być jedynie 
jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś adresatem 
niniejszej wiadomości lub pracownikiem upoważnionym do jej przekazania 
adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne działanie o podobnym charakterze jest prawnie zabronione i może być 
karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, prosimy niezwłocznie 
zawiadomić nadawcę wysyłając odpowiedź oraz trwale usunąć tę wiadomość 
włączając w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is 
intended solely for business use of the addressee. This e-mail may only be 
received by the addressee and may not be disclosed to any third parties. If you 
are not the intended addressee of this e-mail or the employee authorized to 
forward it to the addressee, be advised that any dissemination, copying, 
distribution or any other similar activity is legally prohibited and may be 
punishable. If you received this e-mail by mistake please advise the sender 
immediately by using the reply facility in your e-mail software and delete 
permanently this e-mail including any copies of it either printed or saved to 
hard drive.

mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa, 
www.mBank.pl, e-mail: kont...@mbank.plsąd Rejonowy dla m. st. Warszawy XII 
Wydział Gospodarczy Krajowego Rejestru Sądowego, nr rejestru przedsiębiorców 
KRS 025237, NIP: 526-021-50-88. Według stanu na dzień 01.01.2018 r. kapitał 
zakładowy mBanku S.A. (w całości wpłacony) wynosi 169.248.488 złotych.
   


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

Re: IBM i as JCL replacement (was: Rexx as JCL replacement)

[Jantje.]

On Thu, 5 Jul 2018 15:08:01 -0500, Dana Mitchell  wrote:

>Most everything is menu driven,

Indeed it is, but hitting PF14 on that menu will show you the equivalent CL 
command with all the options you just filled in in the right place and with the 
correct syntax. Just cut that into your CL source... or onto your command 
line for that matter.


Cheers,

Jantje.

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

Re: IBM i as JCL replacement (was: Rexx as JCL replacement)

[Jantje.]

On Thu, 5 Jul 2018 16:28:10 -0300, Clark Morris  wrote:

>
>For batch processes how does the i series command language compare to
>JCL.

One typically uses CL to program ones batch jobs. And when I say 'program' that 
is exactly what I mean. CL is a very complete programming language. It really 
does not compare to JCL on mainframe; it is way more powerful. 

> How are competing requests for file access handled?


Depends on how you set up commitment control for your job. From 'not-at-all' to 
full-blown 2-phase commit; just tell the system what you need for that 
particular job.


Cheers,

Jantje.

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

Re: IBM i as JCL replacement (was: Rexx as JCL replacement)

[Jantje.]

On Thu, 5 Jul 2018 06:40:39 -0700, Charles Mills  wrote:

>Many moons ago we ported a product from z/OS to the AS/400 and were similarly 
>impressed with the sorts of things you mention. The OS was solid as a rock.

Hear, hear !

>
>There is a major learning curve 

Having gone down that path, I have to contradict this statement. OK, granted, 
there are a few quirks one has to get used to, but the fact that the whole 
system, from the hardest "real system-programmer" stuff to the development, to 
the end user is really consistent in the way things behave and are presented, 
makes it IMHO easy to grasp.

> -- the darned thing is unlike any other computer. 

That is true.

> Also as I recall a lot of services were only available via panels -- like if 
> ISPF were the *only* way to accomplish certain z/OS tasks.


This is no longer true. In the recent versions of the OS, there are numerous 
API's available to call from CL, COBOL, C, even Java, that do almost everything 
and anything.


Cheers,

Jantje.

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

Re: CPU Utilization

[saurabh khandelwal]

Hello,

I am able to get RMF3B messages on on my syslog. But I unable to find the
way to get these message like below when DASD activity rate goes above
limit on console.

Can you please suggest way of achieving this task .


+RMF100I 3B: Processing WFEX Report...
+RMF100I 3B: Name Reason Critical val.
+RMF100I 3B: --
+RMF102I 3B: *STOR ONLXF < 16K 0 frames
+RMF102I 3B: OSPCAT DAR > 5 9.000 /sec
+RMF102I 3B: OSPRES DAR > 5 7.300 /sec

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

Re: Sysplex between two hardware

[Vince Getgood]

Peter,
What is your question exactly?

If you MEAN a "hot standby" - which I understand to mean a system that is IPL'd 
but not being used, but could take on workload from a currently active and used 
system, I'd say that's not a SYSPLEX, that's a disaster recovery scenario.

If you are trying to connect two ACTIVE and USED LPARS on different machines, 
that may or may not share worload, then that could be a SHAMPLEX, a SYSPLEX, 
possibly a parallel SYSPLEX or even a GLOBALLY DISPERSED PARALLEL SYSPLEX.

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

Re: Function in SDSF to list Dynamic Exits

[Rob Scott]

Skip

One thought that occurs about this situation that would make SDSF behave 
against its normal processing logic is when the installation has an ISFUSER 
exit installed.

The ISFUSER exit could be changing the "command authorization" bits in the user 
parm area for a user that does not have SAF authority to the ISFCMD.ODSP.* 
profile.

Regards

Rob

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jesse 1 Robinson
Sent: Thursday, July 5, 2018 11:30 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Function in SDSF to list Dynamic Exits

We IPLed a new system today with 2.3. My SDSF menu is in 'hide mode'. All of 
the following options are displayed, but none of them works.

PROC Proclib data setsJES
SSI  Subsystem informationSystem
CFC  CF Connections   Sysplex
CFS  CF StructuresSysplex
VMAP Virtual storage map  Memory
SMSG SMS storage groups   Devices
SMSV SMS volumes  Devices
FS   File systems OMVS
CSR  Common storage remaining Memory
GT   Generic tracker  System
NA   Network activity Network
DEV  Device activity  Devices

"ISF452E SDSFAUX communications failed, return code 0x0008, reason code |
"0x00360806, function "query ". Not authorized for request"  |

.
.
J.O.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler
SHARE MVS Program Co-Manager
323-715-0595 Mobile
626-543-6132 Office ⇐=== NEW
robin...@sce.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Elardus Engelbrecht
Sent: Thursday, July 05, 2018 5:26 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: Function in SDSF to list Dynamic Exits

Rob Scott wrote:

>By default, commands that you do not have access to via ISFCMD or group 
>authority will not appear on the SDSF main menu.

Indeed! Please see (watch the wrrap!) this URL:

https://na01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.ibm.com%2Fsupport%2Fknowledgecenter%2Fen%2FSSLTBW_2.3.0%2Fcom.ibm.zos.v2r3.isfa500%2Frescmds.htmdata=02%7C01%7CRScott%40ROCKETSOFTWARE.COM%7C7bb1378c6e0a4d4b145908d5e2c6ed39%7C79544c1eed224879a082b67a9a672aae%7C0%7C0%7C636664266386648391sdata=5tc3rolN4Jk0YPBCObJut01H0kKDD9Gv7NV%2BkdrHJpc%3Dreserved=0

... for a list of profiles starting with ISFCMD in SDSF RACF Class.


Abilities to use or see unauthorised screens/commands are also managed by:
  ISFPARM (If you use SERVER.NOPARM in SDSF class)
  ISFPRMxx
  RACF Classes - TSOAUTH/FACILITY/SDSF/LOGSTRM/OPERCMDS/XFACILIT.

See this site for a lng list of resources to protect everthing in 
SDSF:

https://na01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.ibm.com%2Fsupport%2Fknowledgecenter%2Fen%2FSSLTBW_2.3.0%2Fcom.ibm.zos.v2r3.isfa500%2Faperes.htmdata=02%7C01%7CRScott%40ROCKETSOFTWARE.COM%7C7bb1378c6e0a4d4b145908d5e2c6ed39%7C79544c1eed224879a082b67a9a672aae%7C0%7C0%7C636664266386648391sdata=PIAyZ1x%2BqnJ2rWyjhgvS5aO%2FRXw6RVHuWcScQOgM9vY%3Dreserved=0


>You can issue the "SET MENU ALL" to show all commands and unauthorised 
>commands will have the "Status" of "Command not authorized".

Or go to pull-down menu. Select 'Display', then select '1. Panels' to see all 
and every panels in SDSF world.

Groete / Greetings
Elardus Engelbrecht


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

Rocket Software, Inc. and subsidiaries ■ 77 Fourth Avenue, Waltham MA 02451 ■ 
Main Office Toll Free Number: +1 855.577.4323
Contact Customer Support: 
https://my.rocketsoftware.com/RocketCommunity/RCEmailSupport
Unsubscribe from Marketing Messages/Manage Your Subscription Preferences - 
http://www.rocketsoftware.com/manage-your-email-preferences
Privacy Policy - http://www.rocketsoftware.com/company/legal/privacy-policy


This communication and any attachments may contain confidential information of 
Rocket Software, Inc. All unauthorized use, disclosure or distribution is 
prohibited. If you are not the intended recipient, please notify Rocket 
Software immediately and destroy all copies of this communication. Thank you.

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

Re: [External] Re: remove bad GDG entry from GDG base

[Lucas Rosalen]

Hi Brad/Judith,

I see you tried: DEFINE NONVSAM(NAME(PTP.DP.TRMS.ARCH999.X3.G0308V00)
DEVT(3390) VOL(Z1SW01))

Maybe the same DEFINE but with RECATALOG would work in this case.
Something like: DEFINE NONVSAM(NAME(PTP.DP.TRMS.ARCH999.X3.G0308V00)
DEVT(3390) VOL(Z1SW01) RECATALOG)

Regards,


---
*Lucas Rosalen*
rosalen.lu...@gmail.com / lucas.rosal...@ibm.com
http://br.linkedin.com/in/lrosalen


2018-07-06 1:02 GMT+02:00 Jackson, Rob :

> That's because if the original attempt was tape, there's definitely no NVR.
>
> Sorry, when I mentioned IEHPROGM earlier, I was actually thinking of the
> CATLG command, as in CATLG DSNAME=dataset,VOL=3390=whocares (disk doesn't
> matter, because you just want an entry you can actually delete).  I thought
> about IEHPROGM, because it's still sort of "dumb," and just does what it's
> told, and I hoped it might just make the entry in the catalog.  If it does,
> the base already has it rolled in, and you can simply delete it with
> noscratch.  I'm not sure your IEHPROGM results so far indicate anything
> other than there is no complete catalog entry.
>
> That's a shame about rename giving you a 040842CD, which says duplicate
> catalog entry exists.  It makes me think the IEHPROGM CATLG won't work
> either, despite being old school.  It depends upon which interfaces
> IEHPROGM does not respect (but which ISPF clearly does).
>
> First Tennessee Bank
> Mainframe Technical Support
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Nelson, Judith
> Sent: Thursday, July 05, 2018 5:59 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: [External] Re: remove bad GDG entry from GDG base
>
> [External Email]
>
> We tried. :(
>
>
>
>DELETE PTP.DP.TRMS.ARCH999.X3.G0308V00 FILE(VOL2) NVR
>
> IDC3014I CATALOG ERROR
>
> IDC3009I ** VSAM CATALOG RETURN CODE IS 50 - REASON CODE IS IGG0CLE3-92
>
> IDC0551I ** ENTRY PTP.DP.TRMS.ARCH999.X3.G0308V00 NOT DELETED
>
> IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 8
>
>
> Judith Nelson  | Senior Systems Programmer Sammons® Financial Group Member
> Companies One Sammons Plaza  | Sioux Falls, SD 57193
> Phone: (605) 373-2321
> jnel...@sfgmembers.com
>
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Tom Marchant
> Sent: Thursday, July 5, 2018 10:05 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: [External] Re: remove bad GDG entry from GDG base
>
>
>
> On Thu, 5 Jul 2018 09:27:07 -0500, Brad Wissink wrote:
>
>
>
> >We need to remove a GDG entry from a GDG base, but the catalog entry
>
> >doesn't exist.  What happened was that during the creation of the GDG
>
> >(PTP.DP.TRMS.ARCH999.X3.G0308V00) the user catalog filled up and could
>
> >not extend.
>
>
>
> I suspect that the NVR was created in the VVDS. I would try DELETE NVR,
> followed by DEFINE.
>
>
>
> --
>
> Tom Marchant
>
>
>
> --
>
> 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 confidential, protected from
> disclosure and may be legally privileged.  If the reader of this message is
> not the intended recipient or an employee or agent responsible for
> delivering this message to the intended recipient, you are hereby notified
> that any disclosure, distribution, copying, or any action taken or action
> omitted in reliance on it, is strictly prohibited and may be unlawful.  If
> you have received this communication in error, please notify us immediately
> by replying to this message and destroy the material in its entirety,
> whether in electronic or hard copy format.  Thank you.
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> FIRST TENNESSEE
>
> Confidentiality notice:
> This e-mail message, including any attachments, may contain legally
> privileged and/or confidential information. If you are not the intended
> recipient(s), or the employee or agent responsible for delivery of this
> message to the intended recipient(s), you are hereby notified that any
> dissemination, distribution, or copying of this e-mail message is strictly
> prohibited. If you have received this message in error, please immediately
> notify the sender and delete this e-mail message from your computer.
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

Re: Function in SDSF to list Dynamic Exits

[Rob Scott]

Skip,

Please raise a PMR and the support team will help resolve this.

Rob

On 5 Jul 2018 11:30 pm, Jesse 1 Robinson  wrote:
We IPLed a new system today with 2.3. My SDSF menu is in 'hide mode'. All of 
the following options are displayed, but none of them works.

PROC Proclib data setsJES
SSI  Subsystem informationSystem
CFC  CF Connections   Sysplex
CFS  CF StructuresSysplex
VMAP Virtual storage map  Memory
SMSG SMS storage groups   Devices
SMSV SMS volumes  Devices
FS   File systems OMVS
CSR  Common storage remaining Memory
GT   Generic tracker  System
NA   Network activity Network
DEV  Device activity  Devices

"ISF452E SDSFAUX communications failed, return code 0x0008, reason code |
"0x00360806, function "query ". Not authorized for request"  |

.
.
J.O.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler
SHARE MVS Program Co-Manager
323-715-0595 Mobile
626-543-6132 Office ⇐=== NEW
robin...@sce.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Elardus Engelbrecht
Sent: Thursday, July 05, 2018 5:26 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: Function in SDSF to list Dynamic Exits

Rob Scott wrote:

>By default, commands that you do not have access to via ISFCMD or group 
>authority will not appear on the SDSF main menu.

Indeed! Please see (watch the wrrap!) this URL:

https://na01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.ibm.com%2Fsupport%2Fknowledgecenter%2Fen%2FSSLTBW_2.3.0%2Fcom.ibm.zos.v2r3.isfa500%2Frescmds.htmdata=02%7C01%7CRScott%40ROCKETSOFTWARE.COM%7C7bb1378c6e0a4d4b145908d5e2c6ed39%7C79544c1eed224879a082b67a9a672aae%7C0%7C0%7C636664266386648391sdata=5tc3rolN4Jk0YPBCObJut01H0kKDD9Gv7NV%2BkdrHJpc%3Dreserved=0

... for a list of profiles starting with ISFCMD in SDSF RACF Class.


Abilities to use or see unauthorised screens/commands are also managed by:
  ISFPARM (If you use SERVER.NOPARM in SDSF class)
  ISFPRMxx
  RACF Classes - TSOAUTH/FACILITY/SDSF/LOGSTRM/OPERCMDS/XFACILIT.

See this site for a lng list of resources to protect everthing in 
SDSF:

https://na01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.ibm.com%2Fsupport%2Fknowledgecenter%2Fen%2FSSLTBW_2.3.0%2Fcom.ibm.zos.v2r3.isfa500%2Faperes.htmdata=02%7C01%7CRScott%40ROCKETSOFTWARE.COM%7C7bb1378c6e0a4d4b145908d5e2c6ed39%7C79544c1eed224879a082b67a9a672aae%7C0%7C0%7C636664266386648391sdata=PIAyZ1x%2BqnJ2rWyjhgvS5aO%2FRXw6RVHuWcScQOgM9vY%3Dreserved=0


>You can issue the "SET MENU ALL" to show all commands and unauthorised 
>commands will have the "Status" of "Command not authorized".

Or go to pull-down menu. Select 'Display', then select '1. Panels' to see all 
and every panels in SDSF world.

Groete / Greetings
Elardus Engelbrecht


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


Rocket Software, Inc. and subsidiaries ■ 77 Fourth Avenue, Waltham MA 02451 ■ 
Main Office Toll Free Number: +1 855.577.4323
Contact Customer Support: 
https://my.rocketsoftware.com/RocketCommunity/RCEmailSupport
Unsubscribe from Marketing Messages/Manage Your Subscription Preferences - 
http://www.rocketsoftware.com/manage-your-email-preferences
Privacy Policy - http://www.rocketsoftware.com/company/legal/privacy-policy


This communication and any attachments may contain confidential information of 
Rocket Software, Inc. All unauthorized use, disclosure or distribution is 
prohibited. If you are not the intended recipient, please notify Rocket 
Software immediately and destroy all copies of this communication. Thank you.

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