Specifications

116 IBM System z Personal Development Tool: Volume 3 Additional Topics
11.3.1 Server installation
File /usr/z1090/bin/ZOSSERV.XMIT must first be uploaded to a z/OS data set with DCB
characteristics RECFM=FB, LRECL=80, BLKSIZE=3120. This XMIT file contains an
unloaded PDS load library with one member. You can begin restoring this material by
preallocating two data sets with the following job:
//OGDEN77 JOB 1,BILL,MSGCLASS=X
// EXEC PGM=IEFBR14
//A DD DISP=(NEW,CATLG),UNIT=3390,VOL=SER=ZBSYS1,SPACE=(TRK,5),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120,DSORG=PS),
// DSN=IBMUSER.SEQ.HOLDING
//B DD DISP=(NEW,CATLG),UNIT=3390,VOL=SER=ZBSYS1,SPACE=(TRK,(3,3,3)),
// DCB=(LRECL=0,BLKSIZE=32760,RECFM=U),DSN=IBMUSER.PDS.HOLDING
(The volser and DSNs are arbitrary. An experienced z/OS system programmer can handle
this upload and installation in multiple ways. We present a basic example here. You can, for
example, use ISPF to create these two holding data sets.)
After the receiving data set is ready, use binary mode and either IND$FILE or FTP to transfer
/usr/z1090/bin/ZOSSERV.XMIT to IBMUSER.SEQ.HOLDING. It is a relatively small file.
Be certain
to use a binary transfer.
After the module has been uploaded to the sequential holding data set, issue the following
TSO commands (using the appropriate data set names, of course):
RECEIVE INDATASET('IBMUSER.SEQ.HOLDING')
INMR901I DATASET ......
INMR906A Enter restore parameter or 'DELETE' or 'END' +
DATASET('IBMUSER.PDS.HOLDING')
INMR001I Restore successful ....
The name of the executable module, once restored, is ZPDTMSRV. You must select an
authorized library (preferably on the LNKLST) to contain the server module. You must have
authority to update this library. We use USER.LINKLIB as an example of an authorized library
in the LNKLST, but your source system is probably different. Userid IBMUSER typically has
update authority for all system libraries and we use this userid in our example. Again, your
source system may be different.
You need to copy member ZPDTMSRV from your temporary PDS to your authorized library.
The easiest way to do this is by using ISPF option 3.3. In the first panel (of ISPF 3.3), select:
Option=====> c
....
(“from” data set name)
Name. . . . . . . ‘IBMUSER.PDS.HOLDING’
(press Enter)
(“to” data set name)
Name. . . . . . .’USER.LINKLIB’
(press Enter)
. ZPDTMSRV (overtype the period with the letter S and Enter)
This completes the server installation. The holding data sets can be deleted.