JCL Examples for Program Compilation and Link Edit › Assembler Example (z/VSE)

Assembler Example (z/VSE)

* $$ JOB JNM=ASSEMBLY,CLASS=x
* $$ LST CLASS=c
// JOB ASSEMBLY
// EXEC      PROC=procname
// LIBDEF    *,CATALOG=lib.sublib
// ASSGN     SYS101,DISK,VOL=vvvvvv,SHR
// DLBL      PUNCH,'SYSIN.FILE',1,SD
// EXTENT    SYS101,vvvvvv,1,0,s,n
* DITTO
// UPSI 1
// EXEC DITTO
$$DITTO CSQ FILEOUT=PUNCH,CISIZE=512,BLKFACTOR=2
*          insert source here
/*
$$DITTO EOJ
/*
* DFHEAP1$
// DLBL      IJSYSPH,'SYSPCH.FILE',1,SD
// EXTENT    SYSPCH,vvvvvv,1,0,s,n
 ASSGN     SYSPCH,DISK,VOL=vvvvvv,SHR
// DLBL      IJSYSIN,'SYSIN.FILE'
// EXTENT    SYSIPT,vvvvvv
 ASSGN     SYSIPT,DISK,VOL=vvvvvv,SHR
// EXEC DFHEAP1$,SIZE=512K
/*
 CLOSE       SYSIPT,READER
 CLOSE       SYSPCH,PUNCH
/*
* COMPILE
// DLBL      IJSYSIN,'SYSPCH.FILE'
// EXTENT    SYSIPT,vvvvvv
 ASSGN     SYSIPT,DISK,VOL=vvvvvv,SHR
// OPTION    NODECK,CATAL
   PHASE   ppppppp,S
   INCLUDE DFHxxx
// EXEC ASSEMBLY,SIZE=350K
/*
 CLOSE       SYSIPT,READER
/*
* LINK-EDIT
/*
// EXEC LNKEDT
/*
/&
* $$ EOJ