Youi might try the ADRDSSU PRINT TRACK function. I have not used this in a little while so I hope my notes in the JCL are still correct.
//*==================================================================* //* ----------------------------------------------------------- * //* ¦ +-,0,c1,max head #--------------+ ¦ * //* +---TRACKS----(--c1--+-------------------------------+--)-+ * //* +-TRKS---+ ¦ +-,c1,max head #-------+ ¦ * //* +-,h1--+----------------------+-+ * //* ¦ +-,max head #-+ ¦ * //* +-,c2--+-------------+-+ * //* +-,h2---------+ * //* * //* TRACKS specifies ranges of tracks to be printed. * //* c1,h1 * //* Specifies the cylinder and head number of the beginning of the * //* range. Specify hexadecimal numbers as X'c1' or X'h1'. * //* * //* c2,h2 * //* Specifies the cylinder and head number of the end of the range. * //* Specify hexadecimal numbers as X'c2' or X'h2'. The c2 must be * //* greater than or equal to c1. If c2 equals c1, h2 must be greater * //* than or equal to h1. * //* * //* PRINT TRACKS(2,0,2,5) INDDNAME(DASD) CPVOLUME ADMINISTRATOR * //*==================================================================* //STEP0010 EXEC PGM=ADRDSSU //SYSPRINT DD SYSOUT=* //DASD DD UNIT=3390,VOL=(PRIVATE,SER=ZOSPLA),DISP=SHR //SYSIN DD * PRINT TRACKS(0,0,2,5) INDDNAME(DASD) ADMINISTRATOR /* Thanks.. Paul Feller AGT Mainframe Technical Support -----Original Message----- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Billy Ashton Sent: Wednesday, July 17, 2019 12:01 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Displaying raw disk data [EXTERNAL] Hi everyone, I have an unusual problem. Somehow, one of my disk datasets seems to have been corrupted, as it does not contain the data that it should have. Is there a way that I can examine the disk, using a ccccchhh address and look at the raw data for the dataset and just before it, to see if I can identify anything? Thank you for your recommendations. Billy ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- Please note: This message originated outside your organization. Please use caution when opening links or attachments. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
