pakin/taobin_project
1
0
Fork 0
Code Issues Pull requests Projects 1 Releases 1 Packages Wiki Activity Actions

MYS: add disabled buttons & show name for pro mystery, WIP staging e-receipt

Browse source
This commit is contained in:
Pakin 2025-06-13 10:47:30 +07:00
parent ccbd8f8071
commit cfb19451ad
27 changed files with 2051 additions and 1238 deletions
Download patch file Download diff file Expand all files Collapse all files

4
inter/mys/xml/process/discount_from_promotion.ev
View file

@ -50,8 +50,12 @@ EndIf
If FromProMysteryCup = 1 Then
Var Seeker.VendingCode = RandomVendingCode
Var Seeker.FromProMysteryCup = "true"
Var FromProMysteryCup = 0
Else
Var Seeker.FromProMysteryCup = "false"
Var FromProMysteryCup = 0
EndIf

110
inter/mys/xml/process/e_receipt.ev Normal file
View file

@ -0,0 +1,110 @@
Var EReceiptQR = ""
; build uri
Var INVOICE_URL = ""
Var Final_INVOICE_URL = ""
Var ProjectId = ""
; check test mode
READ_FILE "/mnt/sdcard/coffeevending/CURR_TEST" TEST_MODE_FLAG
STRCONTAIN "1" TEST_MODE_FLAG IS_TEST_MODE
If IS_TEST_MODE = "true" Then
Var INVOICE_URL = INVOICE_DEV_URL
Else
Var INVOICE_URL = INVOICE_PROD_URL
EndIf
DEBUGVAR IS_TEST_MODE
DEBUGVAR INVOICE_URL
Var documentNo = Seeker.VendingTSID
Var internalRemark = BoxID
Var dateTime = SystemISOTime
Var ProductItemClassification = "022"
Var ProductItemDescription = Seeker.showname
Var ProductItemQuantity = 1
Var ProductItemUnitPrice = Seeker.PriceDrink
Var ProductItemTaxType = "06"
Var ProductItemTaxRate = 0
Var ProductItemTaxAmount = 0
Var ProductItemDiscountAmount = 0
Var ProductItemSubTotalExcludingTax = Seeker.PriceDrink
Var ProductItemSubTotal = Seeker.PriceDrink
Var totalExcludingTax = Seeker.PriceDrink
Var totalDiscountAmount = 0
Var totalTaxAmount = 0
Var totalRoundingAmount = Seeker.PriceDrink
Var totalPayableAmount = Seeker.PriceDrink
Var PayloadEReceipt = "{'documentNo':'"
Var PayloadEReceipt = PayloadEReceipt + documentNo
Var PayloadEReceipt = PayloadEReceipt + "','internalRemark':'"
Var PayloadEReceipt = PayloadEReceipt + internalRemark
Var PayloadEReceipt = PayloadEReceipt + "','dateTime':'"
Var PayloadEReceipt = PayloadEReceipt + dateTime
; array-1-item
Var PayloadEReceipt = PayloadEReceipt + "','items':[{"
Var PayloadEReceipt = PayloadEReceipt + "'ProductItemClassification':'"
Var PayloadEReceipt = PayloadEReceipt + ProductItemClassification
Var PayloadEReceipt = PayloadEReceipt + "','ProductItemDescription':'"
Var PayloadEReceipt = PayloadEReceipt + ProductItemDescription
Var PayloadEReceipt = PayloadEReceipt + "','ProductItemQuantity':"
Var PayloadEReceipt = PayloadEReceipt + ProductItemQuantity
Var PayloadEReceipt = PayloadEReceipt + ",'ProductItemUnitPrice':"
Var PayloadEReceipt = PayloadEReceipt + ProductItemUnitPrice
Var PayloadEReceipt = PayloadEReceipt + ",'ProductItemTaxType':'"
Var PayloadEReceipt = PayloadEReceipt + ProductItemTaxType
Var PayloadEReceipt = PayloadEReceipt + "','ProductItemTaxRate':"
Var PayloadEReceipt = PayloadEReceipt + ProductItemTaxRate
Var PayloadEReceipt = PayloadEReceipt + ",'ProductItemTaxAmount':"
Var PayloadEReceipt = PayloadEReceipt + ProductItemTaxAmount
Var PayloadEReceipt = PayloadEReceipt + ",'ProductItemDiscountAmount':"
Var PayloadEReceipt = PayloadEReceipt + ProductItemDiscountAmount
Var PayloadEReceipt = PayloadEReceipt + ",'ProductItemSubTotalExcludingTax':"
Var PayloadEReceipt = PayloadEReceipt + ProductItemSubTotalExcludingTax
Var PayloadEReceipt = PayloadEReceipt + ",'ProductItemSubTotal':"
Var PayloadEReceipt = PayloadEReceipt + ProductItemSubTotal
Var PayloadEReceipt = PayloadEReceipt + "}]"
Var PayloadEReceipt = PayloadEReceipt + ",'totalExcludingTax':"
Var PayloadEReceipt = PayloadEReceipt + totalExcludingTax
Var PayloadEReceipt = PayloadEReceipt + ",'totalDiscountAmount':"
Var PayloadEReceipt = PayloadEReceipt + totalDiscountAmount
Var PayloadEReceipt = PayloadEReceipt + ",'totalTaxAmount':"
Var PayloadEReceipt = PayloadEReceipt + totalTaxAmount
Var PayloadEReceipt = PayloadEReceipt + ",'totalRoundingAmount':"
Var PayloadEReceipt = PayloadEReceipt + totalRoundingAmount
Var PayloadEReceipt = PayloadEReceipt + ",'totalPayableAmount':"
Var PayloadEReceipt = PayloadEReceipt + totalPayableAmount
Var PayloadEReceipt = PayloadEReceipt + "}"
DEBUGVAR PayloadEReceipt
HashSha256 PayloadEReceipt "HashData"
EncodeURIComponent PayloadEReceipt "PayloadEReceiptEncoded"
DEBUGVAR HashData
DEBUGVAR PayloadEReceiptEncoded
Var EQ_SIGN = "="
If IS_TEST_MODE = "true" Then
Var Final_INVOICE_URL !assigned @AutoVar "https://einvoice-stg.sernsoft.com/public-create-invoice?_id{EQ_SIGN}682d5a08f4fa421acbfd4102&data{EQ_SIGN}{PayloadEReceiptEncoded}&hash{EQ_SIGN}{HashData}"
Else
Var Final_INVOICE_URL !assigned @AutoVar "https://einvoice.sernsoft.com/public-create-invoice?_id{EQ_SIGN}{ProjectId}&data{EQ_SIGN}{PayloadEReceiptEncoded}&hash{EQ_SIGN}{HashData}"
EndIf
DEBUGVAR Final_INVOICE_URL