
JCL Examples Defining the BIM-EPIC Resource Dataset (ERD)
2-36 BIM-EPIC Installation and System Guide
JCL Examples
A single CPU is being used. There are eight tape devices, numbered 300 to 307. An ERD is
not needed since no device sharing occurs.
This example creates the ERD and adds UCB definitions. After the file has been created, the
ERD’s contents are printed on SYSLST.
The tape device environment is as follows:
•
Four 3420 tape devices (300-303), all shared by CPU A and CPU B. Drives have dual-
density capability.
• Four 3490E tape devices (400-403) contained within an ACL unit ,all shared by CPU A
and CPU B. The ACL Name is ATLJOE, and the ACL Number is 1.
• Two 3480 tape devices (500-501) for use by CPU A only.
• Two 3490 tape devices (600-601) for use by CPU B only. Devices have the IDRC
feature.
// JOB ERDCREAT
// DLBL ERDFILE,'EPIC.SHARED.RESOURCES.DATASET',2099/366,SD
// EXTENT SYS040,SYS251,,,5000,15
// ASSGN SYS040,DISK,VOL=SYS251,SHR
// EXEC TSIDSMNT
FMT NAME=ERDFILE
ADD UCB=300,DEV=3420,FEAT=D
ADD UCB=301,DEV=3420,FEAT=D
ADD UCB=302,DEV=3420,FEAT=D
ADD UCB=303,DEV=3420,FEAT=D
ADD UCB=400,DEV=3490,FEAT=E,ACLNAME=ATLJOE,ACLNUM=1
ADD UCB=401,DEV=3490,FEAT=E,ACLNAME=ATLJOE,ACLNUM=1
ADD UCB=402,DEV=3490,FEAT=E,ACLNAME=ATLJOE,ACLNUM=1
ADD UCB=403,DEV=3490,FEAT=E,ACLNAME=ATLJOE,ACLNUM=1
ADD UCB=500,DEV=3480
ADD UCB=501,DEV=3480
ADD UCB=600,DEV=3490,FEAT=I
ADD UCB=601,DEV=3490,FEAT=I
PRT
/*
/&
Even though devices 500-501 and 600-601 are not shared between CPU A and CPU B, they
must still be included in the ERD. If an ERD is used, all tape devices must be described in it,
whether shared or not.
Example One
Example Two
Komentarze do niniejszej Instrukcji