SendNSetRequest Example for C++ 6.0 or later

{
   //This example sends a N-Set 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 = "N-Set\n";
   
   //Choose an SOP Class to find
   _bstr_t strClassUID = UID_SC_IMAGE_STORAGE;
   
   //Choose an SOP Instance to modify
   _bstr_t strInstanceUID = "1.1.1.1";
   
   //create the data set that encodes the changed element(s)
   m_pLEADDicomDS->InitDS (DICOM_CLASS_UNKNOWN, 0);
   
   m_pLEADDicomDS->FindTag(TAG_PATIENT_ID);
   m_pLEADDicomDS->InsertElement (FALSE, TAG_PATIENT_ID, m_pLEADDicomDS->GetCurrentTag ()->VR, FALSE, 0);
   
   //Choose new patient ID
   _bstr_t sPatientID("123-45-6789");
   m_pLEADDicomDS->StringValueCount = 1;
   m_pLEADDicomDS->put_StringValues (0, sPatientID);
   m_pLEADDicomDS->SetStringValue (1);
   
   //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
   {      
      //send a request
      short uUniqueID = 99;
      m_pLEADDicomNet->SendNSetRequest ( 
         m_pLEADDicomNet->GethNet(), 
         nPresentationID, 
         uUniqueID, 
         strClassUID, 
         strInstanceUID, 
         m_pLEADDicomDS->GethDicomDS()
         );
   }
   AfxMessageBox(strMsg);
}