Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

how to display a value in a POS display

Status
Not open for further replies.

mouradoualha

Programmer
Dec 16, 2008
15
0
0
TN
Hi everybody

I want to display the invoice amount in a numeric display POS
please can you help me?
 
first sorry for my english
I have a program that works very well,
My boss wants me to show the amount of the ticket on a small display of an item, I do not know how
 
From that general product specification I am guessing that you are wanting to send your display to the: VFD Customer Display for Cashiers part of the system - either the VFD-890 or VFD-895

Unfortunately it is not clear how that device attaches to the over-all POS system and it is not defined in the device's specification.

The over-all device lists the following as Interfaces
* 1 x DB25 Parallel Port (most likely for the Printer)​
* 6 x USB 2.0 (External), 2 x USB 2.0 (Internal, 1 reserved for touch screen)​
* 1 x DB-15, VGA Port (most likely for the Monitor)​

We can guess that the small display uses a USB port, but YOU have to make sure for us and then let us know.

Instead of us having to guess, maybe YOU should look at the equipment that your Boss has or contact the vendor or manufacturer and get it clarified so that we can help you.

Good Luck,
JRB-Bldr





 
Hi mouradoualha,

I am controlling an Epson DM-D110 POS Display from my Visual Foxpro App. Just do the following:

1) Install the driver for Your POS Display

2) Send the required string directly to Your POS Display:

Code:
#DEFINE ESC CHR( 0x1B )				&& Escape
#DEFINE US  CHR( 0x1F )				&& Unit Separator
#DEFINE BS  CHR( 0x08 )				&& Backspace
#DEFINE HT  CHR( 0x09 )				&& Horizontal Tab
#DEFINE LF  CHR( 0x0A )				&& Line Feed
#DEFINE HOM CHR( 0x0B )				&& Home
#DEFINE CLR CHR( 0x0C )				&& Clear Display Screen
#DEFINE CR  CHR( 0x0D )				&& Carriage Return
#DEFINE CAN CHR( 0x18 )				&& Clear Cursor Line

outputStr = US  + "C" + CHR( 0 );		&& Cursor Off
	  + ESC + "R" + CHR( 0 );		&& Character Set 0 = USA
	  + ESC + "t" + CHR( 0 );		&& Character Code Table 0 = USA
	  + US        + CHR( 3 );		&& Horizontal Scroll
	  + US  + "X" + CHR( 4 );		&& Brightness 1 - 4
	  + HOM;				&& Home
	  + line1Str;				&& String first line
	  + CR + LF;				&& Carriage Return + Line Feed
	  + line2Str				&& String second line

SET PRINTER TO "Epson DM-D110"         && use the name of Your POS Display driver
SET PRINTER OFF

??? outputStr                          && direct output without GDI

SET PRINTER OFF
SET PRINTER TO DEFAULT

The complete documentation for the ESC/POS commands You can download here:

[link]http://www.memotech.de/DM_apg.pdf[/url]

Best regards, Stefan
 
Hi,

if You have connected a cash drawer to Your POS printer, You can also open the cash drawer programmatically from Your Visual Foxpro App. Just do the following:

1) Install the driver for Your POS printer

2) Send the following string directly to Your POS printer:

Code:
#DEFINE ESC CHR( 0x1B )			&& Escape

outputStr = ESC + "p" + CHR( 0x00 ) + CHR( 0x64 ) + CHR( 0x64 )	&& ESC p m t1 t2

SET PRINTER TO "Epson TM-T88V"		&& Use the name of Your POS printer
SET PRINTER OFF

??? outputStr				&& direct output without GDI

SET PRINTER OFF
SET PRINTER TO DEFAULT

Best regards, Stefan
 
Using:
SET PRINTER TO "Epson DM-D110"​
or
SET PRINTER TO "Epson TM-T88V"​

That is some good advice, but it is dependent on the devices having already been INSTALLED as 'printers' into the Windows OS of the POS workstation.

mouradoualha has not yet informed us if that is the situation or not.

JRB-Bldr


 
thank you very much for your support.
I'll try these solutions.
thanks thanks thanks.
 
sorry it doesn't work.
it's an integrated device it's releated with port COM
 
My boss wants me to show the amount of the ticket on a small display of an item,

Have you thought of asking your boss if he knows how to do it? Or how you can find out to do it? After all, it is your employers that purchased and installed the device. They should at least know where to look for the technical information.

Mike



__________________________________
Mike Lewis (Edinburgh, Scotland)

Visual FoxPro articles, tips and downloads
 
Hi mouradoualha,

having Your POS display related to a COM port is also no problem! Just do the following:

1) put a Mscomm32.ocx ActiveX Control on a Form

We assume that the instance of Your Mscomm32.ocx ActiveX Control will be named OleControl1 (otherwise adjust this name)

2) put the following code into the Form Init Event:

Code:
WITH THIS.OleControl1			&& adjust [b]OleControl1[/b] if necessary !!!
	.CommPort = 1			&& COM port = 1  (possible values are 1 to 16)
	
	.Settings = "9600,n,8,1"
	
	.PortOpen = .T.
	
	.InBufferCount  = 0
	.OutBufferCount = 0
	
	.InputLen = 0
ENDWITH

3) put the following code into the Form Destroy Event:

Code:
WITH THIS.OleControl1			&& adjust [b]OleControl1[/b] if necessary !!!
	IF .PortOpen
		.PortOpen = .F.
	ENDIF
ENDWITH

4) Send the required string via COM port to Your POS Display:

Code:
#DEFINE ESC CHR( 0x1B )				&& Escape
#DEFINE US  CHR( 0x1F )				&& Unit Separator
#DEFINE BS  CHR( 0x08 )				&& Backspace
#DEFINE HT  CHR( 0x09 )				&& Horizontal Tab
#DEFINE LF  CHR( 0x0A )				&& Line Feed
#DEFINE HOM CHR( 0x0B )				&& Home
#DEFINE CLR CHR( 0x0C )				&& Clear Display Screen
#DEFINE CR  CHR( 0x0D )				&& Carriage Return
#DEFINE CAN CHR( 0x18 )				&& Clear Cursor Line

outputStr = US  + "C" + CHR( 0 );		&& Cursor Off
	  + ESC + "R" + CHR( 0 );		&& Character Set 0 = USA
	  + ESC + "t" + CHR( 0 );		&& Character Code Table 0 = USA
	  + US        + CHR( 3 );		&& Horizontal Scroll
	  + US  + "X" + CHR( 4 );		&& Brightness 1 - 4
	  + HOM;				&& Home
	  + line1Str;				&& String first line
	  + CR + LF;				&& Carriage Return + Line Feed
	  + line2Str				&& String second line

WITH THISFORM.OleControl1		&& adjust [b]OleControl1[/b] if necessary !!!
	IF .PortOpen
		.InBufferCount  = 0
		.OutBufferCount = 0
		
		.Output = outputStr
	ENDIF
ENDWITH

Best regards, Stefan
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top