AddImagingServiceRequest Method (BrokerService)

Visual Basic
C#
WinRT C#
WinRT JavaScript
C++

public void AddImagingServiceRequest( 
   string patientID,
   string issuerOfPatientID,
   ImagingServiceRequest request
)

'Declaration
 
Public Sub AddImagingServiceRequest( _
   ByVal patientID As String, _
   ByVal issuerOfPatientID As String, _
   ByVal request As ImagingServiceRequest _
)

'Usage
 
Dim instance As BrokerService
Dim patientID As String
Dim issuerOfPatientID As String
Dim request As ImagingServiceRequest
 
instance.AddImagingServiceRequest(patientID, issuerOfPatientID, request)

public void AddImagingServiceRequest( 
   string patientID,
   string issuerOfPatientID,
   ImagingServiceRequest request
)

 function Leadtools.Medical.Worklist.Wcf.Service.BrokerService.AddImagingServiceRequest( 
   patientID ,
   issuerOfPatientID ,
   request 
)

public:
void AddImagingServiceRequest( 
   String^ patientID,
   String^ issuerOfPatientID,
   ImagingServiceRequest^ request
)

Parameters

patientID: Primary hospital identification number or code for the Patient.
issuerOfPatientID: Name of healthcare provider that issued the Patient ID.
request: The imaging service request to add.

Visual Basic
C#
WinRT C#
WinRT JavaScript
Silverlight C#
Silverlight VB

Public Sub ImagingServiceRequestTest()
    Try
        Dim request As ImagingServiceRequest

        request = _BrokerService.FindImagingServiceRequest("1200", "000000", "246")
        If Not request Is Nothing Then
            _BrokerService.DeleteImagingServiceRequest("1200", "000000", "246")
        End If

        request = New ImagingServiceRequest()
        request.AccessionNumber = "1200"
        request.ImagingServiceRequestComments = "My Comments"
        _BrokerService.AddImagingServiceRequest("000000", "246", request)

        request = _BrokerService.FindImagingServiceRequest("1200", "000000", "246")
        If Not request Is Nothing Then
            request.RequestingService = "My Department"
            _BrokerService.UpdateImagingServiceRequest("1200", "000000", "246", request)
        End If

        Dim accNumbers As String() = _BrokerService.GetAccessionNumbers("000000", "246")

        For Each accNumber As String In accNumbers
            Console.WriteLine(accNumber)
        Next accNumber
    Catch e As Exception
        Debug.WriteLine(e.Message)
    End Try
End Sub

public void ImagingServiceRequestTest()
{
    try
    {
        ImagingServiceRequest request;

        request = _BrokerService.FindImagingServiceRequest("1200", "000000", "246");
        if (request != null)
            _BrokerService.DeleteImagingServiceRequest("1200", "000000", "246");

        request = new ImagingServiceRequest();
        request.AccessionNumber = "1200";
        request.ImagingServiceRequestComments = "My Comments";
        _BrokerService.AddImagingServiceRequest("000000", "246", request);

        request = _BrokerService.FindImagingServiceRequest("1200", "000000", "246");
        if (request != null)
        {
            request.RequestingService = "My Department";
            _BrokerService.UpdateImagingServiceRequest("1200", "000000", "246", request);
        }

        string[] accNumbers = _BrokerService.GetAccessionNumbers("000000", "246");

        foreach (string accNumber in accNumbers)
        {
            Console.WriteLine(accNumber);
        }
    }
    catch (Exception e)
    {
        Debug.WriteLine(e.Message);
    }
}

Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2

Reference

BrokerService Class
BrokerService Members