Intel® Fortran Compiler 18.0 Developer Guide and Reference
QuickWin Function: Returns the unit number of the currently active child window.
USE IFQWIN
result = GETACTIVEQQ( )
The result type is INTEGER(4). The result is the unit number of the currently active window. If no child window is active, it returns the parameter QWIN$NOACTIVEWINDOW (defined in IFQWIN.F90).