欧美黑人xxxx高潮猛交,精品国产一区二区三区久久,亚洲国产美女精品久久久

文字

在Oracle中實現(xiàn)報表的定長輸出

摘自：中國計算機報

郭華玲

　　Oracle＊Reports是Oracle的數(shù)據(jù)統(tǒng)計及圖形化報表工具，它提供了六種風(fēng)格的報表格式，而我們通常使用的只有其中的兩種，即Tabular和Matrix，無論用哪種風(fēng)格生成的報表，打印出的表格數(shù)都是動態(tài)變化的。其中Tabular風(fēng)格的報表，列數(shù)固定，而行數(shù)不定；Matrix風(fēng)格的報表，行數(shù)和列數(shù)均不定。那么在Oracle＊Reports中如何實現(xiàn)報表的定長與定寬輸出呢？筆者在實際開發(fā)過程中對上述兩種風(fēng)格的報表各總結(jié)出一種行之有效的方法，供大家參考。

　　一、對于Tabular風(fēng)格的報表，可用報表觸發(fā)子After Parameter Form和After Report實現(xiàn)定長輸出。其方法是：根據(jù)實際情況確定每頁打印的行數(shù)，當(dāng)最后一頁的記錄數(shù)少于每頁打印的行數(shù)時，則用空記錄補齊。在觸發(fā)子After Parameter Form插入空記錄，在觸發(fā)子After Report中再將空記錄刪除，下面舉例說明。

　　假設(shè)有一數(shù)據(jù)基表WZDM：存放物資代碼信息，其數(shù)據(jù)結(jié)構(gòu)為：

字段名	含義	長度	類型
wzdm	物資代碼	9	c
wzmc	物資名稱	20	c
xhgg	型號規(guī)格	20	c
jldw	計量單位	6	c

　　要求：按定長輸出物資代碼表，并且每頁均輸出x行(x可根據(jù)實際情況而定)。

　　1.啟動Oracle＊Reports，建立物資代碼打印報表(略)，然后在報表觸發(fā)子After Parameter Form中加入以下代碼：

　　Declare

　　v―jls number(2);

　　i number(2):=1;

　　Begin

　　Select Count(＊) Into V―jls From Wzdm;

　　If Mod(V―jls,x)〈〉0 Then

　　Loop

　　Exit When i〉=(x－mod(v―jls,x))＋1;

　　Insert Into Wzdm(Wzdm,Wzmc,Xhgg,Jldw)

　　Values(′′,′′,′′,′′);

　　i:=i＋1;

　　End Loop;

　　Commit;

　　End If;

　　End;

　　在報表觸發(fā)子After Report中分別加入以下代碼：

　　Begin

　　Delete From Wzdm Where Wzdm Is Null;

　　Commit;

　　End;

　　2.運行報表后即可輸出定長的物資代碼表。

　　說明：對于其它Tabular風(fēng)格的報表，在編寫上述兩個觸發(fā)子時只需將基表名與列名根據(jù)實際情況修改一下，并確定x的值即可。

　　二、對于Matrix風(fēng)格的報表，可利用視圖實現(xiàn)定長與定寬輸出，其思路是：當(dāng)行記錄數(shù)和列記錄少于實際報表的行數(shù)和列數(shù)時，均以空記錄補齊。下面舉例說明。

　　假設(shè)有一物資資金消耗去向統(tǒng)計月報，該表橫向顯示本期消耗去向，縱向顯示物資類別，由于每月物資消耗去向和消耗物資均不定，所以此類報表即為一矩陣報表。該報表的數(shù)據(jù)存放在基表T―ZJXHQX中，其數(shù)據(jù)結(jié)構(gòu)如下：

字段名	含義	長度	類型
lbmc	類別名稱	20	c
dwmc	單位名稱	20	c
je	金額	14，2	n

　　要求：按定長定寬輸出物資資金消耗去向統(tǒng)計月報，并且每頁均輸出x行y列(行數(shù)和列數(shù)可根據(jù)實際情況而定)。

　　1.首先建一基表T―kjl，用來存放空記錄，其數(shù)據(jù)結(jié)構(gòu)為：

字段名	含義	長度	類型
no	序號	2	n

　　建完該數(shù)據(jù)表后，再往其中插入記錄，記錄數(shù)可根據(jù)實際情況而定，一般為一頁所能打印的最大行數(shù)，這里假設(shè)為z條，即No的值為1，2，3…z。

　　2.建視圖，其過程如下：

　　Create View V―TJBB As

　　Select Dwmc,Lbmc,Je From T―zjxhqx

　　Union

　　Select Dwmc,Null,To―Number(Null) From T―zjxhqx,T―kjl

　　Where No－(z－x)〉(Select Mod(Count(Distinct Lbmc)－1,x)＋1 From T―zjxhqx)

　　Union

　　Select Null,Lbmc,To―Number(Null) From T―zjxhqx,T―kjl

　　Where No－(z－y)〉(Select Mod(Count(Distinct Dwmc)－1,y)＋1 From T―zjxhqx);

　　3. 啟動Oracle＊Reports，建立矩陣報表查詢時直接引用視圖V―TJBB即可。這樣運行時輸出的報表每頁都是x行y列，即實現(xiàn)了定長和定寬輸出。

亚洲国产日韩欧美一区二区三区,精品亚洲国产成人av在线,国产99视频精品免视看7,99国产精品久久久久久久成人热,欧美日韩亚洲国产综合乱

在Oracle中實現(xiàn)報表的定長輸出