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

how to insert packed decimal value


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

New User


Joined: 17 Sep 2008
Posts: 2
Location: bangalour

PostPosted: Thu Feb 09, 2012 4:00 pm
Reply with quote

Hi,

i have 80 byte length file in 30 to 33 position are packed decimal values, i want to change that values into 5678 to all the records. how can i achieve that?
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Thu Feb 09, 2012 4:07 pm
Reply with quote

why not search the forum with the OVERLAY keyword
you will find quite a few examples
Back to top
View user's profile Send private message
Skolusu

Senior Member


Joined: 07 Dec 2007
Posts: 2205
Location: San Jose

PostPosted: Thu Feb 09, 2012 11:03 pm
Reply with quote

sarathy,

Use the following control cards

Code:

//SYSIN    DD *                           
  OPTION COPY                             
  INREC OVERLAY=(30:+5678,TO=PD,LENGTH=4)
//*
Back to top
View user's profile Send private message
sarathy

New User


Joined: 17 Sep 2008
Posts: 2
Location: bangalour

PostPosted: Tue Feb 14, 2012 4:50 pm
Reply with quote

Thanks Skolusu its working fine.
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 Insert header record with record coun... DFSORT/ICETOOL 14
No new posts Insert system time/date (timestamp) u... DFSORT/ICETOOL 5
Search our Forums:

Back to Top