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

Converting s9(9) comp field to char


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

New User


Joined: 16 Mar 2008
Posts: 90
Location: tamil nadu

PostPosted: Fri Jan 22, 2016 12:14 pm
Reply with quote

Hi ,

I need to convert the s9(9) comp field to CHAR.

The Data looks as below

000001 I BE BLMN CORP
000002 I BE BMNO CORP
000003 $A PE HELLOC JAKE
000004 A PE HELLOC TOM

The first 4 bytes belongs to custid which I need to convert to CHAR

Could you please help me to resolve this issue.

Regards,
L.Nethaji
Back to top
View user's profile Send private message
l.nethaji

New User


Joined: 16 Mar 2008
Posts: 90
Location: tamil nadu

PostPosted: Fri Jan 22, 2016 12:23 pm
Reply with quote

Hi ,

The input file looks as below .

I BE BLMN CORP
I BE BMNO CORP
$A PE HELLOC JAKE
A PE HELLOC TOM

My bad the rows got pasted in my previous post.Apologies.

I just need to convert it to CHAR

Regards,
L.nethaji
Back to top
View user's profile Send private message
l.nethaji

New User


Joined: 16 Mar 2008
Posts: 90
Location: tamil nadu

PostPosted: Fri Jan 22, 2016 12:44 pm
Reply with quote

HI,

I tried the below JCL .

//JS111 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SORTIN DD DISP=SHR,DSN=ACSTNS1.ACST831P.TB01008
//SORTOUT DD DSN=ACSTN&LVL..ACST831P.TB01008.OUTPUT,
// DISP=(NEW,CATLG,DELETE),
// DCB=(RECFM=FB,BLKSIZE=0,DSORG=PS),
// UNIT=SYSDA,SPACE=&SPC1
//SYSIN DD *
OPTION COPY
OUTREC FIELDS=(1,4,BI,CH,LENGTH=11,7,2)
//*

Its giving Syntax error in CH. I am able to do only for converting to numeric edited field.Not able to do it for Char.

Regards,
L.Nethaji
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7311
Location: Inside the Matrix

PostPosted: Fri Jan 22, 2016 2:14 pm
Reply with quote

Code tags. Use them.

If you don't post the error, why should we guess at it?

Have you looked up the error by its message-code?

The is no concept of conversion to "CH".

Since you've not indicated how you want the output, just see what 1,4,BI does. If that's not good enough for you, look at TO= and LENGTH= or the specification of an EDIT mask (EDIT=). Even others.

Can you point to the part of the manual which made you think you could convert to CH? I can attempt to arrange to get it fixed.
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 Converting a file from PD to display ... SYNCSORT 4
This topic is locked: you cannot edit posts or make replies. Passing a field name to COBOL program COBOL Programming 10
No new posts Converting Hex to PD Special Condition SYNCSORT 3
No new posts BMS map length field greater than zero CICS 3
No new posts Break a record into fields, each fiel... SYNCSORT 2
Search our Forums:

Back to Top