MVSFORUMS.com

nk.nithya

Input;

dbzTHEdinosauer · Posted: Mon Apr 18, 2011 8:57 am Post subject:

cobol does not have varibale length strings........RTFM

Depending upon your destination field, you can move with reference-modification,
truncate with STRING Delimited by - though here you have to have a unique delimiter:

replace the last space with something unique for string delimited by
if you know that you will always have 2 spaces only at the end, you can use delimited by ' '.

INSPECT (REVERS(your-field)) TALLYING SPACE-CTR FOR LEADING SPACES will tell you how many trailing spaces you have.
the LENGTH(your-field) - SPACES-CTR = number of characters to move.
_________________
Dick Brenholtz
American living in Varel, Germany

misi01 · Posted: Tue Apr 26, 2011 1:11 am Post subject: More to the point (?)

why do you need to remove trailing spaces ???

If your input string is defined as x(30) with 12 trailing spaces, moving it to a field defined as x(18 ) will remove all trailing spaces, so again, why do you need to remove them ????

computer · Posted: Tue Jun 28, 2011 11:58 am Post subject:

Hi nk.nithya,

A simple perform will do. Need to decalre a table variable with picture clause one. And start reading from reverse and capture data from first non-space character till you reach to the starting position.

Hope this helps....

papadi · Supermod Joined: 20 Oct 2009 Posts: 594 Topics: 1

There is no need for a perform. . .

There is actually no reason to do anything. The original post makes no sense. . .

The data is the data and is stored as it is stored. . . It is not a string with trailing blanks. It is not a string at all. . . COBOL has no way to "shorten" the value.
_________________
All the best,

di

Anuj Dhawan · Posted: Mon Jul 04, 2011 10:28 am Post subject:

What exactly the question is here?
_________________
Regards,
Anuj

kolusu · Posted: Mon Jul 04, 2011 10:32 am Post subject:

Folks please look at the date on which the topic is opened.

thanks

Kolusu

papadi · Supermod Joined: 20 Oct 2009 Posts: 594 Topics: 1

Hi Kolusu,

My reply was to the post from "computer" - not the topic in general. Would you prefer we did not reply to such "clutter posts" pointing out that they provide no value and may even more confuse the less experienced?

di

kolusu · Posted: Mon Jul 04, 2011 3:53 pm Post subject:

Papadi,

I did not mean your posts. Clutter posts should be avoided.

Kolusu

nk.nithya · Posted: Wed Jul 27, 2011 6:43 am Post subject:

Hi All,

Please tell me whether it coud be possible or not......
Do not comment on the Post..

kolusu · Posted: Wed Jul 27, 2011 10:17 am Post subject:

papadi · Supermod Joined: 20 Oct 2009 Posts: 594 Topics: 1

seagull · Beginner Joined: 13 Sep 2006 Posts: 5 Topics: 0

Are you sure it's spaces being transalated to junk? Spaces don't normally present any problems with export to excel. Could it be low-values?
_________________
"Programming today is a race between software engineers striving to build bigger and better idiot- proof programs, and the Universe trying to produce bigger and better idiots. So far, the Universe is winning."