Protech Systems PA-3122, User Manual

Page: 105 / 211

Chapter 3 Software
PA-3122 SERIES USER
′
S MANUAL
Page:3-46
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)