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

ALTSEQ replacing numeric charcter to some special characters


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
ponam.jkjain

New User


Joined: 24 Nov 2007
Posts: 2
Location: Mumbai

PostPosted: Wed Mar 24, 2010 9:18 am
Reply with quote

Hi,

I have a file of length 400 in which I have to replace all comma ',' with space ' '.
I am using below control. This control is replacing comma with space but also replacing all numeric fields to some special characters.

Code:

   SORT FIELDS=COPY                     
   ALTSEQ CODE=(6B40)                     
   OUTREC BUILD=(1,400,TRAN=ALTSEQ)   
   OUTFIL FNAMES=SORTO01               


Please guide me to avoid the unwanted conversion.

Input
Code:
0501OGC-MFG,MKTG,DLR RELS, ENV     
1580TALENT MANAGEMENT & DIVERSITY   
1540ELECTRONIC SALES INFO.         
0520PATENT OFFICE                   
0530WARRANTY LITIGATION             
1758ITM S.H.A.P. OPERATIONS         
0532GENERAL  LITIGATION             
0501OGC-MFG,MKTG,DLR RELS, ENV     


Input in hex
Code:

      1723ITM SALES OPERATIONS SYSTEMS   
    44FFFFCED4ECDCE4DDCDCECDDE4EEEECDE444
    0017239340213520675913965202823542000
--------------------------------------
      0501OGC-MFG,MKTG,DLR RELS, ENV     
    44FFFFDCC6DCC6DDEC6CDD4DCDE64CDE44444
    0005016730467B4237B43909532B055500000
--------------------------------------
      1580TALENT MANAGEMENT & DIVERSITY 
    44FFFFECDCDE4DCDCCCDCDE454CCECDECEE44
    0015803135530415175455300049559293800
--------------------------------------
      1540ELECTRONIC SALES INFO.         
    44FFFFCDCCEDDDCC4ECDCE4CDCD4444444444
    001540535339659302135209566B000000000

Output

Code:
^§^£OGC-MFG MKTG DLR RELS  ENV     
£§½^TALENT MANAGEMENT & DIVERSITY 
£§©^ELECTRONIC SALES INFO.         
^§¥^PATENT OFFICE                 
^§·^WARRANTY LITIGATION           
£¼§½ITM S.H.A.P. OPERATIONS       
^§·¥GENERAL  LITIGATION           
^§^£OGC-MFG MKTG DLR RELS  ENV 


Output in hex

Code:
^§^£OGC-MFG MKTG DLR RELS  ENV     
BBBBDCC6DCC4DDEC4CDD4DCDE44CDE44444
05016730467042370439095320055500000
-----------------------------------
£§½^TALENT MANAGEMENT & DIVERSITY 
BBBBECDCDE4DCDCCCDCDE454CCECDECEE44
15803135530415175455300049559293800
-----------------------------------
£§©^ELECTRONIC SALES INFO.         
BBBBCDCCEDDDCC4ECDCE4CDCD4444444444
1540535339659302135209566B000000000
-----------------------------------
^§¥^PATENT OFFICE                 
BBBBDCECDE4DCCCCC444444444444444444
05207135530666935000000000000000000
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Wed Mar 24, 2010 9:46 am
Reply with quote

Hello,

It will help if you post the complete jcl and control statements along with all of the informational messages (including the messgae ids) generated by the run.

When posting data it is best to have the same records included throughout. . .

In the output data the first 4 bytes appear to be VB length info rather than "your" data.

Also note, that your data has been "Code"ed which improves readability and preserves alignment.
Back to top
View user's profile Send private message
guptae

Moderator


Joined: 14 Oct 2005
Posts: 1208
Location: Bangalore,India

PostPosted: Wed Mar 24, 2010 12:11 pm
Reply with quote

Hello Poonam,

You code looks ok to me . It Should replaced all the comma's with Space.
Please provide full jcl with input & output .
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA

PostPosted: Wed Mar 24, 2010 10:22 pm
Reply with quote

Ponam,

The DFSORT control statements you show would NOT do what you say it does. When I run those DFSORT control statements with your input, I get the following for output:

Code:

0501OGC-MFG MKTG DLR RELS  ENV             
1580TALENT MANAGEMENT & DIVERSITY         
1540ELECTRONIC SALES INFO.                 
0520PATENT OFFICE                         
0530WARRANTY LITIGATION                   
1758ITM S.H.A.P. OPERATIONS               
0532GENERAL  LITIGATION                   
0501OGC-MFG MKTG DLR RELS  ENV             


So either you're not doing what you show or you're not showing something you're doing.

Please show your complete JES log.
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 -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts Replacing 'YYMMDD' with date, varying... SYNCSORT 3
No new posts Issues Converting From ZD to Signed N... DFSORT/ICETOOL 4
No new posts Substring number between 2 characters... DFSORT/ICETOOL 2
No new posts Reading dataset in Python - New Line ... All Other Mainframe Topics 22
No new posts Convert HEX to Numeric DB2 3
Search our Forums:

Back to Top