Sendungsvermerk Freitext

This commit is contained in:
2023-04-28 12:41:52 +02:00
parent c19f46cf54
commit fc3683ef31
3 changed files with 68 additions and 47 deletions

View File

@@ -151,7 +151,7 @@ Public Class frmAddSendungsvermerkShort
txtFreierText.Focus()
Return False
End If
insertSendungsVermerk(SendungID, myAviso.AvisoID, txtFreierText.Text.Trim, 47)
insertSendungsVermerk(SendungID, myAviso.AvisoID, txtFreierText.Text.Trim & " - offen", 101)
End If
If cbxAuftrag.Checked Then insertSendungsVermerk(SendungID, myAviso.AvisoID, "Auftrag für Sendung '" & txtSendung.Text.Trim & "' fehlt - angefordert", 1)