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

command in file-aid to


IBM Mainframe Forums -> Compuware & Other Tools
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
ajayvamsi

New User


Joined: 21 Jul 2005
Posts: 56
Location: Hyderabad

PostPosted: Wed Dec 19, 2007 5:57 pm
Reply with quote

Hi all,

In a file I have junk/INVLAID data now using file - aid we can change this invalid data into zeroes for numeric's..wat ever required

we can do this in file-aid using a command but could not remember can any one help me out in this.

thanks
ajay
Back to top
View user's profile Send private message
krisprems

Active Member


Joined: 27 Nov 2006
Posts: 649
Location: India

PostPosted: Wed Dec 19, 2007 6:34 pm
Reply with quote

what do you mean by junk/INVLAID data?
show some sample i/p and o/p records?
Back to top
View user's profile Send private message
socker_dad

Active User


Joined: 05 Dec 2006
Posts: 177
Location: Seattle, WA

PostPosted: Thu Dec 20, 2007 12:43 am
Reply with quote

FileAid allows you to change data - but given data - that means that you must specify exactly what is to be replaced by a given value:


Code:
$$DD01  UPDATE IF=(91,EQ,C'A90')',REPL=(91,C'B01'),PRINT=0
/*


This statement updates the file in place. Specifically, if position 91 = A90, change it to B01.

You could try using something like IF=(91,GT,X'00'),etc.

Good luck.
Back to top
View user's profile Send private message
ajayvamsi

New User


Joined: 21 Jul 2005
Posts: 56
Location: Hyderabad

PostPosted: Thu Dec 20, 2007 10:00 am
Reply with quote

hey it is not to execute thru JCL it can be change using LINE COMMAND I am not sure on that line command so I put the query...Please help me with the line command to change Invalid data in file-aid to zeroes...

if u open the file thru file-aid and type the command it will change all the invalid data into zeroes...for that field...


thanks
ajay
Back to top
View user's profile Send private message
krisprems

Active Member


Joined: 27 Nov 2006
Posts: 649
Location: India

PostPosted: Thu Dec 20, 2007 10:57 am
Reply with quote

ajayvamsi
1. open the file in EDIT mode in your FILE-AID
2. Now give an ordinary TSO CHANGE command like this
Code:
C 1 0 ALL
in the above example all occurances of 1 would be replaced with 0's.
3. If you want to replace all 1's by o's at particular position in a file
Code:
C '1'  '0' 4 ALL
The above command will replace all occurances of 1 to 0's in the position 4.
Back to top
View user's profile Send private message
Santoshdorge

New User


Joined: 27 Jun 2006
Posts: 48
Location: Pune

PostPosted: Thu Dec 20, 2007 3:02 pm
Reply with quote

Hi Ajay,
I am not sure wheather you want to change only invalid occurances in particular column or whole column contains invalid values.

if the first is true then may be you need to do it in JCL or if there are only few INVALID VALUES then use

F \invalid 1 ----where 1 is first column
then change it manually to zero

and in case you want to set whole column to zero....try this
c any '0' 1 all


thanks,
Santosh
Back to top
View user's profile Send private message
ajayvamsi

New User


Joined: 21 Jul 2005
Posts: 56
Location: Hyderabad

PostPosted: Fri Feb 08, 2008 2:33 pm
Reply with quote

THANKS for ur solutions...
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 -> Compuware & Other Tools

 


Similar Topics
Topic Forum Replies
No new posts FTP VB File from Mainframe retaining ... JCL & VSAM 1
No new posts Extract the file name from another fi... DFSORT/ICETOOL 6
No new posts How to split large record length file... DFSORT/ICETOOL 10
No new posts RACF - Rebuild SETROPTS command which... All Other Mainframe Topics 3
No new posts Extracting Variable decimal numbers f... DFSORT/ICETOOL 17
Search our Forums:

Back to Top