libsim  Versione6.3.0

◆ dbametaanddatav_extrude()

subroutine dballe_class::dbametaanddatav_extrude ( class(dbametaanddatav), intent(in)  metaanddatav,
type(dbasession), intent(in)  session,
logical, intent(in), optional  noattr,
type(dbafilter), intent(in), optional  filter,
character(len=*), intent(in), optional  template 
)
private

put data on DSN

Parametri
[in]sessiondballe session
[in]noattrset to .true. to get data only (no attribute)
[in]filteruse this to filter wanted data

Definizione alla linea 2747 del file dballe_class.F03.

2747  i=i+1
2748  toarray_dbametaanddatar(i) =this%current()
2749  call this%next()
2750 end do
2751 end function toarray_dbametaanddatar
2752 
2753 
2755 subroutine displaydbametaanddatad(this)
2756 class(dbametaanddatadList) :: this
2757 type(dbametaanddatad) :: element
2758 
2759 call this%rewind()
2760 do while(this%element())
2761  print *,"index:",this%currentindex()," value:"
2762  element=this%current()
2763  call element%display()
2764  call this%next()
2765 end do
2766 end subroutine displaydbametaanddatad
2767 
2769 type(dbametaanddatad) function currentdbametaanddatad(this)
2770 class(dbametaanddatadList) :: this
2771 class(*), pointer :: v
2772 
2773 v => this%currentpoli()
2774 select type(v)
2775 type is (dbametaanddatad)
2776  currentdbametaanddatad = v
2777 end select
2778 end function currentdbametaanddatad
2779 
2781 subroutine dbasession_ingest_metaanddatadl(session,metaanddatal,filter)
2782 class(dbasession), intent(inout) :: session

Generated with Doxygen.