libsim Versione 7.2.0
|
◆ dbasession_ingest_metaanddatail()
get data from DSN
Definizione alla linea 2805 del file dballe_class.F03. 2806
2807
2809function toarray_dbametaanddatad(this)
2810type(dbametaanddatad),allocatable :: toarray_dbametaanddatad(:)
2811class(dbametaanddatadList) :: this
2812
2813integer :: i
2814
2815allocate (toarray_dbametaanddatad(this%countelements()))
2816
2817call this%rewind()
2818i=0
2819do while(this%element())
2820 i=i+1
2821 toarray_dbametaanddatad(i) =this%current()
2822 call this%next()
2823end do
2824end function toarray_dbametaanddatad
2825
2826
2828subroutine displaydbametaanddatab(this)
2829class(dbametaanddatabList),intent(inout) :: this
2830type(dbametaanddatab) :: element
2831
2832call this%rewind()
2833do while(this%element())
2834 print *,"index:",this%currentindex()," value:"
|