libsim  Versione 7.2.1

◆ dbaconnection_init()

type(dbaconnection) function dballe_class::dbaconnection_init ( character (len=*), intent(in), optional  dsn,
character (len=*), intent(in), optional  user,
character (len=*), intent(in), optional  password,
character(len=*), intent(in), optional  categoryappend,
integer, intent(in), optional  idbhandle 
)
private

Constructor Without parameter it is initialized to missing.

Parametri
[in]dsnDSN (dballe/ODBC definition)
[in]userusername to use
[in]passwordpassword to use
[in]categoryappendappennde questo suffisso al namespace category di log4fortran
[in]idbhandledsn connection; if present it will be used

Definizione alla linea 3953 del file dballe_class.F03.

3954  else
3955  lattrflag = "read"
3956  end if
3957 end if
3958 
3959 
3960 !!$print*,"---------------- call session_init --------------------------------"
3961 !!$print *,"session_init,lformat,ltemplate,lmemdb,lfile,lloadfile,lanaflag,ldataflag,lattrflag"
3962 !!$print *,"session_init",lformat,ltemplate,lmemdb,lfile,lloadfile,lanaflag,ldataflag,lattrflag
3963 !!$print*,"------------------------------------------------"
3964 
3965 if (lfile) then
3966 
3967  if (present(anaflag).or.present(dataflag).or.present( attrflag)) then
3968  call l4f_category_log(dbasession_init%category,l4f_error,"option anaflag, dataflag, attrflag defined with filename access")
3969  CALL raise_error()
3970  end if
3971 
3972 else
3973 
3974  if(.not. present(connection)) then
3975  call l4f_category_log(dbasession_init%category,l4f_error,"connection not present accessing DBA")
3976  CALL raise_error()
3977  end if
3978 
3979  if (present(mode).or.present(format).or.present(template).or.present(simplified)) then
3980  call l4f_category_log(dbasession_init%category,l4f_error,&
3981  "option mode or format or template or simplified defined without filename")
3982  CALL raise_error()
3983  end if
3984 

Generated with Doxygen.