AppStd/RecordOrganizer
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

MS

Browse Source
This commit is contained in:
SchreiberM
2023-07-20 14:12:24 +02:00
parent c2deb54f11
commit ea5ea5f205
64 changed files with 8139 additions and 7996 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
app/DD-Record-Organizer/Classes/ClassSAP.vb
View File

@@ -134,8 +134,8 @@ Public Class ClassSAP
Return Nothing
End Try
End Function
Private Shared WithEvents read As New ReadTable(SAPConnectionString)
Private Shared Sub OnIncomingPackage(ByVal Sender As ReadTable, ByVal PackageResult As DataTable) Handles read.IncomingPackage
Private Shared WithEvents oReadTbl As New ReadTable(SAPConnectionString)
Private Shared Sub OnIncomingPackage(ByVal Sender As ReadTable, ByVal PackageResult As DataTable) Handles oReadTbl.IncomingPackage
Try
LOGGER.Debug("Processing data package with " +
PackageResult.Rows.Count.ToString() + " rows")
@@ -166,11 +166,11 @@ Public Class ClassSAP
oReadTable.RowCount = RowLimit
End If
LOGGER.Debug("Table.Run executing.....")
read = oReadTable
read.Run()
oReadTbl = oReadTable
oReadTbl.Run()
LOGGER.Debug("Table.Run executed")
RESULT_TABLE = read.Result
RESULT_TABLE = oReadTbl.Result
If Not IsNothing(NewDatatable) Then
LOGGER.Debug($"Got [{NewDatatable.Rows.Count}] rows")
End If