3367 allocate (metaanddata%dataattrv%dataattr(1))
3368 ier = idba_enq(session%sehandle,
"var",btable)
3369 ier = idba_enq(session%sehandle, btable,
value)
3370 allocate (metaanddata%dataattrv%dataattr(1)%dat,source=dbadatac(btable,
value))
3371 call metaanddata%metadata%dbaenq(session)
3374 if (optio_log(noattr))
then 3376 allocate (metaanddata%dataattrv%dataattr(1)%attrv%dcv(0))
3382 allocate (metaanddata%dataattrv%dataattr(1)%attrv%dcv(
size(starvars%dcv)))