'Declaration
Sub SendNActionRequest( _
ByVal As DicomRequest, _
ByVal As Byte, _
ByVal As Integer, _
ByVal As String, _
ByVal As String, _
ByVal As Integer, _
ByVal As DicomDataSet _
)
'Usage
Dim instance As IDicomRequest
Dim requestInfo As DicomRequest
Dim presentationID As Byte
Dim messageID As Integer
Dim affectedClass As String
Dim instance As String
Dim action As Integer
Dim dataSet As DicomDataSet
instance.SendNActionRequest(requestInfo, presentationID, messageID, affectedClass, instance, action, dataSet)