Concatenate two variables into one

Neelima · New User Joined: 14 Apr 2005 Posts: 6 Location: Hyderabad

Hi All,

I have two variables:
Variable1 -- X(35) -- Value is DEEP RED
Variable2 -- X(20) -- Value is OTHER

The output should be something like
OUT-VARIABLE -- (DEEP RED OTHER).
No extra spaces should be present at the end of the output variable.

Note: In my code, the output variable is in a array.

Neelima

dick scherrer · Posted: Tue Jun 05, 2007 9:39 pm

Hello,

Please post your actual code.

If your output array is fixed length, there will be something following "OTHER".

If you give a more complete description of what you need to do, we will be able to offer beter suggestions.

Neelima · New User Joined: 14 Apr 2005 Posts: 6 Location: Hyderabad

Hi,

More details below:

01 WS-GMSATTR-INFO.
05 GMS-START-TAG PIC X(26) VALUE
'<attribute name="gmsattr">'.
05 WS-GMS-TAG-1 PIC X(09) VALUE '<![CDATA['.
05 WS-GMS-ARR-OUT.
10 WS-GMS-ITEM-ARRAY OCCURS 0 TO 99999 TIMES
DEPENDING ON WS-TOT-ITEM-REC.
15 WS-ITEM-OUT PIC X(35) VALUE SPACES.
15 WS-FILLER PIC X(01) VALUE SPACES.
05 WS-GMS-TAG-2 PIC X(03).

In the above declaration, we are passing two different values one is X(35) and the other X(20) to WS-ITEM-OUT.

When we pass the value to WS-ITEM-OUT like 'DEEP RED' the output should have only the data but not extra spaces at the end.
I guess i need to change the declaration of WS-ITEM-OUT.

Please help me on this.

Neelima

rahulkolhe2003 · New User Joined: 06 Mar 2007 Posts: 12 Location: columbus

Hi Neelima,

Is this what you want?
VARIABLE1 = 'DEEP RED '
VARIABLE2 = 'OTHER'

OUT-VARIABLE = 'DEEP RED OTHER'

You can get this with the below code.

STRING VARIABLE1 DELIMITED BY ' '
' ' DELIMITED BY SIZE
VARIABLE2 DELIMITED BY SIZE
INTO OUT-VARIABLE

comment- there are 2 spaces while delimited variable1.

Neelima · New User Joined: 14 Apr 2005 Posts: 6 Location: Hyderabad

But i have a question.
When i move OUT-VARIABLE to WS-ITEM-OUT then again, it is taking spaces. should i chnage the declaration of WS-ITEM-OUT.

Please let me know

dick scherrer · Posted: Wed Jun 06, 2007 1:20 am

Hello,

I don't believe this

rahulkolhe2003 · New User Joined: 06 Mar 2007 Posts: 12 Location: columbus

Hi Neelima,

I am not sure how you can get rid of extra spaces :?: You can check it by simple move statment. Output showed that extra spaces will be there.
e.g.

PGM-NAME PIC X(08) VALUE SPACES.

MOVE 'PGMN' TO PGM-NAME.
DISPLAY PGM-NAME 'RAHUL'.

OUTPUT SHOWED:
PGMN RAHUL

socker_dad · Posted: Wed Jun 06, 2007 3:03 am

Those darn professors and their tricky homework assignments!

dick scherrer · Posted: Wed Jun 06, 2007 3:40 am

Hello,

Once we have a more complete problem definition, we can deal with this

William Thompson · Posted: Wed Jun 06, 2007 4:21 am

I know what you are trying to do but this:

dick scherrer · Posted: Wed Jun 06, 2007 4:46 am

Hello,

As i mentioned, i didn't want to post code/process until the final output has been defined.

Knowing where the final result will be used will also help determine how to implement.

Neelima · New User Joined: 14 Apr 2005 Posts: 6 Location: Hyderabad

Neelima · New User Joined: 14 Apr 2005 Posts: 6 Location: Hyderabad

Hi,
Someone help me asap.

Neelima

dick scherrer · Posted: Wed Jun 06, 2007 8:12 am

Hello,

How does this incorporate the array that occurs 0 to 99999 times?

What are the "rules" for combining info from multiple input lines?

Your initial post mentions

ajayvamsi · New User Joined: 21 Jul 2005 Posts: 56 Location: Hyderabad

I am sorry for the delay but here is the solution

var-1 35
var-2 20

take another variable of length var-3 of size 35 + 20 = 55
take another values for calculating the size of var-3

01 BLK-CTR pic 9(02) value zeroes.

MOVE VAR-1 TO VAR-3(1:35).
MOVE VAR-2 TO VAR-3(36:20).

hope u r clear till this point.

now use the below code

INSPECT FUNCTION REVERSE(var-3)
TALLYING BLK-CTR FOR LEADING SPACES

as u said that ur out-varable is in occurs with depending [suppose X]

then compute X = 55 - BLK-CTR

and now move ur var-3(1:X) to occurs variable.

Please let me know if u have any cocerns

thanks for ur good query

sorry again for delay solution

bye
ajay

dick scherrer · Posted: Wed Jun 06, 2007 5:56 pm

Hello,

I believe that suggestion will not create the desired output from the posted input. Please re-read the original and follow on posts and notice that the needed output requires more than simply combining strings. When there are "multiples" they must be combined into a single string.

rahulkolhe2003 · New User Joined: 06 Mar 2007 Posts: 12 Location: columbus

Hello Dick,

William Thompson · Posted: Wed Jun 06, 2007 10:51 pm

dick scherrer · Posted: Thu Jun 07, 2007 12:27 am

Hello,

To get what you want, i'd suggest calculating the "good data" length of the first field and then use a reference modified STRING to combine the desired length from the first field with the data from the second field into a 3rd field. Now you have only what you want in a single field.

Pons · Posted: Thu Jun 07, 2007 6:04 pm

STRING VAR1 DELIMITED BY ' ' ' '
DELIMITED BY SIZE
VAR2 DELIMITED BY ' ' ' '
DELIMITED BY SIZE
INTO VAR3.

I hope it will work.