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
 
Syncsort to replace spaces with CCYYMMDD

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

New User


Joined: 12 Jun 2005
Posts: 44
Location: Boston

PostPosted: Fri Jul 10, 2009 4:50 pm    Post subject: Syncsort to replace spaces with CCYYMMDD
Reply with quote

I have a file with data as below
M**********xxxxxxxx*****************
V*************************xxxxxxxx**

When the first variable is 'M':
I have to check if the xxxxxxxx location is spaces. If it is spaces, I need to replace it with a some hard-coded date.
When the first variable is 'V':
I have to check if the other xxxxxxxx location is spaces. If it is spaces, I need to replace it with a some hard-coded date.

Can this be done using Syncsort?
Back to top
View user's profile Send private message

bipinpeter

Active User


Joined: 18 Jun 2007
Posts: 213
Location: Cochin/Kerala/India

PostPosted: Fri Jul 10, 2009 6:16 pm    Post subject:
Reply with quote

Hi kkxlnc,
Use the below code

Code:
SORT FIELDS=COPY
INREC IFTHEN=(WHEN=(1,1,CH,EQ,C'M',AND,12,10,CH,EQ,C'XXXXXXXXXX'),OVERLAY=(12:C'12/10/2009')),
IFTHEN=(WHEN=(1,1,CH,EQ,C'V,AND,25,10,CH,EQ,C'XXXXXXXXXX'),OVERLAY=(12:C'11/10/2009'))


Here i am assuming that the hard coded date which you are inserting is different in both cases.If the hard coded value is same you can use the second condition along with first codition using OR keyword.
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 Reformatting and adding additional fi... Badbeef SYNCSORT 6 Thu Apr 05, 2018 4:45 pm
No new posts Sort numeric fields with trailing spaces sancraig16 SYNCSORT 7 Tue Apr 03, 2018 1:21 am
No new posts Find & Replace string in CA-SORT mrgnndhmk CA Products 1 Fri Mar 30, 2018 12:58 am
No new posts Replace last name by first name anatol DFSORT/ICETOOL 10 Thu Mar 15, 2018 3:43 pm
No new posts help to replace columns by rows Vikas Maharnawar DFSORT/ICETOOL 8 Tue Mar 06, 2018 3:27 pm

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