MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Extract Alphabets and Spcial Characters into seperate files

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities
View previous topic :: View next topic  
Author Message
gharidoss
Beginner


Joined: 14 Mar 2005
Posts: 38
Topics: 15
Location: Bangalore

PostPosted: Mon Apr 03, 2006 12:06 am    Post subject: Extract Alphabets and Spcial Characters into seperate files Reply with quote

Hi All,

Is it possible to extract the Alphabetics, Numbers into one file and extract the special character (* & ( ) @ # ! >) into another files?

Currently I'm using the following ICETOOL Sort card.

Code:

INCLUDE=(1,2,BI,ALL,X'F0F0')   
INCLUDE=(1,2,BI,NOTALL,X'F0F0')


But it is checking each bit and I can use this sort card only for small length fileds. But my search field length is 50 Bytes. is there any other option in Sort?

I also I tried with SS option, it's not working.


Thanks in advance
Hari
Back to top
View user's profile Send private message Send e-mail MSN Messenger
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12370
Topics: 75
Location: San Jose

PostPosted: Mon Apr 03, 2006 5:00 am    Post subject: Reply with quote

Quote:

But it is checking each bit and I can use this sort card only for small length fileds. But my search field length is 50 Bytes. is there any other option in Sort?


gharidoss,

Just expand the field declaration. For binary fields you can check with 2,4,8 bytes. so split the 50 bytes and perform the checking as shown below.


Code:

INCLUDE COND=(01,08,BI,ALL,X'F0F0F0F0F0F0F0F0',OR,
              09,08,BI,ALL,X'F0F0F0F0F0F0F0F0',OR,
              17,08,BI,ALL,X'F0F0F0F0F0F0F0F0',OR,
              25,08,BI,ALL,X'F0F0F0F0F0F0F0F0',OR,
              33,08,BI,ALL,X'F0F0F0F0F0F0F0F0',OR,
              41,08,BI,ALL,X'F0F0F0F0F0F0F0F0',OR,
              49,02,BI,ALL,X'F0F0')


Hope this helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Frank Yaeger
Sort Forum Moderator
Sort Forum Moderator


Joined: 02 Dec 2002
Posts: 1618
Topics: 31
Location: San Jose

PostPosted: Mon Apr 03, 2006 11:17 am    Post subject: Reply with quote

Quote:
For binary fields you can check with 2,4,8 bytes


For DFSORT's INCLUDE, BI fields can be up to 256 bytes, so this can be done using 1,50,BI,...

Code:

 INCLUDE COND=(1,50,BI,ALL,X'F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0X
               F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0X
               F0')


Hari,

The X'F0F0...F0' mask checks for F0-FF in each byte. It does not check for alphanumerics vs non-alphanumerics. Please clarify what exactly it is you want to do and why you think the X'F0F0...F0' mask does it.
_________________
Frank Yaeger - DFSORT Development Team (IBM)
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
DFSORT is on the Web at:
www.ibm.com/storage/dfsort
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
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


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group