This commit is contained in:
2026-10-16 10:25:23 +02:00
parent eec4e8e3dd
commit 67f501e6ed
3 changed files with 286 additions and 7 deletions

View File

@@ -2445,6 +2445,10 @@ Public Class cWorker_NCTS
If DY_TMP IsNot Nothing Then STATUS.dySt_dyId = DY_TMP.dy_Id
STATUS.SAVE()
''=====IMPORT IN VERAG DATENMODELL==========
'Dim IMP As New DAKOSY_Worker.cImporter_DakosyToVERAG
'IMP.ImportDakosyNCTS(NCTS_TMP, False)
''==================================
'=====ATEZ BEREITSTELLUNG==========
checkATEZ_Bereitstellung(DY_TMP, d)
@@ -3134,6 +3138,11 @@ Public Class cWorker_NCTS
cVERAG_out_ncts.copyFileFTP_VERAGncts_DY(NCTS_TMP, DY_TMP)
'======================================================
''=====IMPORT IN VERAG DATENMODELL==========
'Dim IMP As New DAKOSY_Worker.cImporter_DakosyToVERAG
'IMP.ImportDakosyNCTS(NCTS_TMP, False)
''==================================
'=====ATEZ BEREITSTELLUNG==========
checkATEZ_Bereitstellung(DY_TMP, d)
'==================================
@@ -3207,6 +3216,11 @@ Public Class cWorker_NCTS
cVERAG_out_ncts.copyFileFTP_VERAGncts_DY(NCTS_TMP, DY_TMP)
'======================================================
''=====IMPORT IN VERAG DATENMODELL==========
'Dim IMP As New DAKOSY_Worker.cImporter_DakosyToVERAG
'IMP.ImportDakosyNCTS(NCTS_TMP, False)
''==================================
'=====ATEZ BEREITSTELLUNG==========
checkATEZ_Bereitstellung(DY_TMP, d)
'====================================================
@@ -3276,6 +3290,11 @@ Public Class cWorker_NCTS
If DY_TMP IsNot Nothing Then STATUS.dySt_dyId = DY_TMP.dy_Id
STATUS.SAVE()
'=====IMPORT IN VERAG DATENMODELL==========
Dim IMP As New DAKOSY_Worker.cImporter_DakosyToVERAG
IMP.ImportDakosyNCTS(NCTS_TMP, True)
'==================================
'=======BEREITSTELLUNG DER DATEN AN FREMDSYSTEME=======
cVERAG_out_ncts.copyFileFTP_VERAGncts004_DY(NCTS_TMP, DY_TMP)
'======================================================
@@ -3352,6 +3371,11 @@ Public Class cWorker_NCTS
If DY_TMP IsNot Nothing Then STATUS.dySt_dyId = DY_TMP.dy_Id
STATUS.SAVE()
'=====IMPORT IN VERAG DATENMODELL==========
Dim IMP As New DAKOSY_Worker.cImporter_DakosyToVERAG
IMP.ImportDakosyNCTS(NCTS_TMP, True)
'==================================
'=======BEREITSTELLUNG DER DATEN AN FREMDSYSTEME=======
cVERAG_out_ncts.copyFileFTP_VERAGncts004_DY(NCTS_TMP, DY_TMP)
'======================================================
@@ -3660,6 +3684,11 @@ Public Class cWorker_NCTS
NCTS_TMP.insertIntoSpedBuch(DY_TMP)
''=====IMPORT IN VERAG DATENMODELL==========
'Dim IMP As New DAKOSY_Worker.cImporter_DakosyToVERAG
'IMP.ImportDakosyNCTS(NCTS_TMP, False)
''==================================
'=====ATEZ BEREITSTELLUNG==========
checkATEZ_Bereitstellung(DY_TMP, d)
@@ -3780,6 +3809,11 @@ Public Class cWorker_NCTS
NCTS_TMP.insertIntoSpedBuch(DY_TMP)
''=====IMPORT IN VERAG DATENMODELL==========
'Dim IMP As New DAKOSY_Worker.cImporter_DakosyToVERAG
'IMP.ImportDakosyNCTS(NCTS_TMP, True)
''==================================
'=====ATEZ BEREITSTELLUNG==========
checkATEZ_Bereitstellung(DY_TMP, d)
@@ -3950,6 +3984,13 @@ Public Class cWorker_NCTS
NCTS_TMP.insertIntoSpedBuch(DY_TMP)
'=====IMPORT IN VERAG DATENMODELL==========
Dim IMP As New DAKOSY_Worker.cImporter_DakosyToVERAG
IMP.ImportDakosyNCTS(NCTS_TMP, True)
'==================================
'=====ATEZ BEREITSTELLUNG==========
checkATEZ_Bereitstellung(DY_TMP, d)
'==================================
@@ -4178,6 +4219,11 @@ Public Class cWorker_NCTS
NCTS_TMP.insertIntoSpedBuch(DY_TMP)
'=====IMPORT IN VERAG DATENMODELL==========
Dim IMP As New DAKOSY_Worker.cImporter_DakosyToVERAG
IMP.ImportDakosyNCTS(NCTS_TMP, True)
'==================================
'=====ATEZ BEREITSTELLUNG==========
checkATEZ_Bereitstellung(DY_TMP, d)
'==================================
@@ -4469,6 +4515,11 @@ Public Class cWorker_NCTS
If DY_TMP IsNot Nothing Then STATUS.dySt_dyId = DY_TMP.dy_Id
STATUS.SAVE()
''''=====IMPORT IN VERAG DATENMODELL==========
'''Dim IMP As New DAKOSY_Worker.cImporter_DakosyToVERAG
'''IMP.ImportDakosyNCTS(NCTS_TMP, True)
''''==================================
'=====ATEZ BEREITSTELLUNG==========
checkATEZ_Bereitstellung(DY_TMP, d)
'==================================
@@ -4546,6 +4597,11 @@ Public Class cWorker_NCTS
If DY_TMP IsNot Nothing Then STATUS.dySt_dyId = DY_TMP.dy_Id
STATUS.SAVE()
'''=====IMPORT IN VERAG DATENMODELL==========
''Dim IMP As New DAKOSY_Worker.cImporter_DakosyToVERAG
''IMP.ImportDakosyNCTS(NCTS_TMP, False)
'==================================
'=====ATEZ BEREITSTELLUNG==========
checkATEZ_Bereitstellung(DY_TMP, d)
'==================================
@@ -4622,6 +4678,11 @@ Public Class cWorker_NCTS
If DY_TMP IsNot Nothing Then STATUS.dySt_dyId = DY_TMP.dy_Id
STATUS.SAVE()
'=====IMPORT IN VERAG DATENMODELL==========
Dim IMP As New DAKOSY_Worker.cImporter_DakosyToVERAG
IMP.ImportDakosyNCTS(NCTS_TMP, True)
'==================================
'=====ATEZ BEREITSTELLUNG==========
checkATEZ_Bereitstellung(DY_TMP, d)
'==================================