转Hopewell程序：如何将数字转换成类似证券代码格式的字段

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

var
1
22
333

want
A00001
A00022
A00333
如上，由var->want，want中第一个为字母，其余为数值型字符，这种一般都是怎么实现的涅，请高手指点下，谢谢！！！

解决方案：

data raw;
    input cvar $ nvar;
datalines;
1 1
22 22
333 333
;
data out;
    length cwant nwant $8;
    set raw;
    cwant='A00000';
    substr(cwant,length(cwant)-length(cvar)+1)=cvar;
    nwant=cats('A',put(nvar,z5.));
run;

扫码加我 拉你入群

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

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

分享0 收藏2 回帖

关键词：hopewell Hope Well PEW Wel

data a;
input var;
new_var=compress('A'||put(var,z5.));
cards;
1
22
333
;
run;