LDicomNet::SendNActionRequest

L_INT LDicomNet__SendNActionRequestExample(LMyDicomNet *m_pDicomNet) 
{ 
   //This sample sends an N-Action Request to the server 
   //In this example: 
   // 
   //1. LMyDicomNet is a class derived from LDicomNet 
   //2. LMyDicomNet has the following member variables: 
   //       m_nClientOrServer:  can be (STATUS_NONE, STATUS_SERVER, STATUS_CLIENT) 
   //                           identifieds the LMyDicomNet object as a server or a client 
   //       m_nDataCommand:     can be (COMMAND_C_MOVE,COMMAND_C_GET) 
   //                           set so the server knows how a C-Store Response was generated 
   // 
   //3. m_pDicomNet points to a valid LMyDicomNet object 
   //      LMyDicomNet *m_pDicomNet 
   // 
   //4. A connection exists between client and server 
   //5. An association exists between the client and server 
   L_INT nRet; 
   CString strMsg = TEXT("N-Action\n"); 
   //Choose a supported Action ID 
   L_UINT16 nAction = 1; 
   //Choose an SOP Class to find 
   CString strClassUID = UID_BASIC_FILM_BOX_CLASS; 
   //Choose an SOP Instance to modify 
   CString strInstanceUID = TEXT("1.1.1.1"); 
   //... 
   //...Create a data set that encodes the Action Arguments (based on value of nAction) 
   //...For this example, add a tag to the Data set so that it is non-empty 
   //... 
   LDicomDS DicomDS; 
   DicomDS.InitDS(CLASS_UNKNOWN, 0); 
   //...Add the action arugments 
   pDICOMTAG pDicomTag = LDicomTag::Find(TAG_IMAGE_TYPE); 
   pDICOMELEMENT pElement = DicomDS.InsertElement( 
   NULL,                      //pDICOMELEMENT pNeighbor 
   FALSE,                     //L_BOOL bChild 
   TAG_IMAGE_TYPE,            //L_UINT32 nTag 
   pDicomTag->nVR,            //L_UINT16 nVR 
   FALSE,                     //L_BOOL bSequence, 
   0                          //L_UINT32 nIndex 
   ); 
   UNREFERENCED_PARAMETER(pElement); 
   //Get the associate object 
   LDicomAssociate *pDicomAssociate = m_pDicomNet->GetAssociate(); 
   //Is class supported in the assocation? 
   L_UCHAR nPresentationID = pDicomAssociate->FindAbstract((L_TCHAR *)(LPCTSTR)strClassUID); 
   //nPresentationID must be odd--0 indicates failure 
   if (nPresentationID==0) 
   { 
      CString strTmp; 
      strTmp.Format(TEXT("Abstract Syntax[%s] Not Included in the Association"), strClassUID); 
      strMsg = strMsg + strTmp; 
   } 
   else //success 
   { 
      L_UINT16 uUniqueID = 99; 
      nRet =m_pDicomNet->SendNActionRequest( nPresentationID, 
      uUniqueID, 
      (L_TCHAR *)(LPCTSTR)strClassUID, 
      (L_TCHAR *)(LPCTSTR)strInstanceUID, 
      nAction, 
      &DicomDS); 
      if(nRet > 0) 
         return nRet; 
   } 
   AfxMessageBox(strMsg); 
   return DICOM_SUCCESS; 
}