Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Need to remove the invalid records from Input file

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
akashs

New User


Joined: 24 Nov 2005
Posts: 49
Location: chennai

PostPosted: Wed Nov 11, 2009 10:54 am    Post subject: Need to remove the invalid records from Input file
Reply with quote

Hi,

I need to remove invalid records from my input file.My input file is of length VB 2048.For some records, Field in position 41 to 43 is populated with Junk values.It is comp-3 field.Please suggest me a way to remove those records from my input file.

I dont have PGM=FILEAID utility in my shop.

regards,
Akash
Back to top
View user's profile Send private message

Ketan Varhade

Active User


Joined: 29 Jun 2009
Posts: 197
Location: Mumbai

PostPosted: Wed Nov 11, 2009 1:44 pm    Post subject:
Reply with quote

If you know the possible values that this position can cantian you can filter the file, else

give more details on the fields that you need to check
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8617
Location: Back in jolly old England

PostPosted: Wed Nov 11, 2009 2:17 pm    Post subject:
Reply with quote

Define Junk values !

What you deem as junk can be perfectly valid for another forum member.

Had you have looked at ways to do this yourself in the forum, there are many many excellent examples of using your sort product to do this. Matching records from two files perhaps, or maybe using INCLUDE / OMIT conditions.

And if, as I suspect, you ask for a sort solution, please find out which sort product is used at your site and tell us before someone else wastes their valuable time coding and testing something that will not work with the sort product that you use.
Back to top
View user's profile Send private message
Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1249
Location: Richfield, MN, USA

PostPosted: Wed Nov 11, 2009 11:20 pm    Post subject:
Reply with quote

Quote:
...Field in position 41 to 43 is populated with Junk values.It is comp-3 field.
How dare you call my beloved COMP-3 data "junk". icon_lol.gif
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Wed Nov 11, 2009 11:37 pm    Post subject:
Reply with quote

Akash,

If by junk values, you mean non-numeric PD values, you can use DFSORT control statements like this:

Code:

   OPTION COPY
   OMIT COND=(p,3,PD,NE,NUM)


Use 41 for p if that includes the RDW in positions 1-4. Otherwise, use 45 for p.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Thu Nov 12, 2009 2:14 am    Post subject:
Reply with quote

Quote:
Quote:

...Field in position 41 to 43 is populated with Junk values.It is comp-3 field.

How dare you call my beloved COMP-3 data "junk".

"Sign Sign everywhere a sign
Blocking out the scenery breaking my mind
Do this, don't do that, can't you read the sign"


For those of a certain (or older) age. . . icon_cool.gif

d
Back to top
View user's profile Send private message
akashs

New User


Joined: 24 Nov 2005
Posts: 49
Location: chennai

PostPosted: Thu Nov 12, 2009 11:10 am    Post subject: Reply to: Need to remove the invalid records from Input file
Reply with quote

Hi,

Thank u very much frank..

regards,
Akash
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Merging 2 records at multiple rows wi... Bijesh DFSORT/ICETOOL 2 Wed Dec 06, 2017 1:50 am
No new posts File Tailoring -- Temporary dataset i... samzee71 CLIST & REXX 3 Fri Dec 01, 2017 3:12 am
No new posts Rexx - File tailoring samzee71 CLIST & REXX 10 Thu Nov 30, 2017 10:47 pm
No new posts Moving a PS file as body of a mail! Vignesh Sid JCL & VSAM 4 Tue Nov 21, 2017 9:23 pm
No new posts unable to set RC = 4 when empty file migusd SYNCSORT 1 Tue Nov 21, 2017 1:21 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us