geekhead83
New User
Joined: 14 May 2007 Posts: 10 Location: india
|
|
|
|
hi,
Im a trying to use SORT on a group of records.
The record length is 671 (FB)
The record format is :
1----------------------248 <-- cols
01685632039.......UVWXYZ
02685632039
04685632039
05685632039
06685632039
01615631706.......ABCDEF
02615631706
04615631706
05615631706
04615631706
05615631706
04615631706
05615631706
04615631706
05615631706
06615631706
One group is 01 to 06 in the first column
I want to write all the groups which have ABCDEF at 248th column in file 1 and the rest in file 2.
Im using the following control card to achieve the same :
Code: |
OPTION COPY
INREC IFTHEN=(WHEN=GROUP,BEGIN=(1,2,CH,EQ,C'01'),
PUSH=(672:248,6))
OUTFIL FILES=1,
INCLUDE=(672,6,CH,EQ,C'ABCDEF'),
BUILD=(1,671)
OUTFIL FILES=2,
OMIT=(672,6,CH,EQ,C'UVWXYZ'),
BUILD=(1,671)
|
The problem is that im getting a 'Syntax error' for the when=group statement and a 'statement definer error' for the Push statement?
What am i doing wrong? |
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
|
|
Your syntax is ok, so I'd guess that you don't have z/OS DFSORT V1R5 PTF UK90013 (July, 2008). That PTF is required to use WHEN=GROUP. Ask your System Programmer to install that PTF (it's free). |
|