3274 call metaanddata%metadata%dbaenq(session)
3276 call metadata%dbaenq(session)
3279 do while ( metaanddata%metadata == metadata )
3280 ier = idba_enq(session%sehandle,
"var",btable)
3281 do i=1,
size(metaanddata%dataattrv%dataattr)
3282 if (metaanddata%dataattrv%dataattr(i)%dat%btable == btable)
then 3284 select type ( dat => metaanddata%dataattrv%dataattr(i)%dat )