*-----------------run distiller and wait for close the window-------------- LOCAL Startup_Info LOCAL Process_Info LOCAL Command_String LOCAL Return_Code LOCAL hProcess Startup_Info = long2str(68) + REPLICATE(CHR(0), 64) Process_Info = REPLICATE(CHR(0), 16) Command_String = ALLTRIM(Distiller_EXE_Spec) + ' ' + ALLTRIM (PS_PDF_Combiner_File_Spec) + CHR(0) Return_Code = CreateProcess(0 , Command_String , 0 , 0 , 1 , NORMAL_PRIORITY_CLASS, 0, 0, @Startup_Info, @Process_Info ) IF Return_Code = 0 =MESSAGEBOX("Error occurred. Error code: ", GetLastError()) RETURN ENDIF hProcess = str2long(SUBSTR(Process_Info, 1, 4)) DO WHILE ( .T. ) IF ( WaitForSingleObject(hProcess, WAIT_INTERVAL) != WAIT_TIMEOUT ) EXIT ELSE DOEVENTS ENDIF ENDDO Return_Code = CloseHandle (hProcess)