taobin_project/inter/gbr/xml/page_drinkfail_gbr.lxml

<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xEFEDEA" </Background>
<Volume> SoundVolume </Volume>
;<Refresh> "Partial" </Refresh>
<EventOpen>
	; On open

	DEBUGVAR InternationalEnable
	DEBUGVAR CountryName

	SAVELOG "Redirect to page_show_error"
	Open "ROOT/taobin_project/xml/page_back_to_error.xml"

	Var Seeker.TNumberTaobinMember = ""


	DEBUGVAR TelephoneNumberProblem
	DEBUGVAR Seeker.PromotionIDCurrentOrder

	If TelephoneNumberProblem = "" Then

	Else
		Var NumberFailed = "true"
		CHECKNUMBERFAIL TelephoneNumberProblem NumberFailed

		DEBUGVAR NumberFailed
		DEBUGVAR ERROR_PAY_TIMEOUT
		DEBUGVAR ERROR_BREW_CAUSE_ENG
		DEBUGVAR ERROR_BREW_CAUSE_THAI


		If FailedCount > 0 Then
			Var ERROR_PAY_TIMEOUT = "false"
			DEBUGVAR FailedCount
			DEBUGVAR ERROR_PAY_TIMEOUT
		EndIf

		If  NextOrder = "true" Then
			Var ERROR_PAY_TIMEOUT = "false"
			DEBUGVAR FailedCount
			DEBUGVAR ERROR_PAY_TIMEOUT
		EndIf


		If ERROR_PAY_TIMEOUT = "true" Then
			If NumberFailed = "false" Then
			    Var TextErrorShow = ERROR_BREW_CAUSE_ENG
			EndIf
		EndIf
	    Var ErrorPayTimeoutFlag = 1

	EndIf






	Var DirImage = "ROOT/taobin_project/inter/gbr/image/page_drink_fail/"


	Var Timeout = 0


	StopLongPlay






    Var MachineErrorDetailAll = MachineErrorDetail + " / "
	Var MachineErrorDetailAll = MachineErrorDetailAll + MachineErrorDetailEng




	If show_eng = "true" Then
		Var textRefundChannelX = "textRefundChannel1.png"
		Var xRefundChannelX = 249

		If Seeker.PayWithQR = 0 Then

			If Seeker.StoreCreditFlag = 1 Then
				Var textRefundChannelX = "textRefundChannel2.png"
				Var xRefundChannelX = 249
			EndIf

			If Seeker.CodeChannel = 1 Then
				Var textRefundChannelX = "textRefundChannel3.png"
				Var xRefundChannelX = 60
			EndIf

		Else
			Var textRefundChannelX = "textRefundChannel3.png"
			Var xRefundChannelX = 60
		EndIf

		Var textRefundChannelX = "textRefundChannel3.png"
		Var xRefundChannelX = 60

	Else
		Var textRefundChannelX = "textRefundChannel1.png"
		Var xRefundChannelX = 204

		If Seeker.PayWithQR = 0 Then

			If Seeker.StoreCreditFlag = 1 Then
				Var textRefundChannelX = "textRefundChannel2.png"
				Var xRefundChannelX = 256
			EndIf

			If Seeker.CodeChannel = 1 Then
				Var textRefundChannelX = "textRefundChannel3.png"
				Var xRefundChannelX = 162
			EndIf

		Else
			Var textRefundChannelX = "textRefundChannel3.png"
			Var xRefundChannelX = 162
		EndIf

		Var textRefundChannelX = "textRefundChannel3.png"
		Var xRefundChannelX = 162
	EndIf

	Var text22 = "/text22.png"

	DEBUGVAR CountryName
	DEBUGVAR MaxPhoneNumber

</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>

	SAVELOG MachineStage

    Var Timeout = Timeout + 1

	If Timeout > 20 Then

        If MachineStage = "remove-cup" Then
			Open "ROOT/taobin_project/inter/gbr/xml/page_drinkfail3.lxml"
		Else
			If  NextOrder = "true" Then
				Var NextOrder = "false"

				TransferVar "next" "curr"
				Var Seeker = "curr"

				Open "ROOT/taobin_project/xml/page_thankyouConti.xml"
			Else
				Open "ROOT/taobin_project/xml/page_back_to_main.xml"
			EndIf
		EndIf
	EndIf

	If ErrorPayTimeoutFlag = 1 Then
       	If Timeout > 9 Then
           	StrLen TelephoneNumberProblem TelNumLen
           	If TelNumLen >= MinPhoneNumber Then

          		Var ProblemID = 7

          		Var ChooseProblem = "taobin purchasing problems"

          		If Seeker.PayWithQR = 1 Then
         			Var  VendingTSIDProblem = VendingTSIDTmp
         			If Seeker.CampaignPayChanel = "promptpay" Then
            				Var ProblemID = 8
            				Var ChooseProblem = "taobin purchasing problems(Void Failed)"
         			EndIf
          		Else
         			Var VendingTSIDProblem = VendingTSID
          		EndIf

                If Seeker.CreditCard = 1 Then

                Else
              		PROBLEM2  TelephoneNumberProblem ProblemID ChooseProblem VendingTSIDProblem
                EndIf

           	EndIf




            If MachineStage = "remove-cup" Then
          		Open "ROOT/taobin_project/inter/gbr/xml/page_drinkfail3.lxml"
           	Else
          		If  NextOrder = "true" Then
         			Var NextOrder = "false"

         			TransferVar "next" "curr"
         			Var Seeker = "curr"

         			Open "ROOT/taobin_project/xml/page_thankyouConti.xml"
          		Else
         			Open "ROOT/taobin_project/xml/page_back_to_main.xml"
          		EndIf
           	EndIf
       	EndIf
    EndIf


	TimerReset

</EventTimeout>



;include="ROOT/taobin_project/inc/video.inc"




<Text>
<X> 47 </X>
<Y> 428 </Y>
<Width> 986 </Width>
<Align> center-vertical-horizontal </Align>
<Font> KanitSemiBoldTTF </Font>
<Size> 64 </Size>
<Color> 0x513C2F </Color>
<Value> "We are sorry, this is unexpected" </Value>
</Text>

<Image>
<X> 372 </X>
<Y> 543 </Y>
<Filename> Var( DirImage + "person_img.png") </Filename>
</Image>

<Text>
<X> 17 </X>
<Y> 1118 </Y>
<Width> 1040 </Width>
<Align> center-vertical-horizontal </Align>
<Font> RobotoRegular </Font>
<Size> 32 </Size>
<Color> 0x513C2F </Color>
<Value> "You will receive a code via sms shortly if you entered you\nmobile number.\n\nIf you did not enter phone number, Let us know the machine location and time of transaction,\nand we will send you FREE coupon." </Value>
</Text>


<Image>
<X> 0 </X>
<Y> 1364 </Y>
<Filename> Var( DirImage + "contact_text.png") </Filename>
</Image>

<Image>
<X> 426 </X>
<Y> 1498 </Y>
<Filename> Var( DirImage + "qr_code.png") </Filename>
</Image>


<Text>
<X> 94 </X>
<Y> 1795 </Y>
<Width> 891 </Width>
<Align> center-vertical-horizontal </Align>
<Font> RobotoRegular </Font>
<Size> 24 </Size>
<Color> 0x513C2F </Color>
<Value> "Coupon can redeem a drink and topping of any value" </Value>
</Text>


<Text>
<X> 5 </X>
<Y> 1868 </Y>
<Size> 24 </Size>
<Align> Center </Align>
<Width> 1080 </Width>
<Font> RobotoRegular </Font>
<Color> 0xDE794E </Color>
<Value> MachineErrorDetailAll </Value>
</Text>




</Popup>