'Declaration
 
Sub OnReceiveCGetResponse( _
   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 INotifyReceiveMessage
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.OnReceiveCGetResponse(Client, presentationID, messageID, affectedClass, status, remaining, completed, failed, warning, dataSet)