Adds the specified visit to the worklist database.
[OperationContractAttribute()]
[FaultContractAttribute(System.Type)]
public void AddVisit(
WCFVisit visit
)
<FaultContractAttribute(DetailType=Leadtools.Medical.Worklist.Wcf.Utils.ApplicationFault,
Action="",
Name="",
Namespace="",
ProtectionLevel=ProtectionLevel.None,
HasProtectionLevel=False)>
<OperationContractAttribute()>
Sub AddVisit( _
ByVal visit As WCFVisit _
)
[FaultContractAttribute(DetailType=Leadtools.Medical.Worklist.Wcf.Utils.ApplicationFault,
Action="",
Name="",
Namespace="",
ProtectionLevel=ProtectionLevel.None,
HasProtectionLevel=false)]
[OperationContractAttribute()]
void AddVisit(
WCFVisit^ visit
)
visit
Identification number of the visit as assigned by the healthcare provider.
Shows how to use the visit 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 VistTest()
{
try
{
WCFVisit visit = _BrokerService.FindVisit("VS123");
if (visit != null)
_BrokerService.DeleteVisit("VS123");
visit = new WCFVisit();
visit.AdmissionID = "VS123";
visit.ReferencedPatientSequence = null;
_BrokerService.AddVisit(visit);
visit = _BrokerService.FindVisit("VS123");
if (visit != null)
{
visit.CurrentPatientLocation = "EXAM 1";
_BrokerService.UpdateVisit("VS123", visit);
}
string[] ids = _BrokerService.GetAdmissionIDs();
foreach (string id in ids)
{
Console.WriteLine(id);
}
}
catch (Exception e)
{
Console.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 VistTest()
Try
Dim visit As WCFVisit = _BrokerService.FindVisit("VS123")
If Not visit Is Nothing Then
_BrokerService.DeleteVisit("VS123")
End If
visit = New WCFVisit()
visit.AdmissionID = "VS123"
visit.ReferencedPatientSequence = Nothing
_BrokerService.AddVisit(visit)
visit = _BrokerService.FindVisit("VS123")
If Not visit Is Nothing Then
visit.CurrentPatientLocation = "EXAM 1"
_BrokerService.UpdateVisit("VS123", visit)
End If
Dim ids As String() = _BrokerService.GetAdmissionIDs()
For Each id As String In ids
Console.WriteLine(id)
Next id
Catch e As Exception
Console.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