Open Cash Register Code
Does someone have programmed a Point of sale system? I need to know how to send the "BELL" code to the printer in order to open the cash register box.
I am already trying this
printer.print chr(7)
but is not working.
Thank you in advance for your help
Jose Reyes
View Complete Forum Thread with Replies
See Related Forum Messages: Follow the Links Below to View Complete Thread
Howto Open Cashbox Drawer Of Cash Register Using Visual Basic Code
hi,
im developing a point of sale system for the first time but i know a bit how develop database system using visual basic and mdb and i plan implement on the network and my question are:
- using visualbasic code how can i open cash register drawer?
- does cash register printer the same as the usual printer?
Open UBS Cash Register
I am trying to open a cash register USB based but the OPen file #write statement does not recognize the device \l.ccr3.
example:
-----------------
Open ".\lccr3\" For Output As #1
Print #1, Chr(&H12)
Close #1
---------------
The manufacturer provided code in C but I do not know how to convert it into VB.
Any sugestions will be greatly appreciated
c code
-------------------------------
#include <windows.h>
//This sample is for Logic Controls USB POS deivces
int _cdecl main(int argc, char *argv[])
{
HANDLE hWrite = INVALID_HANDLE_VALUE;
//open the USB port
hWrite = CreateFile(
"\\.\lccr3\",
GENERIC_WRITE | GENERIC_READ,
FILE_SHARE_WRITE,
NULL,
OPEN_EXISTING,
0,
NULL);
if (hWrite == INVALID_HANDLE_VALUE) {
return 1;
}
//write 5 bytes
if (hWrite != INVALID_HANDLE_VALUE) {
int WriteLen = 5; // #bytes to write
int nBytesWrite;
char outBuffer[256];
int i;
for (i=0;i<WriteLen;i++)
{
outBuffer[i] = 'A' + i;
}
WriteFile(hWrite,
outBuffer,
WriteLen,
&nBytesWrite,
NULL);
}
// close devices if needed
if(hWrite != INVALID_HANDLE_VALUE)
CloseHandle(hWrite);
return 0;
}
-----------------------
Send Control Code To LPT1 To Open Cash Drawer
I use the following in a VB6 point of sale program to open the cash drawer.
Open "lpt1:" for output as #1
Print #1, Chr$(open code usually 0 or 7)
Close #1
It works fine, but if the printer on the same port is not turned on, everything locks up and I have to either re-boot or disconnect the printer cable to get it "un-stuck".
Is there a (hopefully simple) way to check the port and printer status directly to see if the printer is turned on and send a message to turn it on if it's off ?
Thanks..
Cash Register
I am developing a POS system. The receipt printer and drawer model is Epson TM-U220B. The Cash Drawer are connected to receipt printer and the receipt printer is connected to the CPU.When i Call the Cash Drawer, the cash drawer will open but at the same time the printer will scroll the paper bout 3 - 4cm long...can anyone help me ?? my code for the cash drawer code is look like this..
Printer.Font.Name = "control"
Printer.Print "A"
Printer.EndDoc
Cash Register
Hi everyone...
im doing th program for my cousin and i need to include a cash regiter application...not anything complicated though, just ur basic functions of entering items and displaying price and printing receipts....
could anyone help me with this, i mean, is there a sample code i could refer to or maybe someone could explain to me how it should be done, esp the receipt printing...thx
Cash Register Dll
ive got to access a cash register for a point of sales program and i think i need to write a dll to do this.Please can someone give me some help on this topic or some tips
Thanks shaun
Cash Register
Please I Need Code For A Simple Cash Register. I'm Using Visual Basic 6.
Cash Register App - Need Help
I'm starting my next assignment in VB, but I'm having some problems. It's basically a 'Cash Register' type program, and it must be able to accept a quantity and unit price. Then, it must be able to display the price before and after tax. Finally, it must be able to add up all the subtotals with tax and give a final total. The whole thing seems pretty easy, but I dont know why my final total won't add up previously entered numbers.
I also want the add a 'reciept' feature that will display item, quantity, price per unit, unit subtotal (w/ tax), and total in a printable listbox, but I have no idea how to get this is appear.
Attached are my project files
Cash Register
Hi everybody ,
I just want to ask what are the procedure so that i can open a cash drawer.
for a Point-of-sales thesis proposal. What object do i need to add in my project.
Can you please email me also at leojune@edsamail.com.ph
Thanks.
Cash Register Polling.
Hi,
I try to poll many models of cash registers(Samsung,Sharp) using the serial port.No matter wich register I poll,I receive strings of datas that look like "ÿÖ£₧ÉæÆô" or "°".What is that and how can I convert that to text?
I have the protocols of communications,but I don't understand what that theory has to do whit that.Thank you for your help.
Cash Register Communication
I try to poll a cash register using the serial port.I receive strings of datas that look like "ÿÖ£₧ÉæÆô" or "°".How can I convert that to text?
Cash Register Interface
I am writing a program that will interface directly with a Samsung SPS-1000 cash register. The register is configured for POLLING on SERIAL port #1 at 9600 N-8-1. Using HyperTerminal, I am unable to send or receive any data. I have verified the cable as a normal serial cable in a Null-Modem configuration.
The purpose of the connection is to query the register for its internal data such as financials, inventory, etc. This data will then be fed into a database and accessed thru a GUI front-end for reporting.
Does anyone have any information that may help. There must be a list of commands that are used to communicate with the register.
Creating A Cash Register
Ok,
Here's the story. I am trying to create a POS screen for a project I'm working on. I'm trying to determine what control to use as the display of data/numbers.
I want the data to start at the bottom of the control and scroll upward each time the enter key is pressed.
I've attached a screen print to show you what I mean.
Thanks,
Jeff
Cash Register Printing
hai
I wan`t to print some lines in my dot matrix printer and after printing the lines i do not wan`t form feed to happen.How can i do it.Currently i get the lines printed using
printer.print "sdfsdf"
printer.print "dfdsfd"
printer.endoc
The lines get printed but the problem is a form feed occurs.
regards
senthil
Simulate Cash Register
I have to write a program that should run in a tea-room.
I have 1000 articles splitted into 10 groups.
Dealing with 3 users and 30 tables.
Is this possible with VB?
Don' wan't to buy a cash register for gv. reason.
Any suggestions are welcome.
Ray
Need Help With Cash Register Application In VB.NET
I am supposed to build a Cash Register Application using Select Case statement. The Sales Tax needs to be calculated for the
amount purchased. I am supposed to add the sales tax to the subtotal and add the subtotal to the total. The Select Case statement
was used to enter the TaxRate and I think I am supposed to multiply the TaxRate by the TaxValue. I am having trouble with the button Enter key and the button Total key. When I enter a number such as $25.00, the $25.00 will show up in the subtotal, but when I enter $25.00 again it freezes up. Please help. I am new to VB and I really do not know what the heck I am doing.
' Private Sub txtCurrentPrice_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtCurrentPrice.TextChanged
'(I DO NOT KNOW WHAT THIS HANDLER IS SUPPOSED TO DO)
' End Sub
PrivateSub btnEnter_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEnter.Click
'This handler is supposed to add the current amount to the subtotal and display new
'subtotal.
Dim sngCurrentPrice AsSingle
sngCurrentPrice = Val(txtCurrentPrice.Text)
Dim sngSubtotalValue AsSingle
sngSubtotalValue = Val(lblSubtotalValue.Text)
Dim sngTaxValue AsSingle
sngTaxValue = Val(lblTaxValue.Text)
sngSubtotalValue += sngCurrentPrice
txtCurrentPrice.Text = ""
lblSubtotalValue.Text = String.Format("{0:C}", sngSubtotalValue)
EndSub'btnEnter_Click
PrivateSub btnTotal_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnTotal.Click
'This handler is supposed to use the subtotal to compute the tax amount.
Dim sngCurrentPrice AsSingle
sngCurrentPrice = Val(txtCurrentPrice.Text)
Dim sngSubtotalValue AsSingle
sngSubtotalValue = Val(lblSubtotalValue.Text)
Dim sngTaxValue AsSingle
sngTaxValue = Val(lblTaxValue.Text)
Dim decTaxRate AsString
SelectCase sngCurrentPrice
'amounts under $100
CaseIs < 100
decTaxRate = 0.05 'Sales Tax
'amounts between $100 and $500
Case 100 To 500
decTaxRate = 0.075 'sales tax
'amounts above $500
CaseIs > 500
decTaxRate = 0.1 'sales tax
'if no other case is true
CaseElse
decTaxRate = 0.0 'sales tax
EndSelect
'lblTaxValue.Text = strTaxRate
Dim dblTotalValue AsDouble
dblTotalValue = Val(lblTotalValue.Text)
lblTaxValue.Text = decTaxRate
'sngTaxValue += sngSubtotalValue
'dblTotalValue = sngSubtotalValue + decTaxRate
'dblTotalValue = sngSubtotalValue + (sngCurrentPrice * decTaxRate) 'or
dblTotalValue = dblTotalValue + (sngCurrentPrice * decTaxRate)
lblSubtotalValue.Text = String.Format("{0:C}", sngSubtotalValue)
lblTaxValue.Text = String.Format("{0:C}", sngTaxValue)
EndSub'btnTotal_Click
Opening A Cash Register In VB
Hi,
I am trying to write a small program to open a cash register using VB. what do I need in order to do that ? (cash register driver ? what function(s)?) Please help ! Thanks.
Touch Computer Cash Register
i am creating a touch screen program for a cash register i have basic knowledge of visual basic but i have realised i do not know how the cash draw will open does anybody have any idea about the coding i will need to do this send replies and i will try to give you more information if needed
Cash Register-like Input Of Numbers
I'm trying to figure out how to have the user enter numbers into a field similar to a cash register. Where the first digit is automatically prefixed by ".0", then the 2nd digit is prefixed by ".", etc.
I keep getting hung up on the 2nd digit.
How Do I Create An Easy PC Cash Register?
Folks out there... please help me to create an easy pc cash register from scratch. I'm new to VB6, but I can try doing it cause I need such programme urgently. I got VB6 loaded on my PCPlease help...
Cash Register Printer Programming
I have never programmed for a point of sale printer..
i have made a program now all i need is to actually print to these printers (same printers as found at convenient stores)
1. do these printers follow a standard protocal? (if i programm for one will i have to program for different brand names or do they ship with drivers for windows)
2. what else should i watch out for..
any details or info you guys could give would be appreciated it
thanks.
Working With Cash Register Device...
HI
if i want that each time that the user sell something and uses his cash register, the code of the product will "go into" my application as an input and will do some stuff with that value..
how is that possible ?
Basic Cash Register Program
I need to write a simple cash register program that I can input an amount of time, a price per hour, and it will tell me how much someone owes.
If any1 can help me write this, it would help
A Simple Cash Register Type Of Program
hey all! well see i'm working on this program and i gota alotta of it to work so far considering i am a newbie with vb. attached is my program. pretty much the first thing i need help with is that there is a reset button on the main form, when clicked it should clear all the entry fields. any ideas on how to get this to work? thanks in advance guys.
Having Trouble With Array Cash Register Program
Im creating a GUI that simulates a cash register. It has 4 check boxes, that correspond to 4 text boxes. They are quarters, dimes, nickels, and dollars. When you click a checkbox that text box opens and lets you input the amount of coins or dollars. A label to the right displays the amount entered.
I also have 9 radio buttons which are the total of the item. The radio buttons and checkboxes are in arrays. Now, I have a button that calculated the Cash given by user - total and outputs number of quarters , nickels, and dimes to give back. Im having problems assigning values to the radio buttons, and creating a correct loop for the output. Here is my code any help would be appreciated.
Code:
Dim Total As Currency
Dim Cost_of_item As Currency
'CCur() converts to Currency
Private Sub chkArray_Click(Index As Integer)
If (chkArray(Index).Value = vbChecked) Then
txtArray(Index).Enabled = True
txtArray(Index).SetFocus
End If
If (chkArray(Index).Value = vbUnchecked) Then
txtArray(Index).Enabled = False
txtArray(Index).Text = "0"
End If
End Sub
Private Sub cmdArray_Click(Index As Integer)
Select Case Index
Case 0
Dim change As Currency
Dim temp As Currency
Total = Val(lblAmountEntered)
change = Total - Cost_of_item
Cost_of_item = optArray(0).Value + optArray(1).Value + optArray(2).Value + optArray(3).Value + _
optArray(4).Value + optArray(5).Value + optArray(6).Value + optArray(7).Value + optArray(8).Value
If (Cost_of_item = False) Then
MsgBox "No selection was made."
End If
If (Total < Cost_of_item) Then
MsgBox "Not enough money was entered."
End If
Case 1
lblAmountEntered = ""
chkArray(0).Value = vbUnchecked
chkArray(1).Value = vbUnchecked
chkArray(2).Value = vbUnchecked
chkArray(3).Value = vbUnchecked
optArray(0).Value = False
optArray(1).Value = False
optArray(2).Value = False
optArray(3).Value = False
optArray(4).Value = False
optArray(5).Value = False
optArray(6).Value = False
optArray(7).Value = False
optArray(8).Value = False
lblArray(0) = ""
lblArray(1) = ""
lblArray(2) = ""
End Select
End Sub
Private Sub Form_Load()
Dim AA, BB, CC, DD
txtArray(0).Text = "0"
txtArray(1).Text = "0"
txtArray(2).Text = "0"
txtArray(3).Text = "0"
Dim Total
optArray(0).Value = False
optArray(1).Value = False
optArray(2).Value = False
optArray(3).Value = False
optArray(4).Value = False
optArray(5).Value = False
optArray(6).Value = False
optArray(7).Value = False
optArray(8).Value = False
AA = txtArray(0)
BB = txtArray(1)
CC = txtArray(2)
DD = txtArray(3)
Total = A + B + C + D
lblAmountEntered.Caption = Format(Total, "Currency")
optArray(0) = 0.25
optArray(1) = 0.35
optArray(2) = 0.45
optArray(3) = 0.55
optArray(4) = 0.65
optArray(5) = 0.75
optArray(6) = 0.85
optArray(7) = 0.95
optArray(8) = 1.5
End Sub
Private Sub txtArray_Change(Index As Integer)
Dim A
Dim B
Dim C
Dim D
Dim Total
A = txtArray(0) * 0.25
B = txtArray(1) * 0.1
C = txtArray(2) * 0.05
D = txtArray(3) * 1#
Total = A + B + C + D
lblAmountEntered.Caption = Format(Total, "Currency")
End Sub
Private Sub txtArray_GotFocus(Index As Integer)
With txtArray(Index)
.SelStart = 0
.SelLength = Len(.Text)
End With
End Sub
Stock Control VB Program With Cash Register Input
Dear All,
I have a Supermarket (shop) with 5 cash registers of model (Samsung SAM45).
I need to create a VB program that does Inventory control for the shop by
getting input from Cash Registers everytime a transaction is processed and
subtracting items purchased from inventory stock.
My main problem is how do I get the VB program on desktop PC to get input
from cash registers.
Can someone please help.
Thanks,
Farai
Displaying On A Poll Display And Opening Cash Register
I am writing a small cashier application which uses a poll display and cash register .
I am having problem in what to use to display on the serial or lpt1 poll display and open the cash register after each treansaction.
Open Cash Machine
hi
I'm sorry 4 all those who had misunderstood my question but i thought people out there would think in a more proffesional way.
Here's the case:
p.s
( the cash machine intended to be open are like those
in supermarkets or bookshops or even somtimes in hotels)
I work in a new company andwe had built an inventory and an accounting system that is used in lots of markets and hotels ,but some owners asked for the computer to be connected to the cash machine in order
to open the door automatically instead of manual method of entering numbers twice(once for the computer software and the other for the cash machine
to give back change or total sum of money)
p.s for those who care about the process being legal
i assure them that it can be only used when the person in charge insert the key into the machine)
if it is hard for you just move on for another thread...heh
however some may say that it depends on software used by computer to control the machine but i'm asking for either a standard method or for a previous experience in an kind of cash machines
any kind of help would be nice for such a long page
P.S where can i find the sense of humour some people
have when sending a reply ?? hehehehe
thanx
Open Cash Drawer
How can i open a cash drawer using visual basic either be paraller of serial
thanks...
Open Cash Drawer
Does anyone know how to open a cash drawer in VB.net. I have an
Epson t88IV printer connected to the lpt1 port and the cash
drawer is connect to the printer via a rj45 jack. How do I send
commands to the printer to force the drawer open??? Any help
would be wonderful...
Thanks
Help! -- Open Cash Drawer In VB
Hi,
I am working on a project which I need to open the cash drawer when one of the button is clicked in my VB program. The cash drawer is connected to the printer, and the printer is connected to my PC. I can open the cash drawer in the DOS prompt by doing : echo ctrl-g>lpt1
Does any one know how to code "echo ctrl-g>lpt1" in VB ? I really need help on this. Thanks.
Cash Drawer Open Signal
I am messing with MS Serial Cash Drawer, trying to figure out how can one detect if the drawer is open or not.
I first check out their web site, but they provide information ( and a nice dll with neat explanations) for USB Models.
For the serial ones, the only information they provided in their user manuel is written in QBasic, which I unfortunately dont know anything about.
Below is the only information available in this model's manuel:
Drawer open signal
The Drawer Open Signal can be read by software as Ring Indicate (RI) ( pin 22 on the DB25 connector ). The signal is HIGH when the drawer is OPEN and LOW when the drawer is CLOSED. The following example shows how to read status from QBASIC on a comatible PC.
Code:
10 A1 = INP(&H3FE) AND (&H40) : IF A1>0
THEN PRINT "Drawer is open" ( for com 1)
10 A1 = INP(&H2FE) AND (&H40) : IF A1>0
THEN PRINT "Drawer is open" ( for com 2)
Any Ideas?
Thanks.
How To Open A POS Machine Cash Drawer Using VB?
Hi,
I am doing a POS system in VB. I am facing the problem in opening the Cash drawer programmatically. can any body help me?
Cash Drawer is connected to the computer directly
it is IBM Sureone POS Machine.
OS installed - Windows ME
any Idea in this regard is appreciated and
thanx a lot in advance
Paramu
Cash Drawer For Pos. Detect Open/close Vb6
hello guys,
im developing a pos. i have problems detecting whether my cash drawer is open of close. I have a simple cash drawer connected via serial port. No sensors inside (it is a dumb cash drawer basically). My question is, is there a work around to detect open/close functionality of a cash drawer?
below is the code i used to open cash drawer. (i'm using vb6)
Code:
Function OpenCashDrawer(x_Comm_Obj As MSComm)
x_Comm_Obj.CommPort = 1
If x_Comm_Obj.PortOpen = True Then
x_Comm_Obj.PortOpen = False
Else
End If
With x_Comm_Obj
.Settings = "300,n,8,1"
.PortOpen = True
.Output = String(10, "A")
.PortOpen = False
End With
End Function
i have no problems opening a cash drawer. i need help regarding open/close detection. any suggestions will be highly appreciated..
coolwater
Star Reciept Printer To Open Cash Drawer
Hi Guys,
I am having some trouble at the moment, basically i have a star tsp100 (143 model) receipt printer which is connected via usb to the computer, the problem is i am tryin to open the cash drawer through the escape codes using vb and access 2000 but both of them i am having no look, i have previously used an epson tm88iv printer connected to the pc via a parralel port which worked fine everytime i clicked the button in my porgramme it run the code with the escape code and opened the drawer but how can i do it with the star printer and how can i do it using usb. with the epson it was a parrallel port to so open it i used lpt1 but what do i need to use for the usb and will i need to use the mscomm port because the pc recognises the usb port as a com port?? please help guys its pulling me hair this thing.
Thanks
Regards
Neemo
Register Ocx In Code
Is it possible to register an ocx using code? i have tryed inno but am very unfamilar with it and have caused nothing but problems. All i have to register is the winsock ocx. a simple program to register it would be much easier than going through all of the inno crap.
Thanks,
Brian
Help With Register Code
I am making a small program which i can use to delete files and register keys. I allready have something only the register delete only works on windows 95/98 can anyone help me to get it to work on windows 2000 and XP so that it works on all the oses. If someone can i can send him the code and things. Contact me on icq 39384711 if possible. I also looked around here, but nothin i am looking for is here.
Register Code
how to insert some register code, like auto start when boot, in the setup program ?
How To Register DLL's Per Code?
Hello,
is it possible to register OCX and DLL-files using code or a component. Or can I use the API? Would be very thankfull for every helping answer!
thanks a lot
AScomp
Can I Register Com Dll Via Code?
Hello
1. Can i register dll or ocx via code in vb6?
2. Is there is any way to unregister the current installed dll before i register the new one or it don't matter?
|
TRACKER
