Thanks for all your help I really understand the problem thing is the file is huge and I don’t know by what factor DFSMS blocked and if the blocking is consistent meaning always by the same factor
Joe Reichman Joe Reichman IT Specialist Master Files Division New Carrollton Federal Building, B7-182 OS:CTO:AD:CP:I:IB Flex M,T,Th,F Home office (240) 863 - 3965 Office (240) 613-4350 Cell (917) 748-9693 TOD M - F 7:30 am - 4:00 pm -----Original Message----- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf Of John McKown Sent: Tuesday, July 19, 2016 2:25 PM To: IBM-MAIN@listserv.ua.edu Subject: Re: Bsam VS Qsam for VB records On Tue, Jul 19, 2016 at 1:20 PM, Farley, Peter x23353 < peter.far...@broadridge.com> wrote: > I've been following the various attempts to help you fix your broken > file with a block that has a zero BDW. How that ever happened is a > mystery you really ought to engage IBM to help solve, BUT . . . > > No one else seems to have suggested the "old time" solution to > recovering the file data - does your shop license DITTO? DITTO can > access AND MODIFY disk blocks directly, without programming. You can > display blocks in the file until you get to the one you want and then > update the BDW in that block based on the block length DITTO tells you it > read. > > If your shop does license DITTO the "disk modify" function is very > likely security protected (or darn well ought to be, since it can > really wreck things up if misused or abused), so you may need to > interface with your security team to get appropriate authority. > > There is a "batch" interface to DITTO as well as TSO capability, so > you could set it up as a batch job or try to accomplish it on the fly > from TSO. If it were me I would also try to make sure I have at least > one safe volume backup of the disk containing that file in case things > get messed up. Caveat emptor. > > HTH > > Peter > AMASPZAP can do the same thing. I don't know DITTO, so I'll guess it would be easier to use. Personally, I'd hate to use AMASPZAP to correct BDWs on disk. AMASPZAP can also print the data, in HEX. -- "Worry was nothing more than paying interest on a loan that a man may never borrow" From: "Quest for the White Wind" by Alan Black Maranatha! <>< John McKown ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
