用sas宏实现decode函数