ZVT-Protokoll & APRO Comport

[masterchris_99]

Zitat von Klaus01:

Stimmen denn die Einstellungen des Comports.
Ist die APRO richtig eingestellt (Baudrate, DataBits, StopBits, Handshake(none, Software, Hardware))?

Also ich habe eingestellt
Baud = 9600
DataBits = 8
StopBits = 2
Handshake = None

So ist es mir vorgegeben

Zitat von Klaus01:

Auf dem Kassensystem kannst Du nicht schauen was da so ankommt?

Mit Kassensystem meinst du das EC-Terminal? Da passiert gar nichts und einen Monitor oder so gibt es leider nicht. Ich denke aber das die Verbindung an sich steht denn sobald ich ja den Port öffne bekomme ich über den Port als Antwort 00

Edit: Der Hersteller meint dass das Gerät richtig eingestellt ist. Also müsste der Fehler ja bei mir liegen?!?

mfg Chris

[z3bu]

Hallo,

ich habe ein ähnliches Problem mit der Ansteuerung über ZVT. Habe ein EC-Cash-Gerät ("Artema Hybrid") über die Ethernetschnittstelle in mein lokales Netzwerk eingebunden - bekomme auch ohne Probleme einen Ping, sowie eine TelNet-Verbindung realisiert. Mit dem Tool "T-Manager", ein Programm mit dem man ein solches EC-Cash-Gerät ansteuern kann, funktioniert z.B. das Initiieren eines Zahlungsvorgangs oder die einfache Anmeldung an das Gerät. Seitens der Konfiguration und Funktionsfähigkeit der Hardware bestehen somit keine Probleme. Nun möchte ich den hier ebenfalls erwähnten Befehl - "Chr(6) + Chr(0) + Chr(4) + Chr(0) + Chr(0) + Chr(0) + Chr(56)" - für die Anmeldung an das Gerät absetzen. Allerdings läuft die Anwendung auf einen Socket Error. Was mache ich falsch?

Code:

procedure BefehlSenden;
var
  lSBefehl : String;
begin
  lSBefehl := '';

  IdTCPClient1.Host := 'xxx.xxx.xxx.xxx'; // IP des EC-Cash-Gerätes
  IdTCPClient1.Port := 22000;

  IdTCPClient1.Connect; // funktioniert

  if IdTCPClient1.Connected then
    ShowMessage('Verbunden!');

  lSBefehl := Chr(6) + Chr(0) + Chr(4) + Chr(0) + Chr(0) + Chr(0) + Chr(56);
  lSBefehl := Chr(16) + Chr(2) + lSBefehl + Chr(16) + Chr(3) + Chr(28) + Chr(162);

  IdTCPClient1.SendCmd(lSBefehl); // nach Ausführung dieser Zeile kommt es zu dem Socket Error
end;

Würde mich über hilfreiche Antworten sehr freuen