//SECPDEC PROC KEYHLQ='SYS3.SECZIP.KEYS.V2' //* //******************************************************************** //* SecureZIP Decrypt processing in PGP format * //* * //* This JCL Procedure invokes the SecureZIP code to decrypt data * //* stored in a PGP-format archive. It is not necessary to specify * //* who will decrypt the data as the software automatically searches * //* for a matching recipient, which should always be OCTO. * //* * //* All of the parameters necessary to make the process work against * //* a PGP-format archive are stored in the Defaults Module, or in * //* the SYSIN file. * //* * //******************************************************************** //* * //* Parameters: * //* * //* KEYHLQ - The dataset prefix for the PGP-format Keyrings * //* * //******************************************************************** //* //DECRYPT EXEC PGM=SECUNZIP,PARM='-DM ACZDFLTP' //STEPLIB DD DISP=SHR,DSN=SYSO.SECZIP.PROD.LOAD //* //PUBRING DD DISP=SHR,DSN=&KEYHLQ..PUBRING //SECRING DD DISP=SHR,DSN=&KEYHLQ..SECRING //* //SYSIN DD DISP=SHR,DSN=SYS3.SECZIP.PARMS.DECRYPT.TXT //SYSERR DD SYSOUT=* //SYSOUT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //SYSTSPRT DD SYSOUT=* //* //IN DD DUMMY //*