using STRING & DELIMITED BY...

genesis786 · Posted: Fri Dec 19, 2008 5:01 pm

Hi,

I have following requirement.

WS-VAR1 PIC X(10).
WS-VAR2 PIC X(30).
WS-VAR3 PIC X(42).

Now. WS-VAR1 has multiple words in it like 005 IBD or ENT DEAL etc etc...
WS-VAR2 is something like ENTERPRISE DEAL IBD

I want WS-VAR3 to be something like

005 IBD-ENTERPRISE DEAL IBD

When I write STRING with DELIMITED BY SIZE it comes like

005 IBD -ENTERPRISE DEAL IBD

Can anyone please help?

dp33770 · New User Joined: 04 Jul 2007 Posts: 91 Location: Hyderabad

Dear genesis786,
You said,

When I write STRING with DELIMITED BY SIZE it comes like

005 IBD -ENTERPRISE DEAL IBD

is it that U get an extra space after IBD and ENTERPRISE .
Do you use the '-' in STRING

hikaps14 · Active User Joined: 02 Sep 2005 Posts: 189 Location: Noida

Hi,

String statement can be used with 2 verbs :
1)delimited by Size
2)delimitedd by Space

Usually when we concatenate 2 variable contents into 1 variable, we use DELIMITED BY SPACE ( for the type of o/p desired by you).

In your case this doesn't seem to be possible, because space is in between your strings of WS-VAR1. We need some marker to delimit your string, which can tell us the end of your string. If you can somehow insert any marker like '@' or '#', then delimited by '@' or '#' can be used.

Thanks,
-Kapil.

genesis786 · Posted: Fri Dec 19, 2008 6:17 pm

dp33770:

this is the STRING instruction:

Robert Sample · Posted: Fri Dec 19, 2008 6:52 pm

I got this output

dp33770 · New User Joined: 04 Jul 2007 Posts: 91 Location: Hyderabad

Robert,
I think genesis786 was looking for somthing like below as o/p

genesis786 · Posted: Fri Dec 19, 2008 7:33 pm

hi guys, i tried the following piece of code and it worked.

genesis786 · Posted: Fri Dec 19, 2008 7:40 pm

only thing is, how to handle it if my WS-VAR1 was something like 005 IBDXYZ .. occupying all 10 bytes.

?

genesis786 · Posted: Fri Dec 19, 2008 7:51 pm

now it is working fine

hikaps14 · Active User Joined: 02 Sep 2005 Posts: 189 Location: Noida

Its good, that your solution worked.

I just came accross another piece of code, which looks simpler to me:

1) MOVE WS-VAR1 to WS-RIGHT-JUST ( variable declared as right justified)
2) INSPECT WS-RIGHT-JUST tallying WS-COUNT for leading spaces.
3)WS-COUNT= 10 - WS-COUNT
4) Now use your string statement
STRING WS-VAR1(1: WS-COUNT)
'-'
WS-VAR2 DELIMITED BY SIZE
INTO WS-VAR3

Just a suggestion.

Thanks,
-Kapil.

Terry Heinze · Posted: Sat Dec 20, 2008 12:28 am

Move WS-VAR1 to WS-RIGHT-JUST will not right justify the source field if both fields are the same length. It will only right justify the contents of WS-VAR1 into WS-RIGHT-JUST regardless of the presence or absence of spaces.