L_DicomGetCodedConceptGroup

#include "ltdic.h"

pDICOMCONTEXTGROUP EXT_FUNCTION L_DicomGetCodedConceptGroup(pCodedConcept)

/* pointer to a Coded Concept */

Returns a pointer to the Context Group in the Context Group Table to which the specified Coded Concept belongs.

Parameter	Description
pCodedConcept	Pointer to a DICOMCODEDCONCEPT structure that specifies a Coded Concept. The function returns a pointer to the DICOMCONTEXTGROUP structure that specifies the Context Group to which this Coded Concept belongs.

Returns

Pointer to the DICOMCONTEXTGROUP structure that specifies the Context Group in the Context Group Table to which the specified Coded Concept belongs.

Required DLLs and Libraries

LTDIC

For a listing of the exact DLLs and Libraries needed, based on the toolkit version, refer to Files To Be Included With Your Application

See Also

Functions:	L_DicomGetFirstCodedConcept, L_DicomFindIndexCodedConcept, L_DicomFindCodedConcept, L_DicomInsertCodedConcept
Topics:	Working with Context Groups

Example

L_BOOL DisplayCodedConcept(pDICOMCODEDCONCEPT pConcept, L_BOOL bYesNo)
{
   pDICOMCONTEXTGROUP pGroup;
   L_CHAR szMsg[256], szTitle[32];

   // Is it a valid pointer?
   if (!L_DicomExistsCodedConcept (pConcept))
   {
      return FALSE;
   }

   pGroup = L_DicomGetCodedConceptGroup (pConcept);
   wsprintf(szTitle, "Coded Concept (%s)", pGroup->pszContextIdentifier);

   if (pConcept->pszCodingSchemeVersion)
   {
      wsprintf(szMsg,
               bYesNo ? "%s\n%s\n%s\n%s\n\nContinue?" : "%s\n%s\n%s\n%s",
               pConcept->pszCodingSchemeDesignator,
               pConcept->pszCodingSchemeVersion,
               pConcept->pszCodeValue,
               pConcept->pszCodeMeaning);
   }
   else
   {
      wsprintf(szMsg,
               bYesNo ? "%s\n%s\n%s\n\nContinue?" : "%s\n%s\n%s",
               pConcept->pszCodingSchemeDesignator,
               pConcept->pszCodeValue,
               pConcept->pszCodeMeaning);
   }

   if (bYesNo)
   {
      return (::MessageBox(NULL, szMsg, szTitle, MB_YESNO) == IDYES);
   }
   else
   {
      ::MessageBox(NULL, szMsg, szTitle, MB_OK);
      return TRUE;
   }
}