Re: What happens if you IPL a LPAR defined as being in a parallel sysplex but the CF LPAR is not there

[Burrell, Todd]

I seem to remember that you can override the system parameters at IPL time and 
specify PLEXCFG=MONOPLEX.  This should bring you up in a single system plex.  
Or you can specify PLEXCFG=XCFLOCAL and not be in a plex at all. 

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Laurence Chiu
Sent: Thursday, November 16, 2023 1:54 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: What happens if you IPL a LPAR defined as being in a parallel 
sysplex but the CF LPAR is not there

It was gold for me and will help me settle a dispute with some local sysprogs 
who said there would be no problem. My question is, it says if you don't have a 
CF then change GRS=TRYJOIN or =NONE. Problem is, when the problem occurs, how 
do you get online to change it? I could not find an operator command to change 
it and since the system is able to IPL, you can't logon to change it.

On Thu, Nov 16, 2023 at 4:18 PM kekronbekron < 
02dee3fcae33-dmarc-requ...@listserv.ua.edu> wrote:

> Awesome, how do we even find such gems with TechDocs being what it is...
> Luckily for this one, I seem to have it bookmarked.
>
>
> On Thursday, November 16th, 2023 at 05:14, Attila Fogarasi < 
> fogar...@gmail.com> wrote:
>
>
> > Answered a decade ago including how to continue the IPL and get 
> > running (either single system or sysplex without CF)
> >
> https://www.ibm.com/support/pages/system/files/inline-files/Where_is_M
> y_Coupling_Facility.pdf
> > "The paper is being written to provide clear and concise 
> > instructions on how to address the sysplex support team’s most 
> > common callout. Where is
> My
> > Coupling Facility?"
> >
> > On Thu, Nov 16, 2023 at 10:42 AM Mark Jacobs < 
> > 0224d287a4b1-dmarc-requ...@listserv.ua.edu> wrote:
> >
> > > GRS will attempt to connect to ISGLOCK, fail and z/OS will go into 
> > > a X'0A3' wait state.
> > >
> > > Mark Jacobs
> > >
> > > Sent from ProtonMail, Swiss-based encrypted email.
> > >
> > > GPG Public Key -
> > >
> [URL Removed for your safety]
> > >
> > > On Wednesday, November 15th, 2023 at 5:49 PM, Laurence Chiu < 
> > > lch...@gmail.com> wrote:
> > >
> > > > Thinking about a LPAR defined as being in a parallel sysplex 
> > > > with GRS=STAR.
> > > >
> > > > What happens if you IPL that LPAR and the CF is not active? Will 
> > > > it start, issue a WTOR or just fail? We are wondering what would 
> > > > happen if our
> LPAR
> > > > was started at the DR site (off a replicated set of volumes) but 
> > > > the
> DR
> > > > CEC
> > > > did not have a CF defined. Thanks
> > > >
> > > >
> --
> > > > For IBM-MAIN subscribe / signoff / archive access instructions, 
> > > > send email to lists...@listserv.ua.edu with the message: INFO
> IBM-MAIN
> > >
> > > --
> > >  For IBM-MAIN subscribe / signoff / archive access 
> > > instructions, send email to lists...@listserv.ua.edu with the 
> > > message: INFO IBM-MAIN
> >
> >
> > 
> > -- For IBM-MAIN subscribe / signoff / archive access instructions, 
> > send email to lists...@listserv.ua.edu with the message: INFO 
> > IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

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

We comply with applicable Federal civil rights laws and do not discriminate.

Visit floridablue.com/ndnotice  to view our 
Non-Discrimination policy and find information on our free language assistance 
services.

 

Florida Blue is a trade name of Blue Cross and Blue Shield of Florida, Inc.  
Blue Cross and Blue Shield of Florida, Inc., and its subsidiary and affiliate 
companies are not responsible for errors or omissions in this e-mail message. 
Any personal comments made in this e-mail do not reflect the views of Blue 
Cross and Blue Shield of Florida, Inc.  The information contained in this 
document may be confidential and intended solely for the use of the individual 
or entity to whom it is addressed.  This document may contain material that is 
privileged or protected from disclosure under applicable law.  If you are not 
the intended recipient or the individual responsible for delivering to the 
intended recipient, please (1) be advised that any use, dissemination, 
forwarding, or copying of this document IS STRICTLY PROHIBITED; and (2) notify 
sender immediately by telephone and destroy the document. THANK YOU.


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

Re: Curved Flat Screen

[Burrell, Todd]

I've got 2 32 inch LG monitors and run them at 1920X1080 - and I have a third 
27 inch ASUS monitor setup vertically that I use for long emails and manuals, 
etc.., where it helps to have them in portrait.   I probably should have a 
higher resolution, but I've been looking at screens for 35 years and they old 
eyes ain't as good as they used to be. 

Thanks

Todd Burrell | Sr. IT Systems Engineer | Mainframe

todd.burr...@bcbsfl.com


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Seymour J Metz
Sent: Tuesday, July 25, 2023 1:01 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Curved Flat Screen

Ignoring cost, what is the largest usable monitor for work, and what is the 
best aspect ratio?

I'm currently using a 23" UHD (16:9), and am looking to get something larger.


From: IBM Mainframe Discussion List  on behalf of 
Marjory Montgomery <031be9a21d48-dmarc-requ...@listserv.ua.edu>
Sent: Tuesday, July 25, 2023 12:56 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Curved Flat Screen

I also have a Dell U4919dw but have been eyeing the new Samsung 55" Odyssey Ark 
...   Samsung also has a 49 Odyssey Ark.

--
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
We comply with applicable Federal civil rights laws and do not discriminate.

Visit floridablue.com/ndnotice  to view our 
Non-Discrimination policy and find information on our free language assistance 
services.

 

Florida Blue is a trade name of Blue Cross and Blue Shield of Florida, Inc.  
Blue Cross and Blue Shield of Florida, Inc., and its subsidiary and affiliate 
companies are not responsible for errors or omissions in this e-mail message. 
Any personal comments made in this e-mail do not reflect the views of Blue 
Cross and Blue Shield of Florida, Inc.  The information contained in this 
document may be confidential and intended solely for the use of the individual 
or entity to whom it is addressed.  This document may contain material that is 
privileged or protected from disclosure under applicable law.  If you are not 
the intended recipient or the individual responsible for delivering to the 
intended recipient, please (1) be advised that any use, dissemination, 
forwarding, or copying of this document IS STRICTLY PROHIBITED; and (2) notify 
sender immediately by telephone and destroy the document. THANK YOU.

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

Re: RSU Maintenance: Asking For a Friend

[Burrell, Todd]

Besides this making you do a LOT more work to get to a new maintenance level - 
there is no benefit that I know of at all?Seems like the Rube Goldberg 
method of Systems Programming? 

Thanks

Todd Burrell | Sr. IT Systems Engineer | Mainframe

todd.burr...@bcbsfl.com


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Rebecca Martin
Sent: Tuesday, July 25, 2023 3:49 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: RSU Maintenance: Asking For a Friend

The OP is referring to a shop that reinstalls z/OS as a way to get to a current 
RSU level.  In the years in between releases of z/OS, they reorder everything 
at a higher maintenance level and  then do a complete reinstall.

Has anyone ever heard of this method for putting on maintenance? Can you see 
any benefits of this approach? 

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
We comply with applicable Federal civil rights laws and do not discriminate.

Visit floridablue.com/ndnotice  to view our 
Non-Discrimination policy and find information on our free language assistance 
services.

 

Florida Blue is a trade name of Blue Cross and Blue Shield of Florida, Inc.  
Blue Cross and Blue Shield of Florida, Inc., and its subsidiary and affiliate 
companies are not responsible for errors or omissions in this e-mail message. 
Any personal comments made in this e-mail do not reflect the views of Blue 
Cross and Blue Shield of Florida, Inc.  The information contained in this 
document may be confidential and intended solely for the use of the individual 
or entity to whom it is addressed.  This document may contain material that is 
privileged or protected from disclosure under applicable law.  If you are not 
the intended recipient or the individual responsible for delivering to the 
intended recipient, please (1) be advised that any use, dissemination, 
forwarding, or copying of this document IS STRICTLY PROHIBITED; and (2) notify 
sender immediately by telephone and destroy the document. THANK YOU.


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

Re: Where does the IHASLMSG mapping macro live?

[Burrell, Todd]

These 2 links give a little more info:

https://www.ibm.com/docs/en/zos/2.4.0?topic=information-ihaslmsg-heading

https://www.ibm.com/docs/en/zos/2.4.0?topic=information-ihaslmsg-mapping

Thanks

Todd Burrell | Sr. IT Systems Engineer | Mainframe

todd.burr...@bcbsfl.com
M 404.723.2017
I work remotely.  Please provide a dial-in number for all meetings.



-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Seymour J Metz
Sent: Thursday, July 13, 2023 10:59 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Where does the IHASLMSG mapping macro live?

Did you search your target zone?


From: IBM Mainframe Discussion List  on behalf of 
Mike Shaw 
Sent: Thursday, July 13, 2023 10:55 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Where does the IHASLMSG mapping macro live?

Listers,

The doc for the SLIP command's MSGID= operand includes this text describing the 
register contents when a SLIP trap that uses MSGID= is invoked:

Register 2 - contains the address of the SLIP message data area, found in 
mapping macro IHASLMSG.

I can't find the IHASLMSG mapping macro anywhere on our z/OS V2R4 system. I 
have searched all SYS1 data sets.

Does anyone know where that macro lives?

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
We comply with applicable Federal civil rights laws and do not discriminate.

Visit floridablue.com/ndnotice  to view our 
Non-Discrimination policy and find information on our free language assistance 
services.

 

Florida Blue is a trade name of Blue Cross and Blue Shield of Florida, Inc.  
Blue Cross and Blue Shield of Florida, Inc., and its subsidiary and affiliate 
companies are not responsible for errors or omissions in this e-mail message. 
Any personal comments made in this e-mail do not reflect the views of Blue 
Cross and Blue Shield of Florida, Inc.  The information contained in this 
document may be confidential and intended solely for the use of the individual 
or entity to whom it is addressed.  This document may contain material that is 
privileged or protected from disclosure under applicable law.  If you are not 
the intended recipient or the individual responsible for delivering to the 
intended recipient, please (1) be advised that any use, dissemination, 
forwarding, or copying of this document IS STRICTLY PROHIBITED; and (2) notify 
sender immediately by telephone and destroy the document. THANK YOU.

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

Re: The new requirement for Certificates to communicate with IBM -- A Journey

[Burrell, Todd]

We've been having this same issue since early June, and we went through and 
made sure all of the new certs are in place.  And our download jobs work 
occasionally, and then fail with either write or read failed at other times. 

Has anyone gotten this working and what was the resolution?  It's been a pain 
trying to download maintenance since it is very hit or miss.  

Thanks 
Todd Burrell

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Kurt J. Quackenbush
Sent: Tuesday, June 13, 2023 4:44 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: The new requirement for Certificates to communicate with IBM -- A 
Journey

> GIM44336S ** AN UNUSUAL CONDITION OCCURRED. GIMJVREQ - 
> java.net.SocketException:
>  Write failed
> My gut reaction is the the SocketException is because the Socket is not being 
> correctly negotiated for encryption.

That does not smell like a certificate problem to me at all.  That sounds like 
a local firewall issue to me.  Is it possible your firewall is blocking the 
connection with the IBM server because of the new server certificate?  Are you 
seeing a stack trace or other information in the SYSPRINT from RECEIVE which 
might offer further hints?  If not, try adding 
javadebugoptions="-Dcom.ibm.smp.debug=severe" to your CLIENT XML for more info. 
 Barring any further revelations with the debug output, it might be time to get 
a packet trace and open a case with the Comm Server IBM Support team to debug 
further.

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

Chuck Norris never uses CHECK when he applies PTFs.

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
We comply with applicable Federal civil rights laws and do not discriminate.

Visit floridablue.com/ndnotice  to view our 
Non-Discrimination policy and find information on our free language assistance 
services.

 

Florida Blue is a trade name of Blue Cross and Blue Shield of Florida, Inc.  
Blue Cross and Blue Shield of Florida, Inc., and its subsidiary and affiliate 
companies are not responsible for errors or omissions in this e-mail message. 
Any personal comments made in this e-mail do not reflect the views of Blue 
Cross and Blue Shield of Florida, Inc.  The information contained in this 
document may be confidential and intended solely for the use of the individual 
or entity to whom it is addressed.  This document may contain material that is 
privileged or protected from disclosure under applicable law.  If you are not 
the intended recipient or the individual responsible for delivering to the 
intended recipient, please (1) be advised that any use, dissemination, 
forwarding, or copying of this document IS STRICTLY PROHIBITED; and (2) notify 
sender immediately by telephone and destroy the document. THANK YOU.


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

Re: Finding uncatalogued datasets

[Burrell, Todd]

One tool you can use to find uncatalogued datasets is DFDSS - and you can use 
TYPRUN=NORUN to just get the displays.  Try using something like this:

//GUK17X   EXEC  PGM=ADRDSSU, PARM='TYPRUN=NORUN' , 
//  REGION=4000K
//SYSUT2 DD DUMMY   
//SYSU01 DD DISP=SHR,UNIT=SYSDA,VOL=SER=SP8060  
//SYSIN DD *,DCB=BLKSIZE=80 
 DUMP INDD(SYSU01) -
 OUTDD(SYSUT2) -
 DATASET (EXCLUDE (SYS*.**) -   
BY ((CATLG EQ NO) (DSORG NE VSAM) ))   
/*  
//SYSOUT   DD SYSOUT=X  
//SYSPRINT  DD SYSOUT=X 
//SYSUDUMP  DD DUMMY   


This should try to dump all of the non-VSAM datasets on volume SP8060 that are 
not catalogued.  The output is dummied and the TYPRUN=NORUN causes the job to 
do nothing, but it should give you a list of uncataloged datasets on the 
volume.  

And with a simple REXX you could generate a ton of these steps from a list of 
volumes. 

Thanks

Todd Burrell | Sr. IT Systems Engineer | Mainframe


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Jack Zukt
Sent: Tuesday, July 26, 2022 6:02 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Finding uncatalogued datasets

Nope, that is not the original problem.
What happened was that when I was working through a list of datasets that have 
not been used for over a year, I found out that some of those files were not 
catalogued. As those are (were) SMS managed datasets, this should not happen.
The user catalogs are alright or we would be having a lot of problems. But , 
for some reason, some files were uncatalogued but not scratched from the VTOC. 
I suppose that can happen to some GDG entries when the base definition is 
"NOSCRATCH". But most of the files that I have found so far are not GDG entries.
So, I need a process to find uncatalogued datasets that will not take ages to 
run, that will not be way too much CPU heavy, and that does not rely on vendor 
software other than the IBM software that we already have. And ideally I would 
not want to use REXX programming or if I have to use it, that it will be very 
simple, easy to understand and to maintain if such a need would arise.
Regards
Jack

On Tue, 26 Jul 2022 at 10:11, Colin Paice  wrote:

> Do you need to worry about data sets cataloged in a user catalog, but 
> the user catalog is not connected to the master catalog - or is this 
> part of your original problem?
> Colin
>
> --
> 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
We comply with applicable Federal civil rights laws and do not discriminate.

You may access the Non-Discrimination and Accessibility Notice here 
.

Language Assistance Available: 

Español, Kreyol Ayisien, Tiếng Việt, Português, 中文, Français, Tagalog, русский, 
Italiano, Deutsche, 한국어, Polskie, Gujarati, ไทย, العربية, 日本語, فارسی 


Florida Blue is a trade name of Blue Cross and Blue Shield of Florida, Inc.  
Blue Cross and Blue Shield of Florida, Inc., and its subsidiary and affiliate 
companies are not responsible for errors or omissions in this e-mail message. 
Any personal comments made in this e-mail do not reflect the views of Blue 
Cross and Blue Shield of Florida, Inc.  The information contained in this 
document may be confidential and intended solely for the use of the individual 
or entity to whom it is addressed.  This document may contain material that is 
privileged or protected from disclosure under applicable law.  If you are not 
the intended recipient or the individual responsible for delivering to the 
intended recipient, please (1) be advised that any use, dissemination, 
forwarding, or copying of this document IS STRICTLY PROHIBITED; and (2) notify 
sender immediately by telephone and destroy the document. THANK YOU.


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

Re: sys1.parmlib compare

[Burrell, Todd]

You will probably have to generate member lists for both PDS's and then you can 
use REXX to generate the compare JCL member by member.  There may be a quicker 
way with something like PDSTOOLS, but this is how I would attempt it.  

Thanks

Todd Burrell | Sr. IT Systems Engineer | Mainframe

todd.burr...@bcbsfl.com
M 404.723.2017



-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Sri 
h Kolusu
Sent: Wednesday, July 6, 2022 10:12 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: sys1.parmlib compare

≫ I am trying to compare members of sys1.parmlib from two different Operating 
systems (using SuperCE), Any other simple ways to do this, Like mass compare of 
members?

Run SuperC in Batch

//SUPERC  EXEC PGM=ISRSUPC,PARM=(DELTAL,ALLMEMS,FILECMP,'','')
//NEWDD   DD DISP=SHR,DSN=Your.PDS1
//OLDDD   DD DISP=SHR,DSN=Your.PDS2
//OUTDD   DD SYSOUT=*
//SYSIN   DD DUMMY


Thanks,
Kolusu


--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
We comply with applicable Federal civil rights laws and do not discriminate.

You may access the Non-Discrimination and Accessibility Notice here 
.

Language Assistance Available: 

Español, Kreyol Ayisien, Tiếng Việt, Português, 中文, Français, Tagalog, русский, 
Italiano, Deutsche, 한국어, Polskie, Gujarati, ไทย, العربية, 日本語, فارسی 


Florida Blue is a trade name of Blue Cross and Blue Shield of Florida, Inc.  
Blue Cross and Blue Shield of Florida, Inc., and its subsidiary and affiliate 
companies are not responsible for errors or omissions in this e-mail message. 
Any personal comments made in this e-mail do not reflect the views of Blue 
Cross and Blue Shield of Florida, Inc.  The information contained in this 
document may be confidential and intended solely for the use of the individual 
or entity to whom it is addressed.  This document may contain material that is 
privileged or protected from disclosure under applicable law.  If you are not 
the intended recipient or the individual responsible for delivering to the 
intended recipient, please (1) be advised that any use, dissemination, 
forwarding, or copying of this document IS STRICTLY PROHIBITED; and (2) notify 
sender immediately by telephone and destroy the document. THANK YOU.


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

Re: List of PTFs

[Burrell, Todd]

I believe you can do an APPLY CHECK selecting RSU2112 as the SOURCEID.  That 
should make the list of FMID's easier to parse out. 

Thanks

Todd Burrell | Sr. IT Systems Engineer | Mainframe

todd.burr...@bcbsfl.com
M 404.723.2017



-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Carmen Vitullo
Sent: Tuesday, January 25, 2022 3:12 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: List of PTFs

replying Bob - testing email client

On 1/25/2022 5:49 AM, Richards, Robert B. (CTR) wrote:
> Not sure how completely accurate it is but you could try going into the SMP/E 
> dialog, invoke 3.3 (SOURCEID QUERY) and select RSU2112.  On my system with my 
> products, there are 124 PTFs that are listed. Select each of those and you'll 
> know that FMIDs were hit.
>
> There may also be a report for the above, but I'll leave it as a task for you 
> to investigate.
>
> Bob
>
> -Original Message-
> From: IBM Mainframe Discussion List  On 
> Behalf Of Immo
> Sent: Tuesday, January 25, 2022 6:33 AM To:IBM-MAIN@LISTSERV.UA.EDU
> Subject: List of PTFs
>
> Hello,
>
>   
>
> since I'm not too deep into system programming: we have now RSU2112 active on 
> our z/OS. Is there a way to get a list of PTFs that came along with the 
> upgrade from RSU2111 to RSU2112?
>
>   
>
> Thanks in advance.
>
>   
>
> Immo
>
>   
>
>   
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email tolists...@listserv.ua.edu  with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email tolists...@listserv.ua.edu  with the message: INFO IBM-MAIN
>
--
/I am not bound to win, but I am bound to be true. I am not bound to succeed, 
but I am bound to live by the light that I have. I must stand with anybody that 
stands right, and stand with him while he is right, and part with him when he 
goes wrong. *Abraham Lincoln*/

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
We comply with applicable Federal civil rights laws and do not discriminate.

You may access the Non-Discrimination and Accessibility Notice here 
.

Language Assistance Available: 

Español, Kreyol Ayisien, Tiếng Việt, Português, 中文, français, Tagalog, русский, 
italiano, Deutsche, 한국어, Polskie, Gujarati, ไทย, العربية, 日本語, فارسی 


Florida Blue is a trade name of Blue Cross and Blue Shield of Florida, Inc.  
Blue Cross and Blue Shield of Florida, Inc., and its subsidiary and affiliate 
companies are not responsible for errors or omissions in this e-mail message. 
Any personal comments made in this e-mail do not reflect the views of Blue 
Cross and Blue Shield of Florida, Inc.  The information contained in this 
document may be confidential and intended solely for the use of the individual 
or entity to whom it is addressed.  This document may contain material that is 
privileged or protected from disclosure under applicable law.  If you are not 
the intended recipient or the individual responsible for delivering to the 
intended recipient, please (1) be advised that any use, dissemination, 
forwarding, or copying of this document IS STRICTLY PROHIBITED; and (2) notify 
sender immediately by telephone and destroy the document. THANK YOU.


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

Re: MSG

[Burrell, Todd]

Try doing a SET SECTRACE in SDSF and then re-attempt the failing command.  You 
should get a good amount of info in the SYSLOG to help resolve.  

We ran into some similar issues when going to 2.4. 

We also set this in SDSF to resolve when some things are not defined:

CONNECT DEFAULT(COND),/* Default server if not already assigned*/ 
  AUXSAF(NOFAILRC4),  

Thanks

Todd Burrell | Sr. IT Systems Engineer | Mainframe

todd.burr...@bcbsfl.com
M 404.723.2017



-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Steve Beaver
Sent: Friday, March 19, 2021 11:27 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: MSG

Has anyone seen this message before know how to fix the prblem

ISF458E Not authorized to connect to the SDSF server. Verify read access to the 
ISF.CONNECT.system resource in the SDSF class. 



 


--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
We comply with applicable Federal civil rights laws and do not discriminate.

You may access the Non-Discrimination and Accessibility Notice here 
.

Language Assistance Available:

Español, Kreyol Ayisien, Tiếng Việt, Português, 中文, français, Tagalog, русский, 
italiano, Deutsche, 한국어, Polskie, Gujarati, ไทย, العربية, 日本語, فارسی 


Florida Blue is a trade name of Blue Cross and Blue Shield of Florida, Inc.  
Blue Cross and Blue Shield of Florida, Inc., and its subsidiary and affiliate 
companies are not responsible for errors or omissions in this e-mail message. 
Any personal comments made in this e-mail do not reflect the views of Blue 
Cross and Blue Shield of Florida, Inc.  The information contained in this 
document may be confidential and intended solely for the use of the individual 
or entity to whom it is addressed.  This document may contain material that is 
privileged or protected from disclosure under applicable law.  If you are not 
the intended recipient or the individual responsible for delivering to the 
intended recipient, please (1) be advised that any use, dissemination, 
forwarding, or copying of this document IS STRICTLY PROHIBITED; and (2) notify 
sender immediately by telephone and destroy the document. THANK YOU.


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

NDM 5.2 on z/OS 2.4

[Burrell, Todd]

And sorry for the typos in the original message - I am talking about NDM (not 
NSM).   I've corrected this below.  

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Todd Burrell
Sent: Thursday, July 30, 2020 11:45 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: NSM 5.2 on z/OS 2.4

We've been trying to get a good answer as to whether or not NDM 5.2 (and 6.0) 
are compatible with z/OS 2.4.  Is anyone running NDM 5.2 on z/OS 2.4?  We're 
working on getting 6.0 installed, but we'd like to know if anyone has seen any 
issues with 5.2 on z/OS 2.4? 

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
We comply with applicable Federal civil rights laws and do not discriminate.

You may access the Non-Discrimination and Accessibility Notice here 
.

Language Assistance Available:

Español, Kreyol Ayisien, Tiếng Việt, Português, 中文, français, Tagalog, русский, 
italiano, Deutsche, 한국어, Polskie, Gujarati, ไทย, العربية, 日本語, فارسی 


Florida Blue is a trade name of Blue Cross and Blue Shield of Florida, Inc.  
Blue Cross and Blue Shield of Florida, Inc., and its subsidiary and affiliate 
companies are not responsible for errors or omissions in this e-mail message. 
Any personal comments made in this e-mail do not reflect the views of Blue 
Cross and Blue Shield of Florida, Inc.  The information contained in this 
document may be confidential and intended solely for the use of the individual 
or entity to whom it is addressed.  This document may contain material that is 
privileged or protected from disclosure under applicable law.  If you are not 
the intended recipient or the individual responsible for delivering to the 
intended recipient, please (1) be advised that any use, dissemination, 
forwarding, or copying of this document IS STRICTLY PROHIBITED; and (2) notify 
sender immediately by telephone and destroy the document. THANK YOU.


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

Re: renames

[Burrell, Todd]

You should be able to generate the SYSIN cards to do the renames in a simple 
REXX program and then use IDCAMS to do the renames using ALTER.  




-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Nai, Dean
Sent: Monday, February 04, 2019 11:23 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: renames

Hi,

   I have almost 1000 datasets I need to rename from say xxx.xxx.xxx to 
yyy.xxx.xxx.xxx where yyy would always be the same qualifier. Any thoughts on 
be best utility to accomplish this?


Dean Nai




>

--
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: BPXPRM00 parmlib

[Burrell, Todd]

For most everything you should be able to update it and then do T OMVS=00.   I 
believe there are a couple of limitations.  


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of McCabe, Ron
Sent: Thursday, January 31, 2019 1:43 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: BPXPRM00 parmlib

Hello,

If I need to make a change to my BPXPRM00 parmlib member can I get the change 
in while everything is running or does it have to done via an IPL?

Thanks,
Ron McCabe
Manager of Mainframe/Midrange Systems
Mutual of Enumclaw


Confidentiality Notice: This e- mail and all attachments may contain 
CONFIDENTIAL information and are meant solely for the intended recipient. It 
may contain controlled, privileged, or proprietary information that is 
protected under applicable law and shall not be disclosed to any unauthorized 
third party. If you are not the intended recipient, you are hereby notified 
that any unauthorized review, action, disclosure, distribution, or reproduction 
of any information contained in this e- mail and any attachments is strictly 
PROHIBITED. If you received this e- mail in error, please reply to the sender 
immediately stating that this transmission was misdirected, and delete or 
destroy all electronic and paper copies of this e-mail and attachments without 
disclosing the contents. This e- mail does not grant or assign rights of 
ownership in the proprietary subject matter herein, nor shall it be construed 
as a joint venture, partnership, teaming agreement, or any other formal 
business relationship.

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

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

Re: how to get the address and size(cylinders) for each volume [EXTERNAL]

[Burrell, Todd]

You should be able to use DCOLLECT and parse out the output in a simple REXX 
exec.  


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Nims,Alva John (Al)
Sent: Wednesday, December 05, 2018 1:04 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: how to get the address and size(cylinders) for each volume 
[EXTERNAL]

My $0.02: CBTTAPE file 296, DVOL

Al Nims
Systems Admin/Programmer III
UF Information Technology
720 Bld. 3rd Floor, #9
P.O. Box 112050
Gainesville, FL. 32611
(e) ajn...@ufl.edu
(p) (352) 273-1298

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Feller, Paul
Sent: Wednesday, December 05, 2018 11:36 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: how to get the address and size(cylinders) for each volume 
[EXTERNAL]

The answer depends on what software you have installed and how you plan on 
using the information.

To name just a few:
IBM File Manager
IBM DCOLLECT - you would have to create some code to read the DCOLLECT output 
Chicago-Soft MVS/QuickRef Compuware File-Aid


Depending on how much DASD you have there is the z/OS command DS QDASD command.


Thanks..

Paul Feller
AGT Mainframe Technical Support

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jason Cai
Sent: Wednesday, December 05, 2018 2:59 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: how to get the address and size(cylinders) for each volume [EXTERNAL]


Hi all

  Is there a utility to get the address  and  size(cylinders) for each volume?

Thanks a lot!



Best Regards,
Jason Cai



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

--
Please note:  This message originated outside your organization. Please use 
caution when opening links or attachments.

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




This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.

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

Re: Copying OMVS IPC file

[Burrell, Todd]

PAX may be a better option.  


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jake Anderson
Sent: Thursday, September 27, 2018 5:40 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Copying OMVS IPC file

Hi

Cross posted

Good morning

Could someone please help to understand.

What's the syntax to copy a IPC file to another directory ? I don't see it in a 
manual. The normal CP or MV doesn't work

All I get is FSUM6258



Regards
Jake

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: how to catalog page dataset to new MCAT

[Burrell, Todd]

If you have both catalogs available to you, this is another option:

//MERGC1   EXEC  PGM=IDCAMS,REGION=8M   
//SYSPRINT DD  SYSOUT=* 
//SYSINDD  *
   REPRO INDATASET(source.catalog.name  )  -  
 OUTDATASET(destination.catalog.name   )  - 
 LEVEL(SYS1.PLPA.PAGE)- 
 MERGECAT   

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Beesley, Paul
Sent: Friday, September 14, 2018 7:18 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: how to catalog page dataset to new MCAT

From memory, something like this:

//RECATEXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSINDD *
  DEF PAGESPACE  ( NAME(SYS1.PLPA.PAGE) -
  RECATALOG VOL(volser)  -
) CAT(new-master-catalog)

Paul

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
johnnydeep san
Sent: Friday, September 14, 2018 12:05 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: how to catalog page dataset to new MCAT

Hi All,

I have created new master- catalog and load my system from it .While IPL'g sys 
throw below

 IEA920I PAGE DATA SET  SYS1.PLPA.PAGE
 NOT LOCATED
 IEA922D REPLY 'DSN=DSNAME' OR 'IGNORE'

I have no clue how to catalog this page dataset(vsam)  with my new master 
catalog . can some please guide me .

Regards,
San

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN Atos, Atos Consulting, 
Worldline and Canopy The Open Cloud Company are trading names used by the Atos 
group. The following trading entities are registered in England and Wales: Atos 
IT Services UK Limited (registered number 01245534), Atos Consulting Limited 
(registered number 04312380), Atos Worldline UK Limited (registered number 
08514184) and Canopy The Open Cloud Company Limited (registration number 
08011902). The registered office for each is at Second Floor, Mid City Place, 
71 High Holborn, London, WC1V 6EA.  The VAT No. for each is: GB232327983.

This e-mail and the documents attached are confidential and intended solely for 
the addressee, and may contain confidential or privileged information. If you 
receive this e-mail in error, you are not authorised to copy, disclose, use or 
retain it. Please notify the sender immediately and delete this email from your 
systems. As emails may be intercepted, amended or lost, they are not secure. 
Atos therefore can accept no liability for any errors or their content. 
Although Atos endeavours to maintain a virus-free network, we do not warrant 
that this transmission is virus-free and can accept no liability for any 
damages resulting from any virus transmitted. The risks are deemed to be 
accepted by everyone who communicates with Atos by email.

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: Yet Another Mainframe z10 Bites the Dust!

[Burrell, Todd]

Not sure if turning on ERASE on SCRATCH in RACF - and then deleting the 
datasets would work?  Just a thought? 


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of George Rodriguez
Sent: Thursday, September 13, 2018 11:16 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Yet Another Mainframe z10 Bites the Dust!

The School District of Palm Beach County is finally shutting down the IBM
z10 and all its components.

I was wondering if any member the listserve can help me with "wiping out"
out VTL. Any help will be greatly appreciated.

Thanks!

*George Rodriguez*

*Specialist II - IT Security*
*PX - 47652*
*(561) 357-7652 (office)*
*(954) 415-7586 (mobile)*
*School District of Palm Beach County*
*3348 Forest Hill Blvd.*
*Room B-332*
*West Palm Beach, FL. 33406-5869*
*Florida's Only A-Rated Urban District*

-- 






*Disclaimer: *Under Florida law, e-mail addresses are public records. 
If you do not want your e-mail address released in response to a public records 
request, do not send electronic mail to this entity. Instead, contact this 
office by phone or in writing.








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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: Strange JES2 SPOOL Offload issue

[Burrell, Todd]

Well Dana wins the prize - this was something I definitely did not know, but 
once I remove the criteria the offloads both started.   

This is why I love this forum!  Thanks for the help.  


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Dana Mitchell
Sent: Thursday, September 13, 2018 10:28 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Strange JES2 SPOOL Offload issue

Specifying a minus sign (-) before a criterion causes that criterion to be 
removed from the list.

$TOFF1.ST,WS=(/)   
$HASP886 OFF1.ST 969   
$HASP886 OFF1.ST  STATUS=STARTABLE,CREATOR=,DISP=DELETE,   
$HASP886  OUTDISP=(WRITE,KEEP),HOLD=,JOBNAME=,NOTIFY=NO,   
$HASP886  RANGE=(J1,99),ROUTECDE=(),START=YES, 
$HASP886  VOLUME=(,,,),WS=(Q,OUTD/),BURST=,FCB=,FLASH=,
$HASP886  FORMS=(,,,),LIMIT=(0,*),PLIM=(0,*),  
$HASP886  PRMODE=(),QUEUE=,UCS=,WRITER=
$TOFF1.ST,WS=(-Q/) 
$HASP886 OFF1.ST 971   
$HASP886 OFF1.ST  STATUS=STARTABLE,CREATOR=,DISP=DELETE,   
$HASP886  OUTDISP=(WRITE,KEEP),HOLD=,JOBNAME=,NOTIFY=NO,   
$HASP886  RANGE=(J1,99),ROUTECDE=(),START=YES, 
$HASP886  VOLUME=(,,,),WS=(OUTD/),BURST=,FCB=,FLASH=,  
$HASP886  FORMS=(,,,),LIMIT=(0,*),PLIM=(0,*),  
$HASP886  PRMODE=(),QUEUE=,UCS=,WRITER=
$TOFF1.ST,WS=(-OUTD)   
$HASP886 OFF1.ST 973   
$HASP886 OFF1.ST  STATUS=STARTABLE,CREATOR=,DISP=DELETE,   
$HASP886  OUTDISP=(WRITE,KEEP),HOLD=,JOBNAME=,NOTIFY=NO,   
$HASP886  RANGE=(J1,99),ROUTECDE=(),START=YES, 
$HASP886  VOLUME=(,,,),WS=(/),BURST=,FCB=,FLASH=,FORMS=(,  
$HASP886  ,,),LIMIT=(0,*),PLIM=(0,*),PRMODE=(),
$HASP886  QUEUE=,UCS=,WRITER=

HTH
Dana


On Thu, 13 Sep 2018 09:05:40 -0500, Todd Burrell  wrote:

>I'm playing around with JES2 SPOOL OFFLOAD on our test system and I want to be 
>able to try and offload everything from the spool to test out timing.  I have 
>changed both of my transmitters to have DISP=KEEP to make the offload 
>no-destructive.  
>
>However, once I start the offload it does not select anything, and when I try 
>and do $TOFF2.ST,WS=(/), JES2 just ignores this and keeps the same selection 
>criteria I had before I did the command?   I have everything else pretty much 
>blanked out for selection criteria, but for some reason JES2 ignores my $TOFF 
>command to change the WS settings?  
>

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: Strange JES2 SPOOL Offload issue

[Burrell, Todd]

I did a $SOFFLOAD2,TYPE=TRANSMIT and it started fine.  Both OFF2.JT and OFF2.ST 
show INACTIVE?  


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Carmen Vitullo
Sent: Thursday, September 13, 2018 10:19 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Strange JES2 SPOOL Offload issue

offload2 not started? 
my display shows 

OFFLOAD1 DRAINED 


OFF1.JT STARTABLE 


OFF1.ST STARTABLE 


OFF1.JR STARTABLE 


OFF1.SR STARTABLE 


OFFLOAD1 DRAINED 


OFF1.JT STARTABLE 


OFF1.ST STARTABLE 


OFF1.JR STARTABLE 


OFF1.SR STARTABLE 



z/OS 2.2 at RSU10805 




Carmen Vitullo 

- Original Message -

From: "Todd Burrell" 
To: IBM-MAIN@LISTSERV.UA.EDU
Sent: Thursday, September 13, 2018 9:05:40 AM
Subject: Strange JES2 SPOOL Offload issue 

I'm playing around with JES2 SPOOL OFFLOAD on our test system and I want to be 
able to try and offload everything from the spool to test out timing. I have 
changed both of my transmitters to have DISP=KEEP to make the offload 
no-destructive. 

However, once I start the offload it does not select anything, and when I try 
and do $TOFF2.ST,WS=(/), JES2 just ignores this and keeps the same selection 
criteria I had before I did the command? I have everything else pretty much 
blanked out for selection criteria, but for some reason JES2 ignores my $TOFF 
command to change the WS settings? 

Has anyone else every seen this just get ignored? I don't see any automation 
grabbing this, nor do I see any RACF error messages. The command just simply is 
being ignored by JES2? 

We are on z/OS 2.2 around RSU1802. 

Here's the $DOFF2.ST command output: 

OFF2.ST STATUS=INACTIVE,CREATOR=,DISP=KEEP,
OUTDISP=(WRITE,HOLD,KEEP),HOLD=,
JOBNAME=,NOTIFY=NO,RANGE=(J1,99),
ROUTECDE=(),START=YES,VOLUME=(,,,),
WS=(OUTD,Q/),BURST=,FCB=,FLASH=,
FORMS=(,,,),LIMIT=(0,*),PLIM=(0,
*),PRMODE=(),QUEUE=,UCS=,WRITER= 

Here's the attempt at the $TOFF2.ST,WS=(/) command: 

$TOFF2.ST,WS=(/)
$HASP886 OFF2.ST 694
$HASP886 OFF2.ST STATUS=INACTIVE,CREATOR=,DISP=KEEP,
$HASP886 OUTDISP=(WRITE,HOLD,KEEP),HOLD=,
$HASP886 JOBNAME=,NOTIFY=NO,RANGE=(J1,99),
$HASP886 ROUTECDE=(),START=YES,VOLUME=(,,,),
$HASP886 WS=(OUTD,Q/),BURST=,FCB=,FLASH=,
$HASP886 FORMS=(,,,),LIMIT=(0,*),PLIM=(0,
$HASP886 *),PRMODE=(),QUEUE=,UCS=,WRITER= 

Anyone have any ideas? This one is puzzling to me? 
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 



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: how to calculate previous day using REXX

[Burrell, Todd]

This code should work for you in any circumstance:

DATEB=DATE('B') 
DATEB=DATEB-1   
DATEX=DATE('N',DATEB,'B')   
SAY DATEX   



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of ITschak Mugzach
Sent: Thursday, August 02, 2018 4:44 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: how to calculate previous day using REXX

Try this logic:

   - Get the Julian date of today (YYXXX)
   - Deduct 1 from Julian date (xxx)
   - Last 3 digits zero? (xxx)
   - Deduct one from first two chars (year) (YY)
   - Decide the Julian date (365 or 366 based on year/4) (xxx)

ITschak


On Thu, Aug 2, 2018 at 10:38 AM saurabh khandelwal < 
sourabhkhandelwal...@gmail.com> wrote:

> Hello Group,
>
> In REXX , we have Date function to calculate today's date but do we 
> have any separate function to calculate yesterday's date.
>
> currently, we used
>
> TODAY= DATE('S')
> YESTERDAY  = TODAY - 1
>
> this code work whole month but, starting of the month where we have 
> date
>
> ex :
>
> TODAY - '20180801'
>
> then yesterday will be calculated like
>
> TODAY -1 , So yesterday value will be
> YESTERDAY = '20180800'  , which is wrong.
>
> Can you please help to overcome this issue.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


--
ITschak Mugzach
*|** IronSphere Platform* *|* *Information Security Contiguous Monitoring for 
Legacy **|  *

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: SPOOL Volumes

[Burrell, Todd]

You could change the UCB in your IODF to come up OFFLINE during an IPL.  It 
would be available to be varied online if needed, but this way it would default 
to being offline when you come up.  

The second option is to rename the dataset on the volume to something else, and 
then you could quickly rename it back if you found that you needed to add the 
volume.  Something like SYS1.HASPACET should work? 


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Steely.Mark
Sent: Thursday, July 12, 2018 1:30 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: SPOOL Volumes

We are z/OS v2.2.  During a DR exercise most times a cold start is performed 
for JES2. I noticed that a volume (that is currently online but not currently  
used by JES2 in production)  was discovered and put into use by the JES2 cold 
start.

This was not a problem at DR but is there a way to specify not to allocate this 
volume during the cold start.  I know I could vary the volume offline , or 
rename the dataset on the volume or rename the volume.

Any other ways to do this.

Thank You

Mark Steely
AAA - Auto Club Enterprises.
Mainframe Support
Phone: 469-221-7350Email: 
steely.m...@aaa-texas.com


*** Disclaimer ***
This communication (including all attachments) is solely for the use of the 
person to whom it is addressed and is a confidential AAA communication. If you 
are not the intended recipient, any use, distribution, printing, or copying is 
prohibited. If you received this email in error, please immediately delete it 
and notify the sender.

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




This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.

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

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

[Burrell, Todd]

Have you tried DELETE dsn NSCR or just putting a U beside the entry in an ISPF 
3.4 listing? 



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 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

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 



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: AW: ICEGENER to the rescue again?

[Burrell, Todd]

I think IEBUPDTE should be able to do this, but you will need to know the 
member names.  You could generate the "./   ADD NAME=" cards for each member 
and then run this back through IEBUPDTE to add the members.  


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Peter Hunkeler
Sent: Monday, June 25, 2018 7:16 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: AW: ICEGENER to the rescue again?

 
> I'm fairly certain that ICEGENER would be able to do this, but have 
> not yet
found an example that comes anywhere close, that I can then adapt to my 
requirements. 
 

It's IEBGENER not ICEGENER which you probably mean. The latter does 1:1 copies 
of sequential data sets only.



--
ßph

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





This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.

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

Re: RACF protection of a volume

[Burrell, Todd]

As I said this was probably a stupid question.  I suspect that from what I have 
seen MIM may be a solution, but we will look more. 

Thanks for the info, Walt. 




This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.

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

Re: Any issues with $ACTIVATE,LEVEL=Z22 command

[Burrell, Todd]

No ROSCOE here - although I do miss it.  I loved the editor and using RPF's.  


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jousma, David
Sent: Thursday, February 22, 2018 9:21 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Any issues with $ACTIVATE,LEVEL=Z22 command

Do you run CA-Roscoe at your location?   We had problems with it(since it reads 
spool directly) and they had to come up with some maint before we could 
complete the switch.

_
Dave Jousma
Manager Mainframe Engineering, Assistant Vice President david.jou...@53.com
1830 East Paris, Grand Rapids, MI  49546 MD RSCB2H p 616.653.8429 f 616.653.2717


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Burrell, Todd
Sent: Thursday, February 22, 2018 8:25 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Any issues with $ACTIVATE,LEVEL=Z22 command

**CAUTION EXTERNAL EMAIL**

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

So my summary of everyone's responses is that we need to do the $TSPOOLDEF 
command and then give it a couple/few minutes, and then do the $ACTIVATE 
command.  

And there were a couple of bad pickle jokes as well :-).  

Thanks 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Rugen, Len
Sent: Wednesday, February 21, 2018 5:11 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Any issues with $ACTIVATE,LEVEL=Z22 command

A cold start is a big dill...

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jesse 1 Robinson
Sent: Wednesday, February 21, 2018 3:17 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Any issues with $ACTIVATE,LEVEL=Z22 command

I've never been in a pickle, but I've had to do a cold start. Much colder than 
a pickle (or so I imagine). 

.
.
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 Carmen Vitullo
Sent: Wednesday, February 21, 2018 12:31 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: Any issues with $ACTIVATE,LEVEL=Z22 command

just some food for thought, once you're z22 mode there's no EASY way back 
that's the biggest reason I've delayed this on my prod plex, I'm comfortable 
now but for any reason I had to revert back to z/OS 2.1, I'd be in a pickle :) 



Carmen Vitullo 

- Original Message -

From: "Todd Burrell" <todd_burr...@csx.com> 
To: IBM-MAIN@LISTSERV.UA.EDU 
Sent: Wednesday, February 21, 2018 12:41:43 PM 
Subject: Re: Any issues with $ACTIVATE,LEVEL=Z22 command 

Yeah - we're planning on doing both at the same time ($TSPOOLDEF and 
$ACTIVATE). 


-Original Message- 
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Carmen Vitullo 
Sent: Wednesday, February 21, 2018 1:39 PM 
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Any issues with $ACTIVATE,LEVEL=Z22 command 

forgot to mention CYL_MANAGED support can be changed dynamically 


$T SPOOLDEF,CYL_MANAGED=ALLOWED 



Carmen Vitullo 

- Original Message - 

From: "Carmen Vitullo" <cvitu...@hughes.net> 
To: IBM-MAIN@LISTSERV.UA.EDU 
Sent: Wednesday, February 21, 2018 12:34:58 PM 
Subject: Re: Any issues with $ACTIVATE,LEVEL=Z22 command 

no problems on my test system after expanding my checkpoint but my production 
systems MAS I get 

$HASP895 z22 ACTIVATION WILL FAIL IF ISSUED FROM THIS MEMBER. 
$HASP895 THE FOLLOWING ISSUES PREVENT ACTIVATION: 
$HASP895 -- CYL_MANAGED SUPPORT MUST BE ACTIVATED. 
I'm in no rush right now to get to z22 mode 

Carmen Vitullo 

- Original Message - 

From: "Todd Burrell" <todd_burr...@csx.com> 
To: IBM-MAIN@LISTSERV.UA.EDU 
Sent: Wednesday, February 21, 2018 12:27:11 PM 
Subject: Any issues with $ACTIVATE,LEVEL=Z22 command 

We've done the $ACTIVATE,LEVEL=Z22 command on our test system and seen no 
issues, but I wanted to run it by this group to see if there have been any 
issues that anyone has seen when doing this? I've checked our CHECKPOINT's and 
they have plenty of room. We will also be doing the 
$TSPOOLDEF,CYL_MANAGED=ALLOWED command at the same time. 
Thanks 
Todd Burrell 

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



This email transmission 

Re: Any issues with $ACTIVATE,LEVEL=Z22 command

[Burrell, Todd]

So my summary of everyone's responses is that we need to do the $TSPOOLDEF 
command and then give it a couple/few minutes, and then do the $ACTIVATE 
command.  

And there were a couple of bad pickle jokes as well :-).  

Thanks 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Rugen, Len
Sent: Wednesday, February 21, 2018 5:11 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Any issues with $ACTIVATE,LEVEL=Z22 command

A cold start is a big dill...

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jesse 1 Robinson
Sent: Wednesday, February 21, 2018 3:17 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Any issues with $ACTIVATE,LEVEL=Z22 command

I've never been in a pickle, but I've had to do a cold start. Much colder than 
a pickle (or so I imagine). 

.
.
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 Carmen Vitullo
Sent: Wednesday, February 21, 2018 12:31 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: Any issues with $ACTIVATE,LEVEL=Z22 command

just some food for thought, once you're z22 mode there's no EASY way back 
that's the biggest reason I've delayed this on my prod plex, I'm comfortable 
now but for any reason I had to revert back to z/OS 2.1, I'd be in a pickle :) 



Carmen Vitullo 

- Original Message -

From: "Todd Burrell"  
To: IBM-MAIN@LISTSERV.UA.EDU 
Sent: Wednesday, February 21, 2018 12:41:43 PM 
Subject: Re: Any issues with $ACTIVATE,LEVEL=Z22 command 

Yeah - we're planning on doing both at the same time ($TSPOOLDEF and 
$ACTIVATE). 


-Original Message- 
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Carmen Vitullo 
Sent: Wednesday, February 21, 2018 1:39 PM 
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Any issues with $ACTIVATE,LEVEL=Z22 command 

forgot to mention CYL_MANAGED support can be changed dynamically 


$T SPOOLDEF,CYL_MANAGED=ALLOWED 



Carmen Vitullo 

- Original Message - 

From: "Carmen Vitullo"  
To: IBM-MAIN@LISTSERV.UA.EDU 
Sent: Wednesday, February 21, 2018 12:34:58 PM 
Subject: Re: Any issues with $ACTIVATE,LEVEL=Z22 command 

no problems on my test system after expanding my checkpoint but my production 
systems MAS I get 

$HASP895 z22 ACTIVATION WILL FAIL IF ISSUED FROM THIS MEMBER. 
$HASP895 THE FOLLOWING ISSUES PREVENT ACTIVATION: 
$HASP895 -- CYL_MANAGED SUPPORT MUST BE ACTIVATED. 
I'm in no rush right now to get to z22 mode 

Carmen Vitullo 

- Original Message - 

From: "Todd Burrell"  
To: IBM-MAIN@LISTSERV.UA.EDU 
Sent: Wednesday, February 21, 2018 12:27:11 PM 
Subject: Any issues with $ACTIVATE,LEVEL=Z22 command 

We've done the $ACTIVATE,LEVEL=Z22 command on our test system and seen no 
issues, but I wanted to run it by this group to see if there have been any 
issues that anyone has seen when doing this? I've checked our CHECKPOINT's and 
they have plenty of room. We will also be doing the 
$TSPOOLDEF,CYL_MANAGED=ALLOWED command at the same time. 
Thanks 
Todd Burrell 

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: Any issues with $ACTIVATE,LEVEL=Z22 command

[Burrell, Todd]

Yeah - we're planning on doing both at the same time ($TSPOOLDEF and 
$ACTIVATE).  


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Carmen Vitullo
Sent: Wednesday, February 21, 2018 1:39 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Any issues with $ACTIVATE,LEVEL=Z22 command

forgot to mention CYL_MANAGED support can be changed dynamically 


$T SPOOLDEF,CYL_MANAGED=ALLOWED 



Carmen Vitullo 

- Original Message -

From: "Carmen Vitullo" 
To: IBM-MAIN@LISTSERV.UA.EDU
Sent: Wednesday, February 21, 2018 12:34:58 PM
Subject: Re: Any issues with $ACTIVATE,LEVEL=Z22 command 

no problems on my test system after expanding my checkpoint but my production 
systems MAS I get 

$HASP895 z22 ACTIVATION WILL FAIL IF ISSUED FROM THIS MEMBER. 
$HASP895 THE FOLLOWING ISSUES PREVENT ACTIVATION: 
$HASP895 -- CYL_MANAGED SUPPORT MUST BE ACTIVATED. 
I'm in no rush right now to get to z22 mode 







Carmen Vitullo 

- Original Message - 

From: "Todd Burrell" 
To: IBM-MAIN@LISTSERV.UA.EDU
Sent: Wednesday, February 21, 2018 12:27:11 PM
Subject: Any issues with $ACTIVATE,LEVEL=Z22 command 

We've done the $ACTIVATE,LEVEL=Z22 command on our test system and seen no 
issues, but I wanted to run it by this group to see if there have been any 
issues that anyone has seen when doing this? I've checked our CHECKPOINT's and 
they have plenty of room. We will also be doing the 
$TSPOOLDEF,CYL_MANAGED=ALLOWED command at the same time. 
Thanks
Todd Burrell 

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: Delete dataset catch-22

[Burrell, Todd]

What do you get if you try this in IDCAMS:

  DEFINE NONVSAM(NAME(MARPACE.GODADDY.CERT) -
 DEVT(3390) VOLUME(STDL09)) 


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Mark Pace
Sent: Thursday, February 08, 2018 2:38 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Delete dataset catch-22

I'm trying to delete a dataset that is not cataloged any longer.  I'm not sure 
why it is not in a catalog, but it is not.  I've tried to re-catalog the 
dataset, but it doesn't catalog.

So I have tried to every combination of IDCAMS DELETE I can think of.
NONVSAM
NVR
etc..

All return
** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEG-42  - Dataset not 
found.

So I tried IEHPROGM
  SCRATCH DSNAME=MARPACE.GODADDY.CERT,VOL=3390=STDL09,PURGE

IEC614I SCRATCH FAILED - RC 008, DIAGNOSTIC INFORMATION IS (0406001E), 
STEP010,STDL09,MARPACE.GODADDY.CERT

0406001E -  Verification of SMS flags failed; caller indicates the data set is 
not cataloged, but the *FMT1 DSCB indicates the data set is cataloged*

So I have no idea how to remove this dataset, IDCAMS won't do it because it's 
not in a catalog, and IEHPROGM won't do it because it thinks it is in a catalog.

Anyone have a suggestion?

Thank you.



--
The postings on this site are my own and don’t necessarily represent Mainline’s 
positions or opinions

Mark D Pace
Senior Systems Engineer
Mainline Information Systems

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: Setting up a new parallel sysplex

[Burrell, Todd]

I believe there is a manual that comes with z/OS called Setting up a Sysplex?  
This is probably a good place to start - and I am sure there are numerous Share 
presentations on this as well. 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Fred Glenlake
Sent: Monday, February 05, 2018 12:25 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Setting up a new parallel sysplex

I am looking for documentation on how to set up a full parallel sysplex from a 
"sham-plex".   We are running all the usual cast of characters, IMS, DB2, CICS, 
MQ, etc.   We have a basic sysplex in place to be able to qualify for IBM 
sysplex pricing.   The management team has decided we should have a full 
parallel sysplex to be able to do z/OS maintenance, etc. without taking an 
outage to the client applications.  They would also like to reduce the amount 
of time it takes us to bring up our DR systems.   It might mean we are going to 
have a physically separate processor in another location/city, that has not yet 
been decided yet.

It has been a while since I have worked with setting up a sysplex so I was 
hoping someone could direct me to where I might find documentation on setting 
up a full parallel sysplex with CICSPLEX, IMSPLEX, DB2PLEX, JESPLEX, etc.   I 
have the IBM redbook on Sysplex Considerations (all 500+) pages of it and I am 
starting to go through it.   What I don't see and have not found yet is 
something that would help me determine what do to first, what can I do ahead of 
time to prepare or position for the new full parallel sysplex.  Perhaps if 
there is a document or manual or informational APAR that indicates how to get 
from basic sysplex to full parallel sysplex.

Many thanks in advance for any pearls of wisdom.

Fred G.

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: When was the *basic* sysplex introduced? MVS/ESA 4.1?

[Burrell, Todd]

I believe it was 4.1.  Here's an interesting article:

http://2000clicks.com/links/Computers/IBMMainframeHistory/mvshist5.htm


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Peter Hunkeler
Sent: Wednesday, October 04, 2017 9:26 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: When was the *basic* sysplex introduced? MVS/ESA 4.1?

I do remember that MVS/ESA V5 (V5.1) introduced the *parallel* sysplex. But I 
don't remember exactly what MVS/ESA release introduced the *basic* sysplex. 
ISTR, it was MVS/ESA V4 (V4.1). Correct?


--
Peter Hunkeler

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.

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

Re: HSM question

[Burrell, Todd]

All three should show MIGRAT and all three will still show up as they are all 
in the catalog. 


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of PINION, RICHARD W.
Sent: Friday, September 22, 2017 1:06 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: HSM question

When a VSAM data set is migrated is the cluster, index, and data component 
displayed under ISPF 3.4 as migrated?  Or is only the cluster name shown?
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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.

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

Re: MERGECAT QUESTION

[Burrell, Todd]

I usually do the MERGECAT first and then define the alias.  I believe the ALIAS 
DEFINE will fail if there are entries in the MCAT that match it...  


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of esmie moo
Sent: Friday, September 22, 2017 11:16 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: MERGECAT QUESTION

Gentle Readers,
We have about hundreds of user dsns which are cataloged in the MCAT because the 
alias for the users were not defined.My question is the sequence I should 
follow. For example do I define the ALIAS and then perform the MERGECAT? or I 
perform the MERGECAT and then define the ALIAS?I don't have a test system in 
which I can try it out.
Below is my jcl to run the MERGECAT:/*                                          
         //STEP1    EXEC PGM=IDCAMS,REGION=2048K,TIME=1440    //DD1      DD   
VOL=SER=MCAT03,UNIT=SYSALLDA,DISP=OLD//         DD   
VOL=SER=TST001,UNIT=SYSALLDA,DISP=OLD//SYSPRINT DD   SYSOUT=*                   
          //SYSIN    DD   *                                          REPRO -    
                                               INDATASET(TSUT3.MCAT)   -        
                    OUTDATASET(USERCAT.APPLIC) -                         
LEVEL(CTPRT17) -                                     MERGECAT -                 
                          FILE(DD1)                                 /*          
                                         //                                     
              Thanks.

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: Looking for mainframe shops Lexington/Cincinnati

[Burrell, Todd]

I also believe someone mentioned For Knox - I believe HPE has that contract for 
the mainframe.  Or DXC now that they merged with CSC. 



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Steve Smith
Sent: Monday, August 28, 2017 4:28 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Looking for mainframe shops Lexington/Cincinnati

I forgot about Kroger, and P  Both are headquartered here.  US Bank may 
still have some operations in town (vestiges of a big local bank they acquired 
many years ago).  Great American Insurance may be a player.

To be honest, I'm ridiculously uninformed about the place I've lived for 30 
years.  For the past five years, I've been a remote hermit, and have no 
colleagues, much less offices, within 500 miles.  (afaik)

sas

On Mon, Aug 28, 2017 at 1:31 PM, Burrell, Todd <todd_burr...@csx.com> wrote:
> I believe Kroger has a shop in Cincinnati.
>

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: Looking for mainframe shops Lexington/Cincinnati

[Burrell, Todd]

I believe Kroger has a shop in Cincinnati. 


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Donald J
Sent: Monday, August 28, 2017 1:19 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Looking for mainframe shops Lexington/Cincinnati

Toyota used to be in Georgetown KY.
WPAFB used to hire a lot of mainframe contractors.
There are also a couple of insurance companies in Cincinnati. 
Cincinnati bell possibly.
State of KY might have a mainframe in Frankfort.
There is a federal site in Fort Knox with mainframes, might be Army.
 
 

Sent: Saturday, August 26, 2017 at 9:59 PM
From: "Joel M Ivey" 
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Looking for mainframe shops Lexington/Cincinnati Would appreciate info 
on zos shops in Lexington KY and Cincinnati OH, for possible relo.
What mainframe shops are there???

Thanks,
Joel
Columbia SC

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: SMS dataset woes

[Burrell, Todd]

This may be a "big hammer" approach, but why not just move the datasets you 
want to keep off of each volume to another volume and then initialize each 
volume?  

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Mike Bell
Sent: Wednesday, August 23, 2017 12:33 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SMS dataset woes

Your issue is the new (different) usercat name.  I am not sure if the vvds 
captures the SMS but I know it captures the usercat.

Mike

On Wed, Aug 23, 2017 at 11:24 AM, Kirk Wolf  wrote:

> I would appreciate some advice on a problem that I'm having on a 
> development system.
> We copied some volumes from an old machine, where the data sets where 
> SMS managed to a new system where SMS is really not set up and we 
> would prefer to keep it that way.
>
> We exported the old usercat that had the datasets on these volumes and 
> then imported it to a new usercat on the new system, which worked fine.
>
> But the problem is that we can't delete any of the old datasets, since 
> they still have the old SMS "storclass" in the VVDS (I think).
>
> - ISPF delete just says "Deallocation failed"
>
> - TSO/IDCAMS delete does this:
>
> delete ftp.data
>
> IDC0550I ENTRY (A) LISA.FTP.DATA DELETED IDC3014I CATALOG ERROR+ 
> IDC3009I  VSAM CATALOG RETURN CODE IS 50 - REASON CODE IS IGG0CLFO-88 
> IDC0551I  ENTRY LISA.FTP.DATA NOT DELETED IDC0014I LASTCC=8
> RC(8)
>
> So the data set is uncataloged, but remains on the volume and the VVDS.
>
> This error is documented here:
>
> https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.
> 0/com.ibm.zos.v2r1.ieam600/bb3009i.htm
>
>
> *88* *Explanation:* A VVR or NVR with the correct component name was 
> found, but the catalog name did not match. On a delete request, the 
> BCS record will be deleted, but the VVR or NVR and the format 1 DSCB 
> will not be scratched. There is no SFI data.
>
> *Programmer Response:* No action is required because this code is for 
> information only.
> Does anyone have any suggestions other than to try to migrate the 
> missing SMS definitions?  We have crap for skills and that area, so an 
> alternative would be appreciated.
>
> One workaround would be something that would scratch an uncataloged SMS
> dataset (and remove from the VVDS).   Will IEHPROGM do this?  It doesn't
> seem like it:
>
>SCRATCH DSNAME=LISA.JOB.LOG,VOL=3390=(VPWRKB),PURGE
>
>  IEH207I  STATUS OF USERS REQUEST TO SCRATCH DATA SET LISA.JOB.LOG
>
>   VOLUME I.D. ACTION TAKEN REASON FOR TAKING THIS ACTION
>  ERROR
> VPWRKB  NONE   CORRECT PASSWORD NOT AVAILABLE
>  ***
>
>
> Thanks for any help...
>
>
> Kirk Wolf
> Dovetailed Technologies
> http://dovetail.com
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



--
Mike

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: OSA-ICC MAC Address

[Burrell, Todd]

You should be able to do the following steps to get a MAC from an IP address:

Ping IP address of OSA card from a DOS/CMD prompt
Then enter ARP -A from the command prompt - this should show the MAC


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Carmen Vitullo
Sent: Tuesday, August 22, 2017 1:56 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: OSA-ICC MAC Address

I've never seen a mac address, I've had my network folks tell me I had the 
incorrect MAC address, I just INACT/ACT the OSC Server, I'll look around, but 
maybe you can get the MAC address from your network folks Carmen 

- Original Message -

From: "Jim Elliott" 
To: IBM-MAIN@LISTSERV.UA.EDU
Sent: Tuesday, August 22, 2017 12:51:12 PM
Subject: OSA-ICC MAC Address 

I am trying to find the MAC address for OSA-ICC (CHPID OSC) ports. The HMC 
guide seems to say you can find the MAC Address, but for OSC the MAC Address is 
not an option to view. Any suggestions for how I find these? 

Regards, Jim 

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: CONSOLE command failing - what else to check?

[Burrell, Todd]

Good call - this issue was that one of the userid's in question was 8 
characters.   IBM pointed this out and we assigned a 7 character ID to the job 
and everything works fine.   It would be nice if the error message gave some 
sort of hint about this problem?

Live and learn.  

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Peter Hunkeler
Sent: Tuesday, August 22, 2017 2:46 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: AW: CONSOLE command failing - what else to check?

 
>I have 2 users...


Do you mean "userids" or persons? If the former, is the one failing an 8 
character userid, and the one succeeding less than 8 characters? 


The TSO CONSOLE facility in one of a few commands that insists in userids not 
being longer than 7 characters (the TSO restriction up to z/OS 2.3 or 2.2)


-- 
Peter Hunkeler



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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.

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

Re: Removing Catalog Entries for Datasets That Do Not Exist

[Burrell, Todd]

Wouldn't a simple IDCAMS DELETE NSCR work?  

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Rodatz, William J
Sent: Friday, August 18, 2017 11:41 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Removing Catalog Entries for Datasets That Do Not Exist

Hello Everyone,

Recently I discovered some datasets with "MIGRAT" as the volser.  These 
datasets had been migrated with DFHSM many years ago.  My organization is no 
longer running the product.  I am attempting to remove the dangling catalog 
entries which appears to be challenging.  The pubs say to use IEHPROGM with the 
SCRATCH function if (1) the dataset is non-SMS managed and (2) you know the 
dataset's volser prior to migration.  I don't what the original volser was and 
I don't know why it matters.  The catalog entry has only the dataset name and 
"MIGRAT" for the volser.

When I execute IEHPROGM, I get messages denoting that DFHSM is not active.  I 
am unable to move past this point.

Does anyone have an idea how the catalog entries can be removed?  Any input 
would be greatly appreciated.

Thank you.

Bill

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.

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

Re: simple questions on migrating to a new mastercat

[Burrell, Todd]

Not to be to flippant, but why in the heck would you have SYS1 datasets in your 
master catalog also SMS managed?   Seems like you are creating a nasty 
scenario. 

But if you have to have this, then REPRO MERGECAT is probably the only solution 
I know of to move the entries from one master to the other.   Just be specific 
with the LEVEL in the command. 


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tracy Adams
Sent: Thursday, August 17, 2017 4:23 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: simple questions on migrating to a new mastercat

So I am built a new master catalog for the 2.2 migration.  I have some sys1. 
Datasets that live on various sms volumes that I want add catalog entries to in 
my new mastcat.   If I just use IDCAMS define nonvsam I get a good entry but 
there is no SMS information.  I can't use "recatalog" because the catalog names 
are different.  Mergecat would move the entry and REPRO will copy all the junk 
I want to leave behind.  What is the correct procedure to recreate an SMS 
managed SYS1 dataset into a second MASTCAT?  TIA Tracy

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: CONSOLE command failing - what else to check?

[Burrell, Todd]

Neither have an OPERPARM segment.  


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Mark Jacobs - Listserv
Sent: Wednesday, August 16, 2017 12:03 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: CONSOLE command failing - what else to check?

Does the falling user have an OPERPARM segment in their RACF profile?

> Todd Burrell  August 16, 2017 at 11:52 AM 
> I have 2 users and one can successfully execute the CONSOLE command 
> while running it in a started task and in batch, but the other user 
> cannot. From what I can tell they are both connected to the same RACF 
> groups and both should have all of the necessary access required to 
> run the CONSOLE command - but one fails with a RC 36 which indicates 
> they are not authorized? Also, there are no RACF error messages for 
> the failing user - and nothing when I ran RACFICE this morning in the 
> violation report?
>
> I seem to remember there is something else that might need to get 
> changed in TSO? Does anyone have anything else I can check?
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
> Please be alert for any emails that may ask you for login information 
> or directs you to login via a link. If you believe this message is a 
> phish or aren't sure whether this message is trustworthy, please send 
> the original message as an attachment to 'phish...@timeinc.com'.
>

-- 

Mark Jacobs
Time Customer Service
Global Technology Services

The standard you walk past is the standard you accept.
Lt. Gen. David Morrison


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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: CONSOLE command failing - what else to check?

[Burrell, Todd]

Yes - both are connected to groups that give access to TSOAUTH/CONSOLE and to 
the appropriate OPERCMDS profiles.  

Todd Burrell | Sr. Mainframe Systems Administrator 
CISSP, PMP, ITIL Expert, CCNA, MCSE
CSX Technologies| 550 Water St. (634H), Jacksonville, FL 32202
Office: (904) 633-5651 Cell: (404) 723-2017 | todd_burr...@csx.com 






-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John McKown
Sent: Wednesday, August 16, 2017 12:02 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: CONSOLE command failing - what else to check?

On Wed, Aug 16, 2017 at 10:52 AM, Todd Burrell  wrote:

> I have 2 users and one can successfully execute the CONSOLE command 
> while running it in a started task and in batch, but the other user 
> cannot.  From what I can tell they are both connected to the same RACF 
> groups and both should have all of the necessary access required to 
> run the CONSOLE command
> - but one fails with a RC 36 which indicates they are not authorized?
> Also, there are no RACF error messages for the failing user - and 
> nothing when I ran RACFICE this morning in the violation report?
>
> I seem to remember there is something else that might need to get 
> changed in TSO?  Does anyone have anything else I can check?
>
>
​Does the second one have appropriate access to the CONSOLE profile in the 
TSOAUTH class in RACF?

​ref:
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.ieag300/iea3g3140.htm



--
If you look around the poker table & don't see an obvious sucker, it's you.

Maranatha! <><
John McKown

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: ISPF LINE COMMAND

[Burrell, Todd]

I believe there is a way to do this with AK, but it requires commands on each 
line.  Not painful for a few lines, but ugly for say 500 lines.  Here's a REXX 
exec I have that will read dataset names from an input file and create output 
cards.   You can alter the cards to be whatever you want. 


/*  REXX EXEC TO READ INPUT DATASET LIST AND CREATE OUTPUT  */  
DATASETS. = ''  
LINES. = '' 
"ALLOCATE FILE(INPUTFIL) DA('ZPN6.VEMER00.DATASETS') SHR"   
'EXECIO * DISKR INPUTFIL (FINIS STEM DATASETS.' 
'FREE FILE(INPUTFIL)'   
"ALLOCATE FILE(OUTFIL) DA('ZPN6.TSO.JCL(OS390210)') SHR"
J = 1   
DO I = 1 TO DATASETS.0  
   DSN = STRIP(SUBSTR(DATASETS.I,1,44)) 
 LINES.J = ' DEFINE NVSAM(NAME('DSN') -'
   J = J + 1
 LINES.J = 'VOL(**) DEVT())  '  
   J = J + 1
 END
 'EXECIO * DISKW OUTFIL (FINIS STEM LINES.' 
 'FREE FILE(OUTFIL)'


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John Dawes
Sent: Thursday, August 10, 2017 9:55 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: ISPF LINE COMMAND

  G'Day,
Is there a line command equivalent to ROSCOE line command using CR?  Let me 
explain.
01 HSEND FIXCDS D TESTJOB.D286.T2041375.TTQM0003   DELETE -
02    PATCH(X'06' BITS(0.1.)) ODS(SYSTEST.FIXCDS)
03 HSEND FIXCDS D TESTJOB.D286.T2101225.TTQM0003   DELETE -
04 HSEND FIXCDS D TESTJOB.D286.T2120595.TTQM0003   DELETE -
05 HSEND FIXCDS D TESTJOB.D286.T2141244.TTQM0003   DELETE -
06 HSEND FIXCDS D TESTJOB.D286.T2203302.TTNRON70   DELETE -
07 HSEND FIXCDS D TESTJOB.D286.T2221294.TTQM0003   DELETE -
08 HSEND FIXCDS D TESTJOB.D288.T1345356.TMDMDE21   DELETE -
09 HSEND FIXCDS D TESTJOB.D295.T1345250.TMDMDE21   DELETE -
10 HSEND FIXCDS D TESTJOB.D298.T1045337.TPDMDE21   DELETE -
11 HSEND FIXCDS D TESTJOB.D299.T1345302.TMDMDE21   DELETE -
12 HSEND FIXCDS D TESTJOB.D300.T1045286.TPDMDE21   DELETE - In 
the above member I would like to copy line 02    PATCH(X'06' 
BITS(0.1.)) ODS(SYSTEST.FIXCDS) after each HSEND command.
In ROSCOE (miss it dearly)  all I had to do is type CR in 02 and an A in 
03 up to 12.  Does ISPF have something similar?
Thanks in advance 


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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: DFHSM Issue

[Burrell, Todd]

I think HSM will skip the volumes if they have ever failed a recycle in the 
past?  So you have to manually recycle them one at a time (from what I 
remember).  

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Pesce, Andy
Sent: Wednesday, July 12, 2017 2:02 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: DFHSM Issue

So, I am having an issue with DFHSM Backup tapes.  I tried opening a PMR and 
the first thing I get back is, "z/OS 1.13 is an unsupported release, and you 
don't have an extended contract".

Anyway, thought I would send this to see if anyone else has seen this issue.
When I list the backupvolumes, I have a list that looks like this:

- DFSMSHSM CONTROL DATASET - BACKUP VOLUME-- LISTING - AT 07:37:16 ON 
17/07/12 FOR SYSTEM=MVSD  


VOLSER   DEVICE  BACKUP   VOL   TOTAL FREETHRESH  LAST BACKUPPSWD   
EXP   RACF   EMPTY  IDRC  DUPLEX PCT
  TYPETYPEFULL  TRACKS   TRACKS  DATE   
   ALT   FULL   


S00012   3590-1  DAILY NO      ***  17/07/10  NO
YESNO NO Y*NONE* 34.6   
S00015   3590-1  DAILY NO      ***  08/05/27  NO
YESNO NO Y*NONE* 20.0   
S00043   3590-1  DAILY NO      ***  08/05/29  NO
YESNO NO Y*NONE* 25.0   
S00071   3590-1  DAILY YES     ***  17/05/09  NO
YESNO NO Y*NONE* 96.6   
S00094   3590-1  DAILY NO      ***  08/05/31  NO
YESNO NO Y*NONE* 28.3   
S00117   3590-1  DAILY YES     ***  15/07/05  NO
YESNO NO Y*NONE* 54.3   
S00133   3590-1  DAILY NO      ***  17/01/10  NO
YESNO NO Y*NONE* 57.5   
S00146   3590-1  DAILY YES     ***  08/04/27  NO
YESNO NO Y*NONE* 96.7   
S00156   3590-1  DAILY NO      ***  08/05/31  NO
YESNO NO Y*NONE* 31.2   
S00169   3590-1  DAILY NO      ***  10/09/15  NO
YESNO NO Y*NONE* 54.8   
S00170   3590-1  DAILY YES     ***  17/04/21  NO
YESNO NO Y*NONE* 96.6   

So, if you notice the second and third tapes on the list S00015 and S00043, you 
will see the last backup date in 2008.
You will see that they are 20.0 and 25.0 PCT full.   So, I tried a RECYCLE 
DISPLAY specifying a percentage of 40%.
I get the following:

RECYCLE BACKUP DISPLAY PERCENTVALID(40) 

ARC0830I RECYCLE COMMAND PROCESSING STARTING



ELIGIBLE VOLUMES: 040%  



LEGEND: 

'*' INDICATES EMPTY TAPE



   S00071S00170S00191S00255S00480S00487S00597S00602 

   S00632S00697S00739S00795S00969S00991S01461S01464 

END OF DISPLAY OF VOLUMES ELIGIBLE FOR RECYCLE  

ARC0831I RECYCLE COMMAND PROCESSING ENDING  


So neither of these volumes show up on the recycle listing.  So, I took the 
S00015 and did a manual recycle and
it worked just fine.   Anyone have any thoughts.

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.

Re: Looks like lots of folks in marketing said thanks but no thanks

[Burrell, Todd]

I've always said that if you think you need someone in the office so you can 
make sure they are working - then you hired the wrong person.   Bad employees 
will goof off whether they are in the office or at home.   And I get a LOT more 
done from home than I ever do in the office because there are no distractions 
at home like at the office.  

And the old "water cooler" argument about learning a lot from discussions in 
the office has a little merit, but not much.  Most of the times these 
discussions quickly wonder off into personal discussions.  

Todd Burrell | Sr. Mainframe Systems Administrator 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Steve Smith
Sent: Thursday, May 25, 2017 9:44 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Looks like lots of folks in marketing said thanks but no thanks

1. Purely imaginary.  Besides being too random to be useful, those "meetings" 
are about family, dogs, and favourite comedies.  Business interaction is often 
better facilitated with electronic communication (see your #3).
2. Purely imaginary.  You cannot "see" much of anything.  A manager's job is to 
get results, not to baby-sit (monitor) their team.  If the manager hires people 
who need to be constantly supervised, well then, that's on the manager.
3. Agreed.  Every office I've worked in was apparently designed to prevent me 
from concentrating on anything.  I'm far, far more productive in my quiet, 
distraction-free home office.

I also liked going to the office (mostly), and seeing everyone.  But I was able 
to actually work maybe 50% of the time there.

sas


On Thu, May 25, 2017 at 2:57 AM, Radoslaw Skorupka < 
r.skoru...@bremultibank.com.pl> wrote:

> Well, it is not my company, so let's leave the decision to the owners 
> and managers they hired.
>
> However if it was my company I would demand to be present in the office.
> Some well justified exceptions apply, but mostly temporarily, and 
> everytime final decision would belong to managers, not employees.
>
> Reasons?
> 1. Meetings at the coffee point (and other places) is very big 
> opportunity to exchange ideas, thoughts, opinions.
> 2. It is much easier to see and control how the emploee spends a time 
> - is he really busy as declared? No timesheet replace it.
> 3. Some people do work more effectively when they have no external 
> "disturbants" (a dog, neighbour, postman, favourite comedy on TV...)
>
> BTW: most of my co-workers claim they absolutely prefer to work in the 
> office, with the team.
> BTW2: multi-site office is still better than home working, We do have 
> good video-chat systems for in conference rooms, except personal a/v 
> equipment in every PC.
>
> My 0,02€
>
> --
> R.Skorupka
> Lodz, Poland
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



--
sas

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: RACF Database (was: Sample JCL for file transfer using NJE/TCPIP)

[Burrell, Todd]

Wouldn't a simpler solution to protecting the RACF database simply be to give 
pretty much no one ALTER access to it?   I know that at most shops only one or 
two folks had ALTER or UPDATE to the actual file and that seems like the best 
course of action to avoid accidental deletion? 
And we backed up the RACF DB 4 times a day as well - just in case.  

Todd Burrell | Sr. Mainframe Systems Administrator 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jesse 1 Robinson
Sent: Tuesday, May 23, 2017 2:28 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: RACF Database (was: Sample JCL for file transfer using NJE/TCPIP)

I have not tried this, but IBM supplies a RACF started task whose purpose is to 
issue RACF commands via a console. As supplied, the RACF STC has no DDs, but I 
suppose you could add one for the primary and maybe even alternate RACF data 
base(s) with DISP=SHR. The hard part of coding such a task has already been 
done. Stopping it seems to require FORCE ARM, but you wouldn't stop it very 
often anyway. 

-
.
.
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 Jesse 1 Robinson
Sent: Tuesday, May 23, 2017 11:03 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: RACF Database (was: Sample JCL for file transfer using 
NJE/TCPIP)

I've been expecting someone with actual experience in this area to jump in. I 
don't think you can get away with 'wait forever' logic. Eventually you'll get 
S522 abend. OTOH XCFAS, which preserves a permanent enqueue on LINKLIST 
libraries, seems to be very busy doing something, accumulating both CPU time 
and EXCP count. Maybe there's something on CBT?



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Paul Gilmartin
Sent: Monday, May 22, 2017 4:58 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: RACF Database (was: Sample JCL for file transfer using 
NJE/TCPIP)

On Mon, 22 May 2017 17:44:16 -0500, Joel C. Ewing wrote:

>RECFM PSU may prevent moving the database, but it doesn't block 
>deletion.  After realizing this somewhat-essential data set wasn't 
>protected by an enqueue, we picked an installation started task that 
>was normally running all the time (but which could be shut down if need 
>be), and added an unreferenced DD for the RACF database with DISP=SHR 
>to reduce the odds of both accidental deletion and movement.
>
Suppose one wanted to craft a started task expressly for that purpose, using 
minimum resource.  Would it suffice to WAIT on an ECB that you never POSTed?  
Would this annoy WLM?  Is there a better way?  Should it intercept a STOP 
command and WTOR with an Abort/Retry/Ignore prompt?  What's the OS Classic 
analogue of SIGINT?

-- gil


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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: Mischaracterized HOLDDATA

[Burrell, Todd]

Well this really should have been labeled as HOLD(ACTION).And I usually 
look through the DOC for stuff like this, but I've never seen something quite 
so egregious.

Todd Burrell | Sr. Mainframe Systems Administrator 
CSX Technologies| 550 Water St. (634I), Jacksonville, FL 32202


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Pinnacle
Sent: Thursday, May 18, 2017 3:07 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Mischaracterized HOLDDATA

For those of you who always laughed when I said read your HOLD(DOC) for buried 
HOLD(ACTION) items.  Here it is kids, so for those of you who still ignore 
HOLD(DOC), keep telling yourselves that you're saving time and I'm crazy for 
looking at HOLD(DOC).

++HOLD(UI43841) SYSTEM FMID(HSMA21A) REASON(DOC) DATE(17011)
   COMMENT(
   Perform the following RACF security steps,
   or equivalent steps using your SAF product.
   The SAMPLIB sample job, IZUCASEC contains these commented-out
   RACF commands and is provided as an aid to perform these steps
   if you choose to use it.

   RDEFINE OPERCMDS MVS.MCSOPER.* UACC(NONE)

   PERMIT MVS.MCSOPER.* CLASS(OPERCMDS) ID(IZUSVR) ACCESS(READ)

   RDEFINE OPERCMDS (MVS.VARY.TCPIP.OBEYFILE) UACC(NONE)

   PERMIT MVS.VARY.TCPIP.OBEYFILE ACCESS(CONTROL) CLASS(OPERCMDS)
 ID(IZUSVR)

   RDEFINE OPERCMDS (MVS.DISPLAY.*) UACC(NONE)

   PERMIT MVS.DISPLAY.* CLASS(OPERCMDS) ID(IZUSVR) ACCESS(READ)

   RDEFINE SERVAUTH EZB.NETSTAT...VIPADCFG
 UACC(NONE)

   PERMIT EZB.NETSTAT...VIPADCFG
 CLASS(SERVAUTH) ID(IZUSVR) ACCESS(READ)

   RDEFINE SERVAUTH EZB.NETWORKUTILS.CLOUD. UACC(NONE)

   PERMIT EZB.NETWORKUTILS.CLOUD. CLASS(SERVAUTH)
 ID(IZUSVR) ACCESS(READ)

   Grant ALTER access to IZUSVR for the stack include and stack
   dynamic update datasets if your system protects data sets with
   SAF profiles.  These are data sets you will create manually and
   then reference in Configuration Assistant when you configure a
   TCP/IP stack from the Systems tab in the Cloud perspective.

   If the z/OS ROUTE command is protected by SAF, IZUSVR must have
   READ access to the MVS.ROUTE.CMD. SAF profile in the
   OPERCMDS class.
   **NOTE:  is the target MVS system name where
   IBM Cloud Provisioning and Management for z/OS will provision
   resources. e.g.

   PERMIT MVS.ROUTE.CMD. CLASS(OPERCMDS)
 ID(IZUSVR) ACCESS(READ)

   SETROPTS RACLIST(OPERCMDS,SERVAUTH) REFRESH
   ).



Regards,
Tom Conley

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: VARY command in a batch job

[Burrell, Todd]

I always used this:

//IEFUJVAA JOB AB07,BUTLERM,CLASS=U,MSGCLASS=0,REGION=4000K 
// COMMAND 'SETPROG EXIT,DELETE,EXITNAME=SYS.IEFUJV,MODNAME=IEFUJV' 
//STEP1EXEC PGM=IEFBR14 

Just update the job card - and then make line 2 whatever command you want. 

Todd Burrell | Sr. Mainframe Systems Administrator 
CISSP, PMP, ITIL Expert, CCNA, MCSE
CSX Technologies| 550 Water St. (634I), Jacksonville, FL 32202
Office: (904) 633-5651 Cell: (404) 723-2017 | todd_burr...@csx.com 






-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of william janulin
Sent: Friday, April 28, 2017 8:41 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: VARY command in a batch job

To list;
  Is there a way to issue a VARY cuu,offline command in a batch job. I need to 
do some full volume copies, including the volser,  and then vary the receiving 
offline. 

Thank you in advance, Bill J.

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: Spool file

[Burrell, Todd]

For a production system I would say no - I would put the SPOOL datasets on 
volume(s) by themselves.  

For a test system you can probably get by with this setup.

What problems are you having?


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Joseph Reichman
Sent: Tuesday, March 21, 2017 8:47 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Spool file

Hi

I'm having problems with my spool file 

SYS1.HASPACE 


It happens to be in the same pack as my parmlib And other important files 

I'm wondering can the spool file be on any pack ?

Thanks 

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.

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

Re: ADR144E

[Burrell, Todd]

Shouldn't the filter be something like INCLUDE( ** )?

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of willie bunter
Sent: Monday, March 20, 2017 9:12 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: ADR144E

Good Day To All,

I am trying to troubleshoot a user's job which is using ADRDSSU.  I cannot find 
the reason why the job fails on a :

ADR144E (002)-RI03P(02), INCOMPLETE SPECIFICATION IN DATA SET REFERENCED BY 
DDNAME FILTERDD   

Below is the jcl:

/* 
//S4112  EXEC PGM=ADRDSSU,REGION=0K,PARM='TYPRUN=NORUN' 
//TD9101   DD UNIT=3390,VOL=SER=TD9101,DISP=SHR 
//TD9102   DD UNIT=3390,VOL=SER=TD9102,DISP=SHR 
//TD9103   DD UNIT=3390,VOL=SER=TD9103,DISP=SHR 
//TD9104   DD UNIT=3390,VOL=SER=TD9104,DISP=SHR 
//NOTAPE   DD DUMMY 
//SYSPRINT DD SYSOUT =*
//SYSUDUMP DD SYSOUT=D  
//SYSINDD DSN=PROD.DATALIB(SYSDAU),DISP=SHR 
//FILTERDD DD DSN=TST.FILTDD,DISP=SHR   

Below is the SYSIN DD contents:

DUMP INDDNAME(TD9101) OUTDDNAME(NOTAPE) -  
 DATASET(FDD(FILTERDD)) -  
 DELETE PURGE  
DUMP INDDNAME(TD9102) OUTDDNAME(NOTAPE) -  
 DATASET(FDD(FILTERDD)) -  
 DELETE PURGE  
DUMP INDDNAME(TD9103) OUTDDNAME(NOTAPE) -  
 DATASET(FDD(FILTERDD)) -  
 DELETE PURGE  
DUMP INDDNAME(TTD9104) OUTDDNAME(NOTAPE) -  
 DATASET(FDD(FILTERDD)) -  
 DELETE PURGE  

Below is the FILTERDD  DD (TST.FILTDD)

 INCLUDE( -
   )   

I think the problem could be with the parm DATASET(FDD I would appreciate 
it someone could point out my error.

Thanks in advance.

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: Subject : DCB NECESSSARY?

[Burrell, Todd]

Here's a sample of the SYSIN for IDCAMS for MODEL - it should allocated the 
FARGD dataset just like the WK dataset:

DEF CL(NAME(FARGD.TEST.X790AC.VS.EBDI019.WRKFILE) VOL(HSM010) -  
  MODEL(WK.X790AC.VS.EBDI019.WRKFILE)) -  
  CAT(CATALOG.MVSICFM.VBTCTLG)

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of esmie moo
Sent: Thursday, February 09, 2017 9:41 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Subject : DCB NECESSSARY?

Todd,
I checked the doc SC26-7394-04 but I didn't see an example for MODEL (section 
23).  Could you post it if you have one available?

  From: "Burrell, Todd" <todd_burr...@csx.com>
 To: IBM-MAIN@LISTSERV.UA.EDU
 Sent: Thursday, February 9, 2017 8:38 AM
 Subject: Re: Subject : DCB NECESSSARY?
   
Why not use either MODEL (IDCAMS SYSIN) or LIKE (JCL)?  That ensures that the 
new file is allocated with the same specs as the old file unless you override 
something in your JCL (like space).  

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of esmie moo
Sent: Thursday, February 09, 2017 7:42 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Subject : DCB NECESSSARY?

Gentle Readers,
I would like to reorganise the HSM cds dsns - MCDS, BCDS & OCDS - using the 
IDCAMS EXPORT parm.  My question is when I preallocate the dsn to which I want 
to export to do I need to specify the LRECL & BLKSIZE?
Here is a part of the job:
//STEP1     EXEC PGM=IEFBR14                      //EXPMCDS DD 
DSNAME=SYS2.COPY.MCDS,UNIT=SYSALLDA,//        
DISP=(NEW,CATLG),SPACE=(CYL,(3000,150)) //EXPBCDS DD 
DSNAME=SYS2.COPY.BCDS,UNIT=SYSALLDA,//        
DISP=(NEW,CATLG),SPACE=(CYL,(3000,150)) //EXPOCDS DD 
DSNAME=SYS2.COPY.OCDS,UNIT=SYSALLDA,//        
DISP=(NEW,CATLG),SPACE=(CYL,(2000,100)) /*//STEP2    EXEC 
PGM=IDCAMS,COND=(0,NE,ALLOC)//SYSPRINT DD  SYSOUT=*                      
//SYSIN   DD   *                              EXPORT SYS2.HSM.PROD.MCDS 
ODS(SYS2.COPY.MCDS) TEMPORARY EXPORT SYS2.HSM.PROD.BCDS ODS(SYS2.COPY.BCDS) 
TEMPORARY
 EXPORT SYS2.HSM.PROD.OCDS ODS(SYS2.COPY.OCDS) TEMPORARY etc etc etc etc..
Would this work?  My uncertainty is that I remember seeing an example where the 
LRECL & BLKSIZE are specified.
Thanks.

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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


   

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

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

Re: Subject : DCB NECESSSARY?

[Burrell, Todd]

Why not use either MODEL (IDCAMS SYSIN) or LIKE (JCL)?  That ensures that the 
new file is allocated with the same specs as the old file unless you override 
something in your JCL (like space).  

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of esmie moo
Sent: Thursday, February 09, 2017 7:42 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Subject : DCB NECESSSARY?

Gentle Readers,
I would like to reorganise the HSM cds dsns - MCDS, BCDS & OCDS - using the 
IDCAMS EXPORT parm.  My question is when I preallocate the dsn to which I want 
to export to do I need to specify the LRECL & BLKSIZE?
Here is a part of the job:
//STEP1     EXEC PGM=IEFBR14                      //EXPMCDS DD 
DSNAME=SYS2.COPY.MCDS,UNIT=SYSALLDA,//        
DISP=(NEW,CATLG),SPACE=(CYL,(3000,150)) //EXPBCDS DD 
DSNAME=SYS2.COPY.BCDS,UNIT=SYSALLDA,//        
DISP=(NEW,CATLG),SPACE=(CYL,(3000,150)) //EXPOCDS DD 
DSNAME=SYS2.COPY.OCDS,UNIT=SYSALLDA,//        
DISP=(NEW,CATLG),SPACE=(CYL,(2000,100)) /*//STEP2    EXEC 
PGM=IDCAMS,COND=(0,NE,ALLOC)//SYSPRINT DD  SYSOUT=*                      
//SYSIN   DD   *                              EXPORT SYS2.HSM.PROD.MCDS 
ODS(SYS2.COPY.MCDS) TEMPORARY EXPORT SYS2.HSM.PROD.BCDS ODS(SYS2.COPY.BCDS) 
TEMPORARY
 EXPORT SYS2.HSM.PROD.OCDS ODS(SYS2.COPY.OCDS) TEMPORARY etc etc etc etc..
Would this work?  My uncertainty is that I remember seeing an example where the 
LRECL & BLKSIZE are specified.
Thanks.

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: IMS log files question

[Burrell, Todd]

Looks like your RETPD=45 is overriding the SMS parameters.  

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tony Thigpen
Sent: Wednesday, January 18, 2017 8:52 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IMS log files question

 From the job logs where the file is created:

//DFSSLOGP  DD DSN=IMSVS.SLDSP.%SSID.D%ARDATE.T%ARTIME.V%ARVERS,
// DISP=(NEW,CATLG,DELETE),RETPD=45,
// UNIT=3390,VOL=SER=SIMS00,SPACE=(CYL,(1,1))

IGD101I SMS ALLOCATED TO DDNAME (DFSSLOGP)
 DSN (IMSVS.SLDSP.DBCT.D17018.T0040131.VF3)
 STORCLAS (SCIMSLOG) MGMTCLAS (MCIMSLOG) DATACLAS ()
 VOL SER NOS= HIMSL2

 From the management class panel:
MGMTCLAS EXPIRE EXPIRERETPARTIAL  PRIMARY
NAME NON-USAGE  DATE/DAYSLIMIT   RELEASE  DAYS
--(2)--- ---(3)---  ---(4)  --(5)--  (6)  ---(7)--
MCIMSLOG 7   7  NOLIMIT  NO  0

SMS is something I am just learning, but, if I am reading the manual right, I 
would expect the files to be gone after 7 days.

But, from the VTOC:
Created  Expires
2017.018 2017.063

It appears that I am missing something. Because here is the vtoc dates for one 
of the old files:
Created Expires
2015.190 2015.235

Tony Thigpen

Peter Hunkeler wrote on 01/18/2017 01:55 AM:
>
>> I am reviewing the system VTOCs and I see a lot of IMS log files that 
>> contain a date/timestamp in their names. I know they are created by 
>> the IMS system using the skeleton proc member ARCHJCL. What I am 
>> seeing is that the file was created with a retention period of 45 days.
>>
>> //DFSSLOGP  DD DSN=IMSVS.SLDSP.%SSID.D%ARDATE.T%ARTIME.V%ARVERS,
>> // DISP=(NEW,CATLG,DELETE),RETPD=45,
>> // UNIT=3390,VOL=SER=SIMS00,SPACE=(CYL,(1,1))
>>
>> But, I have daily files going back almost 2 years.
>
>
>
>
> Is the RETPD honoured at allocation time? Look for message IGD17364I in the 
> IMS joblog. What value is set for "RET LIMIT" in the management class. If it 
> is 0, then EXPDT and RETPD will be ignored, and EXPIRE NON-USAGE and EXPIRE 
> DATE/DAYS determine when space managment considers to delete the data set. 
> Any of those could be NOLIMIT. Or the value is larger than your "almost 2 
> years".
>
>
> Have you looked a the "Expiration date" in ISPF for any of those data data 
> sets?
>
>
> --
> Peter Hunkeler
>
>
>
>
>
> --
> 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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.

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

Re: delete old datsets

[Burrell, Todd]

Try playing around with DFDSS with JCL like this and DEFINITELY test with 
TYPRUN=NORUN before running it live. 

//CATCLEAN EXEC  PGM=ADRDSSU,PARM='TYPRUN=NORUN', 
//  REGION=8M 
//SYSUT2 DD DUMMY 
//*YSU03 DD DISP=SHR,UNIT=SYSDA,VOL=SER=TSOS03
//SYSIN DD *,DCB=BLKSIZE=80   
 DUMP  -  
 OUTDD(SYSUT2) -  
 DATASET (INCLUDE (BF19.**) - 
BY ((CREDT,LE,*,-1)))   DELETE
/*
//SYSOUT   DD SYSOUT=*
//SYSPRINT  DD SYSOUT=*   
//SYSUDUMP  DD DUMMY  

You can change the INCLUDE statement to be what you want and then change the BY 
parameter to be -365 instead of -1.  
The dummy output will make sure the datasets are deleted when it finishes. 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Ron Thomas
Sent: Thursday, January 12, 2017 2:28 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: delete old datsets

Hi . Could some one let me know how to delete old datasets SPXR3V.TEST.*say  1 
year old  old using a job ?  I need to get this scheduled as a monthly process 
so that storage  gets freed.  Thanks!

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: Job portal for mainframe

[Burrell, Todd]

There are quite a few places to look:

www.monster.com
www.dice.com
http://www.computerjobs.com/us/en/IT-Jobs/
www.spci.net

You can also look some on LinkedIn.  

You can also go directly to a company's website and search their job listings 
if you know of companies in your area.   A lot of them will allow you to setup 
searches and get alerts based on those searches.  It's how I got my current 
job.  

Good luck.  

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Kumar
Sent: Thursday, December 22, 2016 12:49 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Job portal for mainframe

Hi,

Can somebody name few of the good job portals for Mainframe Systems programming 
jobs in the USA please ?

Regards,
Kumar

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: Show dataset list in dump full volume adrdssu

[Burrell, Todd]

Another runtime PARM I have used occasionally for DFDSS is UTILMSG - it shows a 
lot of underlying detail as to what DFDSS is really doing:

UTILMSG=YES|NO|ERROR
 This parameter controls the output of messages from auxiliary programs invoked 
by DFSMSdss (including ICKDSF, IDCAMS, IEBCOPY, IEBISAM, and IEHMOVE) to the 
DFSMSdss SYSPRINT output. When YES, informational, warning, and error messages 
from these auxiliary programs are copied to the DFSMSdss SYSPRINT output. When 
NO, messages are not copied to the output. When ERROR, messages are copied only 
if the auxiliary return program returns an error code to DFSMSdss. The default 
is ERROR.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Klan, Rob (RET-DAY)
Sent: Thursday, December 22, 2016 5:53 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Show dataset list in dump full volume adrdssu


Add to exec statementPARM='TYPRUN=NORUN'   while processing an existing 
DFSMSDSS file
 
Ex: //DUMPIT  EXEC PGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'  

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of retired mainframer
Sent: Thursday, December 22, 2016 5:29 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Show dataset list in dump full volume adrdssu

It sure would be nice to know what worked.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jorge Garcia
Sent: Thursday, December 22, 2016 1:25 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Show dataset list in dump full volume adrdssu

Great!. It's Works fine. 

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: Jerk dropped from IBM-MAIN at last

[Burrell, Todd]

Nice to know about that police record since I live in Florida :-)  

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jim Carpenter
Sent: Wednesday, December 21, 2016 2:46 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Jerk dropped from IBM-MAIN at last

On Wed, Dec 21, 2016 at 2:12 PM, John McKown  
wrote:
> On Wed, Dec 21, 2016 at 1:06 PM, Evans-Young, Darren  wrote:
>
>> Don't worry. He'll be back
>>
>>
> Yes. I really don't understand why people do this. I have very strong 
> religious beliefs. But this is not the place to discuss them. And, 
> IMO, trying to do so only alienates people rather than "converting" them.

This is the second time he's attacked the list and we'll be hearing plenty from 
this lunatic. He stole all our e-mail addresses which means he can send the 
spam directly to everyone now. He doesn't need to spam the list anymore. So the 
best people can do is complain to Google because he is using Google Apps and 
that's where the spam originates, and to Godaddy because that's where his 
domains are registered.

I unfortunately exchanged e-mails with the guy. He is *completely* gone. He 
thinks everyone is retarded for not seeing some non-existent pattern in words 
like Nintendo and SONY. (Those were a couple examples he gave me.) And the 
reason his e-mails look like word salad is from evil forces using "hidden 
technology". He's not looking to discuss religion. He's trying to force us 
"retards" to see this *obvious* pattern.

I'm guessing he's schizophrenic but I know he's on drugs. He's got a nice 
police record in Florida for drug possession, including bath salts, domestic 
abuse, and one of the latest was for whipping out his genitalia. So the good 
news is, one way or another, he will not be in society much longer.

Jim

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: TSO LINE COMMAND - EDIT MODE

[Burrell, Todd]

Here's a REXX that I wrote to do the same thing as the Roscoe FILL command.  
PARMS are the start and end columns.

/*REXX--*/ 
/*  */ 
/* FUNCTION:*/ 
/*   BLANK FILL THE COLUMN RANGE SPECIFIED. */ 
/*  */ 
/*--*/ 
ISREDIT 'MACRO (PARMS)'
 TRACE N   
   
 "ISREDIT C P'=' ' ' " PARMS " ALL"
   
 EXIT  

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of willie bunter
Sent: Friday, December 16, 2016 10:15 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: TSO LINE COMMAND - EDIT MODE

Good Day To All,

Is there a way of filling columns 80 95 with blanks?  I have sequence commands 
(please see below for an example) which I would like to remove.

00550003   ** 
0056  
00570001   *  
00580003   ** 
0059  
0061   *  
00610003   ** 
0062  
00630001   *  
00640003   ** 
0065  
00660001   *  
00670003   ** 
0068  
00690001   *  
0073   ** 
0071  

I looked at using C P'00' " " 80 95 however since this is a huge dsn I was 
wondering if there is a quicker way.  I also considered pressing the EOF key on 
my keyboard on every line however since the file is quite large it would take 
me a while.

Is there a line command I could issue to do what I want to do?  I remember in 
ROSCOE I could issue the command FILL 80 95  and it would replace the numbers 
with blank spaces.

Thanks

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: IBM Lays Out Plans to Hire 25,000 in U.S. Ahead of Trump Meeting

[Burrell, Todd]

I don't think that the number ($1billion) and the number of hires are 
necessarily related. 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tom Marchant
Sent: Wednesday, December 14, 2016 9:27 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IBM Lays Out Plans to Hire 25,000 in U.S. Ahead of Trump Meeting

On Tue, 13 Dec 2016 18:05:26 -0500, Gabe Goldberg wrote:

>plans to hire about
>25,000 people in the U.S. and invest $1 billion over the next four 
>years

Did anyone else notice this? If you hire 25,000 people and pay them a $10,000 
salary, that would add up to $250 million per year, or a billion dollars over 
four years.

--
Tom Marchant

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: Prevent allocation of unknown-HLQ data sets?

[Burrell, Todd]

Amen - one shopped I worked in had the master catalog defined with a UACC of 
UPDATE and it took a LONG time to get it cleaned up.  If a new user got created 
with no alias - all their files went into the MASTER.   Took a lot of REPRO 
MERGECAT commands to clean up that mess.  

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Carmen Vitullo
Sent: Tuesday, December 13, 2016 1:59 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Prevent allocation of unknown-HLQ data sets?

What I've done in 2 shops was to protect the master catalog(s) set UACC(READ) 
and only update access to your SYSPROG's you trust :) Carmen
- Original Message -

From: "Richard Way" 
To: IBM-MAIN@LISTSERV.UA.EDU
Sent: Tuesday, December 13, 2016 12:55:21 PM
Subject: Prevent allocation of unknown-HLQ data sets? 

Realize this is a pretty basic question, but my Google-fu isn't working out 
today Can someone tell me the most common / easiest way to prevent 
allocating a data set that doesn't have a catalog alias defined yet? We're 
hitting situations where someone creates a data set by the HLQ of "TEST", for 
example, and because no one created an ALIAS for TEST to a USERCAT, the catalog 
entries for those data sets go straight into the MASTERCAT. 

I'm almost certain there's a way to do this, but I am struggling whether it's 
usually done by RACF or if there's a better / easier way... 

Thanks in advance 

Rich Way
HPE 

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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 
Sender and CSX accept no liability for any damage caused directly or indirectly 
by receipt of this email.


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

Re: How to tell COBOL to read a concatenation of GDGs

[Burrell, Todd]

I'd probably try to accomplish this by doing a LISTCAT of the GDG Base and then 
I would pass that into a REXX exec to parse out the GDG versions into a STEM 
variable.  You could then generate the JCL out of the same REXX to run the 
COBOL program separate times for each GDG version - and you could also probably 
pass the GDG version to the COBOL program in a file as well?   The REXX could 
also submit the JCL to an INTRDR when it generated it...   

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John McKown
Sent: Friday, November 18, 2016 10:19 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to tell COBOL to read a concatenation of GDGs

On Fri, Nov 18, 2016 at 8:54 AM, Lizette Koehler 
wrote:

> List -
>
> I am a very basic Cobol programmer - openfile/read rec/write rec/close 
> file
>
> What I need to understand is how to do the following
>
> I want to either pass a parm or a DD statement that contains a GDG 
> Base
>
>   //S1  EXEC PGM=X,PARM='GDGBASE'
>

​Possible, but not easy. You could call IGGCSI00 to do catalog processing to 
get the entry names.​



>
> Or
>
>   //S1  EXEC PGM=X
>   //GDGBASE DD DISP=SHR,DSN=gdgbase,GDGORDER=LIFO  Read the GDG 
> backwards
>
> I prefer the second case with the DD statement
>
> The program would need to do the following
>
> 1) Identify the GDG base and what the To/From GDG Numbers are.  I 
> cannot use Relative numbers as GDGs are always being created, so when 
> the program starts I want just the ones created at that time this 
> program begins to execute.
> So it
> could be G0001V00 to G0010V00   or G0997V00 through G1010V00  etc...
>
> 2) Once the GDGs are identified, read through them one at a time
>So open gdgbase.G0001V00
>Read the entire GDG and write it to a report repository
>Once completed, move this GDG number to a backup file in-case there 
> are issues with the report in the repository
>Display a message to a log the GDG was successfully or 
> unsuccessfully read
>Go to the next GDG.
>Continue until all are read and added to the Report Repository
>
> The GDG reports can be from 1 line to millions of lines.  No way to 
> know until the file is read.
>
> My question is this
>
> How can I tell Cobol to read the concatenation of GDGs one at a time?  
> Is there anything needed in the FILE SECTION or INPUT OUTPUT Section 
> or FILE CONTROL?  I have not done this type of coding, so this is new 
> to me.  Using Assembler would be easier, but this needs to be in 
> Cobol.
>

​Not that I'm aware of. You can do it (I think) in HLASM by using an EOV DCB 
exit routine.​ But I don't know of a pure COBOL way to do this. I looked at 
DECLARATIVES, that didn't see anything.



>
> Or any other suggestion appreciated.  I could do this easily in REXX 
> but that is not the design request at this time.
>

I'm assuming you need a "pure COBOL" solution. None of my tricky UNIX
stuff. No faking things out by using TSO via IKJTSOEV.

​My design would be to use method #1. That is, pass in the GDG base name.
I'd use IGGCSI00 to do a catalog lookup​ to get the associated NONVSAM
entries. For each entry I would use BPXWDYN() to allocate it to the
appropriate DD name; OPEN, read the DD until EOF, CLOSE, then BPXWDYN() to
deallocate the DD; repeat for each GDG element. The most difficult part is
setting up the IGGCSI00 call and processing it's output. Before you ask:
No, I don't have any code around to do this. If your design excludes using
BPXWDYN(), then: "Son, you're on your own" (Blazing Saddles - reverent
Johnson to sheriff Bart in the lynching scene)


>
> Thanks
>
>
> Lizette Koehler
> statistics: A precise and logical method for stating a half-truth
> inaccurately
>
>

-- 
Heisenberg may have been here.

Unicode: 
http://secure-web.cisco.com/1qpVMTWv-wHuKvkXEaLqhFfxZLGr8o_nZpuO5udsLe3SYP0Y6o2yYZ6R7WTvEePM_AZKZiV8huQ8oMr3Xth6Y8g6-FituSCCxcEg6DIopVrzSkxaTAgc-5PZBAnUKxKdyUzuROfo5XIUtg9K9D0ztfqkS9G1JJXPqRXTW6zrCzikPi4g5EehTFX0XC0SiR1dt_7lOefcRCHqqArEg3rsnVl8kSYrL6oGlWGjtqvZ_DhZH21JGlGhX9h--1_kI2xCoy1DEvRm1U8kia1XKHzshMxUJkjzGU_HOiVmIN56Dfr38qgjGwbyAvRiDPzD13x7MtkxDRDrTJU6HjpeC9J0JbKAsAKnh7QufidcX1K3l_EXUNEpsNirjJFTaXW7PLVqCuv6Pjn8X7ArAvN8ntWeqtw/http%3A%2F%2Fxkcd.com%2F1726%2F

Maranatha! <><
John McKown

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




This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information intended only for the use of the 
intended addressee. Any dissemination, distribution, copying or action taken in 
reliance on the contents of this email by anyone other than the intended 
recipient is strictly prohibited. If you have received this email in error 
please immediately delete it and notify sender at the above CSX email address. 

Re: TIME= on JOB card vs. EXEC card

[Burrell, Todd]

I thought that the jobclass time limit overrides everything - so for this 
example wouldn't the time be 60?

Examples (for one-step job):
jobclass ; JOBcard ; EXEC ; effective
60  ; none  ; 90 ; 90 - increased

I thought that the jobclass was the maximum regardless of what you set on the 
exec or job card?  

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of R.S.
Sent: Tuesday, October 25, 2016 5:48 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: TIME= on JOB card vs. EXEC card

W dniu 2016-10-25 o 04:55, Jesse 1 Robinson pisze:
> OK, consider this case. All defaults, no TIME= coded anywhere. JES2 parms 
> have TIME=3. Five steps. How long will the job run?
>
Answer: it depends.
First: we talk about CPU time, not "wall clock" time.
Second: we know there is a limit 3 minutes for whole job. Maybe each step 
consume 2 seconds, then 2x5steps = 10s CPU.
Assumed first step consumed 30s the limit for the rest of the job is (2,30). 
Assumed second step consumed 10s, the limit for the remaining steps is (2,20), 
etc.

Geeneral rules:
TIME=value coded in JOB can only DECREASE default value.
TIME=NOLIMIT or TIME=1440 in JOB card INCREASE the default to infinity (no time 
limit)

TIME coded in EXEC can INCREASE or DECREASE default value.
TIME=NOLIMIT or TIME=1440 in EXEC card INCREASE the default to infinity (no 
time limit)

When coded both JOB and EXEC, the most restrictive value is in effect.

Examples (for one-step job):
jobclass ; JOBcard ; EXEC ; effective
60  ; none  ; none ; 60
60  ; none  ; 10 ; 10
60  ; 70  ; none ; 60 - job value ignored
60  ; 20  ; none ; 20 - job value decreased default
60  ; 20  ; 10 ; 10 - most restrictive from 
(job, exec)
60  ; 20  ; 90 ; 20 - most restrictive from 
(job, exec)
60  ; none  ; 90 ; 90 - increased
60  ; 50  ; 1440 ; 50 - most restrictive from (job, 
exec)
60  ; 1440 ; none  ; NOLIMIT
60  ; none ; 1440  ; NOLIMIT

Rule of thumb: KISS!
Keep It Simple!

Don't code TIME in both JOB and EXEC
Be generous when setting default values. In case of TIME exhaustion abend the 
most common scenario is to repeat the job with (hopefully!) bigger time limit.
So, setting time default small is a waste of time! ;-)


HTH

--
Radoslaw Skorupka
Lodz, Poland






---
Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku 
przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie 
jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem 
niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania 
adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by 
karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie 
zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo 
wczajc 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, 
http://secure-web.cisco.com/1XhGrmetHLO9M1ggjBw161tA19oX0d7sQHzG-5ETRvY2DIDklDQo15AZbOpa7n4RGMW2JvnO5BgjwD6y_JjXWO11xlViSw-4QbeQXAWLta-WG052OLzgFjTZFt1QCY_kWRbi6KLtGtPFpjxSen-l-W9NQivgvh5cNsM20sW6woUo0euyvFuWVpxyeYvEPoqkQ8TZw0MVw7fu6QP8EpOxY8FKROyoYcne1Zuf9N1sbsRa81jQySZgO3n7dPXwh5l3ji9scsMLfEsQbYACly2252MkN0BYaHa2Fvwgb6eZr9d9XnkQwKXHGm_qH3L1LWkSttCWudHLiI-gRA0Id2Htxd65sNkbflur1ubIghp1vAR5sl7vomow4sgA1Nzk5M6iN/http%3A%2F%2Fwww.mBank.pl%2C%20e-mail%3A%20kontakt%40mBank.pl
Sd Rejonowy dla m. st. Warszawy XII Wydzia Gospodarczy Krajowego Rejestru 
Sdowego, nr rejestru przedsibiorców KRS 025237, NIP: 526-021-50-88. 
Wedug stanu na dzie 01.01.2016 r. kapita zakadowy mBanku S.A. (w caoci 
wpacony) wynosi 168.955.696 zotych.


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



This email transmission and any accompanying attachments may contain CSX 
privileged and confidential information