Set Connection=##class(%SQLGatewayConnection).%New()
  d $system.OBJ.DisplayError(Connection.Connect("_odbc_test","username","password"))
  Set ResSet=##class(%ResultSet).%New("%DynamicQueryGW:SQLGW")
    
  d $system.OBJ.DisplayError(ResSet.Prepare("SELECT * from mytable",,Connection))
  
  d $system.OBJ.DisplayError(ResSet.Execute())
  while ResSet.Next()
  {
    For i= 1 : 1 :ResSet.GetColumnCount()
    {
      if (i'=ResSet.GetColumnCount())
      {
        Write ResSet.GetData(i)_", "
      }
      else
      {
        Write ResSet.GetData(i),!
      }
    }
  }
  d $system.OBJ.DisplayError(ResSet.Close())
  d $system.OBJ.DisplayError(Connection.Disconnect())
  d $system.OBJ.DisplayError(Connection.UnloadDLL())