LDicomContextGroup::Find

L_INT LDicomContextGroup_FindExample() 
{ 
   L_INT nRet; 
   LDicomContextGroup::Reset (); 
   nRet = LDicomContextGroup::Load (); 
   if(nRet != DICOM_SUCCESS) 
      return nRet; 
   pDICOMCONTEXTGROUP pGroup; 
   pDICOMCODEDCONCEPT pConcept; 
   // Look for a Context Group 
   pGroup = LDicomContextGroup::Find(CID_6019); 
   if (!pGroup) 
   { 
      return -1; 
   } 
   // Look for a Coded Concept in the Context Group 
   pConcept = LDicomContextGroup::FindCodedConcept(pGroup, TEXT("SRT"), TEXT("F-01781")); 
   if (!pConcept) 
   { 
      return -1; 
   } 
   // Set the Code Meaning of the Coded Concept (French translation) 
   if (!LDicomContextGroup::SetCodeMeaning(pConcept, TEXT("Situé à 1 heure"))) 
   { 
      return - 1; 
   } 
   // Refer to the example of LDicomContextGroup::GetContextGroup for 
   // the function DisplayCodedConcept 
   DisplayCodedConcept(pConcept, FALSE); 
   // Delete the Coded Concept 
   LDicomContextGroup::DeleteCodedConcept(pConcept); 
   // Add a (testing) Coded Concept to the Context Group 
   pConcept = LDicomContextGroup::InsertCodedConcept(pGroup, 
   TEXT("CSD"), 
   NULL, 
   TEXT("CV"), 
   TEXT("CM")); 
   if (!pConcept) 
   { 
      return -1; 
   } 
   DisplayCodedConcept(pConcept, FALSE); 
   // Restore the Context Group (discard all the changes made to the Group) 
   LDicomContextGroup::Default(pGroup); 
   // Refer to the example of LDicomContextGroup::GetFirstCodedConcept for 
   // the function EnumCodedConcepts 
   EnumCodedConcepts(pGroup); 
   // Delete the Context Group 
   LDicomContextGroup::Delete(pGroup); 
   return nRet; 
}