每隔 N 行补足若干空行

 

举例

Excel文件book1.xlsx有学生考场及座位的明细数据,部分数据如下图所示:

..

现在需要用这些数据来制作报表,实现每40人一页排在一个教室,共76列显示座位示意图,每页打印42个卡片,每页除了40个学生的卡片,还需要显示两个空的卡片占位,因此需要在原有记录中每40条记录后补两条空记录。

编写SPL脚本:


A

1

=T("e:/work/book1.xlsx")

2

=row=A1.create().insert(0)

3

=A1.group((#-1)\40).(~|row|row).conj()

4

=T("e:/work/book2.xlsx",A3)

A1   读入book1.xlsx文件数据

A2   复制A1的数据结构,插入一条空记录,将此记录赋给变量row

A3   40个学生分成一组,每组后面并上两个空行row,然后各组合列为一个数据集

A4   A3中的结果保存到文件book2.xlsx