Fromkey Tokey

IDCAMS 里面如果想从VSAM 里面导特定的数据到另外的VSAM可以使用FROMKEY 与TOKEY。

范例:这里面FROMKEY 与TOKEY里面参数不是指VSAM里面的KEY,而是指相对于其他数据唯一可以设置成KEY的数据，你可以根据数据自行设置，这是正常的格式，还有很多VSAM 里面KEY是COMP-3的格式。可以写成FROMKEY(X''F) Tokey(x''f)

//WAEY0AAA JOB'ALS',CLASS=U,MSGLEVEL=(1,1),MSGCLASS=X             
//STEP010 EXECPGM=IDCAMS                                          
//SYSPRINT DDSYSOUT=*                                             
//SYSIN DD*                                                       
  DELETEVCHXQS2.GWAE.AM.AM.B01.AMACT.VREPRO                       
  SETMAXCC=0                                                      
  DEFINECLUSTER(NAME(VCHXQS2.GWAE.AM.AM.B01.AMACT.VREPRO)-       
    MODEL(GWAE.AM.AM.B01.AMACT.VREPRO))                           
//STEP020 EXECPGM=IDCAMS                                          
//SYSPRINT DDSYSOUT=*                                             
//IN1 DDDSN=GWAE.AM.AM.B01.AMACT.VREPRO,DISP=SHR                  
//OUT1 DDDSN=VCHXQS2.GWAE.AM.AM.B01.AMACT.VREPRO,DISP=SHR         
//SYSIN DD*                                                       
  REPRO INFILE(IN1)OUTFILE(OUT1)     -                           
   FROMKEY(78048000000000915872)-                                 
  TOKEY(78048000000000915872)