taobin_project/xml/page_payment.xml

<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<EventOpen>
	; On open
	Var GetPayInfoFlag = 0
	Var SessionID2 = ""
	Var testservice = "kbank"
	Var QRCODE99 = ""
	Var QRCODETMP = ""

	Var QRChannel = 0
	Var MachineStage = "-"
	Var HaveCup = "true"

	;Var PriceDrink = 5

	Var DiscountDrink = 0
	Var SelectSlot = "1"

	Var QRCODE1 = "A000000677010112"
    Var QRCODE2 = "010755600066301"
    Var QRCODE3 = "VDGN"
    Var QRCODE4 = BoxID
    Var QRCODE5 = SelectSlot
    Var QRCODE6 = ServiceCredit                
    Var QRCODE7 = ServiceAmount2 
    Var QRCODE8 = ""

	If GetPayInfoFlag = 0 Then

		Var RemainAmount = 0
	
		;PrepareDrink SelectDrink SelectSugarID

		Var SessionID2 = SelectSlot + ":"
		Var SessionID2 = SessionID2 + "00"
		Var SessionID2 = SessionID2 + "000"

		Var CreditAmount1 = ""
		Var ServiceAmountFlow = ""
		Var TelephoneNumber = "0899999999"
		Var ServiceType = "coffee"
		Var ECommerce = ""
		Var ECommerce = ECommerce + PriceDrink
		Var ECommerce =	ECommerce + "/"
		Var ECommerce =	ECommerce + DiscountDrink 
		Var ECommerce =	ECommerce + "/"
		Var ECommerce =	ECommerce + SessionID2 
		Var ECommerce =	ECommerce + "/"
		Var ECommerce =	ECommerce + SelectDrink 
		Var ECommerce =	ECommerce + "/"
		Var ECommerce =	ECommerce + "KBA"
		Var ServiceParameter = "max"
		Var ServiceCharge = 0
		Var AccountType = "new"
		Var testservice = "kbank"
		Var tc = ""
		Var GetScore = ""
		Var OperatorName = ""
		Var SessionID = ""


		GetPayInfo TelephoneNumber ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
		Var Timeout = 0
		Var GetPayInfoFlag = 1
		Var ReqPayInfoFlag = 1

	EndIf

	; Reset
	Var MachineState_Result = 0

	Open "ROOT/taobin_project/xml/page_payment_cash.xml"
	
</EventOpen>
<Timeout> 2000 </Timeout>
<EventTimeout> 
	Open "ROOT/taobin_project/xml/page_payment_cash.xml"
	TimerReset
	Refresh
</EventTimeout> 
<EventActionOk>
	Var CreditAmount = 0
	Var QRCODE99 = SessionID
	Var QRCODE99 = QRCODE99 + Ext1a
	SAVELOG QRCODE99
	Var QRCODE99 = QRCODE99 + Ext21
	Var QRCODETMP = QRCODE99
	Open "ROOT/taobin_project/xml/page_payment_cash.xml" 
</EventActionOk>

</Popup>