如何在 Reporting Services 分组中引用 VB 函数

Question

早上好，

我正在使用 Reporting Services 2005 生成一份一次性报告，该报告将根据 PLANCODE 字段对记录进行分组。我创建了以下 VB 函数：

Function PayorGroup (ByVal ipc as String) as String
set ipc = PLANCODE
Select Case ipc
Case 'M01' to 'M99'
PayorGroup = "Medicare"
Case 'A01' to 'A99'
PayorGroup = "Medicare"
Case 'C01' to 'C99'
PayorGroup = "Cash Pay"
Case 'T01' to 'T99' 
PayorGroup = "TCMS"
Case 'W01' to 'W99'
PayorGroup = "Work Comp"
Case 'Y01' to 'Y99'
PayorGroup = "Medi-Cal Managed Care"
Case 'Z01' to 'Z99'
PayorGroup = "Medi-Cal"
Case Else
PayorGroup = "Managed Care/Other"
End Select
Return PayorGroup
End Function

我的目的是让上述函数评估 PLANCODE 字段并返回适当的 PayorGroup，该 PayorGroup 将用于对我的报告中的数据进行分组。我已将上述函数放置在报告属性代码窗口中。

如何在新的计算字段中引用上述函数，以便报表根据该函数的结果对数据进行分组？文档指出表达式应该类似于 =code.PayorGroup。但是，当我在“计算字段”窗口中尝试此表达式时，我看到臭名昭著的红色波浪线，指出“无法识别的 Idnetifier”。

有人可以为我提供一些关于此解决方案的最佳路线的指导吗？

谢谢， 席德

Answer 1

我建议在 SQL 中为此创建一个查找表 &将其与您拥有的基表/查询连接起来。

它有几个优点

1. 逻辑不会被冻结在内部
   报告。
2. 任何附加值都可以
   使用查找来处理
   桌子。