EXG NCTS

SDL/ZOLLSYSTEM/DAKOSY/ATLAS/EXGestellung/usrCntlATLAS_EXGestellung.vb

@@ -120,6 +120,7 @@ Public Class usrCntlATLAS_EXGestellung
             Next
             If Not err Then
                 If cbxNCTS.Checked Then
+                    'Es wird gleich eine NCTS Nachricht erstellt, die BEfüllung erfolge nach Verarbeitung der EXG -> bei der letzten wird der NCTS Datensatz gesendet
                     Dim NCTS_OUT = usrCntlATLAS_NCTS004.genNCTSfromStammref(Me, FIRMA_DY, AVISO, SENDUNG, "")
                     NCTS_OUT.ncts_HOUSE_CONSIGNMENT.Clear()
                     NCTS_OUT.DELETE_HouseConsignment()
@@ -132,9 +133,8 @@ Public Class usrCntlATLAS_EXGestellung
                             MsgBox(NCTS_OUT.ncts_dyaAnmID)
                             cDakosyEXG.UPDATE_FillNCTS_ID(exgId, NCTS_OUT.ncts_dyaAnmID)
                         Next
-
-
                     End If
+
                     'Dim BezugsNr = ""