MVSFORUMS.com A Community of and for MVS Professionals
View previous topic :: View next topic
Author
Message
computer Beginner Joined: 12 Jun 2007 Posts: 64 Topics: 17 Location: Hyderabad
Posted: Thu Jun 11, 2009 10:10 am Post subject: To eliminate records having spaces of length equal to LRECL
Hi,
I need to eliminate records whose value is all spaces.
Now the card used is INCLUDE COND=('1,20,CH,NE,C' ')
But the the createria is changed to check against 800 bytes. Putting a condition with equal to of 800 bytes does not sound realistic.
Is there any way where I can compare spaces with 800 bytes at a single go.
Thanks in Advance
Manoj
Back to top
kolusu Site Admin Joined: 26 Nov 2002 Posts: 12375 Topics: 75 Location: San Jose
Posted: Thu Jun 11, 2009 10:45 am Post subject:
computer ,
Try these control cards
Code:
//SYSIN DD *
SORT FIELDS=COPY
OMIT COND=(001,256,CH,EQ,C' ',AND,
257,256,CH,EQ,C' ',AND,
513,256,CH,EQ,C' ',AND,
513,256,CH,EQ,C' ',AND,
769,032,CH,EQ,C' ')
_________________ Kolusu
www.linkedin.com/in/kolusu
Back to top
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum