一个如何使用 VVALUEX() 函数的静态示例。
data result;
V01 = 2;
AMOUNT=100;
CALC = 'value of V01 * AMOUNT';
length arg1 arg2 $32;
arg1 = scan(compress(CALC, 'value of'), 1);
arg2 = scan(compress(CALC, 'value of'), 2);
put arg1 arg2;
result = input(VVALUEX(arg1), 16.) * input(VVALUEX(arg2), 16.);
run;
对于您的情况,您必须创建逻辑来识别所有已知的 CALC 模式、变量的类型和格式(因为VVALUEX()
返回格式化的值)。
一种可能不适合大量数据的动态方法是为每一行生成代码(见下文)。目前假定一个简单的表达式可用于IF .. THEN
.
data input;
length CALC $50;
input V01 M08 AMOUNT CALC 9-58;
cards;
2 1 100 value of V01 * AMOUNT
2 4 100 value of M08 * AMOUNT
;
run;
/* code generation */
data _null_;
file 'mycalc.sas';
set input end=last;
length line $150;
if _N_=1 then do;
put 'data result;';
put ' set input;';
end;
line = 'if _N_ = ' || put(_N_, 8. -L) ||
' then RESULT = ' || compress(CALC, 'value of') || ';';
put line;
if last then put 'run;';
run;
%include 'mycalc.sas'; /* run the code */
好的,现在如果看到我没有注意到您关于 PLAN 字段的注释 - 请根据需要进行调整。