'Declaration
Sub OnReceiveNActionResponse( _
ByVal As DicomClient, _
ByVal As Byte, _
ByVal As Integer, _
ByVal As String, _
ByVal As String, _
ByVal As DicomCommandStatusType, _
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 instance As String
Dim status As DicomCommandStatusType
Dim action As Integer
Dim dataSet As DicomDataSet
instance.OnReceiveNActionResponse(Client, presentationID, messageID, affectedClass, instance, status, action, dataSet)