Intel® Fortran Libraries Reference

2 Intel Fortran Libraries ReferenceSyntaxresult = SYSTEM (string)string(Input) Character*(*). Operating system command.Results:The result type is INTEGER(4). The result is the exit status of the shell command. If –1, use“IERRNO” to retrieve the error. Errors can be one of the following:• E2BIG – The argument list is too long.• ENOENT – The command interpreter cannot be found.• ENOEXEC – The command interpreter file has an invalid format and is not executable.• ENOMEM – Not enough system resources are available to execute the command.On Windows* systems, the calling process waits until the command terminates. To insurecompatibility and consistent behavior, an image can be invoked directly by using the Windows*API CreateProcess( ) in your Fortran code.Commands run with the SYSTEM routine are run in a separate shell. Defaults set with theSYSTEM function, such as current working directory or environment variables, do not affect theenvironment the calling program runs in.The command line character limit for the SYSTEM function is the same limit that your operatingsystem command interpreter accepts.CompatibilityCONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIBSee Also: “SYSTEMQQ”ExampleUSE IFPORTINTEGER(4) I, errnumI = SYSTEM("dir > file.lst")If (I .eq. -1) thenerrnum = ierrno( )print *, 'Error ', errnumend ifEND2-478