I would like to cintribute my humble openion to the debate:
You can rewrite the open command such as:
open(File_name,parm,parm,parm...)
{
toupper(file)name);
_open(File_name,parm,parm,parm...);
}
( In Fortran jargon of corse).
Hope ip helped.
Michael
____________________________________________
... YEH YEH ... RTFM yoursef!