1:  Imports System

   2:  Imports System.Data

   3:  Imports System.Data.SqlClient

   4:  Imports System.Data.SqlTypes

   5:  Imports Microsoft.SqlServer.Server

   6:   

   7:   

   8:  <Serializable()> _

   9:  <Microsoft.SqlServer.Server.SqlUserDefinedAggregate(Format.Native)> _

  10:  Public Structure $safeitemname$

  11:   

  12:      Public Sub Init()

  13:          ' $PutYourCodeHereComment$

  14:      End Sub

  15:   

  16:      Public Sub Accumulate(ByVal value As SqlString)

  17:          ' $PutYourCodeHereComment$

  18:      End Sub

  19:   

  20:      Public Sub Merge(ByVal value as $safeitemname$)

  21:          ' Put your code here

  22:      End Sub

  23:   

  24:      Public Function Terminate() As SqlString

  25:          ' $PutYourCodeHereComment$

  26:          Return New SqlString("")

  27:      End Function

  28:   

  29:      ' $PlaceholderFieldComment$

  30:      Private var1 As Integer

  31:   

  32:  End Structure