LEADTOOLS Medical (Leadtools.Dicom assembly) Send comments on this topic. | Back to Introduction - All Topics | Help Version 17.0.3.29
FindFirstPrivateCreatorDataElement Method
See Also 
Leadtools.Dicom Namespace > DicomDataSet Class : FindFirstPrivateCreatorDataElement Method



element
A DicomElement in the data set. The search for Private Creator Data Elements will be at the same level as as this item.
tree
true to evaluate the Data Set as a tree; false to evaluate the Data Set as a list.
idCode
String identifier that is assigned to the private creator data element. If non-null, search includes only those Private Creator Data Elements that have a string value that is the same as idCode. If null, search includes Private Creator Data Elements with any string value.
elementGroup
Group number to search within. If elementGroup is 0, search includes Private Creator Data Elements with any group. If elementGroup is 0x0010 to 0x00FF, the search includes only those Private Creator Data Elements in elementGroup.
element
A DicomElement in the data set. The search for Private Creator Data Elements will be at the same level as as this item.
tree
true to evaluate the Data Set as a tree; false to evaluate the Data Set as a list.
idCode
String identifier that is assigned to the private creator data element. If non-null, search includes only those Private Creator Data Elements that have a string value that is the same as idCode. If null, search includes Private Creator Data Elements with any string value.
elementGroup
Group number to search within. If elementGroup is 0, search includes Private Creator Data Elements with any group. If elementGroup is 0x0010 to 0x00FF, the search includes only those Private Creator Data Elements in elementGroup.
Returns the Private Creator Data Element that matches the search constraints. Supported in Silverlight, Windows Phone 7.

Syntax

Visual Basic (Declaration) 
Public Function FindFirstPrivateCreatorDataElement( _
   ByVal element As DicomElement, _
   ByVal tree As Boolean, _
   ByVal idCode As String, _
   ByVal elementGroup As Integer _
) As DicomElement
Visual Basic (Usage)Copy Code
Dim instance As DicomDataSet
Dim element As DicomElement
Dim tree As Boolean
Dim idCode As String
Dim elementGroup As Integer
Dim value As DicomElement
 
value = instance.FindFirstPrivateCreatorDataElement(element, tree, idCode, elementGroup)
C# 
public DicomElement FindFirstPrivateCreatorDataElement( 
   DicomElement element,
   bool tree,
   string idCode,
   int elementGroup
)
C++/CLI 
public:
DicomElement^ FindFirstPrivateCreatorDataElement( 
   DicomElement^ element,
   bool tree,
   String^ idCode,
   int elementGroup
) 

Parameters

element
A DicomElement in the data set. The search for Private Creator Data Elements will be at the same level as as this item.
tree
true to evaluate the Data Set as a tree; false to evaluate the Data Set as a list.
idCode
String identifier that is assigned to the private creator data element. If non-null, search includes only those Private Creator Data Elements that have a string value that is the same as idCode. If null, search includes Private Creator Data Elements with any string value.
elementGroup
Group number to search within. If elementGroup is 0, search includes Private Creator Data Elements with any group. If elementGroup is 0x0010 to 0x00FF, the search includes only those Private Creator Data Elements in elementGroup.

Return Value

The first Private Creator Data Element that matches the search constraints. If null is returned, no item exists with the specified search constraints.

Example

This example displays all the Private Creator Data Elements and corresponding private elements in a data set.

Visual BasicCopy Code
Private Function DumpElement(ByVal p As DicomElement) As String
   If p Is Nothing Then
      Return String.Empty
   End If
   Return String.Format("({0:X4},{1:X4})" & Constants.vbLf, p.Tag >> &H10, p.Tag And &HFFFF)
End Function
Private Function DumpPrivateElements(ByVal ds As DicomDataSet, ByVal privateCreatorDataElement As DicomElement) As String
   Dim sMsg As String = String.Empty
   Dim p As DicomElement = ds.FindFirstPrivateElement(privateCreatorDataElement)
   Do While Not p Is Nothing
      sMsg = sMsg & Constants.vbTab + DumpElement(p)
      p = ds.FindNextPrivateElement(p, privateCreatorDataElement)
   Loop
   Return sMsg
End Function

Private Sub DicomDataSet_FindFirstPrivateCreatorDataElementExample(ByVal ds As DicomDataSet, ByVal root As DicomElement, ByVal tree As Boolean)
   Dim sMsg As String = String.Empty
   Dim pPrivateCreatorDataElement As DicomElement = ds.FindFirstPrivateCreatorDataElement(root, tree, Nothing, 0)
   Do While Not pPrivateCreatorDataElement Is Nothing
      sMsg = sMsg & "*** Private Creator Data Element" & DumpElement(pPrivateCreatorDataElement)
      sMsg = sMsg & DumpPrivateElements(ds, pPrivateCreatorDataElement)
      pPrivateCreatorDataElement = ds.FindNextPrivateCreatorDataElement(pPrivateCreatorDataElement, tree, Nothing, 0)
   Loop

   MessageBox.Show(sMsg.ToString(), "Private Elements", MessageBoxButtons.OK)
End Sub
C#Copy Code
string DumpElement(DicomElement p)
{
   if (p == null)
      return string.Empty;
   return string.Format("({0:X4},{1:X4})\n", p.Tag >> 0x10, p.Tag & 0xFFFF);
}
string DumpPrivateElements(DicomDataSet ds, DicomElement privateCreatorDataElement)
{
   string sMsg = string.Empty;
   DicomElement p = ds.FindFirstPrivateElement(privateCreatorDataElement);
   while (p != null)
   {
      sMsg = sMsg + "\t" + DumpElement(p);
      p = ds.FindNextPrivateElement(p, privateCreatorDataElement);
   }
   return sMsg;
}

void DicomDataSet_FindFirstPrivateCreatorDataElementExample(DicomDataSet ds, DicomElement root, bool tree)
{
   string sMsg = string.Empty;
   DicomElement pPrivateCreatorDataElement = ds.FindFirstPrivateCreatorDataElement(root, tree, null, 0);
   while (pPrivateCreatorDataElement != null)
   {
      sMsg = sMsg + "*** Private Creator Data Element" + DumpElement(pPrivateCreatorDataElement);
      sMsg = sMsg + DumpPrivateElements(ds, pPrivateCreatorDataElement);
      pPrivateCreatorDataElement = ds.FindNextPrivateCreatorDataElement(pPrivateCreatorDataElement, tree, null, 0);
   }

   MessageBox.Show(sMsg.ToString(), "Private Elements", MessageBoxButtons.OK);
}
SilverlightCSharpCopy Code
string DumpElement(DicomElement p)
{
   if (p == null)
      return string.Empty;
   return string.Format("({0:X4},{1:X4})\n", p.Tag >> 0x10, p.Tag & 0xFFFF);
}
string DumpPrivateElements(DicomDataSet ds, DicomElement privateCreatorDataElement)
{
   string sMsg = string.Empty;
   DicomElement p = ds.FindFirstPrivateElement(privateCreatorDataElement);
   while (p != null)
   {
      sMsg = sMsg + "\t" + DumpElement(p);
      p = ds.FindNextPrivateElement(p, privateCreatorDataElement);
   }
   return sMsg;
}

void DicomDataSet_FindFirstPrivateCreatorDataElementExample(DicomDataSet ds, DicomElement root, bool tree)
{
   string sMsg = string.Empty;
   DicomElement pPrivateCreatorDataElement = ds.FindFirstPrivateCreatorDataElement(root, tree, null, 0);
   while (pPrivateCreatorDataElement != null)
   {
      sMsg = sMsg + "*** Private Creator Data Element" + DumpElement(pPrivateCreatorDataElement);
      sMsg = sMsg + DumpPrivateElements(ds, pPrivateCreatorDataElement);
      pPrivateCreatorDataElement = ds.FindNextPrivateCreatorDataElement(pPrivateCreatorDataElement, tree, null, 0);
   }

   Debug.WriteLine("Private Elements: " + sMsg.ToString());
}
SilverlightVBCopy Code
Private Function DumpElement(ByVal p As DicomElement) As String
   If p Is Nothing Then
      Return String.Empty
   End If
   Return String.Format("({0:X4},{1:X4})" & Constants.vbLf, p.Tag >> &H10, p.Tag And &HFFFF)
End Function
Private Function DumpPrivateElements(ByVal ds As DicomDataSet, ByVal privateCreatorDataElement As DicomElement) As String
   Dim sMsg As String = String.Empty
   Dim p As DicomElement = ds.FindFirstPrivateElement(privateCreatorDataElement)
   Do While Not p Is Nothing
      sMsg = sMsg & Constants.vbTab + DumpElement(p)
      p = ds.FindNextPrivateElement(p, privateCreatorDataElement)
   Loop
   Return sMsg
End Function

Private Sub DicomDataSet_FindFirstPrivateCreatorDataElementExample(ByVal ds As DicomDataSet, ByVal root As DicomElement, ByVal tree As Boolean)
   Dim sMsg As String = String.Empty
   Dim pPrivateCreatorDataElement As DicomElement = ds.FindFirstPrivateCreatorDataElement(root, tree, Nothing, 0)
   Do While Not pPrivateCreatorDataElement Is Nothing
      sMsg = sMsg & "*** Private Creator Data Element" & DumpElement(pPrivateCreatorDataElement)
      sMsg = sMsg & DumpPrivateElements(ds, pPrivateCreatorDataElement)
      pPrivateCreatorDataElement = ds.FindNextPrivateCreatorDataElement(pPrivateCreatorDataElement, tree, Nothing, 0)
   Loop

   Debug.WriteLine("Private Elements: " & sMsg.ToString())
End Sub

Remarks

This feature is available in version 16 or higher.

Use this method along with Leadtools.Dicom.DicomDataSet.FindNextPrivateCreatorDataElement to find any or all the Private Creator Data Elements in a DICOM data set. The search for private creator data elements is on the same level as the parameter element. If element is null, the search is at the top or first level.

If tree is true, the data set is searched as a tree. If tree is false, the data set is searched as a list. For more information on the use of this parameter, see FindFirstElement.

Requirements

Target Platforms: Silverlight 3.0, Windows XP, Windows Server 2003 family, Windows Server 2008 family, Windows Vista, Windows 7, MAC OS/X (Intel Only)

See Also

Leadtools.Dicom requires a Medical toolkit server license and unlock key. For more information, refer to: Imaging Pro/Document/Medical Features