I'm using the free Visual Studio 2013 with my Intel 2016 Fortran Compiler and I get the error #6683. Here is a code segment (just a part of my code) that demonstrates the errors:
interface
integer*4 function CreateWindowEx (dwExStyle,lpClassName,lpWindowName,dwStyle, &
x, y, nWidth, nHeight, hWndParent, hMenu, &
hInstance, lpParam )
!DEC$ ATTRIBUTES STDCALL, ALIAS : 'CreateWindowEx' :: CreateWindowEx
use IFWIN
Integer(DWORD),intent(in):: dwExStyle
Integer(LPCTSTR),intent(in):: lpClassName
. . . more after this
error #6683: A kind type parameter must be a compile-time constant. [LPCTSTR]
Integer(LPCTSTR),intent(in):: lpClassName
------------^
If I declare the function to return a HWND then it gets an error too.
Brooks V