资源描述:
《财务管控模块应用监控统计查询脚本(网省使用)》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、一、准备阶段1.1.创建视图--创建审计日志视图,只显示登录成功日志记录CREATEORREPLACEVIEWVIEW_XTAUDITLOGEVT_CWGKASSELECTYHDM,YHMC,YHXSMC,SJ,DWDM,DWMC,HOSTNAME,HOSTIP,LCONTENT,'YES'ASISLOGONFROMXTAUDITLOGEVTWHERELCONTENT='登陆成功'--创建用户视图,不包括停用的用户,各单位可以根据实际情况追加条件把实施用户可以剔除掉CREATEORREPLACEVIEWVIEW_XTYHXX_CWGKASSELECTA.YHD
2、M,A.DWDM,B.MC,A.YHMC,A.XSMCFROMXTYHXXA,XTDWBWHEREA.DWDM=B.DHANDA.STOPED=0ORDERBYA.DWDM--创建2009、2010年凭证主表记录DECLAREV_SQLVARCHAR2(32767);BEGINV_SQL:='CREATEORREPLACEVIEWVIEW_XTBILL_ALLAS'
3、
4、CHR(13);FORRIN(SELECTUSERIDFROMXTDWWHEREDH<>'MAIN'ANDXJ=1ORDERBYDH)LOOPV_SQL:=V_SQL
5、
6、'SELECTBILLI
7、D,TTIME,LASTCHANGETIME,COMPIDFROM'
8、
9、R.USERID
10、
11、'.XTBILL2009UNION'
12、
13、'SELECTBILLID,TTIME,LASTCHANGETIME,COMPIDFROM'
14、
15、R.USERID
16、
17、'.XTBILL2010UNION'
18、
19、CHR(13);ENDLOOP;V_SQL:=SUBSTRING(V_SQL,1,LEN(V_SQL)-6);--DBMS_OUTPUT.PUT_LINE(V_SQL);EXECUTEIMMEDIATEV_SQL;END;--创建2009、2010年凭证明细表记录DECLARE
20、V_SQLVARCHAR2(32767);BEGINV_SQL:='CREATEORREPLACEVIEWVIEW_XTBILLMX_ALLAS'
21、
22、CHR(13);FORRIN(SELECTUSERIDFROMXTDWWHEREDH<>'MAIN'ANDXJ=1ORDERBYDH)LOOPV_SQL:=V_SQL
23、
24、'SELECTBILLID,BILLID1,TTIMEFFROM'
25、
26、R.USERID
27、
28、'.XTBILLMX2009UNION'
29、
30、'SELECTBILLID,BILLID1,TTIMEFFROM'
31、
32、R.USERID
33、
34、'.XTBILLMX2
35、010UNION'
36、
37、CHR(13);ENDLOOP;V_SQL:=SUBSTRING(V_SQL,1,LEN(V_SQL)-6);--DBMS_OUTPUT.PUT_LINE(V_SQL);EXECUTEIMMEDIATEV_SQL;END;--创建2010年凭证主表记录DECLAREV_SQLVARCHAR2(32767);BEGINV_SQL:='CREATEORREPLACEVIEWVIEW_XTBILL_2010AS'
38、
39、CHR(13);FORRIN(SELECTUSERIDFROMXTDWWHEREDH<>'MAIN'ANDXJ=1ORDERBYD
40、H)LOOPV_SQL:=V_SQL
41、
42、'SELECTBILLID,TTIME,LASTCHANGETIME,COMPIDFROM'
43、
44、R.USERID
45、
46、'.XTBILL2010UNION'
47、
48、CHR(13);ENDLOOP;V_SQL:=SUBSTRING(V_SQL,1,LEN(V_SQL)-6);--DBMS_OUTPUT.PUT_LINE(V_SQL);EXECUTEIMMEDIATEV_SQL;END;--创建2010年凭证明细表记录DECLAREV_SQLVARCHAR2(32767);BEGINV_SQL:='CREATEORREPLACEVI
49、EWVIEW_XTBILLMX_2010AS'
50、
51、CHR(13);FORRIN(SELECTUSERIDFROMXTDWWHEREDH<>'MAIN'ANDXJ=1ORDERBYDH)LOOPV_SQL:=V_SQL
52、
53、'SELECTBILLID,BILLID1,TTIMEFFROM'
54、
55、R.USERID
56、
57、'.XTBILLMX2010UNION'
58、
59、CHR(13);ENDLOOP;V_SQL:=SUBSTRING(V_SQL,1,LEN(V_SQL)-6);--DBMS_OUTPUT.PUT_LINE(V_SQL);EXECUTEIMMEDIATEV_SQL
60、;END;一、网省财务管控模块应用监控