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: 239
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 SQL query to run through list of valu... Ni3-db2 DB2 14 Wed Dec 14, 2016 9:52 am
No new posts Overlaying one set of charater values... Kevin Lindsley SYNCSORT 7 Sat Nov 05, 2016 3:21 am
No new posts Low values Results from VARCHAR FORMAT balaji81_k DB2 10 Thu Oct 20, 2016 1:18 am
No new posts How can we create a flat file in JAVA... rakesh.v18 Java & MQSeries 7 Fri Sep 23, 2016 10:46 pm
No new posts Using 'parm' to vary SORTOUT record v... Sysaron DFSORT/ICETOOL 13 Wed Sep 07, 2016 9:24 pm


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