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

JCL using Fileaid utility.


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

New User


Joined: 29 Jan 2006
Posts: 1
Location: hyderabad

PostPosted: Fri Mar 26, 2010 5:57 pm
Reply with quote

Hi all,
I have requirement like there is an flat file which contains customer information in different locations. say for eg., firstname and last name may be in poisition 10 and 30 and other information will be in some other location. for some of the fields (say more than 3 columns) i need to replace with new values. I tried doing in Fileaid utility in JCL but I not able to give multiple if conditions to validate the record. Is it possible to give multiple if's for validation the different locations of records.
//SYSIN DD *
$$DD01 COPYALL IF=(225,EQ,C'MI,BC'),
MOVE=(163,2,225),
MOVE=(165,C'12345'),
ELSE,
MOVE=(163,C' '),
MOVE=(165,8,227),
IF=(225,EQ,C'ON'),
MOVE=(163,2,225),
MOVE=(165,C'A1B2C3'),
ELSE,
MOVE=(163,C' '),
MOVE=(165,8,227),
MOVE=(1,26,42),MOVE=(27,34,73), 1ST AND LAST NAME
MOVE=(61,39,108),MOVE=(100,39,148), ADDR1 AND ADD2
MOVE=(139,24,195) CITY
/*
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Fri Mar 26, 2010 6:05 pm
Reply with quote

Don't know. Why don't YOU try it out and report back to us if it's possible icon_rolleyes.gif
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Fri Mar 26, 2010 6:42 pm
Reply with quote

Why not something like
Code:
IF=(225,EQ,C'ON'),
MOVE=(163,2,225),
MOVE=(165,C'A1B2C3'),
IF=(225,NE,C'ON'),
MOVE=(163,C' '),
MOVE=(165,8,227),
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 Search two or more word with FILEAID Compuware & Other Tools 15
No new posts REASON 00D70014 in load utility DB2 6
No new posts ISRSUPC search utility - using high l... TSO/ISPF 2
No new posts Generate output lines (SYSIN card for... DFSORT/ICETOOL 4
No new posts Any JCL or VSAM Utility to get number... JCL & VSAM 1
Search our Forums:

Back to Top