diff --git a/AVISOUPDATER/UPDATERfrm.vb b/AVISOUPDATER/UPDATERfrm.vb index e9cf396..276081f 100644 --- a/AVISOUPDATER/UPDATERfrm.vb +++ b/AVISOUPDATER/UPDATERfrm.vb @@ -35,6 +35,10 @@ Public Class UPDATERfrm CopyIncremental = False End If + If System.AppDomain.CurrentDomain.BaseDirectory = "\\share01\Programme\AVISO\" OrElse System.AppDomain.CurrentDomain.BaseDirectory = "\\share01\f\Programme\AVISO\" OrElse System.AppDomain.CurrentDomain.BaseDirectory = "\\install\Programme\AVISO\" Then + MsgBox("Programm kann nicht im Quellpfad " & System.AppDomain.CurrentDomain.BaseDirectory & " geupdated werden!" & vbNewLine & "Vorgang wird abgebrochen!", MsgBoxStyle.Critical) + Exit Sub + End If Dim FIRMA = "VERAG" Dim pfadDatei As String = System.AppDomain.CurrentDomain.BaseDirectory & "\Standort.txt" diff --git a/Aviso/Resources/ambar_boarder1.png b/Aviso/Resources/ambar_boarder1.png new file mode 100644 index 0000000..bc0c101 Binary files /dev/null and b/Aviso/Resources/ambar_boarder1.png differ diff --git a/Aviso/frmGesamtsicherheitenNEU.vb b/Aviso/frmGesamtsicherheitenNEU.vb index c97f0e7..ef80ab7 100644 --- a/Aviso/frmGesamtsicherheitenNEU.vb +++ b/Aviso/frmGesamtsicherheitenNEU.vb @@ -83,8 +83,17 @@ Public Class frmGesamtsicherheitenNEU txtlkwIdSearch.initSearchBox(Me.FindForm, " LKW_Nr, AvisoID, CAST(Datum as Date) as Datum FROM [Aviso]", {"LKW_Nr", "AvisoID", "Datum"}, "", "Datum desc", "LKW_Nr", "AvisoID", "AVISO",, 250, 200) + If Standort = "AMBAR GmbH" Then + If cboFiliale.Items.Count > 0 Then + cboFiliale.SelectedIndex = 0 + End If + If cboWarenort.Items.Count > 0 Then + cboWarenort.changeItem("5701") + End If + End If + Else - LoadDGVSicherheiten(True) + LoadDGVSicherheiten(True) End If LoadStandort() cboSicherheitATR.Enabled = currentGesSichRef.brgakto_gs_ATR diff --git a/Aviso/frmLogin.vb b/Aviso/frmLogin.vb index d7d5f64..3eae677 100644 --- a/Aviso/frmLogin.vb +++ b/Aviso/frmLogin.vb @@ -87,6 +87,8 @@ Public Class frmLogin If firma = "NKD" Then firma = "VERAG" If firma = "NEU" Then firma = "VERAG" If firma = "SUB" Then firma = "VERAG" + strmReader.Close() + Else ' FIRMA VON AD HOLEN, wenn keine StandortTxt diff --git a/Aviso/usrcntlAktDetails.vb b/Aviso/usrcntlAktDetails.vb index dd6bb1a..fc38aa8 100644 --- a/Aviso/usrcntlAktDetails.vb +++ b/Aviso/usrcntlAktDetails.vb @@ -839,9 +839,13 @@ Public Class usrcntlAktDetails .RowTemplate.MinimumHeight = 20 .AutoSizeRowsMode = DataGridViewAutoSizeRowsMode.AllCells + .Columns("anh_id").Visible = False 'VermerkID nicht anzeigen - .Columns("anh_docId").Visible = False 'AvisoID nicht anzeigen - .Columns("anh_markiert").Visible = False 'AvisoID nicht anzeigen + .Columns("anh_docId").Visible = False + .Columns("anh_markiert").Visible = False + .Columns("anh_LaufzettelDruck").Visible = False + .Columns("anh_GestellungslisteAnfuegen").Visible = False + .Columns("anh_cmrId").Visible = False .Columns("anh_Name").MinimumWidth = 150 .Columns("anh_Name").HeaderText = "Name" diff --git a/Gemeinsames/Gemeinsames.vbproj b/Gemeinsames/Gemeinsames.vbproj index beb46fd..a26772e 100644 --- a/Gemeinsames/Gemeinsames.vbproj +++ b/Gemeinsames/Gemeinsames.vbproj @@ -35,7 +35,7 @@ true - x64 + AnyCPU true full true