ne"><a id="l00101" name="l00101"></a><span class="lineno">  101</span><span class="keywordtype">type</span>(c_ptr), <span class="keywordtype">intent(in)</span>, <span class="keywordtype">value</span> :: hstmt</div>
<div class="line"><a id="l00102" name="l00102"></a><span class="lineno">  102</span><span class="keywordtype">character(kind=c_char)</span> :: szcatalogname</div>
<div class="line"><a id="l00103" name="l00103"></a><span class="lineno">  103</span><span class="keywordtype">integer(c_short)</span>,