请教如何读取数据集中某个数据

learsaas 发表于 2014-3-28 15:37
我的程序里修改为row=2；col=4；即可。row设定的是行，col设定的是列。

谢谢learsaas的热情答复，程序非常符合提出的问题。
同时也想请教一下，如果将列改为变量名x4，其他条件不变，其程序如何修订？谢谢！

fxf258 发表于 2014-3-31 09:55
谢谢learsaas的热情答复，程序非常符合提出的问题。
同时也想请教一下，如果将列改为变量名x4，其他条件 ...

给你写了个通用的，若要取第2行第3列，则row=2；col=‘3’，若取第2行变量x4，则row=2;col='x4'：

1. data _null_;
   
2.                 length row 8 col $32;
   
3.         row=2;col='x4';
   
4.         length value $256;
   
5.         dsid=open('yoursasdata');
   
6.         rc=fetchobs(dsid,row);
   
7.                 if prxmatch('m/^\d/',left(col)) then varnum=input(col,best32.);
   
8.                 else varnum=varnum(dsid,col);
   
9.         type=vartype(dsid,varnum);
   
10.         if upcase(type)='N' then value=getvarn(dsid,varnum);
    
11.         else value=getvarc(dsid,varnum);
    
12.         rc=close(dsid);
    
13.         call symput('fx',strip(value));
    
14. run;

复制代码

learsaas 发表于 2014-3-31 11:10
给你写了个通用的，若要取第2行第3列，则row=2；col=‘3’，若取第2行变量x4，则row=2;col='x4'：

非常感谢！祝您天天快乐！