IMEX MySnd, RKSV DE Storno, Div.Bugfix

VERAG_PROG_ALLGEMEIN/cAllgemein.vb

@@ -54,6 +54,7 @@ Public Class cAllgemein
     Public Shared BENUTZER_BERECHTIGUNGS_GRUPPEN As cBerechtigungenBenutzerGruppenZuordnung_List = Nothing
     Public Shared PARAMS As cParameterList = Nothing
     Public Shared TRANSLATE As cTranslate_LIST = Nothing
+    Public Shared TRANSLATE_AUTO As cTranslateAuto_LIST = Nothing
     Public Shared _LAN As String = "DE" '"EN"
 
     Public Shared SESSION As New cSession
@@ -128,6 +129,7 @@ Public Class cAllgemein
 
         LOAD_PARAM()
         LOAD_TRANSLATE()
+        LOAD_TRANSLATE_AUTO()
         LOAD_FIRMEN()
         LOAD_FILIALEN()
 
@@ -164,6 +166,9 @@ Public Class cAllgemein
     Public Shared Sub LOAD_TRANSLATE()
         TRANSLATE = New cTranslate_LIST(PROGID)
     End Sub
+    Public Shared Sub LOAD_TRANSLATE_AUTO()
+        TRANSLATE_AUTO = New cTranslateAuto_LIST()
+    End Sub
     Public Shared Function GET_LAND() As String
         Select Case FIRMA
             Case "AMBAR" : Return "DE"