Intel® Fortran Compiler 16.0 User and Reference Guide
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).