Delphi-PRAXiS
Seite 2 von 3     12 3      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Job-Börse: Angebote und Gesuche (https://www.delphipraxis.net/66-job-boerse-angebote-und-gesuche/)
-   -   Kassenschubladen-Ansteuerung via Epson TM T 88V / LAN (https://www.delphipraxis.net/204627-kassenschubladen-ansteuerung-via-epson-tm-t-88v-lan.html)

Neumann 16. Jun 2020 09:27

AW: Kassenschubladen-Ansteuerung via Epson TM T 88V / LAN
 
Merkwürdig ist, dass ich noch nie einen Bon mit den TSE-Text bekommen habe.

Weder bei ALDI, LIDL, EDEKA noch sonstwo. Warten die alle bis zum letzten Tag?

arnof 16. Jun 2020 09:37

AW: Kassenschubladen-Ansteuerung via Epson TM T 88V / LAN
 
Scheint so zu sein, ich habe bisher nur einen Bon von einer Pizzeria bekommen mit TSE, der kam aus einer Vectron Kasse. Und der BON war auch noch fachlich falsch (kein PublicKey auf dem BON und auch kein QR-Code [der aktuell nicht Pflicht ist])

4ks3l 16. Jun 2020 15:22

AW: Kassenschubladen-Ansteuerung via Epson TM T 88V / LAN
 
Hallo beisammen,

vielen Dank für eure Unterstützung.

Den Epson TM-88V ist im LAN via einem Printserver eingebuchen.

Wenn ich euch und den Inhalt der gennannten Verlinkungen richtig verstehe,
dann erstelle ich jetzt eine Textdatei (z.B. textdatei.dat) mit dem ESC-Kommando 'p025250' und
'schicke' diese per Befehl 'copy /B textdatei.dat \\server\druckername.

Ich bin gespannt, ob es funktioniert und berichte dann gerne.

Die TSE soll über das Warenwirtschaftssystem gewährleistet werden. So ist zumindest mein Stand heute...

Aksel

himitsu 16. Jun 2020 16:53

AW: Kassenschubladen-Ansteuerung via Epson TM T 88V / LAN
 
Ja, klingt so, als wenn
Delphi-Quellcode:
copy /B posbefehl.dat \\pos\printername
ausreichen könnte.
Zum Erstellen der Datei, mit dem EscapeCode (Steuerzeichen), kannst dich an Hier im Forum suchenHxD wenden.



Wenn der Drucker eh nicht benutzt wird.
Es gibt auch USB-Adapter (eventuell auch für LAN), wo man die Kassenschublade direkt schließen kann, ohne einen Bondrucker dazwischen.
Die haben dann manchmal auch eine recht einfache API, wie z.B. eine URL aufrufen um zu Öffnen.

Sind die Schubladen denn irgendwie kodiert?
Nicht dass da am Ende nur ein Endschalter und ein Öffnerrelais drin stecken (Strom an = Klappe geht auf bzw. Schublade flutscht raus), denn dann könnte man das Ding auch selbst ansteuern.
(gibt z.B. fertige Relais-IO-Geräte, die sich einfach via LAN steuern lassen)



Einen lokalen Druckertreiber habt ihr installiert, der dann via LAN mit dem PosDrucker redet?
Dann kann man via Delphi oder auch z.B. über ein kleines Python-Script den Befehl an den Treiber schicken.
https://pypi.org/project/escposprinter/
https://stackoverflow.com/questions/...thon-in-ubuntu

4ks3l 17. Jun 2020 09:28

AW: Kassenschubladen-Ansteuerung via Epson TM T 88V / LAN
 
Hallo zusammen,

vielen Dank für eure Unterstützung.

Leider ist es mir noch nicht gelungen, die Kassenschublade über den via LAN eingebundenen Bondrucker EPSON TM-88V per ESC-Kommando zu öffnen.

Ich habe lt. Anleitung von 'Devil At Work' eine Textdatei per Komandozeile 'Copy /B kassenlade.dat \\SRV-DC\Bondrucker' an den Drucker geschickt - leider erfolglos.

In der Textdatei 'kassenlade.dat' (mit Win-Editor erstellt) habe ich per Alt+27 das ESC-Zeichen gefolgt von p025250 hinterlegt.
Sieht dann Fertig so aus: ←p025250 (Bei Alt + 27 kommt der '←' heraus).
Auch '#27+'p'+#48+'pz'' bzw. ←p0pz brachte leider keinen Erfolg (auch per Copy-Befehl an den Drucker geschickt).

Was mache ich bloß falsch? :?

Wo finde ich hier im Forum die Anleitung um einen RAW Job an den Drucker zu schicken?

Der Bondrucker ist unter \\SRV-DC\Bondrucker erreichbar und an den jeweiligen Clients eingerichtet.

Wie bereits geschrieben, kann ich über an den Clients die Kassenschublade über
Druckereigenschaften -> Einstellungen -> Perip. ger. -> Betriebesprüfung
die Kassenschulade öffnen.

Vielen Dank für eure Unterstützung,


Aksel

4ks3l 17. Jun 2020 09:35

AW: Kassenschubladen-Ansteuerung via Epson TM T 88V / LAN
 
Zitat:

Zum Erstellen der Datei, mit dem EscapeCode (Steuerzeichen), kannst dich an Hier im Forum suchenHxD wenden.
Kann man die Datei mit dem EscapeCode den nicht mit dem normalen Windows-Editor erstellen?

Zitat:

Einen lokalen Druckertreiber habt ihr installiert, der dann via LAN mit dem PosDrucker redet?
Der Bondrucker ist unter \\SRV-DC\Bondrucker erreichbar und an den jeweiligen Clients eingerichtet.

Wie bereits geschrieben, kann ich über an den Clients die Kassenschublade über
Druckereigenschaften -> Einstellungen -> Perip. ger. -> Betriebesprüfung
die Kassenschulade öffnen.

4ks3l 17. Jun 2020 09:39

AW: Kassenschubladen-Ansteuerung via Epson TM T 88V / LAN
 
Zitat:

Merkwürdig ist, dass ich noch nie einen Bon mit den TSE-Text bekommen habe.

Weder bei ALDI, LIDL, EDEKA noch sonstwo. Warten die alle bis zum letzten Tag?
Bei dem Ausdruck aus unserem Warenwirtschaftssystem 'Loco-Soft' ist der TSE-Text bereits aufgeführt,
wenn auch noch nicht so wie es wohl später mal endgültig sein soll.

Neumann 17. Jun 2020 10:20

AW: Kassenschubladen-Ansteuerung via Epson TM T 88V / LAN
 
Eigentlich ist das nicht so schwierig:

Delphi-Quellcode:

procedure Tfrmmain.opendrawer(nr:integer);


Var
     FH:THandle;
     Buff: array[0..5] of char;
     RetW:DWORD;
     port:string;
     cmd:ansistring;
     acmd:ansistring;
     p:pansichar;
     stext,sdrucker:string;
begin
  if dm.Schublade1typ=drawerprinter then   // Drucker
  begin
    if nr=2 then
     stext:=dm.Steuertext2 else
     stext:=dm.steuertext;

    sdrucker:=dm.Steuertextdrucker;
    //if (dm.Steuertextoption=2) or (dm.Steuertextoption=1) then
    begin
      if (stext='Epson1') or (stext='Epson') then
      acmd:=#27#112#48#250#250;
      if stext='Epson2' then
      acmd:=#27#112#49#250#250;
      if stext='Bixolon SRP350' then
      acmd:=#27#112#48#50#250;
      if stext='Star1' then
      acmd:=#7;
      if stext='Star2' then
      acmd:=#27#7#11#55#7;
      if stext='Wincor1' then
       acmd:=#27#48;

      if stext='Boca' then
       acmd:='#$1#$C';

      p:=AnsiStrAlloc(length(acmd));

      p:=StrPCopy(p,acmd);

      rawdatatoprinter(pwidechar(sdrucker),pbyte(p),length(acmd));
      if dm.Schubladedelay>0 then
       sleep(dm.schubladedelay);

    end;
  end;
end;
Die Procedure ist etwas abgekürzt, die anderen Arten der Schubladensteuerung habe ich weggelassen.

haentschman 17. Jun 2020 10:25

AW: Kassenschubladen-Ansteuerung via Epson TM T 88V / LAN
 
Moin...:P
Zitat:

ich selbst bin nur Anwender...

Ich benötige eine Ausführbare Exe-Datei/Programm (Windows), welche die an unserem Bondrucker
Epson TM-T88V angeschlossene Kassenschublade öffnet.
Es nützen ihm keine Quelltexte...sondern nur eine EXE. Würde sich jemand, der Ahnung hat, sich mal erweichen. (1 Form, 1 Button) :zwinker:

4ks3l 17. Jun 2020 12:28

AW: Kassenschubladen-Ansteuerung via Epson TM T 88V / LAN
 
Zitat:

Zitat von haentschman (Beitrag 1467535)
Moin...:P
Zitat:

ich selbst bin nur Anwender...

Ich benötige eine Ausführbare Exe-Datei/Programm (Windows), welche die an unserem Bondrucker
Epson TM-T88V angeschlossene Kassenschublade öffnet.
Es nützen ihm keine Quelltexte...sondern nur eine EXE. Würde sich jemand, der Ahnung hat, sich mal erweichen. (1 Form, 1 Button) :zwinker:

Darüber würde ich mich sehr freuen. An einer Aufwandsentschädigung/Trinkgeld soll es nicht scheitern. 8-)

Der Drucker Epson TM-88V, an dem die Kassenlade angeschlossen ist, ist in unserem Netzwerk unter \\SRV-DC\Bondrucker bzw. 192.168.115.21 erreichbar und an den jeweiligen Clients eingerichtet.


Alle Zeitangaben in WEZ +1. Es ist jetzt 20:17 Uhr.
Seite 2 von 3     12 3      

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz