Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Boca Printer using Friendly Ghost Language
Message
From
16/07/2007 17:13:29
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Reports & Report designer
Title:
Boca Printer using Friendly Ghost Language
Miscellaneous
Thread ID:
01240876
Message ID:
01240876
Views:
171
I need to print to a Boca Ticket Printer (prints movie tickets, ball games, etc) using their Friendly Ghost Language. Does anyone have experience controlling a Boca printer using VFP, and if so, any tips to share?

So far, I am able to print to the printer, but only get the FGL itself to print out, instead of a formatted ticket.
set printer TO NAME  "Boca FGL 22/42 200 DPI"
set device to printer

* bottom left & right
@ 0, 0 SAY "<RC340,0><F9>    Admits"
@ 0, 0 SAY "<RC365,0><F9>     One" 

@ 0, 0 SAY "<RC340,200><F9>  Customer"
@ 0, 0 SAY "<RC365,200><F9>   Receipt" 

@ 0, 0 SAY "<P>"

set device to screen
set printer to 
and I have tried it using a REPORT FORM approach as follows which only prints the contents of the m.cBoca variable:
m.cboca1 = ''
maddr1 = "Test Addr1"
maddr2 = "Test Addr2"
maddr3 = "Test Addr3"

m.cboca = ''
m.cboca = m.cboca + "<RC6,280><F2>" + mshopname + lcline
m.cboca = m.cboca + "<RC28,280><F2>" + maddr1 + lcline
m.cboca = m.cboca + "<RC50,280><F2>" + maddr2 + lcline
m.cboca = m.cboca + "<RC72,280><F2>" + maddr3 + lcline
m.cboca = m.cboca + "<RC95,280><HX175><LT4>" + lcline

* this is a dummy cursor to drive the report
CREATE CURSOR ccursor (cTboca M)
append blank
REPORT FORM PosRboca.frx NOEJECT NOCONSOLE TO PRINTER	
If you have any expereience with this, I'd love to hear of the approach that you have used!
Carsten M. Thode
Next
Reply
Map
View

Click here to load this message in the networking platform