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
 

 

eliminating a character from records

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

New User


Joined: 04 Oct 2010
Posts: 5
Location: Chennai

PostPosted: Wed Oct 06, 2010 10:46 am    Post subject: eliminating a character from records
Reply with quote

how to eliminate one characters from the records of a flat file irrespective of its position in using jcl sort card.
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: Wed Oct 06, 2010 12:00 pm    Post subject:
Reply with quote

How about some useful information that is seriously lacking here. Had you have searched the forum you would have seen that almost every thread for sort asks the same questions.

Which sort product and release level are you using.
What is the DSORG, RECFM and LRECL of the input file
Are you removing or replacing the character,
- i.e. convert to a blank, or shift left when this character is found.

Topic will be moved to appropriate forum when the requested information is given.
Back to top
View user's profile Send private message
satyalathas

New User


Joined: 04 Oct 2010
Posts: 5
Location: Chennai

PostPosted: Wed Oct 06, 2010 12:48 pm    Post subject:
Reply with quote

//SORTIN DD *
ABCD!EFGHI!!!JKLM!0!!
ABCDEFGH!!IJKLMNOPQ!!!0!

Assume that, the above displayed is the input field. eliminate all the special characters “!” in the input records.
Position of the special character is not specified.
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: Wed Oct 06, 2010 12:59 pm    Post subject:
Reply with quote

expat wrote:
How about some useful information that is seriously lacking here. Had you have searched the forum you would have seen that almost every thread for sort asks the same questions.

Which sort product and release level are you using.
What is the DSORG, RECFM and LRECL of the input file
Are you removing or replacing the character,
- i.e. convert to a blank, or shift left when this character is found.

Topic will be moved to appropriate forum when the requested information is given.

Please read the questions asked and then answer all of them and only then will there be enough information to be able to help you.
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Wed Oct 06, 2010 2:22 pm    Post subject:
Reply with quote

I don't really like it when someone post question and even after when a direction is provided to them they don't really understand what to answer!

Arrghh - go search for FINDREP, if your sort product supports that. But even before using that you'd need to find out the answer for
Quote:
Are you removing or replacing the character,
.
Back to top
View user's profile Send private message
satyalathas

New User


Joined: 04 Oct 2010
Posts: 5
Location: Chennai

PostPosted: Wed Oct 06, 2010 2:27 pm    Post subject:
Reply with quote

Actually i didnt come across this problem while practicing. But i have seen this questin some where and i dont know the details u hav asked. So posted the exact problem i hav seen. One thing i know is v need to remove the character instead of replacing.
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: Wed Oct 06, 2010 3:14 pm    Post subject:
Reply with quote

To determine the product type and release level, please run the code below and post the output from the SYSOUT JES element.
Code:
//SORTSTEP EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*
//SORTIN   DD *
ABC
//SORTOUT  DD SYSOUT=*
//SYSIN    DD *
  SORT     FIELDS=COPY
Back to top
View user's profile Send private message
satyalathas

New User


Joined: 04 Oct 2010
Posts: 5
Location: Chennai

PostPosted: Wed Oct 06, 2010 3:25 pm    Post subject: Reply to: eliminating a character from records
Reply with quote

Thanks for the guidance.
i vl do dat one and get back to you
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: Wed Oct 06, 2010 5:32 pm    Post subject:
Reply with quote

I will assume that this is SYNCSORT rather than DFSORT.

Just to clarify, although I did ask you to post the output from SYSOUT. Are the message codes prefixed ICE or WER
Back to top
View user's profile Send private message
satyalathas

New User


Joined: 04 Oct 2010
Posts: 5
Location: Chennai

PostPosted: Wed Oct 06, 2010 5:41 pm    Post subject:
Reply with quote

yes it is SYNSORT only and the prefix is WER.
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: Wed Oct 06, 2010 5:44 pm    Post subject:
Reply with quote

Topic moved to the JCL forum for SYNCSORT guidance, eventually.
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: Wed Oct 06, 2010 8:40 pm    Post subject:
Reply with quote

Hello and welcome to the forum,

Quote:
i vl do dat one and get back to you

First - lose the kiddie chat-room text. . .

Next - completely describe what you "have" and what you want using what you have as input (show samples of the input and output (as you did icon_smile.gif )

Next, provide file attribute info (if you are running a test on your own, make up an input file and use those attributes).

When you have a question, you can save yourself a lot of time by looking for a prior topic that answers your question - almost everything asked has been asked before. Use the forum Search (above in the blue bar).
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Wed Oct 06, 2010 9:24 pm    Post subject:
Reply with quote

Well, you did not what release/version of SyncSort are you using. It'll be shown there in the SYSOUT of Job from where you get the mesages prefixed with WER.

If you are using SYNCSORT FOR Z/OS 1.3.2.2R, you can use:
Code:
//PS0070 EXEC PGM=SORT           
//SYSOUT DD SYSOUT=*             
//SORTIN DD *                   
ABCD!EFGHI!!!JKLM!0!!           
ABCDEFGH!!IJKLMNOPQ!!!0!         
//SORTOUT DD SYSOUT=*           
//SYSIN DD *                     
  OPTION COPY                   
  INREC FINDREP=(IN=C'!',OUT=C'')
/*                               
//*                             

SORTOUT:
Code:
********************************* TOP OF DATA **********************************
ABCDEFGHIJKLM0                                                                 
ABCDEFGHIJKLMNOPQ0                                                             
******************************** BOTTOM OF DATA ********************************
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Wed Oct 06, 2010 9:28 pm    Post subject:
Reply with quote

And if you are on some earlier version of SyncSort, please serach the Forum for "ALTSEQ" and SQZ. (SHIFT=LEFT should work for you.)
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 Removing Duplicates based on certain ... chandracdac DFSORT/ICETOOL 5 Fri Dec 09, 2016 4:40 am
No new posts Limit duplicate records in the SORT pshongal SYNCSORT 6 Mon Nov 21, 2016 12:54 pm
No new posts Updating the counters after eliminati... PANDU1 DFSORT/ICETOOL 12 Mon Nov 21, 2016 9:47 am
No new posts How to split the records using the am... vnktrrd DFSORT/ICETOOL 24 Fri Oct 28, 2016 7:33 pm
No new posts Sort records based on numeric field. Alks SYNCSORT 2 Wed Oct 19, 2016 10:14 pm


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