'*
' Modul Globals
'
' Dieses Modul beinhaltet Public Objekte und Variablen, welche während der gesamten
' Luafzeit von EDOKA benötigt werden
' 
' Autor: Stefan Hutter
' Datum: 2.12.2002
'*
Imports System.Reflection
Imports System.IO

Module Globals
    'Datenbankvariablen
    Public Indextyp As Integer = 1
    Public Applikationsdaten As DataTable
    Public AppldataRow As Integer

    Public sConnectionString_edoka As String
    Public sConnectionString_journale As String
    Public sConnectionString_ams As String

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

    Public conn_edoka As New edokadb.clsConnectionProvider()
    Public conn_journale As New edokadb.clsConnectionProvider()
    Public conn_ams 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 Params As New ClsParameters()

    Public ofile As System.IO.File
    Public oread As System.IO.StreamReader
    Public Aufgehoben As Boolean
    Public edokadokumentid As String
    Public dokumenttyp As Integer
    Public save_dokumentid As String

    Public ArchivierteDokumente As Integer = 0


    Public Function ApplicationPath() As String
        'Return Path.GetDirectoryName([Assembly].GetExecutingAssembly().Location)
        Return Path.GetDirectoryName([Assembly].GetEntryAssembly().Location) + "\"
    End Function

End Module