How to get size of file in Intel Fortran?

[brb36641]

Hello,

Some one give me any idea to solve this issue, please.

I wonder that Intel Fortran should recommend how to check size of file in source code.

e.g. INQUIRE and some specifier of it

My idea is recl specifier of INQURE. I attempt to use it.

Actual sorce code

---------------------------------------------------------------------

integer record-length

INQUIRE(file='st-file',recl=record-lenght)

write (*,*) 'st-file length',record-lenght

---------------------------------------------------------------------

Then the last 'write' uncorrect size of st-file.

What's wrong? Please let me know how to solve.

Thanks.

[Steven_L_Intel1]

File length is not record length. All INQUIRE (RECL=) will tell you is the value used in an OPEN to open a current unit. Otherwise no value is available.

What you want is GETFILEINFOQQ.

[brb36641]

Hi, Thank you , Steve.

Let me ask you one further question.

Will GETFILEINFOQQ workin Conpaq Fortran as same as in Intel Fortran?

[Steven_L_Intel1]

Yes, exactly the same. If you want your source code to work with both compilers, use USE DFLIB to make the routine available.

[brb36641]

Dear Steve,

Thank you very much for helpful suggestion.

My problem was immediately solved by your favor.

Thank you again.