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

NCTS Transcode; NCTS_FREMD_GETLIST

Browse Source
This commit is contained in:
Andreas Luxbauer
2025-01-31 23:33:45 +01:00
parent ccdeff02c5
commit cf0679ec37
1 changed files with 6 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
initATLASAufschubkonten/frmStartOptions.vb
View File

@@ -292,6 +292,11 @@ Public Class frmStartOptions
f.Show() f.Show()
getEZB_Waehrungskurse90D() getEZB_Waehrungskurse90D()
closeMe() closeMe()
Case "NCTS_FREMD_GETLIST" 'TRANSCODE NCTS HOLEN
VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False
VERAG_PROG_ALLGEMEIN.cATEZ_ncts_api.query_declarations(Now.AddDays(-3), Now, False)
closeMe()
Case "UID_Pruefung" Case "UID_Pruefung"
Dim f As New frmInfo(PARAM) Dim f As New frmInfo(PARAM)
f.Show() f.Show()
@@ -5427,7 +5432,7 @@ Public Class frmStartOptions
End Sub End Sub
Private Sub Button26_Click(sender As Object, e As EventArgs) Handles Button26.Click Private Sub Button26_Click(sender As Object, e As EventArgs) Handles Button26.Click
VERAG_PROG_ALLGEMEIN.cATEZ_ncts_api.query_declarations(datTranscodeVon._value, datTranscodeVon._value, cbxOverrideNCTSFin.Checked) VERAG_PROG_ALLGEMEIN.cATEZ_ncts_api.query_declarations(datTranscodeVon._value, datTranscodeBis._value, cbxOverrideNCTSFin.Checked)
End Sub End Sub
Private Sub Button27_Click(sender As Object, e As EventArgs) Handles btnTestATEZ.Click Private Sub Button27_Click(sender As Object, e As EventArgs) Handles btnTestATEZ.Click