libsim Versione 7.2.1

◆ dbametaanddata_extrude()

subroutine dbametaanddata_extrude ( class(dbametaanddata), intent(in)  metaanddata,
type(dbasession), intent(in)  session,
logical, intent(in), optional  noattr,
type(dbafilter), intent(in), optional  filter,
logical, intent(in), optional  attronly,
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
[in]attronlyset to .true. to export attr only (no data)

Definizione alla linea 2658 del file dballe_class.F03.

2659i=0
2660do while(this%element())
2661 i=i+1
2662 toarray_dbametaanddatai(i) =this%current()
2663 call this%next()
2664end do
2665end function toarray_dbametaanddatai
2666
2667
2669subroutine displaydbametaanddatar(this)
2670class(dbametaanddatarList),intent(inout) :: this
2671type(dbametaanddatar) :: element
2672
2673call this%rewind()
2674do while(this%element())
2675 print *,"index:",this%currentindex()," value:"
2676 element=this%current()
2677 call element%display()
2678 call this%next()
2679end do
2680end subroutine displaydbametaanddatar
2681
2683type(dbametaanddatar) function currentdbametaanddatar(this)
2684class(dbametaanddatarList) :: this
2685class(*), pointer :: v
2686
2687v => this%currentpoli()
2688select type(v)
2689type is (dbametaanddatar)
2690 currentdbametaanddatar = v
2691end select
2692end function currentdbametaanddatar
2693
2694
2696subroutine dbasession_ingest_metaanddatarl(session,metaanddatal,filter)
2697class(dbasession), intent(inout) :: session
2698type(dbametaanddatarlist), intent(inout) :: metaanddatal
2699type(dbafilter),intent(in),optional :: filter
2700
2701type(dbametaanddatar) :: element
2702

Generated with Doxygen.