求助各位大牛！！！

变量color用了format “color”，怎么能让变量obj里面显示文字的颜色（红色，黄色……），而不是颜色的code（00,01……）

除了“if color='00' then color='红色'” 这种方法之外还有什么更好的方法吗？

proc format lib=test;
value $color '00'='红色'
                '10'='黄色'
                '20'='蓝色'
                '30'='绿色'
                '40'='橙色';
run;


data color;
set Dc.color;
obj=strip(color)||'：'||strip(count)||'个';
keep subjid ae;
run;