View previous topic :: View next topic
|
Author |
Message |
Ambili S
Active User
Joined: 06 Sep 2007 Posts: 112 Location: India
|
|
|
|
Hi
Just like Z is used for leading zero suppression , what should be used for leading space suppression. |
|
Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8697 Location: Dubuque, Iowa, USA
|
|
|
|
I do not understand what you mean by "leading space suppression". Do you mean the field should be left-justified? Leading spaces cannot be suppressed -- there has to be spaces, LOW-VALUES, or something in the character position.
You need to provide more details -- the variable picture and exactly what you want the variable output to look like. |
|
Back to top |
|
|
Bill O'Boyle
CICS Moderator
Joined: 14 Jan 2008 Posts: 2501 Location: Atlanta, Georgia, USA
|
|
|
|
You can define (for example) an edit-field as PIC BBBBBBBBBX. In this example, if the value were right-justified (padded with high-order SPACES) with a low-order 'A', then the edit-field would equal 'bbbbbbbbbA', with each 'b' representing a BLANK/SPACE.
However, if the value is left-justified padded with low-order SPACES, then review the Intrinsic Function REVERSE, used together with the INSPECT verb.
This combination has been discussed on the board before.
Intrinsic Functions were introduced with COBOL/370, about 15-18 years ago.
Bill |
|
Back to top |
|
|
Marso
REXX Moderator
Joined: 13 Mar 2006 Posts: 1353 Location: Israel
|
|
|
|
Ambili S wrote: |
Just like Z is used for leading zero suppression , what should be used for leading space suppression. |
The leading zeroes are not just suppressed, they are replaced by spaces.
Do you want to replace your leading spaces with something else ? |
|
Back to top |
|
|
|