edv/ADMIN
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

MDM Einarb (ASfinag), etc.

Browse Source
This commit is contained in:
d.breimaier
2025-10-06 10:47:00 +02:00
parent eb603ccabb
commit 09cd251c81
7 changed files with 304 additions and 155 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
initATLASAufschubkonten/frmNachrichtenVerarbeitung_MDM_divers.vb
View File

@@ -560,8 +560,6 @@ Public Class frmNachrichtenVerarbeitung_MDM_divers
If programName.Contains("RMC") Then
VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = True
Select Case i
Case 1
@@ -699,7 +697,7 @@ Public Class frmNachrichtenVerarbeitung_MDM_divers
'copy file to lydia
If Not VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then
Dim filepathToLydia = IIf(rmc.PDFRECHNUNGEN <> "", rmc.PDFRECHNUNGEN, "\\share01\F\Juricevic Datensicherung\RMC_RECHNUNGEN\")
If Dateiname.ToString.ToLower.Contains("nto") Then
If fileNamePath.ToString.ToLower.Contains("nto") Then
frmStartOptions.copyFile(fileNamePath, filepathToLydia & "NETTO\")
Else
frmStartOptions.copyFile(fileNamePath, filepathToLydia & "BRUTTO\")