create view stru (TableName, FieldName, FieldPos, FieldLength, FieldType)
as
select R.RDB$RELATION_NAME, R.RDB$FIELD_NAME ,
       R.RDB$FIELD_POSITION+ 1 , F.RDB$FIELD_LENGTH,
       F.RDB$FIELD_TYPE
from RDB$FIELDS F, RDB$RELATION_FIELDS R
where F.RDB$FIELD_NAME = R.RDB$FIELD_SOURCE and R.RDB$SYSTEM_FLAG =  0 ;