On Fri, 21 Aug 2009 12:06:48 -0500, John McKown wrote: >Parsing a CSV file in REXX should be very simple. Something along the lines of: > >/* REXX */ >DO FOREVER > "EXECIO 1 DISKR INPUT" > IF RC <> 0 THEN LEAVE > PARSE PULL RECORD > I=0 > DO WHILE RECORD<> "" > PARSE VAR RECORD VALUE ',' RECORD > I=I+1 > DATA.I=VALUE > END > DATA.0=I > /* PROCESS DATA */ >END >"EXECIO 0 DISKR INPUT(FINIS" > Some cells I had to deal with contained text with embedded newlines. This broke rows into multiple records. And I used tab instead of comma, because I feared embedded commas. And I didn't know how embedded quotation marks would be escaped. HTML seemed more orderly, or at least I know HTML better.
-- gil ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
