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

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


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
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
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: 420
Location: Inside the SPEW (Southwest Ohio, USA)

PostPosted: Wed Nov 23, 2005 5:08 am
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
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
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
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts INCLUDE OMIT COND for Multiple values... DFSORT/ICETOOL 5
No new posts SFTP Issue - destination file record ... All Other Mainframe Topics 2
No new posts Sortjoin and Search for a String and ... DFSORT/ICETOOL 1
No new posts Replace Multiple Field values to Othe... DFSORT/ICETOOL 12
No new posts Remove leading zeroes SYNCSORT 4
Search our Forums:

Back to Top