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

DHF Artikel API; AuditFlow

Browse Source
This commit is contained in:
Andreas Luxbauer
2025-08-20 13:48:34 +02:00
parent 35fd4fbd99
commit feaec7a290
9 changed files with 1946 additions and 24 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
SDL/My Project/AssemblyInfo.vb
View File

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

7
SDL/zoll/usrCntlZollArtikel.vb
View File

@@ -867,11 +867,10 @@ Public Class usrCntlZollArtikel
MsgBox("Kundennummer ungültig!") : Exit Sub
End If
Dim LizenzNr = "S01122"
If DHF_Artikel.Delete_KD(kdNrDHF) Then
Dim LizenzNr = "S01122"
'zollArt_id, KundenNr, zollArt_Status, zollArt_Artikelnummer , zollArt_Warencodenummer, zollArt_Kennzeichen_Gueltig, zollArt_Kurzbezeichnung, Erfassungsdatum, Aenderungsdatum, Sachbearbeiter,zollArt_Warenbeschreibung
If DHF_Artikel.Delete_KD(kdNrDHF, LizenzNr) AndAlso DHF_Artikel.Delete_KDLiveDate(kdNrDHF, LizenzNr) Then
Console.WriteLine("Alte Einträge erfolgreich gelöscht. ")
Dim ZOLL_ART_LIST = cZollArtikel.GetListByKundenNr(kdnr)