[외부데이터 읽기] 외부데이터에서 인용부호(quotation marks)로 구분된 변수 읽기

[#1]

* 출처 : http://cafe.daum.net/statsas/3F8j/290

1.  tilde (~) 포맷 수정자 사용하기(format modifier);

DATA BACK1;

     infile DATALINES 

            MISSOVER DLMSTR = "," dsd;

     INPUT VAR1 ~ $

           VAR2 ~ $

           VAR3 ~ $

           VAR4 ~ $;

DATALINES;

'ABC','BCD','EDF','DFO'

'ADC','ACD','EAF','DFA'

'ABC','ADD','AAF','AFA'

'ABC','','DDD','FFF'

RUN;

2.  SCNA 함수의 'QM' 수정자 사용하기; 

DATA BACK2;

     infile DATALINES;

     INPUT ;

     LENGTH VAR1-VAR4 $3.;

     VAR1 = SCAN(_INFILE_,1,"','",'QM');

     VAR2 = SCAN(_INFILE_,2,"','",'QM');

     VAR3 = SCAN(_INFILE_,3,"','",'QM');

     VAR4 = SCAN(_INFILE_,4,"','",'QM');

DATALINES;

'ABC','BCD','EDF','DFO'

'ADC','ACD','EAF','DFA'

'ABC','ADD','AAF','AFA'

'ABC','','DDD','FFF'

RUN;

3. 입력 버퍼(_INFILE_) 데이터 변경하기; 

DATA BACK3;

     infile DATALINES;

     INPUT ;

     _INFILE_ = COMPRESS(TRANWRD(_INFILE_,"','","|"),"'");

     LENGTH VAR1-VAR4 $3.;

     VAR1 = SCAN(_INFILE_,1,"|",'M');

     VAR2 = SCAN(_INFILE_,2,"|",'M');

     VAR3 = SCAN(_INFILE_,3,"|",'M');

     VAR4 = SCAN(_INFILE_,4,"|",'M');

DATALINES;

'ABC','BCD','EDF','DFO'

'ADC','ACD','EAF','DFA'

'ABC','ADD','AAF','AFA'

'ABC','','DDD','FFF'

RUN;