Using KSAM/XL and KSAM 64 (32650-90886)

Chapter 7 63
Protecting the File and Its Data
Recovering from Index Corruption
>FROM=OLDMSTR.MGR.AR;TO=(ARMSTR.MGR.AR);KEY=0
>EXIT
Figure 7-2. Index Corruption Recovery for a KSAM64 File
:BUILD ARMSTR64.MGR.AR;REC=-80,,F,ASCII;DEV=DISC;&
DISC=100;KSAM64;KEY=(N,4,6;&
B,10,25,RDUP;&
N,65,5,RDUP;&
B,70,3,RDUP;&
FIRSTREC=1;REUSE
:FILE ARMSTR64; KSAM64
:FCOPY
>FROM=OLDMSTR64.MGR.AR;TO=(*ARMSTR64.MGR.AR);KEY=0
>EXIT