From 40b993b0e6e15909293424e63a617d683c54008c Mon Sep 17 00:00:00 2001 From: Andreas Luxbauer Date: Mon, 19 Oct 2026 14:40:48 +0200 Subject: [PATCH] division3 --- DAKOSY_Worker/DAKOSY/ATLAS/NCTS/cDakosyNCTSOut004.vb | 2 +- initATLASAufschubkonten/frmStartOptions.vb | 3 +++ 2 files changed, 4 insertions(+), 1 deletion(-) diff --git a/DAKOSY_Worker/DAKOSY/ATLAS/NCTS/cDakosyNCTSOut004.vb b/DAKOSY_Worker/DAKOSY/ATLAS/NCTS/cDakosyNCTSOut004.vb index 1420a48..c2f53df 100644 --- a/DAKOSY_Worker/DAKOSY/ATLAS/NCTS/cDakosyNCTSOut004.vb +++ b/DAKOSY_Worker/DAKOSY/ATLAS/NCTS/cDakosyNCTSOut004.vb @@ -1619,7 +1619,7 @@ Public Class cDakosyNCTSOut004 XML.Transaktion.IOPartner = cDakosyFunftions.getIOPartner(cDY.ncts_firma, Art) 'If(VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM, "VERA", "VERG") XML.Transaktion.IODatumZeit = Now XML.Transaktion.IOReferenz = cDY.ncts_Trans_Referenz - 'If Not VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then XML.Transaktion.IODivision3 = cDakosyFunftions.getDivision(cDY.ncts_firma, Art) '"SUW" + If Not VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then XML.Transaktion.IODivision3 = cDakosyFunftions.getDivision(cDY.ncts_firma, Art) '"SUW" XML.Transaktion.Version = Interface_VERSION ' XML.Transaktion.IODivision3 = "DUR" XML.EinzelVersandanmeldung = New VersandanmeldungNCTSDE_004.EinzelVersandanmeldungTyp diff --git a/initATLASAufschubkonten/frmStartOptions.vb b/initATLASAufschubkonten/frmStartOptions.vb index 8ef7468..c4c7ec0 100644 --- a/initATLASAufschubkonten/frmStartOptions.vb +++ b/initATLASAufschubkonten/frmStartOptions.vb @@ -4850,8 +4850,11 @@ Public Class frmStartOptions showPic(importEZOLLWechselkurse(VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM, 2, 2), PictureBox24) End Sub Private Sub Button17_Click(sender As Object, e As EventArgs) Handles Button17.Click + Me.Visible = False Dim f As New frmDatenarchivarchiv f.ShowDialog() + Me.Visible = True + End Sub Private Sub Button18_Click(sender As Object, e As EventArgs) Handles Button18.Click