12.07.2015 Views

eTrust CA-Top Secret Security for z/OS and OS ... - SupportConnect

eTrust CA-Top Secret Security for z/OS and OS ... - SupportConnect

eTrust CA-Top Secret Security for z/OS and OS ... - SupportConnect

SHOW MORE
SHOW LESS
  • No tags were found...

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

Digital Certificate SupportLABLCERT('SELF-SIGNED PRIVATE KEY FOR MARY')TSS LIST(MARY001) LABLCERT('SELF-SIGNED PRIVATE KEY FOR MARY')/*=====================================================================*//*To Generate a Digital Certificate <strong>for</strong> a new acid, using the output *//* (DCDSN) from the GENREQ Statement above *//*=====================================================================*/TSS CREATE(GENCDIV) TYPE(DIV) NAME('GENCERT DIVISION')TSS CREATE(GENCDEPT) TYPE(DEPT) DIV(GENCDIV) -NAME('GENCERT DEPARTMENT')TSS CREATE(PAUL001) NAME('GENCERT USER PAUL') TYPE(USER) -PASSWORD(123,0) DEPT(GENCDEPT)TSS LIST(PAUL001) DATA(ALL,PASSWORD)TSS GENCERT(PAUL001) DIGICERT(PAULCERT) -DCDSN(QAPRN.GENREQ.MARYCERT) -LABLCERT('LABEL FOR PAUL001 W/MARY"S DCDSN') -SIGNWITH(MARY001,MARYCERT)TSS LIST(PAUL001) LABLCERT('LABEL FOR PAUL001 W/MARY"S DCDSN')TSS LIST(PAUL001) DIGICERT(PAULCERT)TSS LIST(PAUL001) SEGMENT(CERTDATA)/*========================================================================*//*To Generate a Digital Certificate <strong>for</strong> a user along with keyword SUBJECTN*//* And list the acid with different variations. *//*========================================================================*/TSS GENCERT(PAUL001) DIGICERT(PAULCT02) -SUBJECTN('CN=PAUL O=<strong>CA</strong> OU="RESEARCH AND DEVELOPMENT"')TSS LIST(PAUL001) -SERIAL(00) ISSUERDN('.CN=PAUL.OU=RESEARCH AND DEVELOPMENT.O=<strong>CA</strong>')TSS LIST(PAUL001) DIGICERT(PAULCT02)TSS LIST(PAUL001) SEGMENT(CERTDATA)TSS LIST(SDT) DIGICERT(ALL)/*=====================================================================*//*To EXPORT a Digital Certificate to an output data set NOT defined, *//* then do a CHKCERT comm<strong>and</strong> on the output DCDSN to verify that it *//* was EXPORTED. *//*=====================================================================*/TSS LIST(MARY001) DIGICERT(MARYCERT)TSS EXPORT(MARY001) DIGICERT(MARYCERT) -DCDSN(QAPRN.OUTPUT.MARYCERT)TSS CHKCERT DCDSN(QAPRN.OUTPUT.MARYCERT)TSS LIST(JAMES01) DIGICERT(JIM01)TSS EXPORT(JAMES01) DIGICERT(JIM01) -DCDSN(QAPRN.OUTPUT.JIM01) FORMAT(CERTDER)TSS CHKCERT DCDSN(QAPRN.OUTPUT.JIM01)TSS LIST(JAMES01) DIGICERT(JIM02)TSS EXPORT(JAMES01) DIGICERT(JIM02) -DCDSN(QAPRN.OUTPUT.JIM02) FORMAT(PKCS12B64) PKCSPASS(PSWDJIM2)TSS CHKCERT DCDSN(QAPRN.OUTPUT.JIM02) PKCSPASS(PSWDJIM2)TSS LIST(PAUL001) DIGICERT(PAULCT02)TSS EXPORT(PAUL001) DIGICERT(PAULCT02) -DCDSN(QAPRN.OUTPUT.PAULCT02) FORMAT(PKCS12DER) PKCSPASS(PSWDPAUL)TSS CHKCERT DCDSN(QAPRN.OUTPUT.PAULCT02) PKCSPASS(PSWDPAUL)/*=====================================================================*//* Create Digital Certificate KEYRINGS <strong>and</strong> different variations of *//* the LIST comm<strong>and</strong>. *//*=====================================================================*/TSS CREATE(GENCDEPT) TYPE(DEPT) DIV(GENCDIV) -NAME('GENCERT DEPARTMENT')TSS CREATE(MARY001) NAME('GENCERT USER MARY') TYPE(USER) -PASSWORD(123,0) DEPT(GENCDEPT)TSS GENCERT(MARY001) DIGICERT(MARYCERT) –LABLCERT('SELF-SIGNED PRIVATE KEY FOR MARY')1–72 Cookbook

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!