
Specifying the TSIDMAP Macro Defining the BIM-EPIC Environment
2-50 BIM-EPIC Installation and System Guide
* $$ JOB JNM=TSIDPOL,LDEST=(,USERID)
// JOB TSIDPOL
*
* THIS IS SAMPLE JCL TO ASSEMBLE THE TSIDPOL AND TSIDMAP MACROS FOR
* CATALOGING TO THE BIM-EPIC SUBLIBRARY AS THE TSIDPOL PHASE. MODIFY
* THE EXAMPLE TO SUIT YOUR INSTALLATIONS REQUIREMENTS. CONSULT THE
* BIMEPIC INSTALLATION AND SYSTEM GUIDE FOR AN EXPLANATION OF ALL THE
* PARAMETERS FOR THESEMACROS. VALUES SURROUNDED BY ASTERISKS NEED TO
* BE MODIFIED.
*
// LIBDEF PHASE,CATALOG=*LIB.SUBLIB* EPIC INSTALL LIBRARY
// LIBDEF *,SEARCH=*LIB.SUBLIB* EPIC INSTALL LIBRARY
// OPTION CATAL
// EXEC ASSEMBLY
***********************************************************************
* POOL01 CONTAINS ALL OF VOLUMES *VOL1* AND *VOL2* *
***********************************************************************
POOL01 TSIDPOL (*VOL1*),(*VOL2*)
***********************************************************************
* POOL02 IS THE SAME AS POOL01. THEREFORE, THE POOL01 AND POOL02 *
* NAMES MAY BE USED INTERCHANGEABLY AS POOL NAMES. *
***********************************************************************
POOL02 TSIDPOL EQU=POOL01
***********************************************************************
* POOL03 CONTAINS *VOL1* FROM TRACK 15 TO 13274 AND *VOL2* FROM *
* TRACK 15 TO 13274. LEVELING WILL BE PERFORMED ON POOL03. *
***********************************************************************
POOL03 TSIDPOL (*VOL1*,00015,13274), X
(*VOL2*,00015,13274), X
LEVEL=YES
***********************************************************************
* POOL04 CONTAINS *VOL3* FROM TRACK 30 TO 16619 AND *VOL4* FROM *
* TRACK 30 TO 16619. LEVELING WILL BE PERFORMED ON POOL03. *
***********************************************************************
POOL04 TSIDPOL (*VOL3*,00030,16619), X
(*VOL4*,00030,16619), X
LEVEL=YES
***********************************************************************
* POOL05 IS THE SAME AS POOL04. THEREFORE, THE POOL04 AND POOL05 *
* NAMES MAY BE USED INTERCHANGEABLY AS POOL NAMES. *
***********************************************************************
POOL05 TSIDPOL EQU=POOL04
***********************************************************************
* *VOL1* IS DEFINED AS A SINGLE PACK POOL USING ALL AVAILABLE SPACE *
* FROM THE FIRST TO THE LAST TRACK (OR BLOCK.) *
***********************************************************************
*VOL1* TSIDPOL (*VOL1*)
***********************************************************************
* TAPPOL SPECIFIED THAT ANY TAPE DATASET CATALOGED WITH TPL=A CAN *
* ONLY VOLSERS IN THE RANGE 990000 THROUGH 990100 INCLUSIVE. *
***********************************************************************
TAPPOL TSIDPOL (A,990000,990100),TAPE=YES
***********************************************************************
* CONSULT THE EPIC/VSE INSTALLATION AND MAINTENANCE GUIDE FOR *
* EXPLANATIONS OF THE TSIDMAP PARAMETERS. *
***********************************************************************
TSIDMAP *400*
TSIDMAP ILIST=(*ENTRY1*,*ENTRY2*,...)
TSIDMAP ILIST=(*ENTRYA*,*ENTRYB*,...)
TSIDMAP NLUBPGM=(*PROGX*)
TSIDMAP NLUBDTF=(*NLUBDTF*,*NLUBTAP*)
TSIDMAP END=YES
TSIDPOL Example
Kommentare zu diesen Handbüchern