edv/AVISO
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Gesamtsicherheiten

Browse Source
This commit is contained in:
d.breimaier
2024-11-18 13:39:40 +01:00
parent 96eb0f39c0
commit 52ea51d4e0
3 changed files with 26 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
Aviso/usrCntlSND_ATBGestellung.vb
View File

@@ -134,9 +134,9 @@ Public Class usrCntlSND_ATBGestellung
Select Case gessicherheit.gs_standort
Case "Verag GmbH"
firmaId = 1
Case "Verag AG"
firmaId = 2
Case "Verag AG"
firmaId = 1
Case "Unisped GmbH"
firmaId = 21
Case "AMBAR"
@@ -160,6 +160,7 @@ Public Class usrCntlSND_ATBGestellung
.LKWKZ = gessicherheit.gs_LKWKZ
.avisoID = gessicherheit.gs_avisoId
.firmaId = firmaId
'.warenortPrefix = SND.tblSnd_Zollsystem_Land
End With
AddHandler frm.FormClosing, Function()
@@ -175,13 +176,13 @@ Public Class usrCntlSND_ATBGestellung
Select Case SND.FilialenNr
Case 4803, 4809
Standort = "VERAG AG" : firmaId = 2
Standort = "VERAG AG" : firmaId = 1
Case 5601
Standort = "Unisped GmbH" : firmaId = 21
Case 5701
Standort = "AMBAR" : firmaId = 24
Case 4810, 5103, 5901
Standort = "VERAG GmbH" : firmaId = 1
Standort = "VERAG GmbH" : firmaId = 2
Case 5501
Standort = "IMEX" : firmaId = 20
End Select
@@ -191,7 +192,7 @@ Public Class usrCntlSND_ATBGestellung
Select Case SND.FilialenNr
Case 5501, 4803, 4809, 5103
Standort = "VERAG GmbH" : firmaId = 1
Standort = "VERAG GmbH" : firmaId = 2
End Select
ElseIf SND.tblSnd_Zollsystem_Land = "AT" Then