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

convertion of character to packed decimal


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

New User


Joined: 29 Mar 2006
Posts: 34

PostPosted: Tue Dec 19, 2006 8:27 pm
Reply with quote

hi

This is sudheer

any body let mi give any ida on this query..


i hve one file with 19 chars of record length


in that 19 i wanted to convert position 14 and length 6 character to

14 , 4 packed decimal and iwanted to write in to another file...


give me the fd sort..fields..



thanks in advance\


sudheer
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: Tue Dec 19, 2006 9:38 pm
Reply with quote

You can use a DFSORT job like this:

Code:

//S1 EXEC PGM=ICEMAN
//SYSOUT    DD SYSOUT=*
//SORTIN DD DSN=...  input file (FB/19)
//SORTOUT DD DSN=...  output file (FB/17)
//SYSIN    DD  *
  OPTION COPY
  INREC BUILD=(1,13,14,6,SFF,TO=PD,LENGTH=4)
/*



I used SFF (signed free form) format because you didn't say what the values in 14-19 look like. SFF will handle most values. You could use other formats depending on what the values actually look like, e.g. ZD for '01234'.
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 Extracting Variable decimal numbers f... DFSORT/ICETOOL 17
No new posts PD not working for unsigned packed JO... DFSORT/ICETOOL 5
No new posts Def PD not working for unsigned packe... JCL & VSAM 3
No new posts Need Help with Packed Decimal Signs DFSORT/ICETOOL 4
No new posts Panvalet - 9 Character name - Issue c... CA Products 6
Search our Forums:

Back to Top