//basic Crystal Report实现每个文档多个套页码,在变化的字段所在的节--分页设置
Shared SerialNoGG as Number
Shared RecordTemp as Number
if RecordNumber = 1 then
SerialNoGG = {Rpt_PackingSlipSp;1.pack_num}
RecordTemp = 1
end if
if {Rpt_PackingSlipSp;1.pack_num}<>SerialNoGG then
RecordTemp = 1
SerialNoGG = {Rpt_PackingSlipSp;1.pack_num}
formula = false
else
RecordTemp = RecordTemp + 1
formula =true
end if