LDicomContextGroup::GetFirst

L_INT LDicomContextGroup_GetFirstExample() 
{ 
   L_INT nRet; 
   LDicomContextGroup::Reset (); 
 
   // Load all the Context Groups 
   nRet = LDicomContextGroup::Load (); 
   if(nRet != DICOM_SUCCESS) 
      return nRet; 
 
   pDICOMCONTEXTGROUP pGroup;  
   L_TCHAR szMsg[256];  
 
   // Enumerate them (3 possible ways)  
#if 1 
 
   // One possible way to enumerate the Context Groups 
   pGroup = LDicomContextGroup::GetFirst(); 
   while (pGroup)  
   { 
      wsprintf(szMsg, TEXT("%s\n%s\n\nEnumerate Coded Concepts?"),  
               pGroup->pszContextIdentifier,  
               pGroup->pszName);  
 
      nRet = ::MessageBox(NULL, szMsg, TEXT("Context Group"), MB_YESNOCANCEL);  
      if (nRet == IDYES)  
      { 
         // Refer to the example of LDicomContextGroup::GetFirstCodedConcept 
         // for the function EnumCodedConcepts 
         EnumCodedConcepts(pGroup);  
      } 
      else if (nRet == IDCANCEL)  
      { 
         break;  
      } 
 
      pGroup = LDicomContextGroup::GetNext(pGroup);  
   } 
 
#elif 0 
 
   // Another way to enumerate the Context Groups 
   L_UINT32 uGroupsCount = LDicomContextGroup::GetCount(); 
   for (L_UINT32 i = 0; i < uGroupsCount; i++) 
   { 
      pGroup = LDicomContextGroup::FindIndex(i);  
 
      wsprintf(szMsg,TEXT( "%s\n%s\n\nEnumerate Coded Concepts?"),  
               pGroup->pszContextIdentifier,  
               pGroup->pszName);  
 
      nRet = ::MessageBox(NULL, szMsg, TEXT("Context Group"), MB_YESNOCANCEL);  
      if (nRet == IDYES)  
      { 
         EnumCodedConcepts(pGroup);  
      } 
      else if (nRet == IDCANCEL)  
      { 
         break;  
      } 
   } 
 
#elif 0 
 
   // A third way to enumerate the Context Groups 
   pGroup = LDicomContextGroup::GetLast(); 
   while (pGroup)  
   { 
      wsprintf(szMsg, TEXT("%s\n%s\n\nEnumerate Coded Concepts?"),  
               pGroup->pszContextIdentifier,  
               pGroup->pszName);  
       
      nRet = ::MessageBox(NULL, szMsg, "Context Group", MB_YESNOCANCEL);  
      if (nRet == IDYES)  
      { 
         EnumCodedConcepts(pGroup);  
      } 
      else if (nRet == IDCANCEL)  
      { 
         break;  
      } 
 
      pGroup = LDicomContextGroup::GetPrev(pGroup);  
   } 
 
#endif 
 
   return DICOM_SUCCESS; 
}