Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

JCL using Fileaid utility.

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Compuware & Other Tools
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    Post subject: JCL using Fileaid utility.
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: 8593
Location: Back in jolly old England

PostPosted: Fri Mar 26, 2010 6:05 pm    Post subject:
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: 7993
Location: Bellevue, IA

PostPosted: Fri Mar 26, 2010 6:42 pm    Post subject:
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    IBMMAINFRAMES.com Support Forums -> Compuware & Other Tools All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts TSO or command line utility to genera... kishpra JCL & VSAM 3 Thu Mar 09, 2017 1:11 am
No new posts TAPE VERIFY utility?? MrExtraordinare JCL & VSAM 3 Fri Dec 09, 2016 10:57 pm
No new posts Best IMS DB Unload Utility jjabez10 IMS DB/DC 12 Thu Sep 22, 2016 11:15 pm
No new posts Any docs / links for isub- cobol comp... SRICOBSAS COBOL Programming 4 Fri Aug 26, 2016 2:35 pm
No new posts Comparex utility to Syncsort conversion mistah kurtz SYNCSORT 11 Fri Jul 22, 2016 1:53 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us