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 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: 252
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 Working with hex values in Filemanage... Emile Straker IBM Tools 0 Tue Sep 12, 2017 1:42 am
No new posts DB2 NULL Values display V S Amarendra Reddy DB2 3 Thu Sep 07, 2017 6:59 pm
No new posts Error in SQL-PLIST3 'Above value tru... rikdeb DB2 4 Wed Sep 06, 2017 1:34 pm
No new posts Moving values to a variable of copybo... Vignesh Sid COBOL Programming 6 Wed Sep 06, 2017 1:04 pm
No new posts Remove leading spaces from numeric field rexx77 SYNCSORT 6 Wed Sep 06, 2017 2:15 am

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