In this example, three tape volumes 001200, 001201, and 001202 are to be rekeyed with the same key labels.
Neste exemplo, três volumes de fita 001200, 001201 e 001202 devem ser recodificados com os mesmos rótulos de chave.

  //TAPEJOB	JOB	…
  //STEP1	EXEC	PGM=IEHINITT
  //SYSPRINT	DD	SYSOUT=A
  //REKEY3	DD	UNIT=(TAPE,1,DEFER)
  //SYSIN	DD	*
    REKEY3	REKEY	SER=001200,NUMBTAPE=3,
				KEYLABL1=firstkeylabel,KEYENCD1=L,
				KEYLABL2=secondkeylabel,KEYENCD2=H
  /*

Parent topic: IEHINITT Examples