IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

To OMIT records with 1st 4 position all not numeric?


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Judy85

New User


Joined: 05 Aug 2011
Posts: 17
Location: China

PostPosted: Wed Jan 11, 2012 6:11 pm
Reply with quote

May I know how to code to omit records with 1st 4 positions of a field all not numeric?

Code:
OMIT=(      )
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Wed Jan 11, 2012 6:23 pm
Reply with quote

What sort of numeric? Zoned? Packed?
Back to top
View user's profile Send private message
Judy85

New User


Joined: 05 Aug 2011
Posts: 17
Location: China

PostPosted: Wed Jan 11, 2012 6:31 pm
Reply with quote

I use below code currently, but it looks too long, so I am searching for a good solution.
Code:
OUTFIL FNAMES=SRT,OMIT=(94,1,CH,NE,C'0',&,94,1,CH,NE,C'1',&,          +
            94,1,CH,NE,C'2',&,94,1,CH,NE,C'3',&,94,1,CH,NE,C'4',&,    +
            94,1,CH,NE,C'5',&,94,1,CH,NE,C'6',&,94,1,CH,NE,C'7',&,    +
            94,1,CH,NE,C'8',&,94,1,CH,NE,C'9',|,                      +
            95,1,CH,NE,C'0',&,95,1,CH,NE,C'1',&,                      +
            95,1,CH,NE,C'2',&,95,1,CH,NE,C'3',&,95,1,CH,NE,C'4',&,    +
            95,1,CH,NE,C'5',&,95,1,CH,NE,C'6',&,95,1,CH,NE,C'7',&,    +
            95,1,CH,NE,C'8',&,95,1,CH,NE,C'9',|,                      +
            96,1,CH,NE,C'0',&,96,1,CH,NE,C'1',&,                      +
            96,1,CH,NE,C'2',&,96,1,CH,NE,C'3',&,96,1,CH,NE,C'4',&,    +
            96,1,CH,NE,C'5',&,96,1,CH,NE,C'6',&,96,1,CH,NE,C'7',&,    +
            96,1,CH,NE,C'8',&,96,1,CH,NE,C'9',|,                      +
            97,1,CH,NE,C'0',&,97,1,CH,NE,C'1',&,                      +
            97,1,CH,NE,C'2',&,97,1,CH,NE,C'3',&,97,1,CH,NE,C'4',&,    +
            97,1,CH,NE,C'5',&,97,1,CH,NE,C'6',&,97,1,CH,NE,C'7',&,    +
            97,1,CH,NE,C'8',&,97,1,CH,NE,C'9')                         
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Wed Jan 11, 2012 6:44 pm
Reply with quote

Consult the DFSORT documentation for INCLUDE/OMIT and you'll find something called NUM which, EQ,NUM gives you numeric, NE,NUM gives you non-numeric.
Back to top
View user's profile Send private message
Judy85

New User


Joined: 05 Aug 2011
Posts: 17
Location: China

PostPosted: Wed Jan 11, 2012 7:24 pm
Reply with quote

Thank you for your advise, I have got the correct code by referring to the document. icon_biggrin.gif
Below is the code which works well.
Code:
  OMIT=(94,4,FS,NE,NUM)
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts Compare 2 files and retrive records f... DFSORT/ICETOOL 3
No new posts Compare 2 files(F1 & F2) and writ... JCL & VSAM 8
No new posts Issues Converting From ZD to Signed N... DFSORT/ICETOOL 4
No new posts INCLUDE OMIT COND for Multiple values... DFSORT/ICETOOL 5
No new posts Compare only first records of the fil... SYNCSORT 7
Search our Forums:

Back to Top