Rollup_Chrons

[SimonGoring]

Function

        'Dim initialDt As DataTable
        Dim results As New ArrayList()
        Dim controls As New ArrayList()
        Dim currentChronId As Integer = -1
        Dim returnHt As Hashtable
        Dim controlIdsInChron As ArrayList
        Dim chronsDT As DataTable = chronsDS.Tables(0)
        Dim datasetsDT As DataTable = chronsDS.Tables(1)
        'Dim sw As New IO.StreamWriter("c:/inetpub/wwwroot/mapimages/chron.txt")
        'sw.AutoFlush = True