TSE nach 146a AO Schnittstelle

[Madjid]

herzlichen Dank

[bernau]

Hier ein interessantes Schreiben vom BMF bezüglich der Anwendung von TSE.

https://www.bundesfinanzministerium....cationFile&v=1

[fisch33]

Hallo

Entschuldigung wenn ich mich hier einklinke. Aber wie würde
ich dann die ATrust dll in Delphi aufrufen , beispielsweise StartTransaction

Womit kann ich die Parameter const char *,const uint8_t,uInt32,int64 am besten ersetzen?

Das com Objekt oder die exe finde ich persönlich viel zu teuer

Mit freundlichen Grüßen
Dirk

[Daniel]

Zitat von fisch33:

Womit kann ich die Parameter const char *,const uint8_t,uInt32,int64 am besten ersetzen?

Konkret geht es für Dich um die Frage, wie Du eine DLL, von der Du nur die C-Headerdateien hast, in Delphi nutzen kannst. Rudy V. hat hierzu ein gutes Dokument verfasst:
http://rvelthuis.de/articles/articles-convert.html

Mit den Integer-Typen geht das fix, denn die hast Du mittlerweile auch in Delphi als "uint8" (ist ein Byte), "uint32" oder auch "int64". Char mit einem Sternchen ist ein Pointer auf einen String. Üblicherweise sind die entweder Null-Terminiert, gehen also so lang, bis ein Character #0 kommt oder aber die DLL liefert Dir auf irgendeine Art und Weise eine Länge. Aufpassen musst Du, was die DLL unter einem "Char" versteht. Die von swissbit beispielsweise traditionell ein Byte. In Delphi wäre das also ein AnsiChar und als Zeiger eben ein PAnsiChar bzw. PAnsiString.

[Frickler]

Zitat von bernau:

Hier ein interessantes Schreiben vom BMF bezüglich der Anwendung von TSE.

https://www.bundesfinanzministerium....cationFile&v=1

Ja, das wurde bereits angekündigt:

Zitat von Incocnito:

Laut unserem Rechtanwalt, welcher mit der OFD Niedersachsen in Kontakt steht,
wird es in der ersten Dezemberwoche einen Fragen/Antworten-Katalog geben.
Ein Punkt ist, dass das Bewerben und Verkaufen von EDV-Anlagen im Zeitraum 1.1 - 30.9.
nicht beanstandet wird, wenn die der spätere Anschluss an eine TSE möglich ist
(also nicht baulich ausgeschlossen).

Interessanterweise enthält das Schreiben den von Incocnito erwähnten Punkt gerade nicht.
Es bleibt also beim 1.1.

[Madjid]

Hallo Zusammen,

ich bin dabei die WormDll von Swissbit vom Delphi anzuwenden.

ich bin bei den Parametern nicht sicher, wie sie deklariert werden müssen.
als Beispiel den original code (C++)

WORMAPI WormError WORMAPI_CALL worm_transaction_start(
WormContext *context, const char *clientId,
const unsigned char *processData, worm_uint processDataLength,
const char *processType, WormTransactionResponse *response);

hat jemand für den richtigen Aufruf von "worm_transaction_start" in Delphi ?

?

[TiGü]

Zitat von Madjid:

ich bin bei den Parametern nicht sicher, wie sie deklariert werden müssen.
als Beispiel den original code (C++)

WORMAPI WormError WORMAPI_CALL worm_transaction_start(
WormContext *context, const char *clientId,
const unsigned char *processData, worm_uint processDataLength,
const char *processType, WormTransactionResponse *response);

Was hast du denn bisher?
Diesen Thread hast du auch gefunden: https://www.delphipraxis.net/202858-...se-fragen.html

const char * -> PAnsiChar (vermutlich, außer die API-Doku erzählt was von Widestring/Unicode)
const unsigned char * -> PByte
worm_uint -> UInt32
WormContext *, WormTransactionResponse * -> Zeiger auf entsprechende Records/Structs

[hhcm]

Hi.

Du hast doch sicherlich nicht mit worm_transaction_start angefangen oder?
Setup, Selftest etc. Da spiegelt sich doch fast alles wieder.

[Daniel]

Sorry, aber das hilft ihm nun wirklich nicht weiter.

Ich schaue morgen mal nach, mit welchen Typen wir das übersetzt haben.

[Madjid]

Hi

@ TiGü:

ich habe die TSE von Swissbit erst seit einer Woche da.

bis jetzt habe ich eine Typklasse definiert, die die notwendige Swissbit funktionen darstellt.

die TSE habe ich mithilfe der mitgelieferte Exe getestet um etwas gefühl zu bekommen.

bei dem neuen Thread (Link von dir) habe ich gute Informationen bekommen, danke.

ich komme wohl weiter, und kann mittlerweile mit dem C++ Code etwas anfangen.

nur finde ich zu Schade, dass jeder von uns das Rad neu erfinden muss.

mit Sicherheit werden wir alle die TSE's sauber steuern können, wäre aber viel effektiever, wenn jeder von uns ein Teil davon machen würde.

ich danke euch allen

.