Imports System.Reflection
Imports System.IO

Module Globals
    Public Applikationsdaten As DataTable
    Public AppldataRow As Integer

    Public sConnectionString_edoka As String
    Public sConnectionString_journale As String
    Public sConnectionString_tgdata As String

    Public args As String() = Environment.GetCommandLineArgs()

    Public Params As New ClsParameter()

    Public conn_edoka As New edokadb.clsConnectionProvider()
    Public conn_journale As New edokadb.clsConnectionProvider()
    Public conn_tgdata As New edokadb.clsConnectionProvider()

    Public Fehler As Integer = 0
    Public Warning As Integer = 0
    Public DokumentID As String
    Public ColdDokumentID As String
    Public KeyNr As Long

    Public ofile As System.IO.File
    Public oread As System.IO.StreamReader
    'test

    'NEU
    Public appPath As String = Path.GetDirectoryName([Assembly].GetEntryAssembly().Location) + "\"

#Region "BMS - Normal"


#If CONFIG = "Release" Then
    Public m_log As bms.Logging

#Else
    Public m_log As log

    Public Class log
        Function log(ByVal msg As String, Optional type As Integer = 0)

        End Function

        Public Function start()

        End Function

        Public Function ende()

        End Function
    End Class

#End If

#End Region

End Module