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

offeneAntr, MDM-Datenverarb.

Browse Source
This commit is contained in:
d.breimaier
2025-05-02 14:57:20 +02:00
parent f173406a46
commit e26276884f
1 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
initATLASAufschubkonten/frmStartOptions.vb
View File

@@ -637,7 +637,7 @@ Public Class frmStartOptions
closeMe()
'------------------------------
Case "MSE_NEWTRANSACTIONS_IMPORT" 'jeden Tag/1x pro Woche?
Case "MSE_NEWTRANSACTIONS_IMPORT" 'jeweils am 15/letzen Tag des Monats vor allen anderen MSE-Aufrufen!
VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False
Dim API = VERAG_PROG_ALLGEMEIN.cAPI.INSERT_API(VERAG_PROG_ALLGEMEIN.cAPI_INOUT.IN, VERAG_PROG_ALLGEMEIN.cAPI_Type.REST, VERAG_PROG_ALLGEMEIN.cAPI_ART.AVISO_IN_MSE, "MSE - Multiservice", "MSE")
@@ -654,6 +654,7 @@ Public Class frmStartOptions
Dim totalPages = 0
Dim batchrequestNr = 0
'getNewestTransactions - Only returns the first page of transactions, subsequent pages are to be requested via /transactions with batch_seq_nr and page_nr.
fehler = mse.getNewestTransactions(token, dt, batchrequestNr, totalPages, 0, True)
If fehler <> "" Then
API.UPDTAE_ERR("Batch-Nr: " & batchrequestNr & "-" & totalPages, fehler, "getNewestTransactions")
@@ -672,7 +673,7 @@ Public Class frmStartOptions
i = i + 1
Next
End If
API.UPDTAE_OK(,, PARAM)
API.UPDTAE_OK(,, PARAM & " Batch-Nr: " & batchrequestNr & "-" & totalPages)
closeMe()
End If