Leadtools.Dicom.Scu Namespace > QueryRetrieveScu Class > Move Method : Move(DicomScp,String,String) Method |
'Declaration Public Overloads Sub Move( _ ByVal Scp As DicomScp, _ ByVal DestAE As String, _ ByVal StudyInstanceUID As String _ )
'Usage Dim instance As QueryRetrieveScu Dim Scp As DicomScp Dim DestAE As String Dim StudyInstanceUID As String instance.Move(Scp, DestAE, StudyInstanceUID)
function Leadtools.Dicom.Scu.QueryRetrieveScu.Move(DicomScp,String,String)( Scp , DestAE , StudyInstanceUID )
Public Sub MoveStudy() DicomEngine.Startup() DicomNet.Startup() Dim retrieveStudy As QueryRetrieveScu = New QueryRetrieveScu() Dim query As FindQuery = New FindQuery() Dim scp As DicomScp = New DicomScp() ' ' Change these parameters to reflect the calling AETitle. ' retrieveStudy.AETitle = "LEAD_CLIENT" retrieveStudy.HostPort = 1000 retrieveStudy.HostAddress = IPAddress.Parse(Dns.GetHostByName(Dns.GetHostName()).AddressList(0).ToString()) ' ' Change these parameters to reflect the called AETitle (server). ' scp.AETitle = "MI_SERVER" scp.Port = 104 scp.Timeout = 60 scp.PeerAddress = IPAddress.Parse("10.1.1.96") AddHandler retrieveStudy.BeforeCMove, AddressOf retrieveStudy_BeforeCMove AddHandler retrieveStudy.Moved, AddressOf retrieveStudy_Moved AddHandler retrieveStudy.AfterCMove, AddressOf retrieveStudy_AfterCMove retrieveStudy.Move(scp, String.Empty, "1.2.840.114257.3.6.5.41964868") DicomNet.Shutdown() DicomEngine.Shutdown() End Sub Private Sub retrieveStudy_BeforeCMove(ByVal sender As Object, ByVal e As BeforeCMoveEventArgs) Console.WriteLine("Before CMove") End Sub Private Sub retrieveStudy_Moved(ByVal sender As Object, ByVal e As MovedEventArgs) Console.WriteLine(e.Patient.Name.Full) Console.WriteLine(e.Study.AccessionNumber) Console.WriteLine(e.Series.Number) Console.WriteLine(e.Instance.SOPInstanceUID) Console.WriteLine("==========================================") End Sub Private Sub retrieveStudy_AfterCMove(ByVal sender As Object, ByVal e As AfterCMoveEventArgs) Console.WriteLine("{0} Completed", e.Completed) Console.WriteLine("{0} Failed", e.Failed) Console.WriteLine("{0} Warning", e.Warning) Console.WriteLine("Status: {0}", e.Status) End Sub
public void MoveStudy() { DicomEngine.Startup(); DicomNet.Startup(); QueryRetrieveScu retrieveStudy = new QueryRetrieveScu(); FindQuery query = new FindQuery(); DicomScp scp = new DicomScp(); // // Change these parameters to reflect the calling AETitle. // retrieveStudy.AETitle = "LEAD_CLIENT"; retrieveStudy.HostPort = 1000; retrieveStudy.HostAddress = IPAddress.Parse(Dns.GetHostByName(Dns.GetHostName()).AddressList[0].ToString()); // // Change these parameters to reflect the called AETitle (server). // scp.AETitle = "MI_SERVER"; scp.Port = 104; scp.Timeout = 60; scp.PeerAddress = IPAddress.Parse("10.1.1.96"); retrieveStudy.BeforeCMove += new BeforeCMoveDelegate(retrieveStudy_BeforeCMove); retrieveStudy.Moved += new MovedDelegate(retrieveStudy_Moved); retrieveStudy.AfterCMove += new AfterCMoveDelegate(retrieveStudy_AfterCMove); retrieveStudy.Move(scp, string.Empty, "1.2.840.114257.3.6.5.41964868"); DicomNet.Shutdown(); DicomEngine.Shutdown(); } void retrieveStudy_BeforeCMove(object sender, BeforeCMoveEventArgs e) { Console.WriteLine("Before CMove"); } void retrieveStudy_Moved(object sender, MovedEventArgs e) { Console.WriteLine(e.Patient.Name.Full); Console.WriteLine(e.Study.AccessionNumber); Console.WriteLine(e.Series.Number); Console.WriteLine(e.Instance.SOPInstanceUID); Console.WriteLine("=========================================="); } void retrieveStudy_AfterCMove(object sender, AfterCMoveEventArgs e) { Console.WriteLine("{0} Completed", e.Completed); Console.WriteLine("{0} Failed", e.Failed); Console.WriteLine("{0} Warning", e.Warning); Console.WriteLine("Status: {0}", e.Status); }
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