SendCGetRequest Example for C++ 6.0 and later

{
   //This example sends a C-Get Request to a server
   //
   //In this example:
   //1. m_Dicom, m_Dicom2 are LEAD ActiveX Dicom objects (CLEADDICOM)
   // 
   //2. m_DicomNet is LEAD ActiveX DicomNet object (CLEADDICOMNet)
   //
   //3. m_nClientOrServer:  can be (STATUS_NONE, STATUS_SERVER, STATUS_CLIENT)
   //                       identifieds the LMyDicomNet object as a server or a client
   //4. m_nDataCommand:     can be (COMMAND_C_MOVE,COMMAND_C_GET) 
   //                       set so the server knows how a C-Store Response was generated
   //
   //5. A connection exists between client and server
   //6. An association exists between the client and server
   CString strMsg = "C-Get\n";
   
   //Choose a class
   _bstr_t strClassUID = UID_SC_IMAGE_STORAGE;
   
   //create the data set that encodes the identifier to be matched
   m_pLEADDicomDS->InitDS (DICOM_CLASS_UNKNOWN, 0);
   
   //Add the required elements 
   //   TAG_QUERY_RETRIEVE_LEVEL
   //   TAG_PATIENT_NAME
   m_pLEADDicomDS->FindTag(TAG_QUERY_RETRIEVE_LEVEL); 
   m_pLEADDicomDS->InsertElement (FALSE, TAG_QUERY_RETRIEVE_LEVEL,m_pLEADDicomDS->GetCurrentTag ()->VR,FALSE,0);
   m_pLEADDicomDS->StringValueCount = 1;
   _bstr_t sPatient = "PATIENT";
   m_pLEADDicomDS->put_StringValues (0, sPatient);
   m_pLEADDicomDS->SetStringValue (1);
   
   m_pLEADDicomDS->FindTag(TAG_PATIENT_NAME);
   m_pLEADDicomDS->InsertElement (FALSE, TAG_PATIENT_NAME, m_pLEADDicomDS->GetCurrentTag ()->VR, FALSE,0);
   
   //Add the optional fields that we want returned
   //   TAG_PATIENT_ID
   //   TAG_PATIENT_BIRTH_DATE
   //   TAG_PATIENT_SEX
   //   TAG_NUMBER_OF_PATIENT_RELATED_INSTANCES
   m_pLEADDicomDS->FindTag(TAG_PATIENT_ID);
   m_pLEADDicomDS->InsertElement (FALSE, TAG_PATIENT_ID, m_pLEADDicomDS->GetCurrentTag ()->VR, FALSE, 0);
   
   m_pLEADDicomDS->FindTag(TAG_PATIENT_BIRTH_DATE);
   m_pLEADDicomDS->InsertElement (FALSE, TAG_PATIENT_BIRTH_DATE, m_pLEADDicomDS->GetCurrentTag ()->VR, FALSE, 0);
   
   m_pLEADDicomDS->FindTag(TAG_PATIENT_SEX);
   m_pLEADDicomDS->InsertElement (FALSE, TAG_PATIENT_SEX, m_pLEADDicomDS->GetCurrentTag ()->VR, FALSE, 0);
   
   m_pLEADDicomDS->FindTag(TAG_NUMBER_OF_PATIENT_RELATED_INSTANCES);
   m_pLEADDicomDS->InsertElement (FALSE, TAG_NUMBER_OF_PATIENT_RELATED_INSTANCES, m_pLEADDicomDS->GetCurrentTag ()->VR, FALSE, 0);
   
   //Get the associate object
   long hAssociate = m_pLEADDicomNet->GetAssociate (m_pLEADDicomNet->GethNet());
   
   //Is class supported in the assocation?
   short nPresentationID = m_pLEADDicomNet->FindPresentationAbstract (hAssociate, strClassUID);
   
   
   //nPresentationID must be odd--0 indicates failure
   if (nPresentationID==0)
   {
      CString strTmp;
      strTmp.Format("Abstract Syntax[%s] Not Included in the Association", (char *)strClassUID);
      strMsg = strMsg + strTmp;
   }
   else 
      //success
   {
      short uUniqueID = 99;
      m_FileCount = 0;  //used for file name in OnReceiveCStoreRequest event
      
      m_pLEADDicomNet->SendCGetRequest(   
         m_pLEADDicomNet->GethNet(),
         nPresentationID, 
         uUniqueID, 
         strClassUID,
         COMMAND_PRIORITY_MEDIUM,
         m_pLEADDicomDS->GethDicomDS()
         );
   }
   AfxMessageBox(strMsg);
   //now wait for one or more C-STORE sub-operations and finally the C-Get response

}