有没有办法在FORTRAN 77中返回当前文件名

Question

我正在FORTRAN 77中使用相同代码的几个版本，并且在每个代码中我都打印了文件名和版本号，但是在这么多版本之后，必须更改该行变得很繁琐。我想知道代码是否有办法返回自己的文件名，因为文件名中有版本号？我现在的行看起来像这样，codevers='testfile_v009'和print *, 'Code Version: ', codevers 唯一的问题是我复制了以前版本的代码并对其进行了更改，但是经常忘记更新代码中的那些行。

任何帮助表示赞赏！感谢。