taobin_project/inter/sgp/xml/page_drinkfail_sg.lxml

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

	Var DirImage = CountryRootPath + "/image/collectiing/"

	
	Var Timeout = 0
	StopLongPlay

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

	

	DEBUGVAR TelephoneNumberProblem

    ; try-get-user
    Var payload = "SG/" + TelephoneNumberProblem
    Var payload = payload + "/-"
    Var payload = payload + "/-"
    Var payload = payload + "/-"
    Var payload = payload + "/-"

    DEBUGVAR payload

    Var Seeker.IsMember = 0
    Var SendProblemOfMember = 0
    Var ShowQRByNoMember = "Invisible"

    Var TaobinName = ""
    
    If TelephoneNumberProblem = "" Then
        Var ShowQRByNoMember = "Enable"
    Else
        GETACCEXT payload 35
    EndIf


    Var StepX = 1
    Var Ext1a = ""

    Var DrinkFail3Page = "ROOT/taobin_project/xml/page_drinkfail3.xml"

    If UsePepsiTheme = 1 Then
        Var DirImage = "ROOT/taobin_project/inter/whatthecup/sgp/image/collectiing/"

        Var DrinkFail3Page = "ROOT/taobin_project/inter/whatthecup/sgp/xml/page_drinkfail3-SGP_blue.xml"

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

    Var Timeout = Timeout + 1

	If Timeout > 60 Then

        If SendProblemOfMember = 1 Then

            DEBUGVAR TelephoneNumberProblem

            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

                
                PROBLEM2  TelephoneNumberProblem ProblemID ChooseProblem VendingTSIDProblem 

            EndIf

        EndIf





        If MachineStage = "remove-cup" Then
			Open DrinkFail3Page
		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

	

	TimerReset

</EventTimeout> 



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

<EventActionOk>

If StepX = 1 Then
    If Ext1a = "ok" Then
        Var TaobinName = Ext1d

        If TaobinName = "" Then
            Var Seeker.IsMember = 0
        Else
            If TaobinName = "-" Then
                Var Seeker.IsMember = 0
            Else
                Var Seeker.IsMember = 1
            EndIf
        EndIf

        DEBUGVAR Seeker.IsMember

        If Seeker.IsMember = 1 Then
            SAVELOG "Already member, will send problem"
            Var SendProblemOfMember = 1
        Else
            SAVELOG "Not member, show QR"
            Var SendProblemOfMember = 0
            Var ShowQRByNoMember = "Enable"
        EndIf

    Else
        Var Seeker.IsMember = 0
        SAVELOG "StepX.error, show QR"
        Var ShowQRByNoMember = "Enable"
    EndIf

EndIf


</EventActionOk>

<EventActionError>

If StepX = 1 Then

    SAVELOG "ActionError show QR"
    Var ShowQRByNoMember = "Enable"

EndIf


</EventActionError>








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

<Image>
<X> 329 </X>
<Y> 1351 </Y>
<State> ShowQRByNoMember </State>
<Filename> Var( DirImage + "/QR_contract.png" ) </Filename>
</Image>

;<Image>
;<X> 190 </X>
;<Y> 1548 </Y>
;<Filename> Var( DirImage + "/text13.png" ) </Filename>
;</Image>


<Button>
<X> 400 </X>
<Y> 1770 </Y>
<Filename> Var( DirImage + "/bn_close.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_close.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>

	StrLen TelephoneNumberProblem TelNumLen

    If SendProblemOfMember = 1 Then

        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

            
            PROBLEM2  TelephoneNumberProblem ProblemID ChooseProblem VendingTSIDProblem 

        EndIf

    EndIf




	DEBUGVAR MachineStage	
	If MachineStage = "remove-cup" Then
		Open DrinkFail3Page
	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


</EventClick>
</Button>

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


</Popup>