←Select platform

AddImagingServiceRequest Method (BrokerService)

Summary

Adds the imaging service request to the worklist database.

Syntax

C++

public void AddImagingServiceRequest(  
   string patientID, 
   string issuerOfPatientID, 
   Leadtools.Medical.Worklist.Dataaccesslayer.Matchingparameters.ImagingServiceRequest request 
)

Public Sub AddImagingServiceRequest( _ 
   ByVal patientID As String, _ 
   ByVal issuerOfPatientID As String, _ 
   ByVal request As Leadtools.Medical.Worklist.Dataaccesslayer.Matchingparameters.ImagingServiceRequest _ 
)

public: 
void AddImagingServiceRequest(  
   String^ patientID, 
   String^ issuerOfPatientID, 
   Leadtools.Medical.Worklist.Dataaccesslayer.Matchingparameters.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.

Example

Shows how to use the image service request-specific methods of the broker service.

Imports Leadtools 
Imports Leadtools.Medical.Worklist.Wcf.Service 
Imports Leadtools.Medical.Worklist.DataAccessLayer.MatchingParameters 
Imports Leadtools.Dicom 
Imports Leadtools.Medical.Worklist.Wcf.Entities 
 
<TestMethod()> _ 
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

using Leadtools; 
using Leadtools.Medical.Worklist.Wcf.Service; 
using Leadtools.Medical.Worklist.DataAccessLayer.MatchingParameters; 
using Leadtools.Dicom; 
using Leadtools.Medical.Worklist.Wcf.Entities; 
 
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); 
    } 
}