Date:         Sat, 25 Oct 2003 18:47:51 -0400
Reply-To:     "Chang Y. Chung" <chang_y_chung@HOTMAIL.COM>
Sender:       "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU>
From:         "Chang Y. Chung" <chang_y_chung@HOTMAIL.COM>
Subject:      Re: Splitting up values

Hi, Brent,
Regarding my solution, Richard A. DeVenezia kindly showed me a neater way -
- one that does not involve writing and reading the data to an external
file. Here is his email:
Cheers,
Chang
----------------------------------------------------------------------
Richard wrote:

No need to write it out and read it in, just tweak the _infile_ buffer */

data one;
  master="15231_._1_0_00_0_2_N_0_5_3_-21914__END"; output;
  master="66666_._1_0_00_0_2_N_0_5_3_-21914__END"; output;
run;

data two;
  infile cards dlm='_' missover;
  input @;
  length var1-var20 $8;
  do while (not eod);
    set one end=eod;
    _infile_ = master;
    input @1 var1-var20  @;
    output;
  end;
  stop;
cards4;
necessary evil
;;;;
run;
-----------------------------------------------------------------