libsim Versione 7.2.6
|
◆ dbasession_ingest_metaanddatarl()
get data from DSN
Definizione alla linea 2884 del file dballe_class.F03. 2885
2886
2887!> return an array of dbametaanddatab
2888function toarray_dbametaanddatab(this)
2889type(dbametaanddatab),allocatable :: toarray_dbametaanddatab(:) !< array
2890class(dbametaanddatabList) :: this
2891
2892integer :: i
2893
2894allocate (toarray_dbametaanddatab(this%countelements()))
2895
2896call this%rewind()
2897i=0
2898do while(this%element())
2899 i=i+1
2900 toarray_dbametaanddatab(i) =this%current()
2901 call this%next()
2902end do
2903end function toarray_dbametaanddatab
2904
2905
2906!> print a summary of object content
2907subroutine displaydbametaanddatac(this)
2908class(dbametaanddatacList),intent(inout) :: this
2909type(dbametaanddatac) :: element
2910
2911call this%rewind()
2912do while(this%element())
2913 print *,"index:",this%currentindex()," value:"
|