Previous Topic: Items to RememberNext Topic: VSAM Data Sets


Sample JCL

This sample JCL will produce an extract file and a report.

//USER54 JOB (0,A300),BATCHJCL,CLASS=V,MSGCLASS=H,NOTIFY=USER54 
// EXEC procname,VNODE='*BATCH*'
//*Define file names for extract files 
//PA3USRS DD UNIT=SYSDA,SPACE=(CYL,(1,1)) 
//*Define file names for report files 
//PA3RPRT DD SYSOUT=E 
//XTRACE DD DUMMY 
//SYSIN DD * 
COMMENTS   The following statement produces the extract file named
COMMENTS   PA3USRS which contains the merged user definition for 
COMMENTS   each user who has PA3 as the menu key. 
COMMENTS 
EXTRACT GIVING(PA3USRS) USER NO SESSIONS (UIDXMKEY(PA3)) 
COMMENTS 
COMMENTS 
COMMENTS  The following REPORT statements produce the report files
COMMENTS  PA3RPRT and PA2RPRT which list the user ID, menu key, 
COMMENTS  jump key, and print key for the users who have PA3 and 
COMMENTS  PA2 assigned for the menu key. 
COMMENTS 
COMMENTS 
REPORT GIVING(PA3RPRT) USING(PA3USRS)
       ((' &UIDXNAME' '&UIDXMKEY' '&UIDXJKEY' '&UIDXPKEY'))