输出格式名无效

1. proc import
   
2.   OUT = WORK.a
   
3.   DATAFILE = "F:\Book2.xls"
   
4.   DBMS = EXCEL REPLACE;
   
5.   Sheet = "Sheet1";
   
6. run;
   
7. 
   
8. proc sql noprint;
   
9.                 select Value into:gcsex from a where lower(Key) = "gcsex";
   
10. quit;
    
11. 
    
12. data aaa;
    
13. input no name$;
    
14. cards;
    
15. 1 f
    
16. 2 m
    
17. ;
    
18. run;
    
19. 
    
20. %macro aaa;
    
21. data fmt;
    
22.         set aaa;
    
23.         retain fmtname "&gcsex.f";
    
24.         rename no=start name=label;
    
25. run;
    
26. proc format cntlin=fmt;
    
27. run;
    
28. %mend;
    
29. %aaa;

复制代码

运行后出现


如何解决？谢谢！

Book2.xls (15.5 KB)

2014-11-15 17:38:12 上传

dxystata 发表于 2014-11-17 13:52
使用strip无效！

1. SQL 后去掉空格：
  加一句 %let gcsex=&gcsex;

2. retain那句去除空格
        retain fmtname "%trim(&gcsex.)f";

楼主看到log里面SEX和F之间有很大的空格吗？楼主的本意是生成一个变量fmtname，值为SEXF，作为格式的名字，但是格式的名字里面不能有空格的存在，那些空格估计是因为生成宏变量gcsex时留下的，所以做法有两种：
1. select strip(Value) into :gcsex
2.直接对“&gcsex.f”进行处理，处理方法就是用tranwrd或者compress函数对空格进行替换，具体的，楼主先自己试试看，实在不行，我会给出代码。

sniperhgy 发表于 2014-11-15 20:11
楼主看到log里面SEX和F之间有很大的空格吗？楼主的本意是生成一个变量fmtname，值为SEXF，作为格式的名字， ...

使用strip无效！

pobel 发表于 2014-11-17 15:42
1. SQL 后去掉空格：
  加一句 %let gcsex=&gcsex;

为什么sql后会有空格呢？谢谢！

dxystata 发表于 2014-11-17 15:56
为什么sql后会有空格呢？谢谢！

1. 首先，如果SELECT出的值前后有空格，SQL INTO创建宏变量过程中不会去掉前后的空格。
2. （猜测）用SQL INTO创建的宏变量的长度似乎取决与SELECT的变量长度。
例如，如果变量value的长度是8，那INTO做的宏变量gcsex的值也会是8位。

pobel 发表于 2014-11-17 16:15
1. 首先，如果SELECT出的值前后有空格，SQL INTO创建宏变量过程中不会去掉前后的空格。
2. （猜测）用SQ ...

proc sql noprint;
   select Value into:gcsex from a where lower(Key) = "gcsex";
quit;

%put %length(&gcsex);

结果是3。

pobel 发表于 2014-11-17 16:15
1. 首先，如果SELECT出的值前后有空格，SQL INTO创建宏变量过程中不会去掉前后的空格。
2. （猜测）用SQ ...

proc sql noprint;
   select Value into:gcsex from a where lower(Key) = "gcsex";
quit;

%put %length(&gcsex);

结果是3。

dxystata 发表于 2014-11-18 07:53
proc sql noprint;
   select Value into:gcsex from a where lower(Key) = "gcsex";
quit;

%length的结果是3并不能说明gcsex的值不包含空格。

%put %length(*&gcsex*);

1. proc sql noprint;
   
2.    select compress(Value)||'F' into:gcsex from a where lower(Key) = "gcsex";
   
3. quit;
   
4. 
   
5. /* or   */
   
6. %symdel gcsex;        /* delete the macro variable */
   
7. proc sql noprint;
   
8.     select trim(Value)||'f' into:gcsex from a where lower(Key) = "gcsex";
   
9. quit;
   
10. 
    
11. /* then */
    
12. data fmt;
    
13.     set aaa;
    
14.     retain fmtname "&gcsex";
    
15.     rename no=start name=label;
    
16. run;

复制代码