adddata after pay

This commit is contained in:
miggaze 2021-01-21 15:18:23 +07:00
parent 5ddf97c93c
commit 18ba180b12
5 changed files with 67 additions and 2 deletions

View file

@ -8,6 +8,22 @@
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/test_video_loop.xml"
TopView "hide"
If TNumberTaobinMember = "" Then
Else
If PayWithQR = 1 Then
Var VendingTSID = VendingTSIDTmp
EndIf
Var BmiYear = "0/0/0/0/0/0/0/0/0/1"
Var PointCrm = "pdpa1"
Var GetScore = VendingTSID
AddData 4 TNumberTaobinMember BmiYear PointCrm GetScore
Var TNumberTaobinMember = ""
Var VendingTSID = ""
EndIf
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_list.xml"