MVSFORUMS.com

[Rahull]

Hi,

Problem#1
I have 3 alpha numeric variables of 100 bytes to store name.
Var 1 Pic x(100). (For first name)
Var 2 Pic x(100). (for middle name)
Var 3 Pic x(100). (for last name)

(Any name can have spaces in between. i.e. First name can be "Raja ram".)

I have only one output variable of 40 bytes where i need to store the complete name. (Each part of name will be followed by one space)

Case : If sum of length of first + second + last > 40. Try to get complete first and last name and truncate second name.

Always length first + last name < or = 40.

Please suggest me how to do it in easy way. What solution I thought of so far is to use pointer for first and second and last name using STRING comnad.

Please provide some pseudo code if possible.

Problem # 2 :

I have address stored in one varaible of 100 bytes. I need to split the complete address in 5 lines of 20 bytes each in a very smart way.

For eg:

Var1 :: 3223, Apt # C, hartford road, hardford, connecticut.

output 1 : 3223, Apt # C
Output 2: Hartford road
.
.
( Smart logic: if the 20 th bytes does not end in space then I dont want that WORD of address part in that line)

Please suggest and provide pseudocode

[kolusu]

[ofer71]

Here is a REXX solution to problem 1: