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
 

 

How to remove junk values from the last 10 bytes of filler

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
maverick05

New User


Joined: 14 Apr 2005
Posts: 54
Location: Earth

PostPosted: Tue Nov 22, 2005 8:55 pm    Post subject: How to remove junk values from the last 10 bytes of filler
Reply with quote

Hi,

I have a group variable(of a communication copybook) of 100 bytes.with last 10 bytes as filler.

But these last 10 bytes are having junk value.

So before moving the data to 90 bytes,i am initialising the group variable.

But filler is not initalised as initialisation wont touch filler(as per my knowledge)

So how to remove junk values from the last 10 bytes of filler???

Thanks
Back to top
View user's profile Send private message

dneufarth

Active User


Joined: 27 Apr 2005
Posts: 241
Location: Cincinnati OH USA

PostPosted: Wed Nov 23, 2005 5:08 am    Post subject:
Reply with quote

check out 'referential modification'

move spaces to rec(90:10)




Dave
Back to top
View user's profile Send private message
Lord.of.Wind

New User


Joined: 17 Nov 2005
Posts: 60

PostPosted: Thu Oct 26, 2006 3:27 pm    Post subject:
Reply with quote

dneufarth wrote:
check out 'referential modification'

move spaces to rec(90:10)




Dave


Hi, i think it should be 'move spaces to rec(91:10)'. icon_smile.gif
Back to top
View user's profile Send private message
sridevi2005

New User


Joined: 15 Sep 2005
Posts: 42

PostPosted: Thu Oct 26, 2006 3:37 pm    Post subject: Re: How to remove junk values from the last 10 bytes of fill
Reply with quote

HI,

You can't itiliaze filler clause.
U have to move spaces by using referential modification.

Thanks,
Sridevi
Back to top
View user's profile Send private message
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Fri Oct 27, 2006 3:28 am    Post subject:
Reply with quote

The general solution for a group level variable with perhaps multiple fillers is to move spaces to the group, then you can init.

This approach results in spaces in the fillers and appropriately inited varables of various data formats.

Of course, ref/moded moves will also work but can become cumbersom.
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 -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Sorting of hex values Saurabh_mi DFSORT/ICETOOL 11 Thu May 25, 2017 3:49 pm
No new posts Replace values in the input data Vikas Maharnawar DFSORT/ICETOOL 10 Thu May 11, 2017 2:18 pm
No new posts Format record to remove Leading zeroes Learncoholic DFSORT/ICETOOL 14 Wed Apr 05, 2017 2:43 pm
No new posts Compare two files and subtract values ameetmund DFSORT/ICETOOL 7 Fri Mar 31, 2017 3:35 pm
No new posts Check Binary Values for symbols gandikk CA Products 3 Tue Mar 21, 2017 5:11 am


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