//ESD2DSN JOB 'JOB INFORMATION',MSGLEVEL=(1,1),                       
//          MSGCLASS=H,CLASS=A,NOTIFY=&SYSUID                         
//******************************************************************* 
//*                                                                 *
//* This is sample JCL which can be used to receive an encrypted    * 
//* dataset from a tape and perform decryption using the Encryption *		
//* Services provided by the IBM Encryption Facility for z/OS       * 
//*                                                                 * 
//* This job uses the CSDFILDE batch program of the Encryption      * 
//* Services to decrypt the data. The SYSUT1 DD statement contains  * 
//* the encrypted tape dataset to be decrypted. The SYSUT2 DD       * 
//* statement speicifies the name of the output dataset on dasd.    * 
//*                                                                 * 
//* Refer to the IBM Encryption Facility for z/OS: User's Guide for * 
//* additional information.                                         * 
//******************************************************************* 
//DEC      EXEC PGM=CSDFILDE                                          
//SYSPRINT DD SYSOUT=*                                                
//SYSUDUMP DD SYSOUT=*                                                
//SYSOUT   DD SYSOUT=*
//SYSIN    DD *                                           
PASSWORD=TEST1PASSWORD                                    
//SYSUT1   DD UNIT=3590-1,DSN=HLQ.ENCRYPTED.TAPE.DATASET, 
//            DISP=(SHR),VOL=SER=ABCDEF                   
//SYSUT2   DD DSN=HLQ.DECRYPT.OUTPUT,                     
//            UNIT=3390,DISP=(NEW,CATLG),                 
//            SPACE=(CYL,(2,1))                       
/*