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

Dakosy Testsystem

Browse Source
This commit is contained in:
d.breimaier
2024-11-19 09:26:43 +01:00
parent b3d2d60c53
commit 8e89a193dc
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
DAKOSY_Worker/cIMPORT_Codelisten.vb
View File

@@ -1265,7 +1265,7 @@ Public Class cDY_Paramter
Shared Function GET_PARAM_ByName(dyParam_name, TESTSYSTEM, Optional FIRMA_DY = "") As String
If FIRMA_DY = "" Then FIRMA_DY = VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
Return SQL.getValueTxtBySql("SELECT TOP 1 [dyParam_value] FROM [tbl_DY_Paramter] WHERE [dyParam_name]='" & dyParam_name & "' AND dyParam_firma='" & FIRMA_DY & "'", "FMZOLL", , SQL.GetNewOpenConnectionFMZOLL_SYSTEM(TESTSYSTEM))
Return SQL.getValueTxtBySql("SELECT TOP 1 [dyParam_value] FROM [tbl_DY_Paramter] WHERE [dyParam_name]='" & dyParam_name & "' AND dyParam_firma='" & FIRMA_DY & "' AND dyParam_testsystem = " & IIf(TESTSYSTEM, 1, 0), "FMZOLL", , SQL.GetNewOpenConnectionFMZOLL_SYSTEM(TESTSYSTEM))
End Function
End Class