From 512d18164db29e570b2476cf24d7fe2f482c2b17 Mon Sep 17 00:00:00 2001 From: "d.breimaier" Date: Fri, 10 May 2024 15:02:24 +0200 Subject: [PATCH] Typos ausgebessert --- Aviso/My Project/AssemblyInfo.vb | 4 ++-- Aviso/frmSendungsdetailsNEU.vb | 5 +++-- Aviso/usrcntlAktDetails.vb | 2 +- 3 files changed, 6 insertions(+), 5 deletions(-) diff --git a/Aviso/My Project/AssemblyInfo.vb b/Aviso/My Project/AssemblyInfo.vb index f6e8234..f45f2cb 100644 --- a/Aviso/My Project/AssemblyInfo.vb +++ b/Aviso/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - - + + diff --git a/Aviso/frmSendungsdetailsNEU.vb b/Aviso/frmSendungsdetailsNEU.vb index bd995e3..886fd6a 100644 --- a/Aviso/frmSendungsdetailsNEU.vb +++ b/Aviso/frmSendungsdetailsNEU.vb @@ -187,7 +187,7 @@ Public Class frmSendungsdetailsNEU If SENDUNG_LIST(CURRENT_INDEX).tblSnd_Abfertigungsart_ID = 44 Then ' ATB GEstellung If SENDUNG_LIST(CURRENT_INDEX).tblSnd_ATBFakturieren Is Nothing Then - MsgBox("ATB-Gestllung: Bitte geben Sie an, ob die ATB Gestellung fakturiert (abgerechnet) werden sollte.") : Return False + MsgBox("ATB-Gestellung: Bitte geben Sie an, ob die ATB Gestellung fakturiert (abgerechnet) werden sollte.") : Return False End If @@ -2998,11 +2998,12 @@ Public Class frmSendungsdetailsNEU Case "AMBAR" If cboFiliale._value <> "5701" Then sperren = True 'UNISPED darf VERIMEX nicht, sonst alle im CLUSTER Case "VERAG" - If VERAG_PROG_ALLGEMEIN.cAllgemein.getFirmaFromFiliale2(cboFiliale._value) <> "VERAG" Then sperren = True 'Grundsätzlich wenn nicht VERAG --> sperren + If VERAG_PROG_ALLGEMEIN.cAllgemein.getFirmaFromFiliale2(cboFiliale._value) <> "VERAG" And cboFiliale._value <> "5701" Then sperren = True 'Grundsätzlich wenn nicht VERAG --> sperren If Not VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("AVISO_IMEX", "AVISO") Then If cboFiliale._value = "5601" Or cboFiliale._value = "5501" Then sperren = True End If + If VERAG_PROG_ALLGEMEIN.cAllgemein.getFirmaFromFiliale2(cboFiliale._value) = "IMEX" AndAlso VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("OFFERTE_FREMD_VERAGIMEX", "SDL") Then sperren = False End If diff --git a/Aviso/usrcntlAktDetails.vb b/Aviso/usrcntlAktDetails.vb index fc8b7e7..a5a38d7 100644 --- a/Aviso/usrcntlAktDetails.vb +++ b/Aviso/usrcntlAktDetails.vb @@ -3122,7 +3122,7 @@ Public Class usrcntlAktDetails If pruef Then ' VP fehlen If sender Is btnLZDruck Then 'Wenn LZ Druck - If vbYes <> MsgBox("Nicht alle Sendungen haben ein Vorpapier eingetragen!" & vbNewLine & "Soll der laufzettel trotzdem gedruckt werden?", vbYesNoCancel) Then + If vbYes <> MsgBox("Nicht alle Sendungen haben ein Vorpapier eingetragen!" & vbNewLine & "Soll der Laufzettel trotzdem gedruckt werden?", vbYesNoCancel) Then pnlDetailsRechts.Cursor = Cursors.Default : Exit Sub End If Else ' Digitalabfertigungn