快捷導(dǎo)航

水晶報(bào)表分頁(yè) 的問(wèn)題

更新時(shí)間：2009年04月26日 01:10:29 作者：

在論壇上經(jīng)常會(huì)看到水晶報(bào)表分頁(yè)的問(wèn)題，這個(gè)很好解決。但是自動(dòng)插入空白行的問(wèn)題卻一直沒(méi)有很好的答案，經(jīng)過(guò)研究找到一個(gè)變通的辦法來(lái)實(shí)現(xiàn)了。

水晶報(bào)表分頁(yè)匯總
建三個(gè)公式字段，第一個(gè)(公式1)輸入下面的公式：
whileprintingrecords;
global numbervar ptotal;
ptotal:=0;
第二個(gè)(公式2)輸入下面的公式：
whileprintingrecords;
global numbervar ptotal;
ptotal := ptotal + [要匯總的字段];
如果要匯總的字段不是數(shù)字，就用tonumber()函數(shù)轉(zhuǎn)換；
第三個(gè)(公式3)輸入下面的公式：
whileprintingrecords;
global numbervar ptotal;
把公式1放在頁(yè)眉，公式2放在詳細(xì)資料，并隱藏公式1和公式2；把公式3放在頁(yè)腳，格式公式3，設(shè)置為你要顯示的格式。這樣就行了。

水晶報(bào)表分頁(yè)并自動(dòng)插入空白行
在論壇上經(jīng)常會(huì)看到水晶報(bào)表分頁(yè)的問(wèn)題，這個(gè)很好解決。
但是自動(dòng)插入空白行的問(wèn)題卻一直沒(méi)有很好的答案，
經(jīng)過(guò)研究找到一個(gè)變通的辦法來(lái)實(shí)現(xiàn)了。
'分頁(yè)
在詳細(xì)資料上點(diǎn)格式化節(jié)，在后面頁(yè)新建頁(yè)打勾
公式中輸入：
if onlastrecord then
FORMULA = FALSE
else
if RecordNumber mod 5 =0 then
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
'(BASIC 語(yǔ)法)
---------------------------------------------------------------------
最后頁(yè)不足，用空行填充：
新增一個(gè)空白詳細(xì)資料行，格式化此節(jié)，在抑制顯示(無(wú)深化)打勾
公式中輸入：
if not onlastrecord then
FORMULA = TRUE
else
if (RecordNumber mod 5 <= 1) then '第一個(gè),1
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
'(BASIC 語(yǔ)法)
...接著第二個(gè)[ 新增一個(gè)空白詳細(xì)資料行，格式化此節(jié)，在抑制顯示(無(wú)深化)打勾 ]：
公式中輸入：
if not onlastrecord then
FORMULA = TRUE
else
if (RecordNumber mod 5 <= 2) then '第二個(gè),2
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
...接著第三個(gè)[ 新增一個(gè)空白詳細(xì)資料行，格式化此節(jié)，在抑制顯示(無(wú)深化)打勾 ]：
公式中輸入：
if not onlastrecord then
FORMULA = TRUE
else
if (RecordNumber mod 5 <= 3) then '第三個(gè),3
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
在論壇上經(jīng)常會(huì)看到水晶報(bào)表分頁(yè)的問(wèn)題，這個(gè)很好解決。
但是自動(dòng)插入空白行的問(wèn)題卻一直沒(méi)有很好的答案，
經(jīng)過(guò)研究找到一個(gè)變通的辦法來(lái)實(shí)現(xiàn)了。
'分頁(yè)
在詳細(xì)資料上點(diǎn)格式化節(jié)，在后面頁(yè)新建頁(yè)打勾
公式中輸入：
if onlastrecord then
FORMULA = FALSE
else
if RecordNumber mod 5 =0 then
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
'(BASIC 語(yǔ)法)
---------------------------------------------------------------------
最后頁(yè)不足，用空行填充：
新增一個(gè)空白詳細(xì)資料行，格式化此節(jié)，在抑制顯示(無(wú)深化)打勾
公式中輸入：
if not onlastrecord then
FORMULA = TRUE
else
if (RecordNumber mod 5 <= 1) then '第一個(gè),1
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
'(BASIC 語(yǔ)法)
...接著第二個(gè)[ 新增一個(gè)空白詳細(xì)資料行，格式化此節(jié)，在抑制顯示(無(wú)深化)打勾 ]：
公式中輸入：
if not onlastrecord then
FORMULA = TRUE
else
if (RecordNumber mod 5 <= 2) then '第二個(gè),2
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
...接著第三個(gè)[ 新增一個(gè)空白詳細(xì)資料行，格式化此節(jié)，在抑制顯示(無(wú)深化)打勾 ]：
公式中輸入：
if not onlastrecord then
FORMULA = TRUE
else
if (RecordNumber mod 5 <= 3) then '第三個(gè),3
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
...(同理第四個(gè)，即最后5-1個(gè))
（注：此方法適用于行數(shù)較少，上面是為5行為例，不過(guò)不覺(jué)得麻煩，對(duì)行數(shù)較多也可以用）...(同理第四個(gè)，即最后5-1個(gè))