2977 do while(this%element())
2979 toarray_dbametaanddatac(i) =this%current()
2982 end function toarray_dbametaanddatac
2986 subroutine dbametaanddatai_display(data)
2992 end subroutine dbametaanddatai_display
2995 subroutine dbametaanddatab_display(data)
3001 end subroutine dbametaanddatab_display