Error processing SSI file
LEADTOOLS Medical (Leadtools.Medical.Worklist.Wcf assembly)

Show in webframe

AddVisit Method (IBrokerService)






Identification number of the visit as assigned by the healthcare provider.
Adds the specified visit to the worklist database.
Syntax
[FaultContractAttribute(DetailType=Leadtools.Medical.Worklist.Wcf.Utils.ApplicationFault, 
   Action="", 
   Name="", 
   Namespace="", 
   ProtectionLevel=ProtectionLevel.None, 
   HasProtectionLevel=false)]
[OperationContractAttribute()]
void AddVisit( 
   WCFVisit visit
)
'Declaration
 
<FaultContractAttribute(DetailType=Leadtools.Medical.Worklist.Wcf.Utils.ApplicationFault, 
   Action="", 
   Name="", 
   Namespace="", 
   ProtectionLevel=ProtectionLevel.None, 
   HasProtectionLevel=False)>
<OperationContractAttribute()>
Sub AddVisit( _
   ByVal visit As WCFVisit _
) 
'Usage
 
Dim instance As IBrokerService
Dim visit As WCFVisit
 
instance.AddVisit(visit)

            

            
[FaultContractAttribute(DetailType=Leadtools.Medical.Worklist.Wcf.Utils.ApplicationFault, 
   Action="", 
   Name="", 
   Namespace="", 
   ProtectionLevel=ProtectionLevel.None, 
   HasProtectionLevel=false)]
[OperationContractAttribute()]
void AddVisit( 
   WCFVisit^ visit
) 

Parameters

visit
Identification number of the visit as assigned by the healthcare provider.
Example

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

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

[TestMethod]
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);
    }
}
Requirements

Target Platforms

See Also

Reference

IBrokerService Interface
IBrokerService Members

Error processing SSI file
   Leadtools.Medical.Worklist.Wcf requires a Medical toolkit server license and unlock key. For more information, refer to: LEADTOOLS Toolkit Features