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

gesamtsicherheiten, etc.

Browse Source
This commit is contained in:
d.breimaier
2026-08-13 08:52:51 +02:00
parent 62ca069242
commit 9bc83465e7
2 changed files with 5 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
VERAG_PROG_ALLGEMEIN/Classes/cGesamtsicherheitsPositionen.vb
View File

@@ -22,6 +22,7 @@ Public Class cGesamtsicherheitsPositionen
Property gsp_systemuser As Object = Nothing
Property gsp_datum As Object = Nothing
Property gsp_EH_Anzahl As Object = Nothing
Property gsp_dakosystatusID As Object = Nothing
Public hasEntry = False
@@ -58,6 +59,7 @@ Public Class cGesamtsicherheitsPositionen
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("gsp_zuletztgeandert", gsp_zuletztgeandert))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("gsp_MRNNr", gsp_MRNNr))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("gsp_EH_Anzahl", gsp_EH_Anzahl))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("gsp_dakosystatusID", gsp_dakosystatusID))
Return list
End Function

4
VERAG_PROG_ALLGEMEIN/cSicherheiten.vb
View File

@@ -45,6 +45,7 @@ Public Class cSicherheiten
Property gs_EH_Anzahl As Object = Nothing
Property gs_DK_laufnr As Object = Nothing
Property gs_gewicht As Object = Nothing
Property gs_dakosystatusID As Object = Nothing
Public hasEntry = False
@@ -113,6 +114,7 @@ Public Class cSicherheiten
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("gs_EH_Anzahl", gs_EH_Anzahl))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("gs_DK_laufnr", gs_DK_laufnr))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("gs_gewicht", gs_gewicht))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("gs_dakosystatusID", gs_dakosystatusID))
If Not WithoutPosSubNr Then list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("gs_posSubNr", gs_posSubNr))
Return list
@@ -475,7 +477,7 @@ Public Class cSicherheiten
FROM tblGesamtsicherheit gs_waiting
INNER JOIN tblGesamtsicherheitsPositionen gsp_waiting
ON gs_waiting.gs_gsId = gsp_waiting.gsp_gsId
WHERE gs_waiting.gs_gsnr = 32041
WHERE gs_waiting.gs_gsnr = " & gs_gsnr & "
AND gs_waiting.gs_dakoyimport = 1
AND gsp_waiting.gsp_freitext = 'DAKOSY-WAITING'
)