USE [EUC]
GO
/****** Object:  StoredProcedure [dbo].[SP_SME_QueryAuditLog]    Script Date: 02/05/2015 15:54:16 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO

ALTER PROCEDURE [dbo].[SP_SME_QueryAuditLog]
(
    @ReferenceTable VARCHAR(50),
    @ReferenceNumber NVARCHAR(100)
)
AS
BEGIN
     DECLARE @NodeName VARCHAR(50);
    DECLARE @NodeValue NVARCHAR(500);
    DECLARE @NodePreValue NVARCHAR(500);
    DECLARE @LogId uniqueidentifier;
    DECLARE @LogXml xml;
    DECLARE @ProcessDate datetime;
    DECLARE @PreLogXml xml;
    DECLARE @OperationLog NVARCHAR(4000);
    DECLARE @FirstLogId uniqueidentifier;
    DECLARE @FirstOperationLog NVARCHAR(4000);
    DECLARE @FirstLogXml xml;
    DECLARE @Table NVARCHAR(50);
    set @Table=(case when @ReferenceTable='T_SME_CustInfo' then 'Customer Info' when @ReferenceTable='T_SME_IDExpiry' then 'ID Expiry'
                     when @ReferenceTable='T_SME_AC' then 'Account Info' when @ReferenceTable='T_SME_ParmACType' then 'Account Type'
                     when @ReferenceTable='T_SME_ParmCorpType' then 'Corporation Type' when @ReferenceTable='T_SME_ParmCountryCurrency' then 'Country Currency'
                     when @ReferenceTable='T_SME_ParmIDType' then 'ID Type'    when @ReferenceTable='T_SME_ParmMultiCountry' then 'Multiple Country Type'
                     when @ReferenceTable='T_SME_ParmSettleType' then 'Settle Type' when @ReferenceTable='T_SME_ParmSpecialZone' then 'Special Zone Type'
                     when @ReferenceTable='T_SME_ParmTranType' then 'Transaction Type' when @ReferenceTable='T_SME_ParmRMBSource' then 'RMB Source'
                     when @ReferenceTable='T_SME_ParmBOPCode' then 'BOP Code' when @ReferenceTable='T_SME_ParmFinanceManager' then 'Finance Fanager' end );
    
    SELECT TOP 1 @FirstLogId=LogId,@FirstOperationLog=OperationLog, @FirstLogXml=LogXml
    FROM T_SME_AuditLog t WHERE ReferenceTable=@ReferenceTable AND (ReferenceNumber=@ReferenceNumber or LOWER(ReferenceNumber) = LOWER(@ReferenceNumber))
    ORDER BY ProcessDate

IF (@FirstOperationLog IS NULL OR @FirstOperationLog = '')
    BEGIN
print  @FirstLogId;
        SET @FirstOperationLog = '';
        DECLARE nodename_cursor CURSOR FOR SELECT cast(LogItem.query('fn:local-name(.)') as VARCHAR(50)) as NodeName
        FROM @FirstLogXml.nodes('/LogItem/*') AS T ( LogItem )   
        OPEN nodename_cursor   
        FETCH NEXT FROM nodename_cursor INTO @NodeName   
        WHILE @@FETCH_STATUS = 0   
        BEGIN    
            SELECT  @NodeValue = LogItem.value('(//*[local-name() = sql:variable("@NodeName")])[1]', 'nvarchar(500)')
            FROM @FirstLogXml.nodes('/LogItem') AS T ( LogItem );
            SET @FirstOperationLog = @FirstOperationLog + ' [' + @NodeName + ':] ' + @NodeValue;
            FETCH NEXT FROM nodename_cursor INTO @NodeName  
        END  
        CLOSE nodename_cursor   
        DEALLOCATE nodename_cursor  
        UPDATE T_SME_AuditLog SET OperationLog = @FirstOperationLog WHERE LogId = @FirstLogId;
    End

DECLARE audit_cursor CURSOR FOR SELECT LogId,OperationLog,LogXml,ProcessDate
    FROM T_SME_AuditLog t WHERE ReferenceTable=@ReferenceTable AND (ReferenceNumber=@ReferenceNumber or LOWER(ReferenceNumber) = LOWER(@ReferenceNumber))
    ORDER BY ProcessDate DESC;
    OPEN audit_cursor   
    FETCH NEXT FROM audit_cursor INTO @LogId,@OperationLog,@LogXml,@ProcessDate
    WHILE @@FETCH_STATUS = 0   
    BEGIN   
        IF (@OperationLog IS NULL OR @OperationLog = '')
        BEGIN
            SET @OperationLog = '';
            SELECT TOP 1 @PreLogXml = LogXml
            FROM T_SME_AuditLog t
            WHERE ReferenceTable=@ReferenceTable AND (ReferenceNumber=@ReferenceNumber or LOWER(ReferenceNumber) = LOWER(@ReferenceNumber)) AND ProcessDate<@ProcessDate
            ORDER BY ProcessDate DESC;

DECLARE nodename_cursor CURSOR FOR SELECT cast(LogItem.query('fn:local-name(.)') as VARCHAR(50)) as NodeName
            FROM @LogXml.nodes('/LogItem/*') AS T ( LogItem )   
            OPEN nodename_cursor   
            FETCH NEXT FROM nodename_cursor INTO @NodeName   
            WHILE @@FETCH_STATUS = 0   
            BEGIN    
                SELECT  @NodeValue = LogItem.value('(//*[local-name() = sql:variable("@NodeName")])[1]', 'nvarchar(500)')
                FROM @LogXml.nodes('/LogItem') AS T ( LogItem );
                SELECT  @NodePreValue = LogItem.value('(//*[local-name() = sql:variable("@NodeName")])[1]', 'nvarchar(500)')
                FROM @PreLogXml.nodes('/LogItem') AS T ( LogItem );
                IF (@NodePreValue IS NOT NULL AND @NodePreValue != '')
                BEGIN
                    IF (@NodeValue != @NodePreValue)
                    BEGIN
                        SET @OperationLog = @OperationLog+' ['+@NodeName + ':] '+@NodePreValue+' --> '+@NodeValue;
                     END
                END    
                ELSE
                BEGIN
                    SET @OperationLog = @OperationLog+' ['+@NodeName + ':] Empty --> '+@NodeValue;
                END
                FETCH NEXT FROM nodename_cursor INTO @NodeName  
            END  
            CLOSE nodename_cursor   
            DEALLOCATE nodename_cursor
        END
        UPDATE T_SME_AuditLog SET OperationLog = @OperationLog WHERE LogId = @LogId;
        FETCH NEXT FROM audit_cursor INTO @LogId,@OperationLog,@LogXml,@ProcessDate
    END  
    CLOSE audit_cursor;    
    DEALLOCATE audit_cursor;

SELECT LogId, Operation, OperationStatus, OperationLog, ProcessBy, ProcessDate ,@Table as 'OperationTable'
    FROM T_SME_AuditLog t WHERE ReferenceTable=@ReferenceTable AND (ReferenceNumber=@ReferenceNumber or LOWER(ReferenceNumber) = LOWER(@ReferenceNumber))
    ORDER BY ProcessDate DESC;

END

Sql Cursor example的更多相关文章

  1. SQL Cursor生命周期

      阅读导航 1 Cursor Step 1.1 Create cursor 1.2 Parse statement 1.3 descript and define 1.4 Bind variable ...

  2. SQL Cursor 基本用法

     1 table1结构如下  2 id    int  3 name  varchar(50)  4   5 declare @id int  6 declare @name varchar(50) ...

  3. sql Cursor的用法

    table1结构如下 id int name ) declare @id int ) declare cursor1 cursor for --定义游标cursor1 select * from ta ...

  4. 游标SQL Cursor 基本用法

    http://www.cnblogs.com/Gavinzhao/archive/2010/07/14/1777644.html 1 table1结构如下 2 id    int 3 name  va ...

  5. SQL Cursor 基本用法[用两次FETCH NEXT FROM INTO语句?]

    Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--> ...

  6. SQL CURSOR

    SET NOCOUNT ON; DECLARE @vendor_id int, @vendor_name nvarchar(50),     @message varchar(80), @produc ...

  7. SQL Cursor 游标的使用

    DECLARE @name VARCHAR(50)  --声明游标 DECLARE cursor_VAA1 CURSOR FOR SELECT VAA05 FROM VAA1 --打开游标 OPEN ...

  8. SQL Cursor(游标)

    1.游标在数据表没有id(identity(1,1))时好用,但是游标会吃更多的内存,减少可用的并发,占用宽带,锁定资源,当然还有更多的代码量 2.如果能不用游标,尽量不要使用游标,用完用完之后一定要 ...

  9. android sql Cursor

    Cursor 是每行的集合. 使用 moveToFirst() 定位第一行. 你必须知道每一列的名称.你必须知道每一列的数据类型.Cursor 是一个随机的数据源. 所有的数据都是通过下标取得. Cu ...

随机推荐

  1. Django 前后台的数据传递

    Django 从后台往前台传递数据时有多种方法可以实现. 最简单的后台是这样的: from django.shortcuts import render def main_page(request): ...

  2. Duplicate entry 'javajavajav' for key 'username'

    org.apache.ibatis.exceptions.PersistenceException: ### Error updating database.  Cause: com.mysql.jd ...

  3. PAT 1047. 编程团体赛(20)

    编程团体赛的规则为:每个参赛队由若干队员组成:所有队员独立比赛:参赛队的成绩为所有队员的成绩和:成绩最高的队获胜. 现给定所有队员的比赛成绩,请你编写程序找出冠军队. 输入格式: 输入第一行给出一个正 ...

  4. [LeetCode] Remove Invalid Parentheses 移除非法括号

    Remove the minimum number of invalid parentheses in order to make the input string valid. Return all ...

  5. [LeetCode] Strobogrammatic Number III 对称数之三

    A strobogrammatic number is a number that looks the same when rotated 180 degrees (looked at upside ...

  6. [LeetCode] Remove Linked List Elements 移除链表元素

    Remove all elements from a linked list of integers that have value val. Example Given: 1 --> 2 -- ...

  7. [LeetCode] Maximum Depth of Binary Tree 二叉树的最大深度

    Given a binary tree, find its maximum depth. The maximum depth is the number of nodes along the long ...

  8. 关于AngularJS(1)

      在讲正题之前,先说一下有关angular简介方面的信息: 1. angularJS  诞生于2009年,由Misko Hevery 等人创建,后为Google所收购.是一款优秀的前端JS框架,已经 ...

  9. const 引起的BUG

    今天白天出现了碰见了一个问题,隐藏得比较深,这里记录一下. 初衷很简单,就是要更改改一个数据库的链接名,这个链接名是放在数据层public const string connDB="conn ...

  10. simpson

    使用二次函数拟合复杂的连续函数求积分 对于(l,r)拟合的积分为(r-l)*(f(l)+4*f((l+r)/2)+f(r))/6 ___________________________ BZOJ217 ...