Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
Get a string without leading spaces in natural

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> NATURAL & MQSERIES
Author Message
Shah

New User


Joined: 05 Sep 2006
Posts: 18

PostPosted: Tue Nov 28, 2006 7:23 pm    Post subject: Get a string without leading spaces in natural
Reply with quote

Hi Folks,

I am new to NATURAL. In NATURAL programming how should i get a string without leading spaces. Is there any verb like INSPECT in COBOL.

Thanks,
Shah
Back to top
View user's profile Send private message
References
PostPosted: Tue Nov 28, 2006 7:23 pm    Post subject: Re: Get a string without leading spaces in natural Reply with quote

ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 1897
Location: Israel

PostPosted: Wed Nov 29, 2006 1:01 am    Post subject:
Reply with quote

Yes, the equivalent in NATURAL is EXAMINE.

O.
Back to top
View user's profile Send private message
Shah

New User


Joined: 05 Sep 2006
Posts: 18

PostPosted: Wed Nov 29, 2006 10:33 am    Post subject: Re: Get a string without leading spaces in natural
Reply with quote

Hi Ofer71,

Thanks for that. I need some more info. I have a question.

Question:

I have a string variable ABC (A79), this is initialized with 20 characters. While displaying this variable i am getting 59 spaces and the string is displaying from 60th position. How can i remove the spaces.

My target is while display i need only 20 characters (Means with out spaces).

Thanks in advance,
Shah
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 1897
Location: Israel

PostPosted: Wed Nov 29, 2006 11:51 am    Post subject:
Reply with quote

Shah -

before the display, add the following statement (assuming your variable name is ABC):
Code:
EXAMINE FULL ABC FOR ' ' DELETE


O.
Back to top
View user's profile Send private message
Shah

New User


Joined: 05 Sep 2006
Posts: 18

PostPosted: Wed Nov 29, 2006 1:03 pm    Post subject: Re: Get a string without leading spaces in natural
Reply with quote

Ofer,

Thanks , i will try this and let you know.

Thanks,
shah
Back to top
View user's profile Send private message
Shah

New User


Joined: 05 Sep 2006
Posts: 18

PostPosted: Wed Nov 29, 2006 5:08 pm    Post subject: Re: Get a string without leading spaces in natural
Reply with quote

Ofer,

I got that but not exactly. i need some more info. As per your EXAMINE verb, her i am getting first 20 characters following spaces. Now my requirement is, output will be only text without spaces.

Please help.

Thanks in advance,
Shah
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 1897
Location: Israel

PostPosted: Wed Nov 29, 2006 8:31 pm    Post subject:
Reply with quote

You can find the ending position of the string after the EXAMINE, but that won't help you, since NATURAL always pad variables with blanks.

O.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> NATURAL & MQSERIES All times are GMT + 6 Hours
Page 1 of 1