Datenarchivarchiv

initATLASAufschubkonten/cWorker_NCTS.vb

@@ -2028,8 +2028,10 @@ Public Class cWorker_NCTS
 
         Dim ATEZ = VERAG_PROG_ALLGEMEIN.cATEZ_NCTS_DATA.LOAD_ByBezugsNr(DY_TMP.dy_BezugsNr)
         If ATEZ IsNot Nothing AndAlso ATEZ.hasEntry Then
-            If ATEZ.status Then
+            If ATEZ.status IsNot Nothing Then
+                'If ATEZ.status < 40 Then
                 FileCopy(filePath, "\\ftps.verag.ag\FTP\ATEZ\OUT\")
+                'End If
             End If
         End If
     End Sub