summaryrefslogtreecommitdiffstats
path: root/doc/html/fortran/h5e_FORTRAN.html
blob: 2e0058fff8a05393e22dcd263d1a2d540749f501 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
<html>
<head><title>
FORTRAN Error Handling API -- h5e
</title>

<!-- #BeginLibraryItem "/ed_libs/styles_RM.lbi" --><link href="../ed_styles/RMelect.css" rel="stylesheet" type="text/css"><!-- #EndLibraryItem --></head>

<body bgcolor="#FFFFFF">



<center>
<h1>The FORTRAN 90 API to HDF5<br>h5e: Error Handling</h1>
</center>


<dl>


<p>&nbsp;
<p>&nbsp;
<hr>
<p>&nbsp;
<a name="h5eclear_f">
<p>&nbsp;
</a>


<dt><strong>FORTRAN interface:</strong>  &nbsp <strong>h5eclear_f</strong>
<pre>

          SUBROUTINE h5eclear_f(hdferr) 
            IMPLICIT NONE
            INTEGER, INTENT(OUT) :: hdferr  ! Error code

          END SUBROUTINE h5eclear_f
</pre>


<p>&nbsp;
<p>&nbsp;
<hr>
<p>&nbsp;
<a name="h5eprint_f">
<p>&nbsp;
</a>


<dt><strong>FORTRAN interface:</strong>  &nbsp <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>&nbsp;
<p>&nbsp;
<hr>
<p>&nbsp;
<a name="h5eget_major_f">
<p>&nbsp;
</a>


<dt><strong>FORTRAN interface:</strong>  &nbsp <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>&nbsp;
<p>&nbsp;
<hr>
<p>&nbsp;
<a name="h5eget_minor_f">
<p>&nbsp;
</a>


<dt><strong>FORTRAN interface:</strong>  &nbsp <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>&nbsp;
<p>&nbsp;
<hr>
<p>&nbsp;
<a name="h5eset_auto_f">
<p>&nbsp;
</a>


<dt><strong>FORTRAN interface:</strong>  &nbsp <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>&nbsp;
<p>&nbsp;
<hr>


<!-- #BeginLibraryItem "/ed_libs/Footer.lbi" --><address>
<a href="mailto:hdfhelp@ncsa.uiuc.edu">HDF Help Desk</a> 
<br>
Describes HDF5 Release 1.5, Unreleased Development Branch
</address><!-- #EndLibraryItem -->

Last modified:  13 July 2000

</body>
</html>