谁来帮忙看下这个数据导入问题？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

数据显然是四列，名字是一列 带空格 需要整体导入 不要拆开的，谢谢关注

这个参考有错误
data example;
infile 'c:\x.txt'  ;
input Subj  : $3.  Name & $20.  DOB : mmddyy10. Salary  : dollar8.;
format DOB date9. Salary dollar8.;
run;


/*下面数据存到C盘 起名 x.txt  
001 Christopher Mullens 11/12/1955 $45,200
002 Michelle   Kwo 9/12/1955 $78,123
003 Roger W. McDonald 1/1/1960 $107,200
*/

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：数据导入 christopher McDonald michelle example 数据 帮忙

002 Michelle   Kwo  9/12/1955 $78,123
是不是这一行'Michelle' 和'Kwo'之间多了一个空格（delimiter）？
用&的话，'Michelle' 和'Kwo' 之间只能有一个空格，而'Kwo'之后要有两个以上空格。

pobel 发表于 2009-8-27 08:34
002 Michelle   Kwo  9/12/1955 $78,123
是不是这一行'Michelle' 和'Kwo'之间多了一个空格（delimiter）？
用&的话，'Michelle' 和'Kwo' 之间只能有一个空格，而'Kwo'之后要有两个以上空格。

牛 把kwo改成2个空格果然成功了 但如果真是一个空格的话，该如何处理呢？

用&修饰字符变量，比如name一类的，与后面的变量至少又有两个空格，向前进一个，实际上就达到了两个空格的效果
下面是sas帮助文档中的举例说明
data list;
   infile file-specification;
   input name $ & score;
run;
It can read these input data records:

----+----1----+----2----+----3----+
Joseph   11 Joergensen  red
Mitchel  13 Mc Allister  blue
Su Ellen  14 Fischer-Simon  green
The & modifier follows the variable it affects in the INPUT statement. Because this format modifier follows NAME, at least two blanks must separate the NAME field from the SCORE field in the input data records.

You can also specify an informat with a format modifier, as shown here:
    input name $ & +3 lastname & $15. team $;In addition, this INPUT statement reads the same data to demonstrate that you are not required to read all the values in an input record. The +3 column pointer control moves the pointer past the score value in order to read the value for LASTNAME and TEAM.

data example(drop=temp);                                                                                                               
length temp $20.;                                                                                                               
input Subj  : $3.  Name: & $20. temp $ @;                                                                                       
if index(temp,'/')>0 then input   Salary  : dollar8.;                                                                           
else do;                                                                                                                        
Name=trim(Name)||' '||temp;                                                                                             
        input temp $  Salary  : dollar8.;                                                                                       
end;                                                                                                                           
DOB=input(temp,mmddyy10.);                        
format DOB date9. Salary dollar8.;                                                                                             
datalines;                                                                                                                              
001 Christopher Mullens  11/12/1955 $45,200                                                                                             
002 Michelle   Kwo  9/12/1955 $78,123                                                                                                   
003 Roger W. McDonald  1/1/1960 $107,200                                                                                                
;                                                                                                                                       
run;

本例中，如果名字可能含两个空格的话：
data example(drop=temp);                                                                                                               
length temp $20.;                                                                                                               
input Subj  : $3.  Name: & $20. temp $ @;                                                                                       
if index(temp,'/')>0 then input   Salary  : dollar8.;                                                                           
else do;                                                                                                                        
        Name=trim(Name)||' '||temp;                                                                                             
        input temp $  Salary  : dollar8.;                                                                                       
end;                                                                                                                           
DOB=input(temp,mmddyy10.);                        
format DOB date9. Salary dollar8.;                                                                                             
datalines;                                                                                                                              
001 Christopher Mullens  11/12/1955 $45,200                                                                                             
002 Michelle   Kwo  9/12/1955 $78,123                                                                                                   
003 Roger W. McDonald  1/1/1960 $107,200                                                                                                
;                                                                                                                                       
run;

谢谢 david，如果name和DOB之间不是两个空格
如果是手动删成一个空格的话 你是程序是跑不出来的


如何在这个基础上修改一下呢？

请看如下程序，适用于名字中任意空格，名字后一个或多个空格。
data example(drop=temp);                                                                                                               
length temp $20.;                                                                                                                       
input Subj  : $3.  Name: $20. temp $ @;                                                                                                
do while(index(temp,'/')=0);                                                                                                            
   Name=trim(Name)||' '||temp;                                                                                                         
   input temp $ @;                                                                                                                     
end;                                                                                                                                    
input   Salary  : dollar8.;                                                                                                            
DOB=input(temp,mmddyy10.);                                                                                                              
format DOB date9. Salary dollar8.;                                                                                                      
datalines;                                                                                                                              
001 Christopher                        Mullens 11/12/1955 $45,200                                                                       
002 Michelle     Kwo 9/12/1955 $78,123                                                                                                  
003 Roger         W.       McDonald              1/1/1960 $107,200                                                                                   
;                                                                                                                                       
run;

data example;
infile 'c:\x.txt' truncover;
input aline $50. ;
line = compbl(aline);
; run;
data _null_;
  file 'C:\xx.txt';
  set example (keep=line);
  put line;
run;

问题解决，谢谢关注以及大家的回帖

尤其感谢 david0 的程序 使我犹如 醍醐灌顶 拨云见日的感觉 成语不多 聊表谢意