SendungsAnhänge

This commit is contained in:
2023-03-06 22:15:09 +01:00
parent a950aba8f4
commit e5228f3038
6 changed files with 25 additions and 4 deletions

View File

@@ -141,8 +141,13 @@ Public Class usrcntlAktDetails
lblLKWChat_MsgCnt.Visible = True
lblLKWChat_MsgCnt.BringToFront()
End If
'If VERAG_PROG_ALLGEMEIN.cMessenger.isACTIVE_AVISOID(AvisoID) Then
' lblLKWChat_MsgCnt.Text = "!!"
' lblLKWChat_MsgCnt.Visible = True
' lblLKWChat_MsgCnt.BringToFront()
'End If
End If
End If
End If
End Sub
Sub initSND_CHAT(SendungsID)
@@ -158,6 +163,11 @@ Public Class usrcntlAktDetails
lblSNDChat_MsgCnt.Visible = True
lblSNDChat_MsgCnt.BringToFront()
End If
'If VERAG_PROG_ALLGEMEIN.cMessenger.isACTIVE_SendungsID(SendungsID) Then
' lblSNDChat_MsgCnt.Text = "!!"
' lblSNDChat_MsgCnt.Visible = True
' lblSNDChat_MsgCnt.BringToFront()
'End If
End If
End If
@@ -755,6 +765,7 @@ Public Class usrcntlAktDetails
case
when [anh_Art] = 'ATR-EUR1' then 0
when [anh_Art] = 'Rechnung' then 1
when [anh_Art] = 'eFatura' then 1.1
when [anh_Art] = 'CMR' then 2
when [anh_Art] = 'Ausfuhr' then 3
when [anh_Art] = 'Vorpapier' then 4