libsim  Versione 7.1.8

◆ dbadataattrv_extrude()

subroutine dballe_class::dbadataattrv_extrude ( class(dbadataattrv), intent(in)  dataattr,
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 1587 del file dballe_class.F03.

1588 if (.not. c_e(data%btable)) return
1589 ier = idba_set(session%sehandle,data%btable,data%value)
1590 end subroutine dbadatar_set
1591 
1593 subroutine dbadatar_display(data)
1594 class(dbadatar), intent(in) :: data
1595 print *,"Btable: ", t2c(data%btable,miss="Missing")," Value: ", t2c(data%value,miss="Missing value")
1596 end subroutine dbadatar_display
1597 
1598 
1600 subroutine dbadatad_set(data,session)
1601 class(dbadatad), intent(in) :: data
1602 type(dbasession), intent(in) :: session
1603 integer :: ier
1604 if (.not. c_e(data%btable)) return
1605 ier = idba_set(session%sehandle,data%btable,data%value)

Generated with Doxygen.