RANGE Operator (for Beginners)


Summary

For extensive information, go through the RANGE Operator for Experienced

RANGE operator displays a message with the count of values that are in between the coded range for a field.

Syntax -

RANGE Operator

Required Operands


  • FROM - FROM parameter specifies ddname of the input file.
  • LIST - listdd specifies the list dataset ddname to be created by ICETOOL LIST operation.
  • ON - ON operator specifies the field(s) used for DISPLAY operation.
  • HIGHER, LOWER, EQUAL, NOTEQUAL – HIGHER and LOWER may be used together or separately. EQUAL and NOTEQUAL should use separately.

Optional Operands


  • VSAMTYPE - VSAMTYPE operand specifies the record format for a VSAM input file (F or V).

Example -


Scenario - Display the active employees count in between 2 and 6.

INPUT - MATEPK.INPUT.PSFILE

 BROWSE    MATEPK.INPUT.PSFILE                        Line 00000000 Col 001 080 
 Command ===>                                                  Scroll ===> CSR  
----+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----8
********************************* Top of Data **********************************
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                   
******************************** Bottom of Data ********************************

JCL -

----+----1----+----2----+----3----+----4----+----5----+----6----+----7--
***************************** Top of Data ******************************
//MATEPKR  JOB (123),'MATEPK',CLASS=A,MSGCLASS=A,MSGLEVEL=(1,1),        
//             NOTIFY=&SYSUID                                           
//*                                                                     
//STEP01   EXEC PGM=ICETOOL                                             
//INDD     DD DSN=MATEPK.INPUT.PSFILE,DISP=SHR                          
//TOOLIN   DD *                                                         
  RANGE FROM(INDD) ON(1,3,ZD) HIGHER(2) LOWER(6)                        
/*                                                                      
//TOOLMSG  DD SYSOUT=*                                                  
//DFSMSG   DD SYSOUT=*                                                  
//                                                                      
**************************** Bottom of Data ****************************

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

----+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----8----+----9
********************************* TOP OF DATA ********************************************
1ICE600I 0 DFSORT ICETOOL UTILITY RUN STARTED                                   
                                                                                
 ICE650I 0 VISIT http://www.ibm.com/storage/dfsort FOR ICETOOL PAPERS, EXAMPLES AND MORE 
                                                                                
 ICE632I 0 SOURCE FOR ICETOOL STATEMENTS:  TOOLIN                               
                                                                                
                                                                                
 ICE630I 0 MODE IN EFFECT:  STOP                                                
                                                                                
             RANGE FROM(INDD) ON(1,3,ZD) HIGHER(2) LOWER(6)                   
 ICE627I 0 DFSORT CALL 0001 FOR COPY FROM INDD     TO E35 EXIT COMPLETED      
 ICE628I 0 RECORD COUNT:  000000000000007                                     
 ICE631I 0 NUMBER OF VALUES IN RANGE FOR (1,3,ZD)      :  000000000000003     
 ICE602I 0 OPERATION RETURN CODE:  00                                         
                                                                                
                                                                                
 ICE601I 0 DFSORT ICETOOL UTILITY RUN ENDED - RETURN CODE:  00                  
******************************** BOTTOM OF DATA ******************************************

Explaining Solution -

  • INDD - Specifies the ddname for input 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.
  • COPY FROM(INDD) TO(OUTDD) - Copies all the records from INDD file to OUTDD file.
  • RANGE FROM(INDD) ON(1,3,ZD) HIGHER(2) LOWER(6) - Writes the count of the records in between the higher and lower values specified based on the selection criteria.