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

Therefore Atilla, etc.

Browse Source
This commit is contained in:
d.breimaier
2026-07-28 11:15:55 +02:00
parent a566e3461f
commit 6f53cc40c1
2 changed files with 43 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
SDL/cProgramFunctions.vb
View File

@@ -269,7 +269,7 @@ Public Class cProgramFunctions
Try
Dim abfertNr = AbfertigungsNr & "%"
Dim docid As String = ""
If Filiale = 4801 Then
If Filiale = 4801 OrElse Filiale = 4802 OrElse Filiale = 4813 Then
docid = SQL_VERAG.getValueTxtBySql("SELECT TOP 1 isnull([DocNo],-1) FROM [Therefore].[dbo].[TheCat17] WHERE [String] LIKE '" & abfertNr & "' ORDER BY [Eingabedatum] DESC", "SCANCANON")
ElseIf Filiale = 5601 Then
If Not IsNumeric(docid) OrElse docid <= 0 Then docid = SQL_VERAG.getValueTxtBySql("SELECT TOP 1 isnull([DocNo],-1) FROM [Therefore].[dbo].[TheCat393] WHERE [String] LIKE '" & abfertNr & "' ORDER BY [Eingabedatum] DESC", "SCANCANON")