IsTest then
                SP_01.Show()
            end if
        else
            SP_01.Ask()
        end if

        if SP_01*{_1,_6} then
            StickUsersDummy = {_1}
        elseif SP_01*{_2,_5} then
            StickUsersDummy = {_2}
        elseif SP_01*{_3,_7} then
            StickUsersDummy = {_3}
        else
            StickUsersDummy = {_4}
        end if

            if StickUsersDummy*{_1,_3} then

                SP_07s.Ask()
                'DO NOT DELETE THIS JUMP LABEL!
                START_OF_STICK_QUESTIONS:
                'DO NOT DELETE THIS JUMP LABEL!

                do
                if SP_07s * {_1} then
                    SP_02s.Ask()
                end if

                SP_03s.Ask()
                if not(SP_02s = null) then
                    SP_04s.Label.Inserts["traS3RMCins"] = TRA_S3[{_1}]._scale1 + TRA_S3[{_1}]._scale2/7
                    SP_04s.Label.Inserts["numOfSticksIns"] = SP_02s*SP_03s
                    SP_04s.Ask()
                end if

                loop while SP_04s = {_2}

                SP_10s.Ask()

                dim SP_09s_counter
                SP_09s_counter = 0

                If SP_01*{_1} then
                    If not(isnullObject(FindItem(IOM.Questions,"T13"))) then
                        If T13.AnswerCount() > 0 then
                            SP_09s = T13
                            SP_09s._99 = T13._99

                            If IOM.Info.IsTest then
                                IOM.Questions.SP_09s.Banners.AddNew("pictureTop","<span style='color:red'>Answer autopunched from T13.<br/>SHOWN only in TEST mode!</span>")
                                SP_09s.Show()
                            End If
                        Else
                            SP_09s_counter = SP_09s_counter + 1
                        End If
                    Else
                        SP_09s_counter = SP_09s_counter + 1
                    End If
                Else
                    SP_09s_counter = SP_09s_counter + 1
                End If

                If SP_09s_counter > 0 then
                    SP_09s.Ask()
                End if

                If SP_09s.AnswerCount() > 0 then
                    SP_09s_GLO = SP_09s.Categories[SP_09s].Properties["GLOBAL_CHANNEL"]
                End If

                if IOM.Info.IsDebug or IOM.Info.IsTest then
                    SP_09s_GLO.Show()
                end if

                SP_05s_Intro.Show()
                SP_05s.Ask()

                SP_06s.Ask()

                SP_08s.Ask()

                If SP_08s.AnswerCount() > 0 then
                    SP_08s_GLO = SP_08s.Categories[SP_08s].Properties["GLOBAL_CHANNEL"]
                End If

                If IOM.Info.IsDebug or IOM.Info.IsTest then
                    SP_08s_GLO.Show()
                End If
            end if 'if StickUsersDummy*{_1,_3} then

            if StickUsersDummy*{_2,_3} then

                SP_07p_Intro.Show()

                SP_07p.Ask()

                SP_03p.Ask()

                dim SP_09p_counter
                SP_09p_counter = 0

                If SP_01*{_2} then
                    If not(isnullObject(FindItem(IOM.Questions,"T13"))) then
                        If T13.AnswerCount() > 0 then
                            SP_09p = T13
                            SP_09p._99 = T13._99

                            If IOM.Info.IsTest then
                                IOM.Questions.SP_09s.Banners.AddNew("pictureTop","<span style='color:red'>Answer autopunched from T13.<br/>SHOWN only in TEST mode!</span>")
                                SP_09p.Show()
                            End If
                        Else
                            SP_09p_counter = SP_09p_counter + 1
                        End If
                    Else
                        SP_09p_counter = SP_09p_counter + 1
                    End If
                Else
                    SP_09p_counter = SP_09p_counter + 1
                End If

                If SP_09p_counter > 0 then
                    SP_09p.Ask()
                End if

                If SP_09p.AnswerCount() > 0 then
                    SP_09p_GLO = SP_09p.Categories[SP_09p].Properties["GLOBAL_CHANNEL"]
                End If

                If IOM.Info.IsDebug or IOM.Info.IsTest then
                    SP_09p_GLO.Show()
                End If

                SP_05pIntro.Show()

                SP_05p.Ask()

                SP_06p.Ask()

                SP_08p.Ask()

                If SP_08p.AnswerCount() > 0 then
                    SP_08p_GLO = SP_08p.Categories[SP_08p].Properties["GLOBAL_CHANNEL"]
                End If

                if IOM.Info.IsDebug or IOM.Info.IsTest then
                    SP_08p_GLO.Show()
                end if

            end if 'if StickUsersDummy*{_2,_3} then

        SetSectionTime("Section_SP_EndTime",IOM)

        if IOM.Info.IsTest then
            IOM.Info.EstimatedPages = IOM.Info.EstimatedPages + 2
            Section_SP_StartTime.Show()
            Section_SP_EndTime.Show()
        end if

    end if 'if TRA_S2[{_1}]._scale*{_1,_2} and RespondentType*{_1} then

'<section/>9 - 9. STICK PURCHASE