1157if (present(simplified)) lsimplified=simplified
1158
1159ier = idba_messages_open_input(session%sehandle, filename, lmode, lformat, lsimplified)
1160
1161end subroutine dbasession_messages_open_input
1162
1163
1165subroutine dbasession_messages_open_output(session,filename,mode,format)
1166class(dbasession), intent(in) :: session