Wie anmelden an entfernten Webservice per Headerinfo?

[TiGü]

Zitat von jus:

Hallo TiGü,

mein Wissen zu Fiskaltrust ist nicht mehr auf den aktuellsten Stand, obwohl dies bei uns in der Firma bald wieder ansteht(spätestens am 1.April ).

Hallo jus,

habt ihr denn keine österreichischen Bestandskunden?
Bis zum April muss das ja schon alles stehen und fertig sein!!!

Zitat von jus:

Seit letzten Frühjahr hat sich vermutlich einiges geändert.

Ich hab irgendwann letztes Jahr im Spätsommer/Herbst angefangen und seitdem hat sich einiges geändert.

Zitat von jus:

Damals gab es zwar eine Möglichkeit, und vermutlich jetzt immer noch, dass man statt den Weg übers Interface auch direkt über das Json-Format diesen Dienst anzusprechen kann.

Das würde ich gerne vermeiden, weil im lokalen Netzwerk ich ja keine Probleme habe.
Nur das anbinden an die Cloud (für Kunden die sich keine Hardware hinstellen wollen), funktioniert nicht so wie gewünscht.

Zitat von jus:

Haben die dir ein PDF mit "Delphi Fiskaltrust Einbindung per WSDL Importer" mitgeschickt?

Die aktuelle WSDL liegt im fiskaltrust-Portal, ich kann sie auch gerne auf Wunsch hier mit anhängen.
Außerdem findest du dort eine PDF mit der Schnittstellenbeschreibung.

[mjustin]

Auf Github liegt ein .Net Projekt unter https://github.com/fiskaltrust/interface, könnte man dieses nicht in Visual Studio zu Tests verwenden? Wenn man dann mit Fiddler2 die funktionierenden Requests aufzeichnet und mit denen aus Delphi kann man den Unterschied vermutlich schnell finden.

[TiGü]

Ich hab gerade die Bestätigung bekommen, dass es per IPOS-Interface aus der WSDL nicht funktioneren kann:

Zitat:

Nein. Unsere Cloud spricht nur REST, die WSDL erstellt ein SOAP Interface. Wobei sie sonst vom Aufbau ident sind, nur die Übertragungsart ist unterschiedlich.

Will mir zwar nicht einleuchten, weil man ja auch per XML statt JSON kommunizieren kann, aber soviel verstehe ich auch nicht von Webservices.

[kretabiker]

Hallo,

ich bin positiv überrascht, dass ich hier Themeneinträge zu fiskaltrust finde - die haben mir aktuell sehr geholfen!

Anmerkung dazu: Da ich auch gerade mit fiskaltrust zu tun habe - und zwar mit der reinen Cloud-Lösung "SignatureCloud + Sorglos" seien zwei Hinweise:

- Die Kommunikation mit der RestClient-Library von Delphi 10.1 Berlin Update 2 schlug fehl mit der Fehlermeldung "415: Wrong media type". Ich schätze mal, das liegt daran, dass die RestClient-Library als Format application/x-www-form-urlencoded überträgt, was der REST-Webservice von fiskaltrust nicht mag. Das habe ich aber erst rausgefunden, nachdem ich Fiddler installiert hatte.
- Der Request-Header muss erweitert werden um die beiden Einträge "cashboxid" und "accesstoken" - diese Names müssen klein geschrieben sein, und nicht wie in der fiskaltrust-Doku als CashBoxId bzw. AccessToken, sonst gibt es wieder ne Fehlermeldung. Bei Indys THTTP geht das mit

HTTP.Request.CustomHeaders.AddValue('cashboxid', 'xxxx'); bzw.

HTTP.Request.CustomHeaders.Values['cashboxid'] := 'xxxx'; Vielleicht ersparen diese Hinweise dem einen oder anderen längere Suchen.

Viele Grüße

[TiGü]

Ich bin dazu übergegangen, alles in eine DLL (gebaut mit Delphi Berlin Update 2) zu packen und nach draußen zur EXE hin mit COM-Interfaces zu arbeiten.
Intern wird dann anhand der übergebenen Parameter unterschieden, ob es zu einen lokalen Dienst geht und mit SOAP und dem Import der WSDL gearbeitet wird ODER ob ich per REST-Komponenten und JSON arbeite.

Was mich ewig aufgehalten hat, war das automatische kodieren der Parameter. Das habe ich auch nur per Fiddler raus gefunden.
Beim Anlegen der Header am REST-Request kann man aber sagen, das nicht kodiert werden soll.

Hier ein Quellcode-Schnipsel dazu:

Delphi-Quellcode:

procedure TCloudPOS.InitRestComponents;
var
  Param: TRESTRequestParameter;
begin
  FRESTClient := TRESTClient.Create(nil);
  FRESTClient.Accept := 'application/json, text/plain; q=0.9, text/html;q=0.8,';
  FRESTClient.AcceptCharset := 'UTF-8, *;q=0.8';
  FRESTClient.ContentType := 'application/json';
  FRESTClient.HandleRedirects := True;
  FRESTClient.SynchronizedEvents := False;

  FRESTRequest := TRESTRequest.Create(nil);
  FRESTRequest.Client := FRESTClient;
  FRESTRequest.Method := rmPOST;

  Param := FRESTRequest.Params.AddHeader('accesstoken', FAccessToken);
  Param.Options := Param.Options + [TRESTRequestParameterOption.poDoNotEncode]; // <--- das hier ist der Trick!
  Param := FRESTRequest.Params.AddHeader('cashboxid', FCashBoxId);
  Param.Options := Param.Options + [TRESTRequestParameterOption.poDoNotEncode]; // <--- das hier ist der Trick!

  FRESTResponse := TRESTResponse.Create(nil);
  FRESTRequest.Response := FRESTResponse;
end;

Und natürlich die Delphi-Implementierung des JSON-Serialisieres für leere Arrays, das war auch nochmal so ein Ding für 100 graue Haare mehr:
http://www.delphipraxis.net/191908-r...yn-arrays.html

[kretabiker]

Danke für dein Update zur RestClient-Lib. Werde ich nachzuvollziehen, aber da hätte ich mich totgesucht. Das Thema hat durchaus Potential für eine Menge neuer grauer Haare

[yonojoy]

Hallo TiGü,

ich habe eben mit Entsetzen deinen Post gelesen, dass WSDL vom fiskaltrust-Server nicht unterstützt wird, sondern nur vom Local-Service

Den von dir beschriebenen Weg halte ich in Anbetracht der Umstände für sehr sinnvoll:

Zitat von TiGü:

Ich bin dazu übergegangen, alles in eine DLL (gebaut mit Delphi Berlin Update 2) zu packen und nach draußen zur EXE hin mit COM-Interfaces zu arbeiten.
Intern wird dann anhand der übergebenen Parameter unterschieden, ob es zu einen lokalen Dienst geht und mit SOAP und dem Import der WSDL gearbeitet wird ODER ob ich per REST-Komponenten und JSON arbeite.

Gibt es eine Chance, dass du den Code für die DLL zur Verfügung stellen würdest? Gegen $$$, versteht sich...

[TiGü]

Zitat von yonojoy:

Gibt es eine Chance, dass du den Code für die DLL zur Verfügung stellen würdest? Gegen $$$, versteht sich...

Siehe persönliche Nachricht (Benachrichtigungsglocke oben).