Protech Systems PA-8225, User Manual, Page: 150 / 247

Chapter 3 Software
PA-8225 SERIES USER
’
S MANUAL
Page: 3-87
3-3-3. Sample Code
1. VB Declaration Method
Declare Function GetCashDrawerStatus Lib CashDrawer.dll (ByVal num_drawer as
short) As Boolean
Declare Function CashDrawerOpen Lib CashDrawer.dll (ByVal num_drawer as short)
As Boolean

Call Function
Open cash drawer:
CashDrawerOpen(1)
Open cash drawer1
CashDrawerOpen(2)
Open cash drawer2
Check cash drawer status:
Dim receive_status as Boolean
Check cash drawer1 status
Receive_Status = CashDrawerOpen(&H1)
Check cash drawer2 status
Receive_Status = CashDrawerOpen(&H2)