RESIZE Operator

Splits or merges records (RESIZE Operator) Example

RESIZE Operator Tutorial   

Scenario -Resize the employees record length from 80 to 49.

INPUT - MATEPK.INPUT.PSFILE

----+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----8
001  PAWAN         MAINFRAME           JPM       AP        IN
002  SRINIVAS      TESTING             ORACLE    TG        IN
003  SRIDHAR       SAS                 CG        OR        US
004  VENKATESH     ABAP                CSC       CA        US
005  RAVI          HADOOP              CTS       FL        US
006  PRASAD        HR                  INFOSYS   MI        US
007  RAJA          TESTING             IBM       CA        US

JCL -

----+----1----+----2----+----3----+----4----+----5----+
//MATEPKRZ JOB (123),'MATEPK',CLASS=A,MSGCLASS=A,
//             MSGLEVEL=(1,1),NOTIFY=&SYSUID
//*
//STEP01   EXEC PGM=ICETOOL
//INDD     DD DSN=MATEPK.INPUT.PSFILE,DISP=SHR
//OUTDD    DD DSN=MATEPK.OUTPUT.PSFILER,
//            DISP=(NEW,CATLG,DELETE),VOLUME=SER=DEVHD4,
//            SPACE=(TRK,(1,1),RLSE),UNIT=SYSDA,
//            DCB=(DSORG=PS,RECFM=FB,LRECL=49,BLKSIZE=490)
//TOOLIN   DD *
  RESIZE FROM(INDD) TO(OUTDD) TOLEN(49)
/*
//TOOLMSG  DD SYSOUT=*
//DFSMSG   DD SYSOUT=*
//

OUTPUT - MATEPK.OUTPUT.PSFILER

----+----1----+----2----+----3----+----4----+----
001  PAWAN         MAINFRAME           JPM                                      
AP        IN
002  SRINIVAS      TESTING             ORACLE                                   
TG        IN
003  SRIDHAR       SAS                 CG                                       
OR        US
004  VENKATESH     ABAP                CSC                                      
CA        IN
005  RAVI          HADOOP              CTS                                      
FL        US
006  PRASAD        HR                  INFOSYS                                  
MI        US
007  RAJA          TESTING             IBM                                      
CA        US

TOOLMSG (SDSF SPOOL) - Verify TOOLMSG for the return code of the submitted job.

RESIZE TOOLMSG

Explaining Example -

  • INDD - Specifies the ddname for input file.
  • OUTDD - Specifies the ddname for output file.
  • TOOLIN DD * - Specifies the ICETOOL statements for DFSORT.
  • TOOLMSG - Specifies where to write the ICETOOL processing messages.
  • DFSMSG - Specifies where to write the DFSORT processing messages.
  • RESIZE FROM(INDD) TO(OUTDD1) TOLEN(49) - Resizes the input records from the length 80 to the new length 49 and writes the records to the OUTDD.