I received a CBPDO order.
A part of the order is IBM Encryption Facility and Encryption Facility
DFSMSdss "plugin".
I'm not SMP/E specialist, so probably I missed something obvious.
I defined blank new CSI using sample, defined zones (GLOBAL, TARGET and
DIST), deifned SMP* DDDEFs.
Receive ended OK, all the relfiles were received to DASD, as well as
SMPPTS (quite huge, by the way).
I RTFM, that means Memoext, and PGMdir. Created additional DDDEFs as
described. Submitted APPLY job for FMID HCF7730 (base Encryption
Facility), I had to use BYPASS REQ (lacking FMIDs for ICSF, z/OS). As a
result two members were added to LINKLIB dataset. That's OK.
I also tried to the the same thing for HCR773D, however the APPLY job
ended with RC=4, but no member was copied. I checked: HCR773D consist of
*one member*, CSDEDREG which should be added to LINKLIB, but it was not
added. I did it manually and encryption works OK, but I wanted to know
what I did wrong with the FMID.
My apply job:
SET BOUNDARY(TARGET) .
APPLY /* CHECK */
FORFMID(HCF773D)
SELECT(HCF773D)
GROUPEXTEND(NOAPARS,NOUSERMODS)
SOURCEID(DSSFIX,HIPER)
BYPASS(REQ,HOLDSYSTEM,
HOLDUSER,HOLDCLASS(UCLREL,ERREL,HIPER)) .
It is copied from sample, I modified TARGET name and inserted REQ to BYPASS.
Job ends with RC=4.
Member HCR773D from SMPPTS:
++FUNCTION(HCF773D) REWORK(2005279)
DESC(Encryption Facility DFSMSdss Encryption)
RFDSNPFX(IBM) /* TIME=14:37:53 DATE=10/06/05 */ FILES(1)
.
++VER(Z038)
REQ(HBB7707,
HCR770A,
HDZ11G0)
.
++IF FMID(HDZ11G0) /* DATA FACILITY SYSTEM MANAGED */
THEN /* STORAGE BASE Z/OS R4 */
REQ( /* */
UA90212 /* DFSMSDSS ENCRPTION SUPPORT */
).
++IF FMID(HDZ11H0) /* DATA FACILITY SYSTEM MANAGED */
THEN /* STORAGE BASE Z/OS R5 */
REQ( /* */
UA90213 /* DFSMSDSS ENCRPTION SUPPORT */
).
++IF FMID(HDZ11J0) /* DATA FACILITY SYSTEM MANAGED */
THEN /* STORAGE BASE Z/OS R6 */
REQ( /* */
UA90214 /* DFSMSDSS ENCRPTION SUPPORT */
).
++IF FMID(HDZ11K0) /* DATA FACILITY SYSTEM MANAGED */
THEN /* STORAGE BASE Z/OS R7 */
REQ( /* */
UA90215 /* DFSMSDSS ENCRPTION SUPPORT */
)
.
++MOD(CSDEDREG)
CSECT(CSDEDREG)
DISTLIB(ALINKLIB) RELFILE(1) .
I received GIM43401W message.
I guess the problem is caused by missing JCLIN, so it is IBM error.
Or I missed something ???
--
Radoslaw Skorupka
Lodz, Poland
P.S. I also browsed PSP bucket for the product - it's empty.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
