LEADTOOLS Medical (Leadtools.Medical.Worklist.Wcf assembly)
LEAD Technologies, Inc

AddScheduledProcedureStep Method (IBrokerService)

Example 





A departmental IS-generated number that identifies the order for the Imaging Service Request.
Identifier that identifies the Requested Procedure in the Imaging Service Request.
The procedure step to add to the worklist database.
Adds the scheduled procedure step to the worklist database.
Syntax
[FaultContractAttribute(DetailType=Leadtools.Medical.Worklist.Wcf.Utils.ApplicationFault, 
   Action="", 
   Name="", 
   Namespace="", 
   ProtectionLevel=ProtectionLevel.None, 
   HasProtectionLevel=false)]
[OperationContractAttribute()]
void AddScheduledProcedureStep( 
   string accessionNumber,
   string requestedProcedureID,
   WCFScheduledProcedureStep procedureStep
)
'Declaration
 
<FaultContractAttribute(DetailType=Leadtools.Medical.Worklist.Wcf.Utils.ApplicationFault, 
   Action="", 
   Name="", 
   Namespace="", 
   ProtectionLevel=ProtectionLevel.None, 
   HasProtectionLevel=False)>
<OperationContractAttribute()>
Sub AddScheduledProcedureStep( _
   ByVal accessionNumber As String, _
   ByVal requestedProcedureID As String, _
   ByVal procedureStep As WCFScheduledProcedureStep _
) 
'Usage
 
Dim instance As IBrokerService
Dim accessionNumber As String
Dim requestedProcedureID As String
Dim procedureStep As WCFScheduledProcedureStep
 
instance.AddScheduledProcedureStep(accessionNumber, requestedProcedureID, procedureStep)
[FaultContractAttribute(DetailType=Leadtools.Medical.Worklist.Wcf.Utils.ApplicationFault, 
   Action="", 
   Name="", 
   Namespace="", 
   ProtectionLevel=ProtectionLevel.None, 
   HasProtectionLevel=false)]
[OperationContractAttribute()]
void AddScheduledProcedureStep( 
   string accessionNumber,
   string requestedProcedureID,
   WCFScheduledProcedureStep procedureStep
)
FaultContractAttribute(DetailType=Leadtools.Medical.Worklist.Wcf.Utils.ApplicationFault, 
   Action="", 
   Name="", 
   Namespace="", 
   ProtectionLevel=ProtectionLevel.None, 
   HasProtectionLevel=)
OperationContractAttribute()
function Leadtools.Medical.Worklist.Wcf.Service.IBrokerService.AddScheduledProcedureStep( 
   accessionNumber ,
   requestedProcedureID ,
   procedureStep 
)
[FaultContractAttribute(DetailType=Leadtools.Medical.Worklist.Wcf.Utils.ApplicationFault, 
   Action="", 
   Name="", 
   Namespace="", 
   ProtectionLevel=ProtectionLevel.None, 
   HasProtectionLevel=false)]
[OperationContractAttribute()]
void AddScheduledProcedureStep( 
   String^ accessionNumber,
   String^ requestedProcedureID,
   WCFScheduledProcedureStep^ procedureStep
) 

Parameters

accessionNumber
A departmental IS-generated number that identifies the order for the Imaging Service Request.
requestedProcedureID
Identifier that identifies the Requested Procedure in the Imaging Service Request.
procedureStep
The procedure step to add to the worklist database.
Example
 
Public Sub ScheduledProcedureStepTest()
    Try
        Dim procedureStep As WCFScheduledProcedureStep = Nothing

        procedureStep = _BrokerService.FindScheduledProcedureStep("123.456.89000000")
        If Not procedureStep Is Nothing Then
            _BrokerService.DeleteScheduledProcedureStep("123.456.89000000")
        End If

        procedureStep = New WCFScheduledProcedureStep()
        procedureStep.ScheduledProcedureStepID = "123.456.89000000"
        procedureStep.ScheduledProcedureStepStartDate_Time = New Leadtools.Dicom.Common.DataTypes.DateRange() With {.StartDate = DateTime.Now}

        procedureStep.Modality = "CT"
        procedureStep.ScheduledProcedureStepDescription = "Procedure Step Description"
        procedureStep.ScheduledStationAETitle = New List(Of String)()
        procedureStep.ScheduledStationAETitle.Add(Environment.MachineName)
        _BrokerService.AddScheduledProcedureStep("1200", "1300", procedureStep)

        procedureStep = _BrokerService.FindScheduledProcedureStep("123.456.89000000")
        If Not procedureStep Is Nothing Then
            procedureStep.ScheduledStationName = New List(Of String)()
            procedureStep.ScheduledStationName.Add("My Station Name")
            _BrokerService.UpdateScheduledProcedureStep("123.456.89000000", procedureStep)
        End If

        Dim ids As String() = _BrokerService.GetScheduledProcedureStepIDs("1200", "1300")

        For Each id As String In ids
            Console.WriteLine(id)
        Next id

    Catch e As Exception
    End Try
End Sub
public void ScheduledProcedureStepTest()
{
    try
    {
        WCFScheduledProcedureStep procedureStep = null;

        procedureStep = _BrokerService.FindScheduledProcedureStep("123.456.89000000");
        if (procedureStep != null)
            _BrokerService.DeleteScheduledProcedureStep("123.456.89000000");

        procedureStep = new WCFScheduledProcedureStep();
        procedureStep.ScheduledProcedureStepID = "123.456.89000000";
        procedureStep.ScheduledProcedureStepStartDate_Time = new Leadtools.Dicom.Common.DataTypes.DateRange() { StartDate = DateTime.Now };
        procedureStep.Modality = "CT";
        procedureStep.ScheduledProcedureStepDescription = "Procedure Step Description";
        procedureStep.ScheduledStationAETitle = new List<string>();
        procedureStep.ScheduledStationAETitle.Add(Environment.MachineName);
        _BrokerService.AddScheduledProcedureStep("1200", "1300", procedureStep);

        procedureStep = _BrokerService.FindScheduledProcedureStep("123.456.89000000");
        if (procedureStep != null)
        {
            procedureStep.ScheduledStationName = new List<string>();
            procedureStep.ScheduledStationName.Add("My Station Name");
            _BrokerService.UpdateScheduledProcedureStep("123.456.89000000", procedureStep);
        }

        string[] ids = _BrokerService.GetScheduledProcedureStepIDs("1200", "1300");

        foreach (string id in ids)
        {
            Console.WriteLine(id);
        }

    }
    catch (Exception e)
    {
        Console.WriteLine(e.Message);
    }
}
Requirements

Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2

See Also

Reference

IBrokerService Interface
IBrokerService Members

 

 


Products | Support | Contact Us | Copyright Notices

© 2006-2012 All Rights Reserved. LEAD Technologies, Inc.