def METHOD_NAME():
    TestSection("Test a .visit file of shapefiles")
    db = data_path("shapefile_test_data/bayarearoads/roads.visit")
    OpenDatabase(db)
    AddPlot("Subset", "blocks")
    DrawPlots()
    ResetView()
    Test("shapefile_4_00")
    # Zoom in a little
    v = View2DAttributes()
    v.windowCoords = (-122.614, -121.92, 37.3495, 37.9982)
    SetView2D(v)
    Test("shapefile_4_01")
    # Zoom in more
    v.windowCoords = (-122.522, -122.362, 37.7017, 37.8424)
    SetView2D(v)
    Test("shapefile_4_02")
    # Zoom in more still
    v.windowCoords = (-122.488, -122.445, 37.7816, 37.825)
    SetView2D(v)
    Test("shapefile_4_03")
    DeleteActivePlots()
    CloseDatabase(db)