- 阅读权限
- 255
- 威望
- 0 级
- 论坛币
- 5649 个
- 通用积分
- 747.2663
- 学术水平
- 121 点
- 热心指数
- 140 点
- 信用等级
- 83 点
- 经验
- 21768 点
- 帖子
- 556
- 精华
- 2
- 在线时间
- 564 小时
- 注册时间
- 2018-5-31
- 最后登录
- 2024-4-19
|
若你仍然允许使用file=参数的话,确实有一法:
- filename style temp;
- proc template;
- path sashelp.tmplmst;
- source styles.rtf/file=style;
- run;
- data test;
- infile style truncover;
- input text $char1024.;
- run;
- *将每个分号所在的语句压缩至一行;
- data compressed;
- length newtext styles $2048. text $1024.;
- do until(char(text,length(text))=';');
- set test;
- newtext=catx('',newtext,text);
- end;
- if find(newtext,'/') then styles=substrn(newtext,find(newtext,'/')+1);
- run;
复制代码
|
|