AddPatient Method (BrokerService)

Visual Basic
C#
Objective-C
Java
C++

public void AddPatient( 
   WCFPatient patient
)

'Declaration
 
Public Sub AddPatient( _
   ByVal patient As WCFPatient _
)

'Usage
 
Dim instance As BrokerService
Dim patient As WCFPatient
 
instance.AddPatient(patient)

public:
void AddPatient( 
   WCFPatient^ patient
)

Parameters

patient: The patient record to add.

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

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

Public Sub PatientTest()
    Try
        Dim patient As WCFPatient = Nothing
        '
        ' Find and delete the patient
        '
        patient = _BrokerService.FindPatient("000000", "246")
        If Not patient Is Nothing Then
            _BrokerService.DeletePatient("000000", "246")
        End If

        patient = New WCFPatient()
        patient.IssuerOfPatientID = "246"
        patient.PatientID = "000000"
        patient.PatientNameFamilyName = "Family"
        patient.PatientNameGivenName = "Given"
        patient.PatientSex = "M"

        '
        ' Add the patient
        '
        _BrokerService.AddPatient(patient)

        '
        ' Search for the patient
        '
        patient = _BrokerService.FindPatient("000000", "246")
        If Not patient Is Nothing Then
            patient.AdditionalPatientHistory = "Additional History"
            _BrokerService.UpdatePatient("000000", "246", patient)
        End If

        '
        ' List all patient ids
        '
        Dim ids As String() = _BrokerService.GetPatientIDs()

        For Each id As String In ids
            Console.WriteLine(id)
        Next id
    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 PatientTest()
{
    try
    {
        WCFPatient patient = null;
        //
        // Find and delete the patient
        //


        patient = _BrokerService.FindPatient("000000", "246");
        if (patient != null)
            _BrokerService.DeletePatient("000000", "246");

        patient = new WCFPatient();
        patient.IssuerOfPatientID = "246";
        patient.PatientID = "000000";
        patient.PatientNameFamilyName = "Family";
        patient.PatientNameGivenName = "Given";
        patient.PatientSex = "M";

        //
        // Add the patient
        //


        _BrokerService.AddPatient(patient);

        //
        // Search for the patient
        //


        patient = _BrokerService.FindPatient("000000", "246");
        if (patient != null)
        {
            patient.AdditionalPatientHistory = "Additional History";
            _BrokerService.UpdatePatient("000000", "246", patient);
        }

        //
        // List all patient ids
        //


        string[] ids = _BrokerService.GetPatientIDs();

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

Target Platforms

Reference

BrokerService Class
BrokerService Members