<html>
<!--
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* Copyright by the Board of Trustees of the University of Illinois. *
* All rights reserved. *
* *
* This file is part of HDF5. The full HDF5 copyright notice, including *
* terms governing use, modification, and redistribution, is contained in *
* the files COPYING and Copyright.html. COPYING can be found at the root *
* of the source code distribution tree; Copyright.html can be found at the *
* root level of an installed copy of the electronic HDF5 document set and *
* is linked from the top-level documents page. It can also be found at *
* http://hdf.ncsa.uiuc.edu/HDF5/doc/Copyright.html. If you do not have *
* access to either file, you may request a copy from hdfhelp@ncsa.uiuc.edu. *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
-->
<head><title>
FORTRAN Error Handling API -- h5e
</title></head>
<body bgcolor="#FFFFFF">
<center>
<h1>The FORTRAN 90 API to HDF5<br>h5e: Error Handling</h1>
</center>
<dl>
<p>
<p>
<hr>
<p>
<a name="h5eclear_f">
<p>
</a>
<dt><strong>FORTRAN interface:</strong>   <strong>h5eclear_f</strong>
<pre>
SUBROUTINE h5eclear_f(hdferr)
IMPLICIT NONE
INTEGER, INTENT(OUT) :: hdferr ! Error code
END SUBROUTINE h5eclear_f
</pre>
<p>
<p>
<hr>
<p>
<a name="h5eprint_f">
<p>
</a>
<dt><strong>FORTRAN interface:</strong>   <strong>h5eprint_f</strong>
<pre>
SUBROUTINE h5eprint_f(hdferr, name)
CHARACTER(LEN=*), OPTIONAL, INTENT(IN) :: name ! File name
INTEGER, INTENT(OUT) :: hdferr ! Error code
END SUBROUTINE h5eprint_f
</pre>
<p>
<p>
<hr>
<p>
<a name="h5eget_major_f">
<p>
</a>
<dt><strong>FORTRAN interface:</strong>   <strong>h5eget_major_f</strong>
<pre>
SUBROUTINE h5eget_major_f(error_no, name, hdferr)
INTEGER, INTENT(IN) :: error_no !Major error number
CHARACTER(LEN=*), INTENT(OUT) :: name ! File name
INTEGER, INTENT(OUT) :: hdferr ! Error code
END SUBROUTINE h5eget_major_f
</pre>
<p>
<p>
<hr>
<p>
<a name="h5eget_minor_f">
<p>
</a>
<dt><strong>FORTRAN interface:</strong>   <strong>h5eget_minor_f</strong>
<pre>
SUBROUTINE h5eget_minor_f(error_no, name, hdferr)
INTEGER, INTENT(IN) :: error_no !Major error number
CHARACTER(LEN=*), INTENT(OUT) :: name ! File name
INTEGER, INTENT(OUT) :: hdferr ! Error code
END SUBROUTINE h5eget_minor_f
</pre>
<p>
<p>
<hr>
<p>
<a name="h5eset_auto_f">
<p>
</a>
<dt><strong>FORTRAN interface:</strong>   <strong>h5eset_auto_f</strong>
<pre>
SUBROUTINE h5eset_auto_f(printflag, hdferr)
INTEGER, INTENT(IN) :: printflag !flag to turn automatic error
!printing on or off
!possible values are:
!printon (1)
!printoff(0)
INTEGER, INTENT(OUT) :: hdferr ! Error code
END SUBROUTINE h5eset_auto_f
</pre>
<!-- Keep the rest; it's file closing stuff. -->
</dl>
<p>
<p>
<hr>
<address>
<a href="mailto:hdfhelp@ncsa.uiuc.edu">HDF Help Desk</a>
</address>
Last modified: 13 July 2000
<br>
Describes HDF5 Release 1.4.4, July 2002
</body>
</html>
