“常用公式”在线计算,“设计手册”在线查询
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 支持支持 反对反对

共 1 个关于本帖的回复 最后回复于 2013-8-16 17:17

沙发
淡写轻描 新来的 发表于 2013-8-16 17:17:51 | 只看该作者
研发埠培训中心
可以的data a;input group $ number point;cards;A 1 85A 2 66B 1 69C 3 55D 4 33;run;%macro test;*打开存放参数的数据集;%let dsid=%sysfunc(open(work.a,i));%put &dsid;     *%put是在日志输出改宏变量的值;*fetch是为了判断是否读取完数据集记录,若已读完,则返回-1,否则返回0,赋给宏变量rc;%let rc=%sysfunc(fetch(&dsid));         %do%while(&rc=0);             *trim是去掉字符右边的空格,left是去掉字符左边的空格,getvarc(&dsid,1)是读取数据集的第一列,读取第二列则为getvarc(&dsid,2),getvarc是针对字符,若该列是数值型的则为getvarn(&dsid,2);                   %letgroup=%sysfunc(trim(%sysfunc(left(%sysfunc(getvarc(&dsid,1))))));                   %letnumber=%sysfunc(trim(%sysfunc(left(%sysfunc(getvarn(&dsid,2))))));                   %letpoint=%sysfunc(trim(%sysfunc(left(%sysfunc(getvarn(&dsid,3))))));                   %put&group;     %put &number;     %put &point;                   %letrc=%sysfunc(fetch(&dsid));     *同上fetch;                   %put&rc;         %end;                   %letrc=%sysfunc(close(&dsid));     *关闭数据集;                   %put&rc;%mend;%test;这里使用do while读取每条,你也可以使用记录数去循环读取每条
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关注我们

360网站安全检测平台