home *** CD-ROM | disk | FTP | other *** search
/ moodle.waes.ac.uk / moodle.waes.ac.uk.zip / moodle.waes.ac.uk / TMG / SP1-TMG-KB981324-AMD64-ENU.msp / PCW_CAB_SHFx2 / F2143_msfpcui.dll / BINARY / 25486 < prev    next >
Text File  |  2010-06-15  |  3KB  |  93 lines

  1. CREATE PROCEDURE [dbo].[ISA_spWebProtocolsRDL]
  2.     @FromDate datetime,
  3.     @ToDate datetime,
  4.     @ReportType varchar(10),
  5.     @TopCount int,
  6.     @SortOrder varchar(100)
  7. AS
  8. BEGIN
  9.     DECLARE @SummTableName varchar(100)
  10.     SET @SummTableName = dbo.fnGetSummaryTableName('tblProtocolSummary', @FromDate, @ToDate, @ReportType)
  11.     DECLARE @OrderColumn varchar(100)
  12.     SET @OrderColumn =
  13.             CASE
  14.                 WHEN @SortOrder = 'Requests' THEN 'Requests'
  15.                 WHEN @SortOrder = 'BytesIn' THEN 'BytesIn'
  16.                 WHEN @SortOrder = 'BytesOut' THEN 'BytesOut'
  17.                 ELSE 'TotalBytes'
  18.             END;
  19.     CREATE TABLE #Table1
  20.     (
  21.         Protocol nvarchar(128),
  22.         BytesIn bigint,
  23.         BytesOut bigint,
  24.         TotalBytes bigint,
  25.         Requests bigint
  26.     );
  27.     IF OBJECT_ID (@SummTableName, 'u') IS NOT NULL
  28.     BEGIN
  29.         DECLARE @strQuery varchar(8000)
  30.         SET @strQuery =
  31.         'SELECT
  32.             [Protocol] AS Protocol,
  33.             SUM([BytesIn]) AS BytesIn,
  34.             SUM([BytesOut]) AS BytesOut,
  35.             SUM([TotalBytes]) AS TotalBytes,
  36.             SUM([Requests]) AS Requests
  37.         FROM ' + @SummTableName + '
  38.         WHERE ([date] >= ' + QUOTENAME(CONVERT(varchar, @FromDate, 126),CHAR(39)) + ' AND [date] <= ' + QUOTENAME(CONVERT(varchar, @ToDate, 126),CHAR(39)) + ')
  39.             AND [LogType]  = 1
  40.         GROUP BY [Protocol]
  41.         ORDER BY ' + QUOTENAME(@OrderColumn) + ' DESC;
  42.         '
  43.         INSERT #Table1
  44.         EXEC(@strQuery)
  45.     END
  46.     DECLARE @TotalRequests bigint
  47.     SET @TotalRequests = (SELECT SUM(Requests) FROM #Table1 )
  48.     IF (@TotalRequests = 0)
  49.         SET @TotalRequests = 1
  50.     DECLARE @totalBytes bigint
  51.     SET @totalBytes = (SELECT SUM(TotalBytes) FROM #Table1 )
  52.     IF (@totalBytes = 0)
  53.         SET @totalBytes = 1
  54.     DECLARE @TotalBytesIn bigint
  55.     SET @TotalBytesIn = (SELECT SUM(BytesIn) FROM #Table1)
  56.     IF (@TotalBytesIn = 0)
  57.         SET @TotalBytesIn = 1
  58.     DECLARE @TotalBytesOut bigint
  59.     SET @TotalBytesOut = (SELECT SUM(BytesOut) FROM #Table1)
  60.     IF (@TotalBytesOut = 0)
  61.         SET @TotalBytesOut = 1
  62.     SELECT TOP(@TopCount)
  63.         [Protocol] AS Protocol,
  64.         [Requests] AS Requests,
  65.         (CAST([Requests] AS decimal) / @TotalRequests) AS RequestRatio,
  66.         [BytesIn] AS BytesIn,
  67.         (CAST([BytesIn] AS decimal) / @TotalBytesIn) AS BytesInRatio,
  68.         [BytesOut] AS BytesOut,
  69.         (CAST([BytesOut] AS decimal) / @TotalBytesOut) AS BytesOutRatio,
  70.         [TotalBytes] AS TotalBytes,
  71.         (CAST([TotalBytes] AS decimal) / @totalBytes) AS TotalByteRatio
  72.     FROM #Table1
  73.     WHERE [Protocol] != N'{[23124]}'
  74.     UNION ALL
  75.     SELECT
  76.        N'{[23124]}' As Protocol,
  77.         SUM(Requests),
  78.         (CAST(SUM(Requests) AS decimal) / @TotalRequests) AS RequestRatio,
  79.         SUM([BytesIn]),
  80.         (CAST(SUM([BytesIn]) AS decimal) / @TotalBytesIn) AS BytesInRatio,
  81.         SUM([BytesOut]),
  82.         (CAST(SUM([BytesOut]) AS decimal) / @TotalBytesOut) AS BytesOutRatio,
  83.         SUM([TotalBytes]) AS TotalBytes,
  84.         (CAST(SUM([TotalBytes]) AS decimal) / @totalBytes) AS TotalByteRatio
  85.     FROM #Table1 t1
  86.     WHERE NOT EXISTS
  87.         (SELECT * FROM
  88.            (SELECT TOP(@TopCount) *
  89.             FROM #Table1
  90.             WHERE [Protocol] != N'{[23124]}') t2
  91.          WHERE t1.Protocol = t2.Protocol)
  92. END
  93.