libsim  Versione 7.2.4

◆ dbasession_set()

subroutine dballe_class::dbasession_set ( class (dbasession), intent(in)  session,
type (dbametadata), optional  metadata,
class(dbadcv), optional  datav,
class(dbadata), optional  data,
type (dbadatetime), optional  datetime,
type (dbaana), optional  ana,
type (dbanetwork), optional  network,
type (dbalevel), optional  level,
type (dbatimerange), optional  timerange,
type (dbafilter), optional  filter 
)
private

set parameters in dballe API

Parametri
datavdata array
datetimedate and time
filterfilter for wanted data

Definizione alla linea 4351 del file dballe_class.F03.

4352 !!$
4353 !!$if (present(metaanddatal)) then
4354 !!$ call metaanddatal%extrude(session,noattr,filter)
4355 !!$end if
4356 !!$
4357 !!$end subroutine dbasession_extrude
4358 
4359 # ifndef F2003_FULL_FEATURES
4360 
4361 subroutine dbasession_delete(session)
4362 class(dbasession), intent(inout) :: session
4363 integer :: ier
4364 type(dbasession) :: defsession
4365 
4366 if (c_e(session%sehandle)) then
4367  ier = idba_fatto(session%sehandle)
4368 end if
4369 
4370 call session%memconnection%delete()
4371 
4372 select type (session)
4373 type is (dbasession)
4374  session = defsession
4375 end select
4376 
4377 !!$session%sehandle=imiss
4378 !!$session%file=.false.
4379 !!$session%template=cmiss
4380 !!$session%filename=cmiss
4381 !!$session%mode=cmiss
4382 !!$session%format=cmiss
4383 !!$session%simplified=.true.
4384 !!$session%memdb=.false.
4385 !!$session%category=imiss
4386 !!$session%count=imiss
4387 
4388 end subroutine dbasession_delete
4389 
4390 #else
4391 
4393 subroutine dbasession_delete(session)
4394 type (dbasession), intent(inout) :: session
4395 integer :: ier
4396 
4397 if (c_e(session%sehandle)) then
4398  ier = idba_fatto(session%sehandle)

Generated with Doxygen.