z/OS DFSORT Application Programming Guide
Previous topic | Next topic | Contents | Contact z/OS | Library | PDF


INCLUDE and OMIT

z/OS DFSORT Application Programming Guide
SC23-6878-00

COND operand: You can use symbols where you can use fields (p1,m1,f1 and p1,m1 and p2,m2,f2 and p2,m2) and constants (n, +n, -n, C'xx...x', X'yy...yy', Y'yyx...x' and B'bbbbbbbb...bbbbbbbb'). A symbol for p,m,f results in substitution of p,m if FORMAT=f or symbol,f is specified. A symbol for 'string' always results in substitution of C'string'.

Example 1
 INCLUDE COND=((Z_Field1,GT,LIMIT,AND,Any_Format,CH,EQ,C_Field2),OR,
               (SubString,NE,Depts),OR,
               (Flags,ALL,Error,AND,Flags,NE,Empty))
will be transformed to:
 INCLUDE COND=((22,8,ZD,GT,+12500,AND,12,3,CH,EQ,4,2,CH),OR,(16,3,SS,NE*
               ,C'J82,L92,M72'),OR,(35,1,BI,ALL,B'11010000',AND,35,1,BI*
               ,NE,B'......01'))
Example 2
  OMIT FORMAT=BI,COND=(C_Field1,EQ,Code_1,OR,
                       Any_Format,EQ,Stopper,OR,
                       Flags,EQ,Full)
will be transformed to:
 OMIT FORMAT=BI,COND=(6,5,EQ,C'86A4Z',OR,12,3,EQ,X'FFFFFF',OR,35,1,EQ,X*
               'FF')
Example 3
  INCLUDE COND=(25,8,CH,EQ,Sysplex)
If the value for the system symbol &SYSPLEX. is 'MAS3', the INCLUDE statement will be transformed to:
  INCLUDE COND=(25,8,CH,EQ,C'MAS3')
Note: You can use a symbol for Y'DATEx', Y'DATEx'+n or Y'DATEx'-n (where x is 1, 2 or 3) in the COND operand, but you cannot use symbol+n or symbol-n to substitute Y'DATEn'+n or Y'DATEn'-n in the COND operand. For example, if you have the symbols:
  YD1,Y'DATE1'
  YD1P5,Y'DATE1'+5    
The INCLUDE statement:
  INCLUDE COND=(1,6,Y2T,EQ,YD1)
will be transformed to:
 INCLUDE COND=(1,6,Y2T,EQ,Y'DATE1')
The INCLUDE statement:
 INCLUDE COND=(1,6,Y2T,EQ,YD1P5)      
will be transformed to:
 INCLUDE COND=(1,6,Y2T,EQ,Y'DATE1'+5)    
The INCLUDE statement:
 INCLUDE COND=(1,6,Y2T,EQ,YD1+5)       
will not be transformed because YD1+5 is not valid.

Go to the previous page Go to the next page




Copyright IBM Corporation 1990, 2014