Previous Topic: Example JCL (Output to Tape)Next Topic: Sample Report:  EXTRACT


Example JCL (Output to Disk)

The following shows the command to extract the information for the table PAY in physical sequence to OUT1 on disk.

Note: Use the following as a guide to prepare your JCL. The JCL statements are for example only. Lowercase letters in a statement indicate a value you must supply. Code all statements to your site and installation standards.

 * $$ JOB ...           See the note above and JCL Requirements.
 * $$ LST ...
 // JOB name
 // EXEC PROC=procname  Whether you use PROCs or LIBDEFs, see JCL Requirements.
 // ASSGN SYSnnn,device type,VOL=volser,SHR
 // DLBL CXX,'cxx',,DA                             Directory data set
 // EXTENT SYSnnn,volser
 // DLBL PAY001,'db001.dem',,DA                    Area PAY in DBID 1
 // EXTENT SYSnnn,volser
 // ASSGN SYSnnn,devicetype,VOL=volser,SHR
 // DLBL OUT1,'out',1,SD                           Output data
 // EXTENT,volser,1,0,rel trk/blk,number trks/blks
 // EXEC DBUTLTY,SIZE=750K
          EXTRACT  AREA=PAY,DBID=1,TABLE=PAY,DTFNAME=OUT1,DEVICE=DISK,
            BLKSIZE=800,SEQ=PHYSICAL
 /*
 /&
 * $$ EOJ