GetVisible inst_show9
    ;DEBUGVAR inst_show9



    If inst_show9 = 1 Then
        InstanceGetString SaveStringInst
        ;DEBUGVAR SaveStringInst
        If SaveStringInst = "RefreshNow" Then
            GetXMLFileNameCurrentRunning CurrentOpenFile
            Open CurrentOpenFile

            If LanguageShow = "THAI" Then
				InstanceSetString "ShowThai"
			EndIf

            If LanguageShow = "ENG" Then 
                InstanceSetString "ShowEng"
            EndIf

            If LanguageShow = "MYANMAR" Then
				InstanceSetString "ShowMYANMAR"
			EndIf

            If LanguageShow = "MSC" Then 
                InstanceSetString "ShowMSC"
            EndIf

        EndIf
    EndIf

    ; setvarint SlientRefreshEnable 1
    ;DEBUGVAR SlientRefreshEnable

    If SlientRefreshEnable = 1 Then
        If SaveStringInst = "RefreshNow" Then
            GetXMLFileNameCurrentRunning CurrentOpenFile
            Open CurrentOpenFile

            If LanguageShow = "THAI" Then
				InstanceSetString "ShowThai"
			EndIf

            If LanguageShow = "ENG" Then 
                InstanceSetString "ShowEng"
            EndIf

            If LanguageShow = "MYANMAR" Then
				InstanceSetString "ShowMYANMAR"
			EndIf

            If LanguageShow = "MSC" Then 
                InstanceSetString "ShowMSC"
            EndIf

        EndIf
    EndIf


	If SlientRefreshIndex = 8 Then
		If inst_show9 = 0 Then
			GetXMLFileNameCurrentRunning CurrentOpenFile5
			Open CurrentOpenFile5
		Else
			Var SlientRefreshIndex = 9
		EndIf
    EndIf

    If langnext9 = "true" Then
        Var langnext9 = "false"
        RefreshAll
    EndIf

    If inst_show9 = 1 Then

        InstanceGetString SaveStringInst
		If SaveStringInst = "RefreshNow" Then

		Else
			If LanguageShow = "ENG" Then
				Var SaveStringInst = "ShowEng"
			EndIf
			If LanguageShow = "THAI" Then
				Var SaveStringInst = "ShowThai"
			EndIf
			If LanguageShow = "MYANMAR" Then
				Var SaveStringInst = "ShowMYANMAR"
			EndIf
            If LanguageShow = "MSC" Then 
                Var SaveStringInst = "ShowMSC"
            EndIf
		EndIf
    EndIf

    Var Inst10CountMenuEnable = 0
    Var Inst10CountCurrentMenuEnable = 0
    GetFrameScrollBlockCount Inst10CountCurrentMenuEnable
    GetCurrentEnableBlockCount Inst10CountMenuEnable

    If XMLMultiDebug = 1 Then
        DEBUGVAR Inst10CountMenuEnable
        DEBUGVAR Inst10CountMenuEnablePrev
        DEBUGVAR Inst10CountCurrentMenuEnable
    EndIf

    If Inst10CountMenuEnablePrev = "" Then
        Var Inst10CountMenuEnablePrev = Inst10CountMenuEnable
        Var Inst10CountDownForOpenXML = 0
        Var Inst10CountDownOpenXMLFromMenuZero = 20
    EndIf

    If Inst10CountMenuEnable = Inst10CountMenuEnablePrev Then

    Else
        SAVELOG "Inst10 Refresh ===================================================================== Refresh"
        Var Inst10CountDownForOpenXML = 10
        Var Inst10CountMenuEnablePrev = CountMenuEnable
    EndIf

    If Inst10CountMenuEnable = Inst10CountCurrentMenuEnable Then

    Else
        If Inst10CountDownForOpenXML = 0 Then
            SAVELOG "Inst10 Refresh =======================Inst10CountMenuEnable / Inst10CountCurrentMenuEnable ============================================== Refresh"
            Var Inst10CountDownForOpenXML = 10
        EndIf
    EndIf

    If Inst10CountCurrentMenuEnable = 0 Then

        DEBUGVAR Inst10CountDownOpenXMLFromMenuZero

        If Inst10CountDownOpenXMLFromMenuZero > 0 Then
            Var Inst10CountDownOpenXMLFromMenuZero = Inst10CountDownOpenXMLFromMenuZero - 1
            If Inst10CountDownOpenXMLFromMenuZero = 0 Then
                Var Inst10CountDownOpenXMLFromMenuZero = 20
                Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_pepsi_7up.lxml"
            EndIf
        EndIf
    EndIf

    If Inst10CountMenuEnable = Inst10CountCurrentMenuEnable Then
        If Inst10CountCurrentMenuEnable > 0 Then
            Var Inst10MenuLoaded = "done"
        EndIf
    EndIf

    If Inst10CountDownForOpenXML > 0 Then
        Var Inst10CountDownForOpenXML = Inst10CountDownForOpenXML - 1
        DEBUGVAR Inst10CountDownForOpenXML
        If Inst10CountDownForOpenXML = 0 Then
            Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_pepsi_7up.lxml"
        EndIf
    EndIf