cc.KassenSichV.* - Die Unitsammlung zur Kassensicherungverordnung des BMF

[bernau]

In einen anderen Thread hier in der Delphi-Praxis hatte ich wegen einem Gemeinschaftsprojekt zur Ansteuerung der SwissBit-TSE angefragt. Da es nicht wirklich ein bestehendes Projekt gab, habe ich einfach mal angefangen. Ist stehe etwas unter Zeitdruck, deshalb wollte ich nicht erst ein Gemeinschaftsprojekt organisieren. Zwischenzeitlich habe ich einige Anfragen von Personen erhalten, die auch noch am Anfang der Entwicklung stehen. Die KassenSichV ist ein heikles Thema und ich denke mehrere Augen sehen mehr als Zwei. Deshalb möchte ich hiermit meine Unit-Sammlung, die ich in den letzten Tagen geschrieben habe, der Allgemeinheit zur Verfügung stellen.

Etwas zur Lizenz:

Es wird die Beerware-Lizenz verwendet. https://de.wikipedia.org/wiki/Beerware

Kurz gesagt, mach mit der Unitsammlung was du willst. Wenn es möglich ich, dann sende mir einfach eine Flasche Bier aus deiner Region zu. Vielleicht noch einen zugehörigen Bierdeckel.

Es kann auf einem gemeinsammen Delphi-Event (z.B. die Foren-Tage https://forentage.de) auch gerne ein Bier ausgegeben werden.

Gegen einen Leckeren Single-Malt-Whiskey hätte ich auch nichts einzuwenden

Grundsätzlich erfolgt die Nutzung dieser Unitsammlung auf eigenes Risiko. Ich weise ausdrücklich darauf hin, dass bei falscher Nutzung die Hardware (TSE) unbrauchbar gemacht werden kann.

SwissBit-TSE / DsFinV-K

Ursprünglich wollte ich nur einen kleinen Wrapper für die DLL der SwissBit-TSE. Nun ist noch eine Klasse hinzugekommen, mit der die DLL noch etwas komfortabler angesprochen werden kann. Eine Kassenbeleg in mit wenigen Zeilen Quellcode erstellt und die benötigten Rückgabewerte für den Kassenbon werden in einem einfachen Record inkl. dem Inhalt des QR-Codes zurückgegeben. Da aber auch vieles davon in die DsFinV-K übergeht, werde ich ziemlich zügig noch weitere Klassen erstellen, die einen ordentlichen Export für die DsFinV-K ermöglicht. Die entsprechenden Units werde ich nachreichen.

Demo-Programm

Damit die Units von Interessenten einfach getestet werden können, habe ich ein kleines VCL-Programm beigefügt. Nichts besonderes. Soll nur zeigen, wie Funktionen angesprochen werden. Hier zwei Screenshots:

Version 0.2

Die DLL kann nun dynamisch geladen werden. Informationen dazu stehen in der Datei "cc.KassenSichV.License"

Diverse Fehler behoben.

Version 0.4

Event OnSelftestNotify zugefügt.

Automatisch Steuersatzzuordnung.

Kontrolle ob Bruttoumsatz und Zahlungen stimmig sind.

Compilerdirective WORMAPIDLL_STATIC zugefügt.

Verschiedene Hilfsfunktionen

Singleton-Funktion

Version 1.0

Neue Funktionen neuerer SDK > 5.7.1

keepalive_configure

LAN-TSE (von Uwe Koch)

Log-Funktionen

Weitere Events

Details stehen in der Datei "cc.KassensichV.ChangeLog.pas"

Erweiterung der SwissbitGui. (Siehe Bilder)

[noisy_master]

Nur so zur Info:
hier gibt es eine wesentlich umfangreichere Aufstellung zu den länderspezifischen Verlängerungen der Nichtbeanstandungsregelung:

https://www.zdh.de/fileadmin/user_up...ung_Kassen.pdf

Ich hoffe es hilft dem Einen oder Anderen weiter....
Gruß

[bernau]

Hab ne neue Version hochgeladen.

Version 0.4

[LHSoft2]

Hallo,
Ich bin neu hier und habe gerade einen ersten Blick über Eure V04 geworfen und die mal getestet.
Erst mal zur Info: Habe gestern nagelneue Swissbit TSEs unters Volk gebracht, microSD, mit
TSE FirmwareVersion: 1.0.3
TSE HardwareVersion: 1.0.4

Dabei ist mir aufgefallen, dass nach einem Selftest der Zeitsync weg war, die TSE war also tot.
Ich habe dann heute nach dem Selftest einen Zeitsync reingeschrieben und schon liefs wieder. Bei meiner Entwickler-TSE ist das nicht so (TSE FirmwareVersion: 0.7.1, TSE HardwareVersion: 0.6.0).

Habt Ihr das auch so? In Eurer V04 scheint mir kein Zeitsync nach dem Selftest zu sein. Kann das Problem noch jemand bestätigen?

Grüße, Hans

[LHSoft2]

Zu Deiner Frage wegen der DSFinVK:
Meine DSFinVK ist eigentlich fertig, aber momentan zerlege ich sie wieder. Ursache ist, dass Amadeus meldet, meine Signaturen sind nicht gültig (aber zumindest richtig formatiert). Sonst ist in Amadeus alles grün. Da überlege ich schon seit Tagen und spiele mit Zertifikat, PublicKey, den Zeiten etc, habe aber keine Ahnung was das sein kann.
Der Support hat folgende Meldung gegeben:

Zitat:

das Problem an der starken Kryptographie ist, dass man diese nicht zurückrechnen kann. Wir können mit AV also nur feststellen, ob alles stimmt, sprich die Signaturen Byte für Byte richtig sind, oder eben nicht. Es ist unmöglich Fehler genau zu identifizieren.

Hat Hier im Forum jemand eine Idee?

Insgesamt ist mir beim Vergleich aufgefallen, dass wir eigentlich schon die Funktionen alle prinzipiell gleich definiert haben, aber Du selten Pointer benutzt. Liegt mein Problem vielleicht daran?

Ein Vergleich:

Deine
worm_transaction_finish(const aWormContext: TWormContextHandle; const aClientId: PWormChar; atransactionNumber: worm_uint; const aProcessData: PWormChar; aProcessDataLength: worm_uint; const aprocessType: PWormChar; const aresponse: TWormTransactionResponseHandle): TWormError; cdecl; external SwissbitWormApiDll;

Meine
worm_transaction_finish(context: PIntPtr; const clientId: PAnsiChar; transactionNumber: Worm_UInt; const processData: PBytes; processDataLength: Worm_UInt; const processType: PAnsiChar; response: PIntPtr): WormError; cdecl; external WormDLL;

eine / Meine
Context: IntPtr gegen PIntPtr
ClientID: Identisch: PAnsiChar
transactionNumber: Identisch UInt64
Prozessdata PansiChar gegen Pointer auf TBytes
processDataLength: identisch
processType: identisch
response: IntPtr gegen PIntPtr

Diese worm-transaction-finish ist der eigentliche Knackpunkt auch für die DSFinVK wegen den Signaturen. Alles andere läuft fein.
Was mir bei Dir noch aufgefallen ist: Du benutzt anscheinend UTC für die Rückgabe der Zeiten einer Transaktion aus der UnixTime. Die müssen ja in die DSFinVK und anhand derer wird auch die Gültigkeit der Signatur geprüft. Ist das bewusst oder zufällig.

Grüße
Hans

[sh17]

Zu Deiner Frage der Lizenz, Du könntest den Quelltext unter der LGPL-2.1 License veröffentlichen. Das ist meiner Meinung nach die gerechteste Lizenz und kommerzielle Nutzung ist erlaubt.

[bernau]

Zitat von sh17:

Zu Deiner Frage der Lizenz, Du könntest den Quelltext unter der LGPL-2.1 License veröffentlichen. Das ist meiner Meinung nach die gerechteste Lizenz und kommerzielle Nutzung ist erlaubt.

Ich habe mir aus Zeitmangel nicht wirklich Gedanken über die Lizenz gemacht.
Redeemer hatte in seiner QR-Code Komponente die Lizenz WTFPL angesprochen. Fand ich ganz Witzig.

Vielleicht erfinde ich die BeerWare-Lizenz. Jeder, der den Source verwendet aktiviert automatisch die WTFPL, sobald er mir eine Flasche Bier aus seiner Region zusendet. So ähnlich wie Postcardware.


Edit: BeerWare gibt es schon.

[LikeMike]

-----

[LikeMike]

-----

[schotte77]

Hallo,

hat schon jemend den "DSFinV-K" export geschrieben?

Habe das hier gefunden. https://www.aitc.at/dsfinvk-bibliothek/

mdf

Schotte

[arnof]

der Export ist eigentlich gleich dem bisherigen GDPdU Export nur halt vorgegebene Dateien und Spalten.

Hier ist es nur Fleißarbeit das Umzusetzen, es gibt ausreichende Beschreibungstexte, hier ist es manchmal nur schwer, diese mit deinen Daten zu füllen. Das Problem hat man aber auch mit einer "fertigen" Schnittstelle.