diff --git a/initATLASAufschubkonten/cWorker_NCTS.vb b/initATLASAufschubkonten/cWorker_NCTS.vb index 120706f..fc3c700 100644 --- a/initATLASAufschubkonten/cWorker_NCTS.vb +++ b/initATLASAufschubkonten/cWorker_NCTS.vb @@ -4109,7 +4109,7 @@ Public Class cWorker_NCTS STATUS.dySt_BezugsNr = readNCTS_Ueberlassungsmeldung009 STATUS.dySt_artMitteilung = "UEM" STATUS.dySt_dyArt = "" '"NCTS" 'T1/T2 - + STATUS.dySt_pfad = d STATUS.dySt_status = DAKOSY_Worker.cDY_Statusliste.S_50 STATUS.dySt_ergCode = "MRN" STATUS.dySt_ergMitteilung = MRN @@ -4170,16 +4170,19 @@ Public Class cWorker_NCTS 'End If - If saveVerwahrung Then - 'saveVerwahrungsAusgang(MRN, posErledigung, NCTS, sendMail, testlauf) - cWorker_Verwahrung.saveVerwahrungsAusgang(MRN, posErledigung, "", zp, sendMail, testlauf, STATUS.dySt_id, True, "T1") - End If SaveNCTS004_FirmaNL(NCTS_TMP, DY_TMP, division) SaveNCTS004_WGDAT(NCTS_TMP, Wiedergestellungsdatum) If DY_TMP IsNot Nothing Then STATUS.dySt_dyId = DY_TMP.dy_Id STATUS.SAVE() + + If saveVerwahrung Then + 'saveVerwahrungsAusgang(MRN, posErledigung, NCTS, sendMail, testlauf) + cWorker_Verwahrung.saveVerwahrungsAusgang(MRN, posErledigung, "", zp, sendMail, testlauf, STATUS.dySt_id, True, "T1") + End If + + statusTMP = STATUS cVERAG_out_ncts.copyFileFTP_VERAGncts004_DY(NCTS_TMP, DY_TMP) 'VERAG SCHNITTSTELLE ' If If(NCTS_TMP.ncts_firma, "") = "IMEX" Then diff --git a/initATLASAufschubkonten/cWorker_Verwahrung.vb b/initATLASAufschubkonten/cWorker_Verwahrung.vb index ddf579d..f317ea7 100644 --- a/initATLASAufschubkonten/cWorker_Verwahrung.vb +++ b/initATLASAufschubkonten/cWorker_Verwahrung.vb @@ -1049,7 +1049,7 @@ Anzeige: GesSichRef.CalcSaldo() Dim differenz As Double = cSicherheiten.getDifferenz_alleAusgetragen(gsrightRow("gs_gsnr")) - Dim InfoDifferenz As String = "Austragung Sicherheitsbertrag." & gsrightRow.Item("gs_MRNNr") + Dim InfoDifferenz As String = "Austragung Sicherheitsbertrag. " & gsrightRow.Item("gs_MRNNr") Dim corrWarenwert As Double = 0 If differenz <> 0 Then