title: Attachmate data scraping macro that prints pages to file
body: <p>I recorded the following macro using Attachmate Extra! X-treme at work. I believe I'm using version 9.0. I'm trying to "scrape" data from a report that spans various screens, and print each page to a .txt or .prn file. The code as presented steps through all the necessary screens but fails to output the results to the desired file that I would like to then manipulate in MS Excel.</p>
  
  <p>I'm new to Attachmate so any help would be appreciated. Is it simply a matter of adding a few lines of code to direct the output or is there a bigger picture here? Many thanks in advance for your help!</p>
  
  <pre><code>' Global variable declarations
  Global g_HostSettleTime%
  Global g_szPassword$
  
  Sub Main()
  '--------------------------------------------------------------------------------
  ' Get the main system object
       Dim Sessions As Object
   Dim System As Object
   Set System = CreateObject("EXTRA.System")  ' Gets the system object
   If (System is Nothing) Then
      Msgbox "Could not create the EXTRA System object.  Stopping macro playback."
      STOP
   End If
   Set Sessions = System.Sessions
  
   If (Sessions is Nothing) Then
      Msgbox "Could not create the Sessions collection object.  Stopping          
              macro playback."
      STOP
   End If
       '--------------------------------------------------------------------------------
       ' Set the default wait timeout value
   g_HostSettleTime = 3000        ' milliseconds
  
   OldSystemTimeout&amp; = System.TimeoutValue
   If (g_HostSettleTime &gt; OldSystemTimeout) Then
      System.TimeoutValue = g_HostSettleTime
   End If
  
      ' Get the necessary Session Object
   Dim Sess0 As Object
   Set Sess0 = System.ActiveSession
   If (Sess0 is Nothing) Then
      Msgbox "Could not create the Session object.  Stopping macro playback."
      STOP
   End If
   If Not Sess0.Visible Then Sess0.Visible = TRUE
   Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  
      ' This section of code contains the recorded events
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf11&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf10&gt;") 
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf8&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf3&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  Sess0.Screen.Sendkeys("&lt;Pf3&gt;")  
  Sess0.Screen.WaitHostQuiet(g_HostSettleTime)
  
  System.TimeoutValue = OldSystemTimeout
  
      End Sub
  </code></pre>