View previous topic :: View next topic
|
Author |
Message |
knobi
New User
Joined: 16 Aug 2005 Posts: 54
|
|
|
|
hi.. It's been awhile since the last time with rexx and i'm getting some logic trouble to put one stem into another one. Basically i'm trying to group 4 lines from old stem into 1 line on the new one. Any help is welcome! Thanks !
old.1 = "A"
old.2 = "A"
old.3 = "A"
old.4 = "A"
old.5 = "A"
old.6 = "A"
old.7 = "A"
old.8 = "A"
desired result
new.1 = "A A A A"
new.2 = "A A A A"
Note, not sure if counts or not but the old. stem may have 200 lines and may not be multiple by 4... so last new var may have few than 4 A's. |
|
Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006 Posts: 2547 Location: Silicon Valley
|
|
|
|
Your example would be better if the OLD stem had different values so we could see where they came from and where you want them.
1. you want a loop to process all of the OLD stem
2. within the loop, you need assignment statements for the NEW stem
3. concatenate the OLD stem values to whatever is in NEW stem
4. increment the index for the NEW stem every four times. |
|
Back to top |
|
|
knobi
New User
Joined: 16 Aug 2005 Posts: 54
|
|
|
|
thanks.. but it didn't help... as i said it been awhile... pls don't feel obligated to post...
folks... any change to the code below is welcome...
Code: |
full.1=" "
x=1
do i=1 to dat1.0
if substr(dat1.i,28,1) = "X" then do
full.x = full.x || substr(dat1.i,29,10)
end
end
say full.1
exit 0 |
Code'd |
|
Back to top |
|
|
knobi
New User
Joined: 16 Aug 2005 Posts: 54
|
|
|
|
i think i got it.. thanks !!! |
|
Back to top |
|
|
Pandora-Box
Global Moderator
Joined: 07 Sep 2006 Posts: 1592 Location: Andromeda Galaxy
|
|
|
|
What do you want to do if the file is having empty line? |
|
Back to top |
|
|
|