diff --git a/Aviso/frmATEZ_NCTS.vb b/Aviso/frmATEZ_NCTS.vb
index a75797f..7890ab0 100644
--- a/Aviso/frmATEZ_NCTS.vb
+++ b/Aviso/frmATEZ_NCTS.vb
@@ -293,6 +293,13 @@ Public Class frmATEZ_NCTS
         Select Case FIRMA_DY
             Case "VERAG" : txtDyMandant.Text = "VERG"
                 txtDyNiederlassung.Text = VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG
+
+                Select Case FilialenNr
+                    Case "5103" : txtDyNiederlassung.Text = "WAI"
+
+                End Select
+
+
             Case "ATILLA" : txtDyMandant.Text = "ATIL" : txtDyNiederlassung.Text = "SUW"
             Case "UNISPED" : txtDyMandant.Text = "UNAT" : txtDyNiederlassung.Text = "ATSPED"
             Case "IMEX" : txtDyMandant.Text = "IMEX" : txtDyNiederlassung.Text = "IME"
diff --git a/Aviso/frmHauptfenster.vb b/Aviso/frmHauptfenster.vb
index 7f6d3b1..3b7214a 100644
--- a/Aviso/frmHauptfenster.vb
+++ b/Aviso/frmHauptfenster.vb
@@ -597,19 +597,19 @@ Public Class frmHauptfenster
 
 
         If VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_timasId IsNot Nothing Then
-                Dim timas As New cTimasAPI
+            Dim timas As New cTimasAPI
             Dim infoMessage As New DataTable
             Dim timeEntryExisting As Boolean = False
             timas.getTimeEntries(cAllgemein.MITARBEITER.mit_timasId, infoMessage, timeEntryExisting)
             If Not timeEntryExisting Then
-                    Dim a As MsgBoxResult = MsgBox("Für " & VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME & " wurde heute noch keine Zeit erfasst" & vbNewLine & Now.ToString() & "als Startzeit erfassen?", vbYesNo)
-                    If a = vbYes Then
-                        Dim info
-                        timas.setTimeEntry(cAllgemein.MITARBEITER, Now, info, "in")
-                        MsgBox(info)
-                    Else
+                Dim a As MsgBoxResult = MsgBox("Für " & VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME & " wurde heute noch keine Zeit erfasst" & vbNewLine & Now.ToString() & "als Startzeit erfassen?", vbYesNo)
+                If a = vbYes Then
+                    Dim info
+                    timas.setTimeEntry(cAllgemein.MITARBEITER, Now, info, "in")
+                    MsgBox(info)
+                Else
 
-                    End If
+                End If
 
             End If
         End If
@@ -1264,12 +1264,12 @@ Public Class frmHauptfenster
                                                  " when [Status] =5 then 4 " &
                                                  " when [Status] =0 then 5 " &
                                          " END, Grenzstelle,Ankunft " & If(cbx_My_LKW.Checked, "", ",tblSnd_SendungID")
-                Else
+            Else
 
-                    '----------------------------------------------------------------------------------------------------------------------------------
-                    '--- Sendung ---
-                    '----------------------------------------------------------------------------------------------------------------------------------
-                    Dim inBearbeitungSQL = " tblSendungen.LetzterMitarbeiterId=@maId " ' 1<>1 " 'DEFAULT = "Benutzer"
+                '----------------------------------------------------------------------------------------------------------------------------------
+                '--- Sendung ---
+                '----------------------------------------------------------------------------------------------------------------------------------
+                Dim inBearbeitungSQL = " tblSendungen.LetzterMitarbeiterId=@maId " ' 1<>1 " 'DEFAULT = "Benutzer"
                 If cboMyAvisoAnzeige._value <> "" Then
                     If cboMyAvisoAnzeige._value = "ALLE" Then
                         '  inBearbeitungSQL = " 1=1 " 'ALLE
@@ -3098,7 +3098,7 @@ Public Class frmHauptfenster
 
         Dim path = SDL.cFinanzOnlineWebService.genUID_Formular("ATU74813856")
         If path <> "" Then
-            Process.Start(path)
+            process.Start(path)
         End If
         'If SDL.cFinanzOnlineWebService.Call_Web_Service_MethodUID_Abfrage_NEU2020(firma, "ATU74813856") = 0 Then
         '    MsgBox("HURRA2" & vbNewLine & firma)