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

Compare commits

base: edv:77595308d68135ba727921fda31e9f4fa5f37544
Branches Tags
edv:master edv:ADMIN
..
compare: edv:ed2e63a0040c7f79779e88e67a0a32cc2d2e9fe3
Branches Tags
edv:ADMIN edv:master

2 Commits
77595308d6 ... ed2e63a004

Author SHA1 Message Date
d.breimaier
ed2e63a004 Merge branch 'ADMIN' of https://git.it.verag.ag/edv/ADMIN into ADMIN 2026-10-22 08:57:00 +02:00
d.breimaier
6a7ee97bc8 Kundensicherheiten, CBAM-Rechner, etc. 2026-10-21 16:55:35 +02:00
2 changed files with 4 additions and 4 deletions
Expand all files Collapse all files

4
UID/My Project/AssemblyInfo.vb
View File

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben: ' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")> ' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.2.6.4")> <Assembly: AssemblyVersion("1.2.6.5")>
<Assembly: AssemblyFileVersion("1.2.6.4")> <Assembly: AssemblyFileVersion("1.2.6.5")>

4
initATLASAufschubkonten/frmStartOptions.vb
View File

@@ -6174,8 +6174,8 @@ weiter:
ElseIf txtUTADate.Text <> "" AndAlso IsDate(txtUTADate.Text) Then ElseIf txtUTADate.Text <> "" AndAlso IsDate(txtUTADate.Text) Then
datumString = txtUTADate.Text datumString = txtUTADate.Text
'fehlendeRechnungen = (New SQL).loadDgvBySql("SELECT A.AdressenNr, A.[Name 1], U.Abrechnungsnummer AS Abrechnungsnummer,U.Rechnungsnummer_pro_Lieferland,U.Lieferland,CAST(U.Rechnungsdatum AS date) AS Rechnungsdatum,A.LandKz FROM tblUTAImportNew U INNER JOIN Adressen A ON A.UTAKundenNr = U.Kundennummer WHERE U.daId IS NULL AND CAST(U.Rechnungsdatum AS date) = '" & datumString & "' AND NOT (A.LandKz = 'RO' AND U.Lieferland = 'ROM') GROUP BY A.AdressenNr, A.[Name 1], U.Abrechnungsnummer,U.Rechnungsnummer_pro_Lieferland,U.Lieferland,U.Rechnungsdatum,A.LandKz", "FMZOLL") 'fehlendeRechnungen = (New SQL).loadDgvBySql("SELECT A.AdressenNr, A.[Name 1], U.Abrechnungsnummer AS Abrechnungsnummer,U.Rechnungsnummer_pro_Lieferland,U.Lieferland,CAST(U.Rechnungsdatum AS date) AS Rechnungsdatum,A.LandKz FROM tblUTAImportNew U INNER JOIN Adressen A ON A.UTAKundenNr = U.Kundennummer WHERE U.daId IS NULL AND CAST(U.Rechnungsdatum AS date) = '" & datumString & "' AND NOT (A.LandKz = 'RO' AND U.Lieferland = 'ROM') GROUP BY A.AdressenNr, A.[Name 1], U.Abrechnungsnummer,U.Rechnungsnummer_pro_Lieferland,U.Lieferland,U.Rechnungsdatum,A.LandKz", "FMZOLL")
von = New Date(datumString) von = CDate(datumString)
bis = New Date(datumString) bis = CDate(datumString)
End If End If