From ee2f39d9a884e865b9fea84f77426109163317c2 Mon Sep 17 00:00:00 2001
From: "d.breimaier" <d.breimaier@verag.ag>
Date: Mon, 30 Mar 2026 16:55:03 +0200
Subject: [PATCH] Version, etc.

---
 Aviso/My Project/AssemblyInfo.vb | 4 ++--
 Aviso/usrcntlAktDetails.vb       | 5 +++--
 2 files changed, 5 insertions(+), 4 deletions(-)

diff --git a/Aviso/My Project/AssemblyInfo.vb b/Aviso/My Project/AssemblyInfo.vb
index 4b8e943..81349df 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:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("4.2.5.6")>
-<Assembly: AssemblyFileVersion("4.2.5.6")>
+<Assembly: AssemblyVersion("4.2.5.7")>
+<Assembly: AssemblyFileVersion("4.2.5.7")>
diff --git a/Aviso/usrcntlAktDetails.vb b/Aviso/usrcntlAktDetails.vb
index 84cab1a..6ca7b21 100644
--- a/Aviso/usrcntlAktDetails.vb
+++ b/Aviso/usrcntlAktDetails.vb
@@ -1346,14 +1346,15 @@ Public Class usrcntlAktDetails
                                         End If
 
                                     End If
-                                    Else
+                                Else
                                     If Not existCodeInGridVermerke_VK_OLD(gridvermerke, r.Cells("SendungID").Value) Then
                                         optionCell.Value = paarBez
                                         optionCell.ToolTipText = "Klicken Sie hier, um den Vermerk '" & paarBez & "' einzutragen."
                                     End If
                                 End If
                             End If
-                        Case 101
+
+                        Case 101, 25
                             If paarId > 0 AndAlso r.Cells("VermerkIDAufgehoben").Value Is DBNull.Value Then
                                 optionCell.Value = paarBez
                                 optionCell.ToolTipText = "Klicken Sie hier, um den Vermerk '" & paarBez & "' einzutragen."