Re: Re : Extracting STDOUT data from USS
>If the OP actually wants to write to spool, and is not necessarily >running under BPXBATCH, he can do: I can't see where the OP ever said he wanted to write to the spool. -- Peter Hunkeler Credit Suisse -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: REXX to delete all members of a PDS... serverpac CPPEDELM
Victor's Rexx works fine. I just tested it. On my system there is a PDS
utility installed, and this also works. I just tested it from a batch TSO
job:
//TSO EXEC PGM=IKJEFT01
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
PDS 'BOLAN.JUNK.JCL'
FIX RESET
/*
On Mon, Jan 25, 2010 at 6:12 AM, Stocker, Herman <
herman.stoc...@avisbudget.com> wrote:
> Very nice Victor. Thank you.
> Regards,
>
> Herman Stocker
>
> It is impossible to make anything foolproof, because fools are so
> ingenious.
> -- Robert Heinlein
>
>
>
> The below REXX [from one of the dino sites, forgot which one] does the job.
> Can even be used as an "action" against a given PDS on the DSLIST panel.
>
> /* REXX */
> /* DELETE ALL MEMBERS OF A GIVEN LIBRARY DSN */
> TRACE 'N'
> /* TRACE 'R' */
> /* TRACE 'O' */
> PARSE UPPER ARG DSNAME
> DSN = STRIP(DSNAME, 'BOTH', ) /* IN CASE IT'S IN QUOTES */
> QUOTE = "'"
> QDSN = QUOTE||DSN||QUOTE /* FULLY QUOTED DSN */
>
> ADDRESS ISPEXEC
> "LMINIT DATAID( MYDATAID) DATASET(" QDSN ") ENQ(SHRW)"
> "LMOPEN DATAID("MYDATAID") OPTION(OUTPUT)"
> "LMMDEL DATAID("MYDATAID") MEMBER(*)"
> "LMCLOSE DATAID("MYDATAID")"
> "LMFREE DATAID("MYDATAID")"
>
> SAY DSN " IS NOW EMPTY"
>
> EXIT
>
>
> HTH,
> -Victor-
>
>
>
> The sender believes that this E-mail and any attachments were free of any
> virus, worm, Trojan horse, and/or malicious code when sent. This message
> and
> its attachments could have been infected during transmission. By reading
> the
> message and opening any attachments, the recipient accepts full
> responsibility for taking protective and remedial action about viruses and
> other defects. The sender's employer is not liable for any loss or damage
> arising in any way from this message or its attachments.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Enormous redbook
On Tue, Jan 26, 2010 at 9:50 AM, Thompson, Steve wrote: > In my opinion, FrameMaker causes problems for cut and paste. At least it > does in manuals that I have to review. Are you sure it's Frame? I think it's just PDF. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Used Sharks
Ron, I don't really know when the SSA interface production stopped. All I do know is that all of the drives that kicked out as defective were like that, both 36G & 72G drives alike. We took delivery of the unit new in December 2002. Ron Hawkins wrote: Jim, Thanks for correcting me. I was told by many sources that when IBM/Hitachi stopped making SSA interfaces that the ESS drives were FCAL with an SSA bridge. I stand corrected. Ron -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Jim Phoenix Sent: Tuesday, January 26, 2010 3:11 PM To: IBM-MAIN@bama.ua.edu Subject: Re: [IBM-MAIN] Used Sharks Ron, The 2105-800 that we replaced in December 2008 used SCSI disks with a small SSA- SCSI bridge circuit board on the back of the drive. The mounting rails had slots in them that held the CB in place on the drive's SCSI connector. We routinely connected these SCSI drives to a PC when the drive went bad. Ron Hawkins wrote: SCSI Disks in a 2105-800? That never happened. The ESS used SSA disk drives, or FC-AL drives with a SSA/FC-AL bridge. -- | Jim Phoenix | Voice: (310) 338-0400 x316 | | Senior Software Developer| Fax: (310) 338-0801| | Phoenix Software International | Alt fax: (310) 337-2685| | 831 Parkview Drive North | jimphoe...@phoenixsoftware.com | | El Segundo, CA 90245 | http://www.phoenixsoftware.com | Opinions expressed by this individual are not necessarily those of the Company. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- | Jim Phoenix | Voice: (310) 338-0400 x316 | | Senior Software Developer| Fax: (310) 338-0801| | Phoenix Software International | Alt fax: (310) 337-2685| | 831 Parkview Drive North | jimphoe...@phoenixsoftware.com | | El Segundo, CA 90245 | http://www.phoenixsoftware.com | Opinions expressed by this individual are not necessarily those of the Company. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Used Sharks
Jim, Thanks for correcting me. I was told by many sources that when IBM/Hitachi stopped making SSA interfaces that the ESS drives were FCAL with an SSA bridge. I stand corrected. Ron > -Original Message- > From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of > Jim Phoenix > Sent: Tuesday, January 26, 2010 3:11 PM > To: IBM-MAIN@bama.ua.edu > Subject: Re: [IBM-MAIN] Used Sharks > > Ron, > > The 2105-800 that we replaced in December 2008 used SCSI disks with a > small SSA- SCSI bridge circuit board on the back of the drive. The > mounting rails had slots in them that held the CB in place on the > drive's SCSI connector. We routinely connected these SCSI drives to a > PC when the drive went bad. > > Ron Hawkins wrote: > > SCSI Disks in a 2105-800? That never happened. The ESS used SSA disk drives, > > or FC-AL drives with a SSA/FC-AL bridge. > > > > > > > > -- > | Jim Phoenix | Voice: (310) 338-0400 x316 | > | Senior Software Developer| Fax: (310) 338-0801| > | Phoenix Software International | Alt fax: (310) 337-2685| > | 831 Parkview Drive North | jimphoe...@phoenixsoftware.com | > | El Segundo, CA 90245 | http://www.phoenixsoftware.com | > > Opinions expressed by this individual are not necessarily those of the > Company. > > > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO > Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: undoc'd DFDSS msg
so i have been informed ... well - i did what I could to assist ... oh well .. Chris Hoelscher Senior IDMS & DB2 Database Administrator Humana Inc 502-476-2538 choelsc...@humana.com you only need to test the programs that you want to work correctly From: "Pommier, Rex R." To: IBM-MAIN@bama.ua.edu Date: 01/26/2010 06:12 PM Subject: Re: [IBM-MAIN] undoc'd DFDSS msg Sent by: IBM Mainframe Discussion List Chris, But.unfortunately.the publib link points to a z/OS 1.10 messages and codes book. The book doesn't contain the message. Rex The information transmitted is intended only for the person or entity to which it is addressed and may contain CONFIDENTIAL material. If you receive this material/information in error, please contact the sender and delete or destroy the material/information. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: undoc'd DFDSS msg
Chris, But.unfortunately.the publib link points to a z/OS 1.10 messages and codes book. The book doesn't contain the message. Rex -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Chris Hoelscher Sent: Tuesday, January 26, 2010 4:10 PM To: IBM-MAIN@bama.ua.edu Subject: Re: undoc'd DFDSS msg i goog'ed ADR261I and got 2 hits: what appears to be a SHARE presentation from 2008 - What's New in z/OS 1.10 DFSMSdss also in the following publication http://publib.boulder.ibm.com/infocenter/zos/v1r10/index.jsp?topic=/com. ibm.zos.r10.e0zm100/dssmsgs.htm Chris Hoelscher Senior IDMS & DB2 Database Administrator Humana Inc 502-476-2538 choelsc...@humana.com you only need to test the programs that you want to work correctly -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Used Sharks
Ron, The 2105-800 that we replaced in December 2008 used SCSI disks with a small SSA- SCSI bridge circuit board on the back of the drive. The mounting rails had slots in them that held the CB in place on the drive's SCSI connector. We routinely connected these SCSI drives to a PC when the drive went bad. Ron Hawkins wrote: SCSI Disks in a 2105-800? That never happened. The ESS used SSA disk drives, or FC-AL drives with a SSA/FC-AL bridge. -- | Jim Phoenix | Voice: (310) 338-0400 x316 | | Senior Software Developer| Fax: (310) 338-0801| | Phoenix Software International | Alt fax: (310) 337-2685| | 831 Parkview Drive North | jimphoe...@phoenixsoftware.com | | El Segundo, CA 90245 | http://www.phoenixsoftware.com | Opinions expressed by this individual are not necessarily those of the Company. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: undoc'd DFDSS msg
i goog'ed ADR261I and got 2 hits: what appears to be a SHARE presentation from 2008 - What's New in z/OS 1.10 DFSMSdss also in the following publication http://publib.boulder.ibm.com/infocenter/zos/v1r10/index.jsp?topic=/com.ibm.zos.r10.e0zm100/dssmsgs.htm Chris Hoelscher Senior IDMS & DB2 Database Administrator Humana Inc 502-476-2538 choelsc...@humana.com you only need to test the programs that you want to work correctly The information transmitted is intended only for the person or entity to which it is addressed and may contain CONFIDENTIAL material. If you receive this material/information in error, please contact the sender and delete or destroy the material/information. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: undoc'd DFDSS msg
Can't find it either. In z/OS library or the IBM search DB. Seems pretty self-explanatory though. Either it's already one extent, or there is no space to consolidate the extents. Guess it's PMR (or RCF) time. HTH, Anyone know where I can find ADR261I? It's not in the manuals on the Web, that I can find. ADR261I (001)-DFRGD(01), UNABLE TO FURTHER CONSOLIDATE EXTENTS FOR SYS5.DATACOM.V11R0M2.SMPHOLD, 01 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: undoc'd DFDSS msg
The smphold dataset is a PS file. Are you trying to do an IEBCOPY? If so you can't do it. Regards Otto HP Enterprise Services Infrastructure Specialist Ahold Account CICS & Capacity Technical Support P.O. Box 6462 2000 Wade Hampton Blvd. LC1-302 Greenville, South Carolina, 29606 Cell: 864 449 1755 Tel: 864 987-1417 Fax: 864 987-4500 E-mail: otto.schumac...@hp.com -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Staller, Allan Sent: Tuesday, January 26, 2010 16:01 To: IBM-MAIN@bama.ua.edu Subject: Re: undoc'd DFDSS msg Can't find it either. In z/OS library or the IBM search DB. Seems pretty self-explanatory though. Either it's already one extent, or there is no space to consolidate the extents. Guess it's PMR (or RCF) time. HTH, Anyone know where I can find ADR261I? It's not in the manuals on the Web, that I can find. ADR261I (001)-DFRGD(01), UNABLE TO FURTHER CONSOLIDATE EXTENTS FOR SYS5.DATACOM.V11R0M2.SMPHOLD, 01 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: undoc'd DFDSS msg
> -Original Message- > From: IBM Mainframe Discussion List > [mailto:ibm-m...@bama.ua.edu] On Behalf Of Schumacher, Otto > Sent: Tuesday, January 26, 2010 3:27 PM > To: IBM-MAIN@bama.ua.edu > Subject: Re: undoc'd DFDSS msg > > The smphold dataset is a PS file. Are you trying to do an > IEBCOPY? If so you can't do it. > Regards > Otto > > HP Enterprise Services I was using DFDSS's CONSOLIDATE command. I guess that it runs the appropriate utility "under the covers". -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * (817)-961-6183 cell john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: RLSE pipe dream (was: The Incredible Shrinking PDSE)
On Tue, 26 Jan 2010 08:55:44 -0800, Ron Hawkins wrote: You can't blame a golf club for your slice, < Some of us don't need to hear that :) P -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: undoc'd DFDSS msg
Are you running on zOS 10. This message should be in the messages and code for DFSMS It came in with zOS 10. I think the dataset is an extended multi volume dataset. Check with you storage Admin support. Regards Otto HP Enterprise Services Infrastructure Specialist Ahold Account CICS & Capacity Technical Support P.O. Box 6462 2000 Wade Hampton Blvd. LC1-302 Greenville, South Carolina, 29606 Cell: 864 449 1755 Tel: 864 987-1417 Fax: 864 987-4500 E-mail: otto.schumac...@hp.com -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Staller, Allan Sent: Tuesday, January 26, 2010 16:01 To: IBM-MAIN@bama.ua.edu Subject: Re: undoc'd DFDSS msg Can't find it either. In z/OS library or the IBM search DB. Seems pretty self-explanatory though. Either it's already one extent, or there is no space to consolidate the extents. Guess it's PMR (or RCF) time. HTH, Anyone know where I can find ADR261I? It's not in the manuals on the Web, that I can find. ADR261I (001)-DFRGD(01), UNABLE TO FURTHER CONSOLIDATE EXTENTS FOR SYS5.DATACOM.V11R0M2.SMPHOLD, 01 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: undoc'd DFDSS msg
It isn't in the 1.10 documents I have. -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Schumacher, Otto Sent: Tuesday, January 26, 2010 3:46 PM To: IBM-MAIN@bama.ua.edu Subject: Re: undoc'd DFDSS msg Are you running on zOS 10. This message should be in the messages and code for DFSMS It came in with zOS 10. I think the dataset is an extended multi volume dataset. Check with you storage Admin support. Regards Otto -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Staller, Allan Sent: Tuesday, January 26, 2010 16:01 To: IBM-MAIN@bama.ua.edu Subject: Re: undoc'd DFDSS msg Can't find it either. In z/OS library or the IBM search DB. Seems pretty self-explanatory though. Either it's already one extent, or there is no space to consolidate the extents. Guess it's PMR (or RCF) time. HTH, Anyone know where I can find ADR261I? It's not in the manuals on the Web, that I can find. ADR261I (001)-DFRGD(01), UNABLE TO FURTHER CONSOLIDATE EXTENTS FOR SYS5.DATACOM.V11R0M2.SMPHOLD, 01 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: undoc'd DFDSS msg
> -Original Message- > From: IBM Mainframe Discussion List > [mailto:ibm-m...@bama.ua.edu] On Behalf Of Schumacher, Otto > Sent: Tuesday, January 26, 2010 3:46 PM > To: IBM-MAIN@bama.ua.edu > Subject: Re: undoc'd DFDSS msg > > Are you running on zOS 10. This message should be in the > messages and code for DFSMS It came in with zOS 10. I think > the dataset is an extended multi volume dataset. Check with > you storage Admin support. > > Regards > Otto I am storage admin support. It's not in the books. It's not in IBMLink either. But it does appear to be saying that the CONSOLIDATE failed because the file is already in a single extent. I put in a BY(EXTNT,GE,2) and eliminated the message. It just isn't documented! -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * (817)-961-6183 cell john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: 878-10 abend in IPCS
Hi Tony, That would work as long as the dump format never changed down the road. While it is pretty straight forward to do, and I have done it as a test, I don't want to get into something I have to check on each new release of z/OS. Couple that with the fact that after I find an occurrence of the string I need to do some processing using other IPCS commands, staying in the IPCS environment is the only real solution. With regards to you idea, as I said, I wrote a second exec that allocates the dump file to a DD and then uses "EXECIO * ddname (FINIS STEM DUMPDATA." and that single EXECIO statement reads the entire dump file, all 22k record, each of just over 4k, into my TSO session without running out of storage. So, that implies to me that IPCS is holding on to something for each page it attempts to access in the dump, regardless of whether or not the page was in the file. I make that statement because I have executed other EXECs against this same dump file that produce many 100's of thousands of lines of dump analysis output and none of those executions have yet run out of storage. However, those EXECs are only accessing pages that are known to belong to the application that has create the dump, that is to say, chains were chased from known starting location and very few strays outside of allocated storage occurred. The EXEC I am attempting to execute is generating addresses starting at X'' and going to X'800' in 4k (x'1000') increments. Therefore there are many more non-existent pages being attempted than there are existent pages. That, I think, is where the error in IPCS lies. I believe it is holding on to information about these non-existent pages. Maybe it's holding on to information about all pages, I don't know, I just know that I run out of storage with my simple EXEC and I haven't even started working on the rest of the analysis portion. Chuck -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Tony Harminc Sent: Tuesday, January 26, 2010 2:40 PM To: IBM-MAIN@bama.ua.edu Subject: Re: 878-10 abend in IPCS I wouldn't normally suggest this, but for such a brute-force task, might it not make sense to read the dump dataset directly and scan for your string? If the string is easy to find, i.e. doesn't need too much expression processing, then just browse it in ISPF. If the search is fancier, then you can read it either directly in REXX, or via a program in the high performing language of your choice. Of course you may get false positives (from the header data and address spaces you aren't interested in), and false negatives if your data crosses page boundaries (though you'd get that with your IPCS page-at-a-time scheme too). For that matter (shock, horror) you could do your scanning on a non z/OS platform if, as is typical, you have the dump FTP'd from somewhere else via your desktop. Tony H. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Used Sharks
SCSI Disks in a 2105-800? That never happened. The ESS used SSA disk drives, or FC-AL drives with a SSA/FC-AL bridge. And there is no way EMC, STK or HDS are going to let you plug pull apart a HDD assy and plug an FC-AL drive from an ESS into it to use as a spare. If the vendor doesn't stop you the microcode probably will. New generation subsystems being cheaper than the maint on a superseded model has been position normal for as long as I can remember. Ron > -Original Message- > From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of > z/OS scheduler > Sent: Monday, January 25, 2010 1:46 PM > To: IBM-MAIN@bama.ua.edu > Subject: Re: [IBM-MAIN] Used Sharks > > Hal, > > If I am correct, this is the model that does not have hardware encryption? > We had one and the only thing we could do was remove all the disks inside > and stack it up as spares for other machines that use scsi disk. IBM did not > even mind us removing it, the rest went into storage to be dismantled and > recycled. Very sad, but EMC are giving away SAN storage, brand new, double > the capacity, for next to nothing, it is so cheap that when one of the > warrantees goes on the EMC's we just stack them and get new faster units, > for cheaper than the maint, a total waste, absolutely scandalous, but all > the storage migrations, keeps someone in a job. > > 2010/1/25 Hal Merritt > > > Please forgive the nature of this post, but I'm not certain who I should > > ask for permission. > > > > I have a matched pair of Shark's (2105-800) with PPRC and PAV licenses > > needing a new home. Both are under IBM service and suitable for 'banding'. > > One is located in Houston, Tx and the other in Allen, Tx (just north of > > Dallas). > > > > Both are powered up and in use, but are available immediately. > > > > Offline email queries only, please. > > > > Hal Merritt > > Passport Switch Operations > > Jack Henry & Associates > > 7800 Willow Chase > > Houston, Texas 77070 > > > > NOTICE: This electronic mail message and any files transmitted with it are > > intended > > exclusively for the individual or entity to which it is addressed. The > > message, > > together with any attachment, may contain confidential and/or privileged > > information. > > Any unauthorized review, use, printing, saving, copying, disclosure or > > distribution > > is strictly prohibited. If you have received this message in error, please > > immediately advise the sender by reply email and delete all copies. > > > > -- > > For IBM-MAIN subscribe / signoff / archive access instructions, > > send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO > > Search the archives at http://bama.ua.edu/archives/ibm-main.html > > > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO > Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: 878-10 abend in IPCS
2010/1/26 Hardee, Charles H : > Without going into details, what I am attempting to do is read every > page in a dump in order to scan the page for a particular string. > > I am using a REXX (found at the end of this note) that simply starts ad > address x'' and issues an EVAL for each address with a length of > x'1000'. I wouldn't normally suggest this, but for such a brute-force task, might it not make sense to read the dump dataset directly and scan for your string? If the string is easy to find, i.e. doesn't need too much expression processing, then just browse it in ISPF. If the search is fancier, then you can read it either directly in REXX, or via a program in the high performing language of your choice. Of course you may get false positives (from the header data and address spaces you aren't interested in), and false negatives if your data crosses page boundaries (though you'd get that with your IPCS page-at-a-time scheme too). For that matter (shock, horror) you could do your scanning on a non z/OS platform if, as is typical, you have the dump FTP'd from somewhere else via your desktop. Tony H. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
undoc'd DFDSS msg
Anyone know where I can find ADR261I? It's not in the manuals on the Web, that I can find. ADR261I (001)-DFRGD(01), UNABLE TO FURTHER CONSOLIDATE EXTENTS FOR SYS5.DATACOM.V11R0M2.SMPHOLD, 01 John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * (817)-961-6183 cell john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: RLSE pipe dream (was: The Incredible Shrinking PDSE)
Gil, All your extents can be contiguous so there is no fragmentation whatsoever. You are hitting a boundary on the number of extents. You don't know, or care if those extents are fragmented. Extent = Space or degree to which a thing is extended Fragment = A small part broken off or detached. I'm not quibbling. I'm being as specific as you usually require of IBM JCL. If you called me about a fragmentation problem I'd tell you not to worry, or maybe run a DEFRAG. If you call me an extent problem I'd ask you which x37 you're hitting and how to fix your JCL or SMS. Ron > > > This seems to be a quibble about definition. In my view, a > secular growth in the number of extents, disproportionate to > the actual content of data, counts as fragmentation. > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IPCS Starttup issue
--- According to: http://publib.boulder.ibm.com/infocenter/zos/v1r9/index.jsp?topic=/com.i bm.zos.r9.ikjb700/inurp.htm error 23 indicates: " Processing unsuccessful; the IKJURPS service was invoked in an environment in which the TSO/E TMP cannot process an IKJURPS request. For example, during LOGON processing." Are you by any chance trying to start IPCS in your logon exec, before the first READY prompt has been issued? On Mon, 25 Jan 2010 20:19:36 -0600 Rick Fochtman wrote: :>Trying to start IPCS for the first time on this system and getting a :>failure in IKJURPS, RC=20, ERROR=23 :>Can someone tell me what I'm doing wrong? MSGS & CODES dscreiption is :>completely useless, as are the IPCS pubs I have. --- I'm trying to start IPCS via ISPF panels. Rick -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
How to modify the CICS DB2ENTRY resource Table
Hi. I need a CPSM COBOL piece of code to modify the content of some counters of DB2ENTRY resource table. If anyone can help me or give me some link to join a CICS forums. Thanks. Atte. Alvaro. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMS and OAM commands
Nigel, With SMS it can only issue certain commands. There is not "CMD" function that I know of is SMS. So it needs to be able to Modify OAM so it can sync things like TAPE It needs to be able to activate an SCDS or ACDS data set. You also need (as a person) the ability to issue V SMS commands if you want to change volume status (DISNEW, ENABLE) in a plex. There is also SET SMS and SETSMS functions. But I think those are people based (operator) not from the SMS address space. SMS cannot do much else. You would have to write exits I think for SMS to give it that ability. But as far as I remember, SMS is very limited in what MVS commands it can issue. This black box is controlled by IBM, so I think your RACF group should be okay with these accesses. Lizette Nigel Wolfendale wrote: > >When I enter the system command 'DISPLAY SMS,LIBRARY,DETAIL' this seems >to translate into a modify command for the OAM address space - >F OAM,D,LIB,L=ABC0021-Z. > >Similarly when I do a 'V SMS,LIB(XYZATL3),ONLINE' this translates into the >command 'F OAM,V,XYZATL3),ONLINE' > >I say translates - something else may be done as well - but my question is - >is >there documentation anywhere that describes this process, and >what 'secondary' commands are produced by which 'primary' commands ? > >The reason for the question is that the Modify commands are done under the >RACF userid of the SMS address space - and it is not currently authorised to >do these commands. You may think it is easy to authorise these commands to >SMS - but our security dept is concerned about what other commands may >appear from this 'black box'. Before allowing SMS to perform these modify >commands they want some documentation as to how / why this works. I >suspect that they are also worried about the command called 'modify' which >suggests something insidious is going on. > > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: 878-10 abend in IPCS
The EXEC is literally this simple (at the moment): Issue EVAL command for an address, length of 4k Increment address by 4k If address > x'7FFF' exit loop Loop So, why do I need to increase my storage? I'm processing 1 4k page from the dump at a time. I'm not building any type of stem variables to retain the dump data that was read. I have created a second EXEC that allocates the dump file to a DD and issues an "EXECIO *" loading the dump records into a stem. This exec works just fine with the existing TSO session's storage allocation. So, if I can read the entire file into storage using REXX, but can't process the entire file reading the dump with IPCS, What conclusion would you draw? I don't want to use this second EXEC as my dump scanner since I would then have to worry about it breaking across releases of IPCS. And, to add to that, there is more logic to come once I get the EXEC to look for a string and then do some analysis of its location in the dump. And, no, the IPCS FIND command won't work for what I am attempting to do. Chuck -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Chase, John Sent: Tuesday, January 26, 2010 12:27 PM To: IBM-MAIN@bama.ua.edu Subject: Re: 878-10 abend in IPCS > -Original Message- > From: IBM Mainframe Discussion List On Behalf Of Edward Jaffe > > Hardee, Charles H wrote: > > Has anyone ever experienced an 878-10 abend in IPCS while processing a > > dump? > > > > I used to get out-of-space conditions from both IPCS and z/XDC many > years ago before I changed my TSO/E logon "size" to: > > Size ===> 524288 You might need a corresponding increase in MAXSIZE in your TSO segment as well. -jc- -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: 878-10 abend in IPCS
> -Original Message- > From: IBM Mainframe Discussion List On Behalf Of Edward Jaffe > > Hardee, Charles H wrote: > > Has anyone ever experienced an 878-10 abend in IPCS while processing a > > dump? > > > > I used to get out-of-space conditions from both IPCS and z/XDC many > years ago before I changed my TSO/E logon "size" to: > > Size ===> 524288 You might need a corresponding increase in MAXSIZE in your TSO segment as well. -jc- -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMS and OAM commands
>The reason for the question is that the Modify commands are done under the RACF userid of the SMS address space - and it is not currently authorised to do these commands. You may think it is easy to authorise these commands to SMS - but our security dept is concerned about what other commands may appear from this 'black box'. >Before allowing SMS to perform these modify commands they want some documentation as to how / why this works. Of course, the need for documentation is important. >I suspect that they are also worried about the command called 'modify' which >suggests something insidious is going on. Ask them if this is so, rather than suspect. But, it's even more insidious if you can't manage your libraries. - Too busy driving to stop for gas! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: TLS..FTP
At the end of my RDATALIB diatribe, I post three links which are good references for using it and protecting KEYRINGs, etc. Oh, I hit $10 with Google AdSense yesterday. I am ordering the check and my life is now complete. There is nothing else that I could possibly accomplish, at this point. Scott On Tue, Jan 26, 2010 at 4:33 AM, Chase, John wrote: > > -Original Message- > > From: IBM Mainframe Discussion List On Behalf Of Ron Wells > > > > Tried that--getting following...thinking something in racf that is > > limiting who uses it .. > > init failed with rc = 428 (Key entry does not contain a private key) > > http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ICHZA780/21.5 > .2 > >-jc- > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO > Search the archives at http://bama.ua.edu/archives/ibm-main.html > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: 878-10 abend in IPCS
Hardee, Charles H wrote: Has anyone ever experienced an 878-10 abend in IPCS while processing a dump? I used to get out-of-space conditions from both IPCS and z/XDC many years ago before I changed my TSO/E logon "size" to: Size ===> 524288 -- Edward E Jaffe Phoenix Software International, Inc 831 Parkview Drive North El Segundo, CA 90245 310-338-0400 x318 edja...@phoenixsoftware.com http://www.phoenixsoftware.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: RLSE pipe dream (was: The Incredible Shrinking PDSE)
On Tue, 26 Jan 2010 08:55:44 -0800, Ron Hawkins wrote: > >The problem here is number of extents, not fragmentation. No-one gives a >toss about fragmentation on a PDS or PDS-E since the 3990-3. > This seems to be a quibble about definition. In my view, a secular growth in the number of extents, disproportionate to the actual content of data, counts as fragmentation. >> -Original Message- >> From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf >> Of >> Paul Gilmartin >> Sent: Tuesday, January 26, 2010 8:07 AM >> > >> Wouldn't it be great if there were a variant of RLSE that freed only >> entire extents, thus causing no fragmentation? Or even a PARMLIB or >> management class option to select such behavior? >> >> -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: The Incredible Shrinking PDSE
Thanks all for the great information!! We have elected to use a storage group that is not SMS managed so that the management class release does not apply. Again, thanks!! -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Hal Merritt Sent: Monday, January 25, 2010 2:30 PM To: IBM-MAIN@bama.ua.edu Subject: The Incredible Shrinking PDSE I have a C application program that creates members in a PDSe that is allocated new and empty at the beginning of the job by an IEFBR14 step. Since the program repeatedly opens and closes the PDSe, I can watch the space allocation via ISPF 3.4. To our concernation, the allocated space shrinks as the number of exents rises. No matter how much space we specify, the file shrinks and eventually the program fails with an E37-04 (no more space on volume). I'm guessing that somehow, somewhere, something is causing the effect of a space release upon every close. I am uncertian as to what to ask the programmer about his program, but I feel like that's the root of my problem. Thoughts? Thanks!! NOTICE: This electronic mail message and any files transmitted with it are intended exclusively for the individual or entity to which it is addressed. The message, together with any attachment, may contain confidential and/or privileged information. Any unauthorized review, use, printing, saving, copying, disclosure or distribution is strictly prohibited. If you have received this message in error, please immediately advise the sender by reply email and delete all copies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html NOTICE: This electronic mail message and any files transmitted with it are intended exclusively for the individual or entity to which it is addressed. The message, together with any attachment, may contain confidential and/or privileged information. Any unauthorized review, use, printing, saving, copying, disclosure or distribution is strictly prohibited. If you have received this message in error, please immediately advise the sender by reply email and delete all copies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: TSO Exit IKJEFLD3 & IEFPRMLB Service
Andrew,
Instead of coding the exit, how about this:
In a shop I once worked for a few years ago, I used to put saved TSO Logon
Messages into the BRODCAST dataset to indicate the system you logged on to,
e.g., (now this is an old example ...)
se 'z/OS 11 44 ',save
se '111 4 4 ',save
se ' 114 4 ',save
se ' 11 :: 44 ',save
se ' 11 :: 4 ',save
se 'Welcome to the z/OS v1.4 Production system on CPU1 ',save
se '*',save
To put the messages into BRODCAST, the above commands were executed as
subcommands under OPER within a simple Clist. This needed to be run once on
every LPAR whenever the text needed to change. My Test LPAR had a different
set of messages.
Or perhaps you can use a common Clist or REXX Exec which is executed from
the PARM='...' parameter of every Logon proc. Inside this Exec, you can use
system symbols and other variables to determine the system / LPAR this is
running on and write an appropriate bunch of logon messages. For example:
sysproc = sysvar('sysproc')
sysid = mvsvar('sysname')
say " |\/\/\/|"
say " | |"
say " |_ |"
say " | (o)(o)"
say " C _) "
say " | ,___|" sysid "at your service."
say " | / " "You are logged on using proc " sysproc
say " /\ "
say "/ \ "
Regards,
Ulrich Krueger
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: RLSE pipe dream (was: The Incredible Shrinking PDSE)
- Original Message - From: "Paul Gilmartin" Newsgroups: bit.listserv.ibm-main Sent: Tuesday, January 26, 2010 11:08 AM Subject: RLSE pipe dream (was: The Incredible Shrinking PDSE) On Mon, 25 Jan 2010 14:30:27 -0600, Hal Merritt wrote: Since the program repeatedly opens and closes the PDSe, I can watch the space allocation via ISPF 3.4. To our concernation, the allocated space shrinks as the number of exents rises. No matter how much space we specify, the file shrinks and eventually the program fails with an E37-04 (no more space on volume). I'm guessing that somehow, somewhere, something is causing the effect of a space release upon every close. I am uncertian as to what to ask the programmer about his program, but I feel like that's the root of my problem. Wouldn't it be great if there were a variant of RLSE that freed only entire extents, thus causing no fragmentation? Or even a PARMLIB or management class option to select such behavior? -- gil FIXPDS RELEXT. File 182 on your cbttape dial www.cbttape.org. Regards, Tom Conley -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: RLSE pipe dream (was: The Incredible Shrinking PDSE)
Gil, The problem here is number of extents, not fragmentation. No-one gives a toss about fragmentation on a PDS or PDS-E since the 3990-3. I've used Space Release in the Management Class of several sites, and apart from the SAS Dataset problem I cited in another post I've never had a problem with it. This includes using it with extended format VSAM. I really think Space Release is not a problem, it is how it is implemented. It can be done at close, it can be done by DFSMShsm, it can be done in ISPF 3.4, or it can be done with SAS's PROC RELEASE. You can't blame a golf club for your slice, and likewise you can't blame the feature for its improper use (like YES-IMMED for DSORG=PO). BTW SAS PROC RELEASE has support for releasing unused secondary extents. Ron > -Original Message- > From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of > Paul Gilmartin > Sent: Tuesday, January 26, 2010 8:07 AM > To: IBM-MAIN@bama.ua.edu > Subject: [IBM-MAIN] RLSE pipe dream (was: The Incredible Shrinking PDSE) > > On Mon, 25 Jan 2010 14:30:27 -0600, Hal Merritt wrote: > > > >Since the program repeatedly opens and closes the PDSe, I can watch the space > allocation via ISPF 3.4. To our concernation, the allocated space shrinks as > the number of exents rises. No matter how much space we specify, the file > shrinks and eventually the program fails with an E37-04 (no more space on > volume). > > > >I'm guessing that somehow, somewhere, something is causing the effect of a > space release upon every close. I am uncertian as to what to ask the > programmer about his program, but I feel like that's the root of my problem. > > > Wouldn't it be great if there were a variant of RLSE that freed only > entire extents, thus causing no fragmentation? Or even a PARMLIB or > management class option to select such behavior? > > -- gil > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO > Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: PAGE datasets -- few large or more small
Ron, Thanks. It will take me some time to digest that. Don -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Ron Hawkins Sent: Tuesday, January 26, 2010 4:13 AM To: IBM-MAIN@bama.ua.edu Subject: Re: PAGE datasets -- few large or more small Sorry, I missed some decimal points. Should be: CMR time is staying constant at 0.1ms, which indicates delays at the Host End. At 95% Channel MP busy I'm averaging 45-50 OE and PEND time has jumped to 45ms, with CMR at 0.1-0.2ms. > growing to 3-5ms. CMR time is staying constant at 1ms, which indicates > delays at the Host End. > > At >95% Channel MP busy I'm averaging 45-50 OE and PEND time has jumped to > 45ms, with CMR at 1-2ms. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Re : Extracting STDOUT data from USS
Peter / Gil .. thank you for your advice. Kind Regards, Jim Thomas 617-233-4130 (mobile) 636-294-1014 (res) j...@thethomasresidence.us -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Paul Gilmartin Sent: Tuesday, January 26, 2010 9:33 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Re : Extracting STDOUT data from USS On Tue, 26 Jan 2010 13:15:45 +0100, Hunkeler Peter (KIUP 4) wrote: >> I'm looking for some direction and advice on dynamically extracting >> STDOUT data from USS that I can feed into a CICS sub-system. Would a >> writer /> listener be the right direction ?. How would I extract the >>STDOUT data ?. > >Create a named pipe and have the writer send its stdout to that pipe. >In CICS run a process to read form that named pipe. Prerequisite to >this design is that both ends must be active simultaneuosly. > Good answer; seems to meet the OP's requirement. (But I don't know CICS; I seem to remember discussions about problems using Unix System Services in CICS.) If the OP actually wants to write to spool, and is not necessarily running under BPXBATCH, he can do: Some-command | Rexx-EXEC where Rexx-EXEC (actually any language) allocates SYSUT1 to /dev/fd/0 and SYSUT2 to SYSOUT, then LINKMVS IEBGENER. For writing to a catalogued data set, it's easier: Some-command | cp /dev/fd/0 "//'DATA.SET.NAME'" -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html No virus found in this incoming message. Checked by AVG - www.avg.com Version: 8.5.432 / Virus Database: 271.1.1/2638 - Release Date: 01/26/10 07:46:00 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
RLSE pipe dream (was: The Incredible Shrinking PDSE)
On Mon, 25 Jan 2010 14:30:27 -0600, Hal Merritt wrote: > >Since the program repeatedly opens and closes the PDSe, I can watch the space >allocation via ISPF 3.4. To our concernation, the allocated space shrinks as >the number of exents rises. No matter how much space we specify, the file >shrinks and eventually the program fails with an E37-04 (no more space on >volume). > >I'm guessing that somehow, somewhere, something is causing the effect of a >space release upon every close. I am uncertian as to what to ask the >programmer about his program, but I feel like that's the root of my problem. > Wouldn't it be great if there were a variant of RLSE that freed only entire extents, thus causing no fragmentation? Or even a PARMLIB or management class option to select such behavior? -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: The Incredible Shrinking PDSE
Now, how do I override that? Is there a JCL parameter? As other have said, use a different MgmtClas (MC) is you can or make the PDSe nonSMS and piss off everyone. Lots of time you can't allocate with a different MC but you can ALTER the DSN after it's allocated. Jack Kelly 202-502-2390 (Office) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Re : Extracting STDOUT data from USS
On Tue, 26 Jan 2010 13:15:45 +0100, Hunkeler Peter (KIUP 4) wrote: >> I'm looking for some direction and advice on dynamically extracting >> STDOUT data from USS that I can feed into a CICS sub-system. Would a >> writer /> listener be the right direction ?. How would I extract the >>STDOUT data ?. > >Create a named pipe and have the writer send its stdout to that pipe. >In CICS run a process to read form that named pipe. Prerequisite to >this design is that both ends must be active simultaneuosly. > Good answer; seems to meet the OP's requirement. (But I don't know CICS; I seem to remember discussions about problems using Unix System Services in CICS.) If the OP actually wants to write to spool, and is not necessarily running under BPXBATCH, he can do: Some-command | Rexx-EXEC where Rexx-EXEC (actually any language) allocates SYSUT1 to /dev/fd/0 and SYSUT2 to SYSOUT, then LINKMVS IEBGENER. For writing to a catalogued data set, it's easier: Some-command | cp /dev/fd/0 "//'DATA.SET.NAME'" -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: TSO Exit IKJEFLD3 & IEFPRMLB Service
I know you mentioned that you were reluctant to change the logon procs, but if you have a CLIST or REXX front-end, you could change that to invoke another CLIST or REXX exec to detect the production system, issue the necessary message(s), prompt for acknowledgment, and take action as needed. Keep in mind also that users can be 'clever'. If using a 3270 emulator that allows scripting, they can/will set it up to automatically answer the prompt, essentially defeating the purpose. You may be able to get around this by generating a random string to be used for the reply. - Don Imbriale On Tue, Jan 26, 2010 at 7:50 AM, Andrew Metcalfe < andrew.metca...@barclays.com> wrote: > Rob > > For reasons I won't go into, my management have decreed that there must be > a > positive acknowledgement by the user that they are on a production system. > I loop in the exit until I get one. Unfortunately using the broadcast > facility doesn't give me this > > > Andrew Metcalfe > Global z/OS Systems Programming Team > Barclays Bank Plc > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Enormous redbook
-Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Marian Gasparovic Sent: Monday, January 25, 2010 2:37 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Enormous redbook Steve, FrameMaker is used and it generates a book using macros and stuff, so just save as is not an option. I assume it is so big because of pictures, they tend to increase the size a lot. Look at it from the better side - for the same money you get more megabytes/mebibytes :) BTW, I hope size is the only thing you complain about, not the contents of the book. Marian Gasparovic IBM Slovakia In my opinion, FrameMaker causes problems for cut and paste. At least it does in manuals that I have to review. Regards, Steve Thompson -- Opinions expressed by this poster may not reflect those held by poster's employer -- -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
SMS and OAM commands
When I enter the system command 'DISPLAY SMS,LIBRARY,DETAIL' this seems to translate into a modify command for the OAM address space - F OAM,D,LIB,L=ABC0021-Z. Similarly when I do a 'V SMS,LIB(XYZATL3),ONLINE' this translates into the command 'F OAM,V,XYZATL3),ONLINE' I say translates - something else may be done as well - but my question is - is there documentation anywhere that describes this process, and what 'secondary' commands are produced by which 'primary' commands ? The reason for the question is that the Modify commands are done under the RACF userid of the SMS address space - and it is not currently authorised to do these commands. You may think it is easy to authorise these commands to SMS - but our security dept is concerned about what other commands may appear from this 'black box'. Before allowing SMS to perform these modify commands they want some documentation as to how / why this works. I suspect that they are also worried about the command called 'modify' which suggests something insidious is going on. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
878-10 abend in IPCS
Hello Group,
Has anyone ever experienced an 878-10 abend in IPCS while processing a
dump?
Without going into details, what I am attempting to do is read every
page in a dump in order to scan the page for a particular string.
I am using a REXX (found at the end of this note) that simply starts ad
address x'' and issues an EVAL for each address with a length of
x'1000'.
The REXX then increments the address by x'1000' and issues the EVAL
again with the new address and length.
Every 100 EVALs I issue a message to indicate, more or less, how far
along I am in the dump. The last message was:
EVALs issued: 177800, records returned: 30317
The REXX is coded to stop when the address is greater than x'7FFF'.
After the first time, I added a DROP for the target variable into which
I am telling IPCS to place the dump data and that made no change so, it
appears that IPCS is reading the dump file and, for whatever reason, is
holding on to the records as they are being read.
Originally I was executing the REXX using interactive TSO, but the above
numbers are from running TSO/Batch and executing IPCS there.
Seems like a bug in IPCS to me, but, who am I to say?
Thanks for any insight you may have.
Chuck
/* rexx */
parse arg options
address ipcs
numeric digits 25
fromaddr = ""
readlength = "1000"
say "starting"
recsread = 0
evalrqsts = 0
do forever
drop dumpdata
"eval "fromaddr" len(x'"readlength"') rexx(unformatted
sto(dumpdata))"
evrc = rc
if evrc = 0 then do
recsread = recsread + 1
end
evalrqsts = evalrqsts + 1
"note 'address:" fromaddr " return code:" evrc "data length:",
length(dumpdata)"' asis"
if evalrqsts > 0 then do
if evalrqsts // 100 = 0 then
"note 'EVALs issued:" evalrqsts", records returned:" recsread"'
asis"
end
fromaddr = d2x(x2d(fromaddr)+x2d(readlength),8)
if x2d(fromaddr) > x2d("7FFF") then leave
end
say "ended"
exit
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IPCS Starttup issue
According to: http://publib.boulder.ibm.com/infocenter/zos/v1r9/index.jsp?topic=/com.i bm.zos.r9.ikjb700/inurp.htm error 23 indicates: " Processing unsuccessful; the IKJURPS service was invoked in an environment in which the TSO/E TMP cannot process an IKJURPS request. For example, during LOGON processing." Are you by any chance trying to start IPCS in your logon exec, before the first READY prompt has been issued? On Mon, 25 Jan 2010 20:19:36 -0600 Rick Fochtman wrote: :>Trying to start IPCS for the first time on this system and getting a :>failure in IKJURPS, RC=20, ERROR=23 :>Can someone tell me what I'm doing wrong? MSGS & CODES dscreiption is :>completely useless, as are the IPCS pubs I have. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: 2010 IBM System z Technical Conferences, zExpo, Technical University
>Yes, Barbara, unfortunately that is the one. Well, it was worth a try. :-) >And Mike Cowlishaw was to give a presentation but unfortunately couldn't because they found a bomb (from WW2) next to the conference center. :-( I know. I've been there! The presentation I attended in that time slot was repeated a day later 'after hours'. Your's apparently not. Regards, Barbara -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: TSO Exit IKJEFLD3 & IEFPRMLB Service
Andrew My preference in this case would be to keep the actual exit code as simple as possible and offload the "smarts" into some other started task. I would suggest having some sort of owner STC that starts before TSO and build a system-level name token (or SSI anchor or ENQ or... etc etc) that your exit can lookup and get the address of the E-CSA (or whereever) resident message text that you want. Maybe the owner STC can refresh the message text in response to an operator MODIFY command. Rob Scott Developer Rocket Software 275 Grove Street * Newton, MA 02466-2272 * USA Tel: +1.617.614.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Andrew Metcalfe Sent: 26 January 2010 12:50 To: IBM-MAIN@bama.ua.edu Subject: Re: TSO Exit IKJEFLD3 & IEFPRMLB Service Rob For reasons I won't go into, my management have decreed that there must be a positive acknowledgement by the user that they are on a production system. I loop in the exit until I get one. Unfortunately using the broadcast facility doesn't give me this Andrew Metcalfe Global z/OS Systems Programming Team Barclays Bank Plc This e-mail and any attachments are confidential and intended solely for the addressee and may also be privileged or exempt from disclosure under applicable law. If you are not the addressee, or have received this e-mail in error, please notify the sender immediately, delete it from your system and do not copy, disclose or otherwise act upon any part of this e-mail or its attachments. Internet communications are not guaranteed to be secure or virus-free. The Barclays Group does not accept responsibility for any loss arising from unauthorised access to, or interference with, any Internet communications by any third party, or from the transmission of any viruses. Replies to this e-mail may be monitored by the Barclays Group for operational or business reasons. Any opinion or other information in this e-mail or its attachments that does not relate to the business of the Barclays Group is personal to the sender and is not given or endorsed by the Barclays Group. Barclays Bank PLC.Registered in England and Wales (registered no. 1026167). Registered Office: 1 Churchill Place, London, E14 5HP, United Kingdom. Barclays Bank PLC is authorised and regulated by the Financial Services Authority. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: 2010 IBM System z Technical Conferences, zExpo, Technical University
Yes, Barbara, unfortunately that is the one. There are some nice topics, but very few apply to my job, and not enough to justify a whole week. Some look nice. For example the technical conference in Dresdey a couple of years ago there was a presentation on the port of OpenSolaris. That was one of the best. Then some other things of interest. And Mike Cowlishaw was to give a presentation but unfortunately couldn't because they found a bomb (from WW2) next to the conference center. :-( Lindy From: IBM Mainframe Discussion List [ibm-m...@bama.ua.edu] On Behalf Of Barbara Nitz [nitz-...@gmx.net] Sent: 26 January 2010 14:43 To: IBM-MAIN@bama.ua.edu Subject: Re: 2010 IBM System z Technical Conferences, zExpo, Technical University Lindy, >I was so looking forward to going this year, too. But after reading the topics there is nothing for me. you didn't by chance check the wrong conference, did you? 'Nothing there for me' applies (for me) to the former EXPO - now Technical University. The 'real' zConf (this link http://www- 304.ibm.com/jct03001c/services/learning/ites.wss/zz/en? pageType=page&c=T156786F45994W11 - watch the wrap) sounds interesting to me and similar to what the zConf in Dresden had on the agenda. Regards, Barbara -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: The Incredible Shrinking PDSE
>Good answer :-) > >Now, how do I override that? Is there a JCL parameter? I used release immediate on a management class *once* and quickly changed it. Your storage admin may have coded the acs routine to accept a management class value passed in via jcl but not likely. You can use idcams alter to change the management class to get around it quickly but you will need to work with your storage admin to remove the immediate release from the management class or assign a different management class to your PDSE. Re-allocating the PDSE without either change will get you back to where you are. Regards, John -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: TSO Exit IKJEFLD3 & IEFPRMLB Service
Rob For reasons I won't go into, my management have decreed that there must be a positive acknowledgement by the user that they are on a production system. I loop in the exit until I get one. Unfortunately using the broadcast facility doesn't give me this Andrew Metcalfe Global z/OS Systems Programming Team Barclays Bank Plc This e-mail and any attachments are confidential and intended solely for the addressee and may also be privileged or exempt from disclosure under applicable law. If you are not the addressee, or have received this e-mail in error, please notify the sender immediately, delete it from your system and do not copy, disclose or otherwise act upon any part of this e-mail or its attachments. Internet communications are not guaranteed to be secure or virus-free. The Barclays Group does not accept responsibility for any loss arising from unauthorised access to, or interference with, any Internet communications by any third party, or from the transmission of any viruses. Replies to this e-mail may be monitored by the Barclays Group for operational or business reasons. Any opinion or other information in this e-mail or its attachments that does not relate to the business of the Barclays Group is personal to the sender and is not given or endorsed by the Barclays Group. Barclays Bank PLC.Registered in England and Wales (registered no. 1026167). Registered Office: 1 Churchill Place, London, E14 5HP, United Kingdom. Barclays Bank PLC is authorised and regulated by the Financial Services Authority. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: The Incredible Shrinking PDSE
> -Original Message- > From: IBM Mainframe Discussion List On Behalf Of Paul Gilmartin > > On Mon, 25 Jan 2010 16:43:59 -0800, Ron Hawkins wrote: > > > >If your Storage Admin has PDS and/or PDS-E in a Management Class with > >Partial Release =YES_IMMED then make sure you beat him/her around the head a > >few times with a baseball bat. > > > >What a stupid thing to do. > > > Could this be realated to PK64372? Or is it even stupider? ??? APAR Identifier .. PK64372 Last Changed 10/01/11 NEW FUNCTION Symptom .. IN INCORROUT Status ... OPEN Severity ... 4 Date Closed . Component .. 568819805 Duplicate of Reported Release . 730 Fixed Release Component Name LE C LIBRARY Special Notice Current Target Date ..10/03/26 Flags SCP ... Platform Status Detail: REVIEW - APAR solution is being reviewed. PE PTF List: PTF List: Parent APAR: Child APAR list: ERROR DESCRIPTION: NEW FUNCTION LOCAL FIX: Or is the absence of any information the point? -jc- -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: 2010 IBM System z Technical Conferences, zExpo, Technical University
Lindy, >I was so looking forward to going this year, too. But after reading the >topics there is nothing for me. you didn't by chance check the wrong conference, did you? 'Nothing there for me' applies (for me) to the former EXPO - now Technical University. The 'real' zConf (this link http://www- 304.ibm.com/jct03001c/services/learning/ites.wss/zz/en? pageType=page&c=T156786F45994W11 - watch the wrap) sounds interesting to me and similar to what the zConf in Dresden had on the agenda. Regards, Barbara -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: TLS..FTP
> -Original Message- > From: IBM Mainframe Discussion List On Behalf Of Ron Wells > > Tried that--getting following...thinking something in racf that is > limiting who uses it .. > init failed with rc = 428 (Key entry does not contain a private key) http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ICHZA780/21.5 .2 -jc- -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: 2010 IBM System z Technical Conferences, zExpo, Technical University
I was so looking forward to going this year, too. But after reading the topics there is nothing for me. From: IBM Mainframe Discussion List [ibm-m...@bama.ua.edu] On Behalf Of Barbara Nitz [nitz-...@gmx.net] Sent: 26 January 2010 08:52 To: IBM-MAIN@bama.ua.edu Subject: Re: 2010 IBM System z Technical Conferences, zExpo, Technical University Thanks Pam, for mentioning the conferences. It sounds like *both* zEXPO and the zConf (Technical Conference) are now called 'Technical University', which makes it hard to distinguish. In my experience, the zConf really was technically oriented, with lots of technical presentations, while zEXPO was more geared towards management. Now, let's see if the cut education budgets allow me to go to the zConf! Regards, Barbara Nitz -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Re : Extracting STDOUT data from USS
> I'm looking for some direction and advice on dynamically extracting > STDOUT data from USS that I can feed into a CICS sub-system. Would a > writer /> listener be the right direction ?. How would I extract the >STDOUT data ?. Create a named pipe and have the writer send its stdout to that pipe. In CICS run a process to read form that named pipe. Prerequisite to this design is that both ends must be active simultaneuosly. -- Peter Hunkeler Credit Suisse -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: TSO Exit IKJEFLD3 & IEFPRMLB Service
Andrew Does the broadcast dataset function in TSO not help? Rob Scott Developer Rocket Software 275 Grove Street * Newton, MA 02466-2272 * USA Tel: +1.617.614.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Andrew Metcalfe Sent: 26 January 2010 11:43 To: IBM-MAIN@bama.ua.edu Subject: Re: TSO Exit IKJEFLD3 & IEFPRMLB Service Thanks for the replies - they confirmed my suspicions. All I am trying to accomplish in IKJEFLD3 is to display a message (via TPUT) to warn that the user has logged on to a production system rather than development. Rather than hard-code the text of the message in the exit, I proposed to keep it in a Parmlib member to make changes more dynamic. As we have a number (not small) of logon procedures, I considered the logon exit as a guaranteed point where all users would get the message as opposed to changing all the logon procs. Andrew Metcalfe Global z/OS Systems Programming Team Barclays Bank Plc -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Keith E. Moe Sent: 26 January 2010 03:53 To: IBM-MAIN@bama.ua.edu Subject: TSO Exit IKJEFLD3 & IEFPRMLB Service >IEF431E ZERO QMPA POINTER FOUND. SWA MANAGER REASON CODE=3C > >The explanation of RC=3C states: > >While attempting to process an assign request, the SWA manager >encountered a zero value as the pointer to the QMPA. The most likely >cause of this error condition is that a task running under the master >subsystem (SUB=MSTR) attempted a dynamic allocation in its own address >space, but that address space is not yet totally established. > >I believe that my parameter list is ok and I cannot see any >restrictions documented in either IKJEFLD3 or IEFPRMLB manuals. >However, the fact that this is a logon exit sits will with the fact >that the address space is not fully established (?). > >Has anyone else come across this problem? > You cannot perform Dynamic Allocation in the LOGON Exits. This is because you are running with the Master's TIOT, but not in the Master Address Space. The Logical PARMLIB should already be allocated in the Master's TIOT, so I don't see any reason why you just can use it as is. In order to get something allocated in the Master's TIOT, my LOGON Pre-Prompt Exit initialization program schedules an SRB into the Master Address Space. This SRB then schedules an IRB. This IRB performs the dynamic allocation. This allocation remained until doing it again to unallocate it and allocate a different one. I didn't do this from the Exit itself, as normally the allocations remains unless needed to be changed, but it should be possible to do the same thing from any authorized program. Keith E. Moe Laid Back Software, Inc. http://www.laidbacksoftware.com ke...@laidbacksoftware.com (408) 749-0655 (voice and FAX) (408) 480-2067 (cell) "We take our clients seriously, not ourselves." -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html This e-mail and any attachments are confidential and intended solely for the addressee and may also be privileged or exempt from disclosure under applicable law. If you are not the addressee, or have received this e-mail in error, please notify the sender immediately, delete it from your system and do not copy, disclose or otherwise act upon any part of this e-mail or its attachments. Internet communications are not guaranteed to be secure or virus-free. The Barclays Group does not accept responsibility for any loss arising from unauthorised access to, or interference with, any Internet communications by any third party, or from the transmission of any viruses. Replies to this e-mail may be monitored by the Barclays Group for operational or business reasons. Any opinion or other information in this e-mail or its attachments that does not relate to the business of the Barclays Group is personal to the sender and is not given or endorsed by the Barclays Group. Barclays Bank PLC.Registered in England and Wales (registered no. 1026167). Registered Office: 1 Churchill Place, London, E14 5HP, United Kingdom. Barclays Bank PLC is authorised and regulated by the Financial Services Authority. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Sea
Re: TSO Exit IKJEFLD3 & IEFPRMLB Service
Thanks for the replies - they confirmed my suspicions. All I am trying to accomplish in IKJEFLD3 is to display a message (via TPUT) to warn that the user has logged on to a production system rather than development. Rather than hard-code the text of the message in the exit, I proposed to keep it in a Parmlib member to make changes more dynamic. As we have a number (not small) of logon procedures, I considered the logon exit as a guaranteed point where all users would get the message as opposed to changing all the logon procs. Andrew Metcalfe Global z/OS Systems Programming Team Barclays Bank Plc -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Keith E. Moe Sent: 26 January 2010 03:53 To: IBM-MAIN@bama.ua.edu Subject: TSO Exit IKJEFLD3 & IEFPRMLB Service >IEF431E ZERO QMPA POINTER FOUND. SWA MANAGER REASON CODE=3C > >The explanation of RC=3C states: > >While attempting to process an assign request, the SWA manager >encountered a zero value as the pointer to the QMPA. The most >likely cause of this error condition is that a task running >under the master subsystem (SUB=MSTR) attempted a dynamic >allocation in its own address space, but that address space is >not yet totally established. > >I believe that my parameter list is ok and I cannot see any restrictions >documented in either IKJEFLD3 or IEFPRMLB manuals. However, the fact that >this is a logon exit sits will with the fact that the address space is not >fully established (?). > >Has anyone else come across this problem? > You cannot perform Dynamic Allocation in the LOGON Exits. This is because you are running with the Master's TIOT, but not in the Master Address Space. The Logical PARMLIB should already be allocated in the Master's TIOT, so I don't see any reason why you just can use it as is. In order to get something allocated in the Master's TIOT, my LOGON Pre-Prompt Exit initialization program schedules an SRB into the Master Address Space. This SRB then schedules an IRB. This IRB performs the dynamic allocation. This allocation remained until doing it again to unallocate it and allocate a different one. I didn't do this from the Exit itself, as normally the allocations remains unless needed to be changed, but it should be possible to do the same thing from any authorized program. Keith E. Moe Laid Back Software, Inc. http://www.laidbacksoftware.com ke...@laidbacksoftware.com (408) 749-0655 (voice and FAX) (408) 480-2067 (cell) "We take our clients seriously, not ourselves." -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html This e-mail and any attachments are confidential and intended solely for the addressee and may also be privileged or exempt from disclosure under applicable law. If you are not the addressee, or have received this e-mail in error, please notify the sender immediately, delete it from your system and do not copy, disclose or otherwise act upon any part of this e-mail or its attachments. Internet communications are not guaranteed to be secure or virus-free. The Barclays Group does not accept responsibility for any loss arising from unauthorised access to, or interference with, any Internet communications by any third party, or from the transmission of any viruses. Replies to this e-mail may be monitored by the Barclays Group for operational or business reasons. Any opinion or other information in this e-mail or its attachments that does not relate to the business of the Barclays Group is personal to the sender and is not given or endorsed by the Barclays Group. Barclays Bank PLC.Registered in England and Wales (registered no. 1026167). Registered Office: 1 Churchill Place, London, E14 5HP, United Kingdom. Barclays Bank PLC is authorised and regulated by the Financial Services Authority. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Re : Extracting STDOUT data from USS
> I'm looking for some direction > From > I'm looking for some direction and advice on dynamically extracting STDOUT > data from USS that I can feed into a CICS sub-system. Would a writer / > listener be the right direction ?. How would I extract the STDOUT data ?. > Could BPXWDYN be used ?. Maybe I am misundertanding you, but IIRC STDOUT can be written to datasets ever since z/OS 1.5. Why would you want to write it to the spool first ? Which z/OS level are you at ? Walter Marguccio z/OS Systems Programmer BELENUS LOB Informatic GmbH Munich - Germany -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: z/OS SSHD Configuration Issue
On Mon, 25 Jan 2010 05:17:01 -0800, Anson Ye wrote: >Yes, the client is running as root > >I have no idea why the root ID needs extra setup efforts. Could you give me some clue? Thanks! No, sorry, I don't know the details. It has to do with security on the other end. That's all I seem to remember. Jantje. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re : Extracting STDOUT data from USS
Top of the morning to everybody, I'm looking for some direction and advice on dynamically extracting STDOUT data from USS that I can feed into a CICS sub-system. Would a writer / listener be the right direction ?. How would I extract the STDOUT data ?. Could BPXWDYN be used ?. I'd prefer to have each record (as it were) be sent to my subsystem as it's written (or immediately thereafter). Any thoughts and or advice would be greatly appreciated. Kind Regards, Jim Thomas 617-233-4130 (mobile) 636-294-1014 (res) j...@thethomasresidence.us -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Receive e-mails on z/OS
> I haven't tried this, but theore > From: > I haven't tried this, but theoretically you should be able to run > sendmail and a custom Perl script as a local delivery agent to > accomplish this function. It looks like the requirements for this specific case are quite trivial. E-mails sent to z/OS do *not* contain any attachment, the needed info are contained in the body of the message. Considering the above, I will keep going with SMTP and TSO RECEIVE. However, since other batch jobs for other customers are fed by e-mail attachments, I'll sooner or later investigate other options to accomplish this. Many thanks to all who answered and posted suggesstions. Walter Marguccio z/OS Systems Programmer BELENUS LOB Informatic GmbH Munich - Germany -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: PAGE datasets -- few large or more small
Sorry, I missed some decimal points. Should be: CMR time is staying constant at 0.1ms, which indicates delays at the Host End. At 95% Channel MP busy I'm averaging 45-50 OE and PEND time has jumped to 45ms, with CMR at 0.1-0.2ms. > growing to 3-5ms. CMR time is staying constant at 1ms, which indicates > delays at the Host End. > > At >95% Channel MP busy I'm averaging 45-50 OE and PEND time has jumped to > 45ms, with CMR at 1-2ms. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: PAGE datasets -- few large or more small
Don, My two cents > > I do not know what are the potential performance limiting factors are for > the following: > 1. The FICON cable/protocol [Ron Hawkins] The Microprocessors on the Host and on the storage are the first limiting factor. Saturating these usually leads to connect time and/or Pend time increase depending on how and when the vendor responds to channel commands. Next is blocks sizes - still the bane of serial channels the cost of processing start subchannel commands is still far greater than the transfer time of unchained IO less than 4KB. Finally I'd say Open Exchanges, especially when many channels are fanned into a single FICON card. For example when you have 4 or more CEC running their own channels into a switch and fanned into a single port. That's sixteen channels into four ports capable of 64 OE each - a potential total of 1024 OE into a single card. > 2. The IBM's processor channel card [Ron Hawkins] In the past Cathy Cronin has recommended keeping Channel and Bus MP Busy below 50%. I'm not going to argue with her. In single channel tests on z9 and USP-V the Host Channel MP saturates before the Storage, so I'm able to measure the affects of a single saturated volume. This was a 4kb read/write workload spread across 1024 volumes with some volumes having skewed IO and a variety of read cache misses (avg 74%). >From around 70% Host Channel MP busy I see OE hitting 40-45 and pend time growing to 3-5ms. CMR time is staying constant at 1ms, which indicates delays at the Host End. At >95% Channel MP busy I'm averaging 45-50 OE and PEND time has jumped to 45ms, with CMR at 1-2ms. At this point the SAP assigned to that channel had also jumped to 96% busy with almost no other IO activity running on the CEC. That's a very nasty response time 12K IOPS using 4KB Blocks. To give some idea of how response time responded to Channel MP Busy: IOPSCHAN% AVGRSPMS 1K 9% 1.796 3K 27% 1.671 6K 51% 1.853 9K 72% 2.880 12042 91% 6.686 12100 96% 47.77 So for this workload we see response time has jumped by 1ms going from 27% to 51% channel busy, and things get worse from there. It suggests that Cathy Cronin's recommendation is spot on. And if you are trying to get that last 10% of activity out of your channels, you may want to think again. The interaction of Channel usage, retries, IOP % Busy and OE certainly needs some research, but doing this on a z9 is not timely. Suffice to say that keeping FICON channels away from 90% peak, and 50% in a 15 minute interval should keep you out of trouble. NB These are all one minute intervals. It may be worth checking to see if larger 15 minute intervals are masking this sort of high pend time due to high activity on the Host Channel MP. > 3. The IBM's storage channel cards [Ron Hawkins] I am not familiar with the DS8700 yet, but for the DS8300 the channel card had a single 1GHz MP shared by all four channels. IBM recommended using only two ports at 2Gb or one port at 4Gb with this card, and I believe it had to do with the throughput of this MP as observed in the performance numbers they published comparing 2Gb and 4Gb HCA back in 2007. > 4. Any switches along the path [Ron Hawkins] I've never tried to saturate the backplane of a switch to see how Host and Storage respond. I've found switches to be transparent to response time and through put on FICON. The only serious performance problem I've heard of was one switch vendor that negotiated eight buffer credits with the Host so that IO on the channel was limited to just one or two OE. Ron -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Deactivating an EMCS Console
Hi Magen,
The SDSF EMCS console should be deactivated on exit.
But if you change the SDSF console name before accessing ULOG you would
never get the problem.
I use this code, before entering ISPF:-
/*==REXX===
==*/
parse source . . cmd . clib .
/**
***/
/* Ensure ISPF dialog manangement services are available */
/**
***/
If 'SYSVAR'("SYSISPF") = "NOT ACTIVE" Then Do
"ISPSTART CMD(%" || cmd || ") NEWAPPL(ISF)"
End
Else Do
address "ISPEXEC"
"VGET ZAPPLID SHARED"
If Strip(zapplid) ¬= "ISF" then do
If clib ¬= "?" Then Do
"SELECT CMD(EX '"clib"("cmd")') NEWAPPL(ISF) PASSLIB"
End
Else Do
"SELECT CMD(%"cmd") NEWAPPL(ISF) PASSLIB"
End
End
Else Do
Address TSO
system_type = Left('MVSVAR'("SYMDEF ","SYSNAME "),2)
sysclone_name = Strip(Left('MVSVAR'("SYMDEF ","SYSCLONE "),2))
console_name_suffix = Right("@" || sysclone_name,8-Length(Userid()))
console_name = Left(Strip(Userid()) || Strip(console_name_suffix),8)
Address ISPEXEC
isfcons = console_name || "N"
isfownr = Strip(Userid())
isfsysid = Strip('MVSVAR'("SYSNAME"))
isfdest1 = ""
isfdest2 = ""
isfdest3 = ""
isfdest4 = ""
isfprefx = "*"
isfdispv = "ON"
"VPUT (ISFCONS ISFDEST1 ISFDEST2 ISFDEST3 ISFDEST4" ,
"ISFPREFX ISFDISPV ISFOWNR ISFSYSID) PROFILE"
End
End
Return 4 /* to bypass ISPF termination panel */
/*=
==*/
On Mon, 25 Jan 2010 14:40:54 -0600, Magen Margalit
wrote:
>That won't work.
>Changing the console id via SDSF
>will not release the EMCS.
>
>However using the suggested IEARELEC solves the problem.
>
>Thanks.
>
>Magen
>
>--
Regards
Bruce Hewson
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IPCS Starttup issue
On Mon, 25 Jan 2010 20:19:36 -0600 Rick Fochtman wrote: :>Trying to start IPCS for the first time on this system and getting a :>failure in IKJURPS, RC=20, ERROR=23 :>Can someone tell me what I'm doing wrong? MSGS & CODES dscreiption is :>completely useless, as are the IPCS pubs I have. I vaguely recall it has something to do with IPCS being in IKJTSO** -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
