Crystal Reports统计字符串值：子报表分组累计与主报表调用问题

子报表调整步骤 #

1. 初始化共享计数器
   在子报表的报表页眉新建公式@InitCounter，代码如下：

WhilePrintingRecords;
Shared NumberVar Countersub := 0;

这个公式仅在子报表加载时执行一次，重置计数器为0，避免跨组累计错误。

2. 细节行累计非空记录
   在子报表的细节节新建公式@IncrementCounter，代码如下：

WhilePrintingRecords;
Shared NumberVar Countersub;
// 同时判断非Null和非空字符串，覆盖所有未填写的情况
If Not IsNull({Data_Entry_By_Login}) And {Data_Entry_By_Login} <> "" Then
    Countersub := Countersub + 1;

直接对共享变量赋值累计，而非返回单个1/0，以此统计当前组内所有符合条件的记录数。

3. 传递累计结果
   在子报表的报表页脚新建公式@PassCounter，代码如下：

WhilePrintingRecords;
Shared NumberVar Countersub;
Countersub;

该公式用于输出最终累计值，确保主报表能读取到统计结果（需保证子报表的报表页脚设置为打印状态）。

主报表配置步骤 #

1. 关联子报表与主报表分组
   将子报表放置在主报表对应分组的组页脚（或组页眉，按需选择），右键子报表选择「更改子报表链接」，把主报表的分组字段关联到子报表的对应字段，确保子报表仅统计当前组内的数据。

2. 读取子报表的累计值
   在主报表的同组页脚位置，新建公式@GetSubCounter，代码如下：

WhilePrintingRecords;
Shared NumberVar Countersub;
Countersub;

通过该公式获取当前组的非空记录统计数。

3. 计算填写百分比
   先创建主报表当前组的总记录数公式@TotalGroupRecords：

WhilePrintingRecords;
// 替换为你的主报表分组字段和数据源主键字段
Count({主报表数据源.主键字段}, {主报表分组字段});

再创建百分比计算公式@CompletionPercentage：

WhilePrintingRecords;
NumberVar filled := {@GetSubCounter};
NumberVar total := {@TotalGroupRecords};
// 避免除以0的错误
If total > 0 Then
    (filled / total) * 100
Else
    0;

最后将该百分比公式的格式设置为「百分比」即可。

关键注意事项 #

• 确保子报表所有包含公式的节处于打印状态，尤其是报表页脚，否则共享变量无法正确更新。
• 同时判断IsNull和空字符串，避免漏判字段为空但不是Null的情况。
• 借助子报表放置在组内+子报表页眉初始化的方式，确保每个组的计数器独立统计，避免全局变量跨组干扰。

内容的提问来源于stack exchange，提问作者BrianB417