home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #16 / NN_1992_16.iso / spool / comp / lang / rexx / 666 < prev    next >
Encoding:
Text File  |  1992-07-28  |  1.7 KB  |  55 lines
  1. Comments: Gated by NETNEWS@AUVM.AMERICAN.EDU
  2. Path: sparky!uunet!gatech!paladin.american.edu!auvm!SIUEMUS.BITNET!DPTS
  3. Message-ID: <28JUL92.15648536.0141.MUSIC@SIUEMUS.BITNET>
  4. Newsgroups: comp.lang.rexx
  5. Date:         Tue, 28 Jul 1992 14:29:21 CDT
  6. Sender:       REXX Programming discussion list <REXXLIST@UGA.BITNET>
  7. From:         Todd Shook <DPTS@SIUEMUS.BITNET>
  8. Subject:      Coding question
  9. Lines: 44
  10.  
  11.     Hello REXX-L,
  12.  
  13.  
  14.      I have a Rexx coding question that somebody on the list
  15. might be able to help with.  I'm trying to write a Rexx program that
  16. will create the following output.  My input looks like the following.
  17.  
  18.               variable
  19.               --------
  20. record1:      out=c1
  21. record2:      out=c2
  22. record3:      out=c3
  23. record4:      out=c4
  24.    .            .
  25.    .            .
  26.    .            .
  27.  
  28.  
  29.  
  30. I want to read these input records and create the following string.
  31.  
  32.  
  33.       SET C1 C2 C3 C4 . . .  until all records have been read.
  34.  
  35. Any help on how I can create this string would be appreciated.
  36.  
  37.  
  38.                        Thanks Todd
  39.  
  40.  
  41.  
  42.  
  43.  
  44.  
  45.  
  46. +----------------------------------------------------------------------+
  47. | Todd Shook                       |     ____   __  __  __  ____       |
  48. | Data Processing Analyst III      |    / ___| |  | ||  || |  __|      |
  49. | Southern Illinois University     |   ( (      ||  ||  || | |_        |
  50. |     at Edwardsville              |     \ \    ||  ||  || |  _|       |
  51. | Edwardsville, IL 62026-1068      |    ___) )  ||  ||__|| | |__       |
  52. | (618) 692-3742                   |   |____/  |__|  \__/  |____|      |
  53. | Bitnet: DPTS@SIUEMUS             |                                   |
  54. +----------------------------------------------------------------------+
  55.