public void AddImagingServiceRequest(
string patientID,
string issuerOfPatientID,
ImagingServiceRequest request
)
Public Sub AddImagingServiceRequest( _
ByVal patientID As String, _
ByVal issuerOfPatientID As String, _
ByVal request As ImagingServiceRequest _
)
public:
void AddImagingServiceRequest(
String^ patientID,
String^ issuerOfPatientID,
ImagingServiceRequest^ request
)
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.
Shows how to use the image service request-specific methods of the broker service.
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);
}
}
Imports Leadtools
Imports Leadtools.Medical.Worklist.Wcf.Service
Imports Leadtools.Medical.Worklist.DataAccessLayer.MatchingParameters
Imports Leadtools.Dicom
Imports Leadtools.Medical.Worklist.Wcf.Entities
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
Help Collections
Raster .NET | C API | C++ Class Library | HTML5 JavaScript
Document .NET | C API | C++ Class Library | HTML5 JavaScript
Medical .NET | C API | C++ Class Library | HTML5 JavaScript
Medical Web Viewer .NET
Multimedia
Direct Show .NET | C API | Filters
Media Foundation .NET | C API | Transforms
Supported Platforms
.NET, Java, Android, and iOS/macOS Assemblies
Imaging, Medical, and Document
C API/C++ Class Libraries
Imaging, Medical, and Document
HTML5 JavaScript Libraries
Imaging, Medical, and Document