'Declaration
Sub OnSendCMoveResponse( _
ByVal As DicomClient, _
ByVal As Byte, _
ByVal As Integer, _
ByVal As String, _
ByVal As DicomCommandStatusType, _
ByVal remaining As Integer, _
ByVal As Integer, _
ByVal As Integer, _
ByVal As Integer, _
ByVal As DicomDataSet _
)
'Usage
Dim instance As INotifySendMessage
Dim Client As DicomClient
Dim presentationID As Byte
Dim messageID As Integer
Dim affectedClass As String
Dim status As DicomCommandStatusType
Dim remaining As Integer
Dim completed As Integer
Dim failed As Integer
Dim warning As Integer
Dim dataset As DicomDataSet
instance.OnSendCMoveResponse(Client, presentationID, messageID, affectedClass, status, remaining, completed, failed, warning, dataset)