Fortran channel to File descriptor conversion..help!

[A JETSON News User]

	I am using fortran on the DG AVION system and have run into the
following. The fortran supplied by DG does't have a functional interface to
return a FILE DESCRIPTOR from a channel number. I need that badly to enable
and disable locking mechanisms. I have thought of the following as a solution.
Maybe somebody out ther can suggest a solution.

	I know the filename of the file, so I can get the inode number of the
file by using the system call stat(). Now, we know that file descriptor tables
store the inode number of the file for i/o. How can I use the inode number of
the file and get to the file descriptor. It's my understanding that the file
descriptor is nothing but an index into this table. Is there a function which I
can use to access and search the file descriptor table???

thanks

ashok
chee13h at jane.uh.edu