The use of AMASPZAP is restricted.  No can do.  Thanks for the suggestion.


From: "McKown, John" <[email protected]>
To: [email protected]
Sent: Tuesday, July 26, 2011 1:58:53 PM
Subject: Re: CORRUPT PDS - I/O ERROR

Well, perhaps my guess was just plain wrong. Maybe something more is wrong than 
with the DCB information. Can you use AMASPZAP to dump the dataset in hex? I've 
done that in the past, too.



John McKown 

Systems Engineer IV

IT



Administrative Services Group



HealthMarkets®



9151 Boulevard 26 . N. Richland Hills . TX 76010

(817) 255-3225 phone . 

[email protected] . 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® is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company®, Mid-West National Life Insurance Company of TennesseeSM and The MEGA 
Life and Health Insurance Company.SM



> -----Original Message-----
> From: IBM Mainframe Discussion List 
> [mailto:[email protected]] On Behalf Of esmie moo
> Sent: Tuesday, July 26, 2011 12:41 PM
> To: [email protected]
> Subject: Re: CORRUPT PDS - I/O ERROR
> 
> John,
>  
> I followed  your example it add the member JUNK to the pds 
> and I was able to browse the member JUNK which has the X in 
> it.  However, the rest of the members still give the I/O 
> error.  I know that am sounding thick however I am not sure 
> as to what I should do for the other members.  Could you give 
> me an example? 
> 
> From: "McKown, John" <[email protected]>
> To: [email protected]
> Sent: Tuesday, July 26, 2011 1:22:20 PM
> Subject: Re: CORRUPT PDS - I/O ERROR
> 
> The "X" is just junk instream data to put into the member 
> JUNK. What it is doesn't matter. I just put it there for completeness.
> 
> --
> John McKown 
> Systems Engineer IV
> IT
> 
> Administrative Services Group
> 
> HealthMarkets®
> 
> 9151 Boulevard 26 . N. Richland Hills . TX 76010
> (817) 255-3225 phone . 
> [email protected] . 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® is the brand name for products underwritten 
> and issued by the insurance subsidiaries of HealthMarkets, 
> Inc. -The Chesapeake Life Insurance Company®, Mid-West 
> National Life Insurance Company of TennesseeSM and The MEGA 
> Life and Health Insurance Company.SM
> 
> 
> 
> > -----Original Message-----
> > From: IBM Mainframe Discussion List 
> > [mailto:[email protected]] On Behalf Of esmie moo
> > Sent: Tuesday, July 26, 2011 12:17 PM
> > To: [email protected]
> > Subject: Re: CORRUPT PDS - I/O ERROR
> > 
> > John,
> >  
> > Just to clarify, you have an X do I include it?  Also, I 
> > noticed that you the SYSUT2 has the PDS name as well as the 
> > member name (JUNK).  Could you tell me what it is for?
> > 
> > From: "McKown, John" <[email protected]>
> > To: [email protected]
> > Sent: Tuesday, July 26, 2011 1:13:12 PM
> > Subject: Re: CORRUPT PDS - I/O ERROR
> > 
> > I had this happen in the past. A programmer modified the DCB 
> > attributes on the DSCB. If you know what they are supposed to 
> > be, then run an IEBGENER to set them to something good. For a 
> > "card image" (source) type library, I do:
> > 
> > //GENER EXEC PGM=IEBGENER
> > //SYSPRINT DD SYSOUT=*
> > //SYSIN DD DUMMY
> > //SYSUT1 DD *
> > X
> > //SYSUT2 DD DSN=MY.SOURCE.PDS(JUNK),DISP=OLD,
> > // DCB=(LRECL=80,RECFM=FB,BLKSIZE=27920,DSORG=PO)
> > //
> > 
> > this is only an example! You need to know what the DCB 
> > characters really are (too large a BLKSIZE is usually OK).
> > 
> > --
> > John McKown 
> > Systems Engineer IV
> > IT
> > 
> > Administrative Services Group
> > 
> > HealthMarkets®
> > 
> > 9151 Boulevard 26 . N. Richland Hills . TX 76010
> > (817) 255-3225 phone . 
> > [email protected] . 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® is the brand name for products underwritten 
> > and issued by the insurance subsidiaries of HealthMarkets, 
> > Inc. -The Chesapeake Life Insurance Company®, Mid-West 
> > National Life Insurance Company of TennesseeSM and The MEGA 
> > Life and Health Insurance Company.SM
> > 
> > 
> > 
> > > -----Original Message-----
> > > From: IBM Mainframe Discussion List 
> > > [mailto:[email protected]] On Behalf Of esmie moo
> > > Sent: Tuesday, July 26, 2011 12:03 PM
> > > To: [email protected]
> > > Subject: CORRUPT PDS - I/O ERROR
> > > 
> > > Good Morning Gentle Readers,
> > >  
> > > When I try to browse a member of  my pds I get a I/O error.  
> > > I tried browsing several members but I get the same error 
> > > message.  Is there a way of fixing it?  For some reason the 
> > > storage group is NOT backed up so I cannot restore it from an 
> > > old backup.  I recovered the PDS from a DFHSM backup but when 
> > > I try to browse any members I still get the I/O error.  Is 
> > > there a work around to this problem or should I consider it lost?
> > >  
> > > Thanks. 
> > > 
> > > 
> > 
> ----------------------------------------------------------------------
> > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to [email protected] 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 [email protected] 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 [email protected] 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 [email protected] 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 [email protected] 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 [email protected] 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 [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to