system "Amersc(oops) Database"
{
*************************************
*        System by amerscoop        *
*         on the VIP Lounge         *
*************************************
         Rx-ed by Sp1N-D1zZy
-------------------------------------
          not 00-c0mpatible
-------------------------------------
for instructions visit thread at VIP Lounge

http://www.gambling.projectsydney.com/viewtopic.php?t=4901
-------------------------------------
}
method "main"
begin
add 1 record"Count"data
while starting new session
    begin
    load single wheel
    call "Init"
    exit
    end
call "Track"
end

method "Track"
begin
track last number for 1 spins record"Last Number"layout
locate number backward 1 spins from last number record"Last But 1"layout
call "Update Database"
if record"Count"data >= 50000
    begin
    call "Get Popular"
    call "Place Bets"
    end
end

method "Place Bets"
begin
put 1 record"Single Layout"layout list
put 0 record"Exclusions"layout list
end

method "Get Popular"
begin
if record"Last Number"layout = number 0
    begin
    clear record"Exclusions"layout
    duplicate record"Number 0" record"Number 0 Temp"
    put 1 record"Number 0"data index
    put 1 record"Number 0 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 0 Temp"data index > record"Number 0 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 0"data < record"Number 0 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 0"data index
                if record"Number 0"data index > record"Number 0"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 0 Temp"data
                    duplicate record"Number 0 Temp" record"Number 0 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 0 Temp"data index
        put 1 record"Number 0"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 0 Temp"data index
        put 1 record"Number 0 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 0 Temp 2"data index > record"Number 0 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 0 Temp"data < record"Number 0 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 0 Temp"data index
                    if record"Number 0 Temp"data index > record"Number 0 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 0 Temp 2"data index
            put 1 record"Number 0 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
 if record"Last Number"layout = Number 1
    begin
    clear record"Exclusions"layout
    duplicate record"Number 1" record"Number 1 Temp"
    put 1 record"Number 1"data index
    put 1 record"Number 1 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 1 Temp"data index > record"Number 1 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 1"data < record"Number 1 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 1"data index
                if record"Number 1"data index > record"Number 1"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 1 Temp"data
                    duplicate record"Number 1 Temp" record"Number 1 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 1 Temp"data index
        put 1 record"Number 1"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 1 Temp"data index
        put 1 record"Number 1 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 1 Temp 2"data index > record"Number 1 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 1 Temp"data < record"Number 1 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 1 Temp"data index
                    if record"Number 1 Temp"data index > record"Number 1 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 1 Temp 2"data index
            put 1 record"Number 1 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 2
    begin
    clear record"Exclusions"layout
    duplicate record"Number 2" record"Number 2 Temp"
    put 1 record"Number 2"data index
    put 1 record"Number 2 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 2 Temp"data index > record"Number 2 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 2"data < record"Number 2 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 2"data index
                if record"Number 2"data index > record"Number 2"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 2 Temp"data
                    duplicate record"Number 2 Temp" record"Number 2 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 2 Temp"data index
        put 1 record"Number 2"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 2 Temp"data index
        put 1 record"Number 2 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 2 Temp 2"data index > record"Number 2 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 2 Temp"data < record"Number 2 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 2 Temp"data index
                    if record"Number 2 Temp"data index > record"Number 2 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 2 Temp 2"data index
            put 1 record"Number 2 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
 if record"Last Number"layout = Number 3
    begin
    clear record"Exclusions"layout
    duplicate record"Number 3" record"Number 3 Temp"
    put 1 record"Number 3"data index
    put 1 record"Number 3 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 3 Temp"data index > record"Number 3 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 3"data < record"Number 3 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 3"data index
                if record"Number 3"data index > record"Number 3"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 3 Temp"data
                    duplicate record"Number 3 Temp" record"Number 3 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 3 Temp"data index
        put 1 record"Number 3"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 3 Temp"data index
        put 1 record"Number 3 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 3 Temp 2"data index > record"Number 3 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 3 Temp"data < record"Number 3 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 3 Temp"data index
                    if record"Number 3 Temp"data index > record"Number 3 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 3 Temp 2"data index
            put 1 record"Number 3 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 4
    begin
    clear record"Exclusions"layout
    duplicate record"Number 4" record"Number 4 Temp"
    put 1 record"Number 4"data index
    put 1 record"Number 4 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 4 Temp"data index > record"Number 4 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 4"data < record"Number 4 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 4"data index
                if record"Number 4"data index > record"Number 4"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 4 Temp"data
                    duplicate record"Number 4 Temp" record"Number 4 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 4 Temp"data index
        put 1 record"Number 4"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 4 Temp"data index
        put 1 record"Number 4 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 4 Temp 2"data index > record"Number 4 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 4 Temp"data < record"Number 4 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 4 Temp"data index
                    if record"Number 4 Temp"data index > record"Number 4 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 4 Temp 2"data index
            put 1 record"Number 4 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 5
    begin
    clear record"Exclusions"layout
    duplicate record"Number 5" record"Number 5 Temp"
    put 1 record"Number 5"data index
    put 1 record"Number 5 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 5 Temp"data index > record"Number 5 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 5"data < record"Number 5 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 5"data index
                if record"Number 5"data index > record"Number 5"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 5 Temp"data
                    duplicate record"Number 5 Temp" record"Number 5 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 5 Temp"data index
        put 1 record"Number 5"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 5 Temp"data index
        put 1 record"Number 5 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 5 Temp 2"data index > record"Number 5 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 5 Temp"data < record"Number 5 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 5 Temp"data index
                    if record"Number 5 Temp"data index > record"Number 5 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 5 Temp 2"data index
            put 1 record"Number 5 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 6
    begin
    clear record"Exclusions"layout
    duplicate record"Number 6" record"Number 6 Temp"
    put 1 record"Number 6"data index
    put 1 record"Number 6 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 6 Temp"data index > record"Number 6 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 6"data < record"Number 6 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 6"data index
                if record"Number 6"data index > record"Number 6"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 6 Temp"data
                    duplicate record"Number 6 Temp" record"Number 6 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 6 Temp"data index
        put 1 record"Number 6"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 6 Temp"data index
        put 1 record"Number 6 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 6 Temp 2"data index > record"Number 6 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 6 Temp"data < record"Number 6 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 6 Temp"data index
                    if record"Number 6 Temp"data index > record"Number 6 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 6 Temp 2"data index
            put 1 record"Number 6 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 7
    begin
    clear record"Exclusions"layout
    duplicate record"Number 7" record"Number 7 Temp"
    put 1 record"Number 7"data index
    put 1 record"Number 7 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 7 Temp"data index > record"Number 7 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 7"data < record"Number 7 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 7"data index
                if record"Number 7"data index > record"Number 7"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 7 Temp"data
                    duplicate record"Number 7 Temp" record"Number 7 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 7 Temp"data index
        put 1 record"Number 7"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 7 Temp"data index
        put 1 record"Number 7 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 7 Temp 2"data index > record"Number 7 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 7 Temp"data < record"Number 7 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 7 Temp"data index
                    if record"Number 7 Temp"data index > record"Number 7 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 7 Temp 2"data index
            put 1 record"Number 7 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 8
    begin
    clear record"Exclusions"layout
    duplicate record"Number 8" record"Number 8 Temp"
    put 1 record"Number 8"data index
    put 1 record"Number 8 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 8 Temp"data index > record"Number 8 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 8"data < record"Number 8 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 8"data index
                if record"Number 8"data index > record"Number 8"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 8 Temp"data
                    duplicate record"Number 8 Temp" record"Number 8 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 8 Temp"data index
        put 1 record"Number 8"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 8 Temp"data index
        put 1 record"Number 8 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 8 Temp 2"data index > record"Number 8 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 8 Temp"data < record"Number 8 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 8 Temp"data index
                    if record"Number 8 Temp"data index > record"Number 8 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 8 Temp 2"data index
            put 1 record"Number 8 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 9
    begin
    clear record"Exclusions"layout
    duplicate record"Number 9" record"Number 9 Temp"
    put 1 record"Number 9"data index
    put 1 record"Number 9 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 9 Temp"data index > record"Number 9 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 9"data < record"Number 9 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 9"data index
                if record"Number 9"data index > record"Number 9"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 9 Temp"data
                    duplicate record"Number 9 Temp" record"Number 9 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 9 Temp"data index
        put 1 record"Number 9"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 9 Temp"data index
        put 1 record"Number 9 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 9 Temp 2"data index > record"Number 9 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 9 Temp"data < record"Number 9 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 9 Temp"data index
                    if record"Number 9 Temp"data index > record"Number 9 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 9 Temp 2"data index
            put 1 record"Number 9 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 10
    begin
    clear record"Exclusions"layout
    duplicate record"Number 10" record"Number 10 Temp"
    put 1 record"Number 10"data index
    put 1 record"Number 10 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 10 Temp"data index > record"Number 10 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 10"data < record"Number 10 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 10"data index
                if record"Number 10"data index > record"Number 10"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 10 Temp"data
                    duplicate record"Number 10 Temp" record"Number 10 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 10 Temp"data index
        put 1 record"Number 10"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 10 Temp"data index
        put 1 record"Number 10 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 10 Temp 2"data index > record"Number 10 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 10 Temp"data < record"Number 10 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 10 Temp"data index
                    if record"Number 10 Temp"data index > record"Number 10 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 10 Temp 2"data index
            put 1 record"Number 10 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 11
    begin
    clear record"Exclusions"layout
    duplicate record"Number 11" record"Number 11 Temp"
    put 1 record"Number 11"data index
    put 1 record"Number 11 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 11 Temp"data index > record"Number 11 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 11"data < record"Number 11 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 11"data index
                if record"Number 11"data index > record"Number 11"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 11 Temp"data
                    duplicate record"Number 11 Temp" record"Number 11 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 11 Temp"data index
        put 1 record"Number 11"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 11 Temp"data index
        put 1 record"Number 11 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 11 Temp 2"data index > record"Number 11 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 11 Temp"data < record"Number 11 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 11 Temp"data index
                    if record"Number 11 Temp"data index > record"Number 11 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 11 Temp 2"data index
            put 1 record"Number 11 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 12
    begin
    clear record"Exclusions"layout
    duplicate record"Number 12" record"Number 12 Temp"
    put 1 record"Number 12"data index
    put 1 record"Number 12 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 12 Temp"data index > record"Number 12 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 12"data < record"Number 12 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 12"data index
                if record"Number 12"data index > record"Number 12"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 12 Temp"data
                    duplicate record"Number 12 Temp" record"Number 12 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 12 Temp"data index
        put 1 record"Number 12"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 12 Temp"data index
        put 1 record"Number 12 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 12 Temp 2"data index > record"Number 12 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 12 Temp"data < record"Number 12 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 12 Temp"data index
                    if record"Number 12 Temp"data index > record"Number 12 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 12 Temp 2"data index
            put 1 record"Number 12 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 13
    begin
    clear record"Exclusions"layout
    duplicate record"Number 13" record"Number 13 Temp"
    put 1 record"Number 13"data index
    put 1 record"Number 13 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 13 Temp"data index > record"Number 13 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 13"data < record"Number 13 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 13"data index
                if record"Number 13"data index > record"Number 13"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 13 Temp"data
                    duplicate record"Number 13 Temp" record"Number 13 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 13 Temp"data index
        put 1 record"Number 13"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 13 Temp"data index
        put 1 record"Number 13 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 13 Temp 2"data index > record"Number 13 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 13 Temp"data < record"Number 13 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 13 Temp"data index
                    if record"Number 13 Temp"data index > record"Number 13 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 13 Temp 2"data index
            put 1 record"Number 13 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 14
    begin
    clear record"Exclusions"layout
    duplicate record"Number 14" record"Number 14 Temp"
    put 1 record"Number 14"data index
    put 1 record"Number 14 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 14 Temp"data index > record"Number 14 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 14"data < record"Number 14 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 14"data index
                if record"Number 14"data index > record"Number 14"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 14 Temp"data
                    duplicate record"Number 14 Temp" record"Number 14 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 14 Temp"data index
        put 1 record"Number 14"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 14 Temp"data index
        put 1 record"Number 14 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 14 Temp 2"data index > record"Number 14 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 14 Temp"data < record"Number 14 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 14 Temp"data index
                    if record"Number 14 Temp"data index > record"Number 14 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 14 Temp 2"data index
            put 1 record"Number 14 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 15
    begin
    clear record"Exclusions"layout
    duplicate record"Number 15" record"Number 15 Temp"
    put 1 record"Number 15"data index
    put 1 record"Number 15 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 15 Temp"data index > record"Number 15 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 15"data < record"Number 15 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 15"data index
                if record"Number 15"data index > record"Number 15"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 15 Temp"data
                    duplicate record"Number 15 Temp" record"Number 15 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 15 Temp"data index
        put 1 record"Number 15"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 15 Temp"data index
        put 1 record"Number 15 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 15 Temp 2"data index > record"Number 15 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 15 Temp"data < record"Number 15 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 15 Temp"data index
                    if record"Number 15 Temp"data index > record"Number 15 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 15 Temp 2"data index
            put 1 record"Number 15 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 16
    begin
    clear record"Exclusions"layout
    duplicate record"Number 16" record"Number 16 Temp"
    put 1 record"Number 16"data index
    put 1 record"Number 16 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 16 Temp"data index > record"Number 16 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 16"data < record"Number 16 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 16"data index
                if record"Number 16"data index > record"Number 16"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 16 Temp"data
                    duplicate record"Number 16 Temp" record"Number 16 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 16 Temp"data index
        put 1 record"Number 16"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 16 Temp"data index
        put 1 record"Number 16 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 16 Temp 2"data index > record"Number 16 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 16 Temp"data < record"Number 16 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 16 Temp"data index
                    if record"Number 16 Temp"data index > record"Number 16 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 16 Temp 2"data index
            put 1 record"Number 16 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 17
    begin
    clear record"Exclusions"layout
    duplicate record"Number 17" record"Number 17 Temp"
    put 1 record"Number 17"data index
    put 1 record"Number 17 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 17 Temp"data index > record"Number 17 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 17"data < record"Number 17 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 17"data index
                if record"Number 17"data index > record"Number 17"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 17 Temp"data
                    duplicate record"Number 17 Temp" record"Number 17 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 17 Temp"data index
        put 1 record"Number 17"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 17 Temp"data index
        put 1 record"Number 17 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 17 Temp 2"data index > record"Number 17 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 17 Temp"data < record"Number 17 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 17 Temp"data index
                    if record"Number 17 Temp"data index > record"Number 17 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 17 Temp 2"data index
            put 1 record"Number 17 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 18
    begin
    clear record"Exclusions"layout
    duplicate record"Number 18" record"Number 18 Temp"
    put 1 record"Number 18"data index
    put 1 record"Number 18 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 18 Temp"data index > record"Number 18 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 18"data < record"Number 18 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 18"data index
                if record"Number 18"data index > record"Number 18"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 18 Temp"data
                    duplicate record"Number 18 Temp" record"Number 18 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 18 Temp"data index
        put 1 record"Number 18"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 18 Temp"data index
        put 1 record"Number 18 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 18 Temp 2"data index > record"Number 18 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 18 Temp"data < record"Number 18 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 18 Temp"data index
                    if record"Number 18 Temp"data index > record"Number 18 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 18 Temp 2"data index
            put 1 record"Number 18 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 19
    begin
    clear record"Exclusions"layout
    duplicate record"Number 19" record"Number 19 Temp"
    put 1 record"Number 19"data index
    put 1 record"Number 19 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 19 Temp"data index > record"Number 19 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 19"data < record"Number 19 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 19"data index
                if record"Number 19"data index > record"Number 19"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 19 Temp"data
                    duplicate record"Number 19 Temp" record"Number 19 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 19 Temp"data index
        put 1 record"Number 19"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 19 Temp"data index
        put 1 record"Number 19 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 19 Temp 2"data index > record"Number 19 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 19 Temp"data < record"Number 19 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 19 Temp"data index
                    if record"Number 19 Temp"data index > record"Number 19 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 19 Temp 2"data index
            put 1 record"Number 19 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 20
    begin
    clear record"Exclusions"layout
    duplicate record"Number 20" record"Number 20 Temp"
    put 1 record"Number 20"data index
    put 1 record"Number 20 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 20 Temp"data index > record"Number 20 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 20"data < record"Number 20 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 20"data index
                if record"Number 20"data index > record"Number 20"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 20 Temp"data
                    duplicate record"Number 20 Temp" record"Number 20 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 20 Temp"data index
        put 1 record"Number 20"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 20 Temp"data index
        put 1 record"Number 20 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 20 Temp 2"data index > record"Number 20 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 20 Temp"data < record"Number 20 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 20 Temp"data index
                    if record"Number 20 Temp"data index > record"Number 20 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 20 Temp 2"data index
            put 1 record"Number 20 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 21
    begin
    clear record"Exclusions"layout
    duplicate record"Number 21" record"Number 21 Temp"
    put 1 record"Number 21"data index
    put 1 record"Number 21 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 21 Temp"data index > record"Number 21 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 21"data < record"Number 21 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 21"data index
                if record"Number 21"data index > record"Number 21"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 21 Temp"data
                    duplicate record"Number 21 Temp" record"Number 21 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 21 Temp"data index
        put 1 record"Number 21"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 21 Temp"data index
        put 1 record"Number 21 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 21 Temp 2"data index > record"Number 21 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 21 Temp"data < record"Number 21 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 21 Temp"data index
                    if record"Number 21 Temp"data index > record"Number 21 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 21 Temp 2"data index
            put 1 record"Number 21 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 22
    begin
    clear record"Exclusions"layout
    duplicate record"Number 22" record"Number 22 Temp"
    put 1 record"Number 22"data index
    put 1 record"Number 22 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 22 Temp"data index > record"Number 22 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 22"data < record"Number 22 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 22"data index
                if record"Number 22"data index > record"Number 22"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 22 Temp"data
                    duplicate record"Number 22 Temp" record"Number 22 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 22 Temp"data index
        put 1 record"Number 22"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 22 Temp"data index
        put 1 record"Number 22 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 22 Temp 2"data index > record"Number 22 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 22 Temp"data < record"Number 22 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 22 Temp"data index
                    if record"Number 22 Temp"data index > record"Number 22 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 22 Temp 2"data index
            put 1 record"Number 22 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 23
    begin
    clear record"Exclusions"layout
    duplicate record"Number 23" record"Number 23 Temp"
    put 1 record"Number 23"data index
    put 1 record"Number 23 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 23 Temp"data index > record"Number 23 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 23"data < record"Number 23 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 23"data index
                if record"Number 23"data index > record"Number 23"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 23 Temp"data
                    duplicate record"Number 23 Temp" record"Number 23 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 23 Temp"data index
        put 1 record"Number 23"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 23 Temp"data index
        put 1 record"Number 23 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 23 Temp 2"data index > record"Number 23 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 23 Temp"data < record"Number 23 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 23 Temp"data index
                    if record"Number 23 Temp"data index > record"Number 23 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 23 Temp 2"data index
            put 1 record"Number 23 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 24
    begin
    clear record"Exclusions"layout
    duplicate record"Number 24" record"Number 24 Temp"
    put 1 record"Number 24"data index
    put 1 record"Number 24 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 24 Temp"data index > record"Number 24 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 24"data < record"Number 24 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 24"data index
                if record"Number 24"data index > record"Number 24"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 24 Temp"data
                    duplicate record"Number 24 Temp" record"Number 24 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 24 Temp"data index
        put 1 record"Number 24"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 24 Temp"data index
        put 1 record"Number 24 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 24 Temp 2"data index > record"Number 24 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 24 Temp"data < record"Number 24 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 24 Temp"data index
                    if record"Number 24 Temp"data index > record"Number 24 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 24 Temp 2"data index
            put 1 record"Number 24 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 25
    begin
    clear record"Exclusions"layout
    duplicate record"Number 25" record"Number 25 Temp"
    put 1 record"Number 25"data index
    put 1 record"Number 25 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 25 Temp"data index > record"Number 25 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 25"data < record"Number 25 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 25"data index
                if record"Number 25"data index > record"Number 25"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 25 Temp"data
                    duplicate record"Number 25 Temp" record"Number 25 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 25 Temp"data index
        put 1 record"Number 25"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 25 Temp"data index
        put 1 record"Number 25 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 25 Temp 2"data index > record"Number 25 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 25 Temp"data < record"Number 25 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 25 Temp"data index
                    if record"Number 25 Temp"data index > record"Number 25 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 25 Temp 2"data index
            put 1 record"Number 25 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 26
    begin
    clear record"Exclusions"layout
    duplicate record"Number 26" record"Number 26 Temp"
    put 1 record"Number 26"data index
    put 1 record"Number 26 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 26 Temp"data index > record"Number 26 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 26"data < record"Number 26 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 26"data index
                if record"Number 26"data index > record"Number 26"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 26 Temp"data
                    duplicate record"Number 26 Temp" record"Number 26 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 26 Temp"data index
        put 1 record"Number 26"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 26 Temp"data index
        put 1 record"Number 26 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 26 Temp 2"data index > record"Number 26 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 26 Temp"data < record"Number 26 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 26 Temp"data index
                    if record"Number 26 Temp"data index > record"Number 26 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 26 Temp 2"data index
            put 1 record"Number 26 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 27
    begin
    clear record"Exclusions"layout
    duplicate record"Number 27" record"Number 27 Temp"
    put 1 record"Number 27"data index
    put 1 record"Number 27 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 27 Temp"data index > record"Number 27 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 27"data < record"Number 27 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 27"data index
                if record"Number 27"data index > record"Number 27"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 27 Temp"data
                    duplicate record"Number 27 Temp" record"Number 27 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 27 Temp"data index
        put 1 record"Number 27"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 27 Temp"data index
        put 1 record"Number 27 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 27 Temp 2"data index > record"Number 27 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 27 Temp"data < record"Number 27 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 27 Temp"data index
                    if record"Number 27 Temp"data index > record"Number 27 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 27 Temp 2"data index
            put 1 record"Number 27 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 28
    begin
    clear record"Exclusions"layout
    duplicate record"Number 28" record"Number 28 Temp"
    put 1 record"Number 28"data index
    put 1 record"Number 28 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 28 Temp"data index > record"Number 28 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 28"data < record"Number 28 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 28"data index
                if record"Number 28"data index > record"Number 28"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 28 Temp"data
                    duplicate record"Number 28 Temp" record"Number 28 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 28 Temp"data index
        put 1 record"Number 28"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 28 Temp"data index
        put 1 record"Number 28 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 28 Temp 2"data index > record"Number 28 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 28 Temp"data < record"Number 28 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 28 Temp"data index
                    if record"Number 28 Temp"data index > record"Number 28 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 28 Temp 2"data index
            put 1 record"Number 28 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 29
    begin
    clear record"Exclusions"layout
    duplicate record"Number 29" record"Number 29 Temp"
    put 1 record"Number 29"data index
    put 1 record"Number 29 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 29 Temp"data index > record"Number 29 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 29"data < record"Number 29 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 29"data index
                if record"Number 29"data index > record"Number 29"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 29 Temp"data
                    duplicate record"Number 29 Temp" record"Number 29 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 29 Temp"data index
        put 1 record"Number 29"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 29 Temp"data index
        put 1 record"Number 29 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 29 Temp 2"data index > record"Number 29 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 29 Temp"data < record"Number 29 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 29 Temp"data index
                    if record"Number 29 Temp"data index > record"Number 29 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 29 Temp 2"data index
            put 1 record"Number 29 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 30
    begin
    clear record"Exclusions"layout
    duplicate record"Number 30" record"Number 30 Temp"
    put 1 record"Number 30"data index
    put 1 record"Number 30 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 30 Temp"data index > record"Number 30 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 30"data < record"Number 30 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 30"data index
                if record"Number 30"data index > record"Number 30"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 30 Temp"data
                    duplicate record"Number 30 Temp" record"Number 30 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 30 Temp"data index
        put 1 record"Number 30"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 30 Temp"data index
        put 1 record"Number 30 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 30 Temp 2"data index > record"Number 30 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 30 Temp"data < record"Number 30 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 30 Temp"data index
                    if record"Number 30 Temp"data index > record"Number 30 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 30 Temp 2"data index
            put 1 record"Number 30 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 31
    begin
    clear record"Exclusions"layout
    duplicate record"Number 31" record"Number 31 Temp"
    put 1 record"Number 31"data index
    put 1 record"Number 31 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 31 Temp"data index > record"Number 31 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 31"data < record"Number 31 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 31"data index
                if record"Number 31"data index > record"Number 31"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 31 Temp"data
                    duplicate record"Number 31 Temp" record"Number 31 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 31 Temp"data index
        put 1 record"Number 31"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 31 Temp"data index
        put 1 record"Number 31 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 31 Temp 2"data index > record"Number 31 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 31 Temp"data < record"Number 31 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 31 Temp"data index
                    if record"Number 31 Temp"data index > record"Number 31 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 31 Temp 2"data index
            put 1 record"Number 31 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 32
    begin
    clear record"Exclusions"layout
    duplicate record"Number 32" record"Number 32 Temp"
    put 1 record"Number 32"data index
    put 1 record"Number 32 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 32 Temp"data index > record"Number 32 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 32"data < record"Number 32 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 32"data index
                if record"Number 32"data index > record"Number 32"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 32 Temp"data
                    duplicate record"Number 32 Temp" record"Number 32 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 32 Temp"data index
        put 1 record"Number 32"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 32 Temp"data index
        put 1 record"Number 32 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 32 Temp 2"data index > record"Number 32 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 32 Temp"data < record"Number 32 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 32 Temp"data index
                    if record"Number 32 Temp"data index > record"Number 32 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 32 Temp 2"data index
            put 1 record"Number 32 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 33
    begin
    clear record"Exclusions"layout
    duplicate record"Number 33" record"Number 33 Temp"
    put 1 record"Number 33"data index
    put 1 record"Number 33 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 33 Temp"data index > record"Number 33 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 33"data < record"Number 33 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 33"data index
                if record"Number 33"data index > record"Number 33"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 33 Temp"data
                    duplicate record"Number 33 Temp" record"Number 33 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 33 Temp"data index
        put 1 record"Number 33"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 33 Temp"data index
        put 1 record"Number 33 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 33 Temp 2"data index > record"Number 33 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 33 Temp"data < record"Number 33 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 33 Temp"data index
                    if record"Number 33 Temp"data index > record"Number 33 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 33 Temp 2"data index
            put 1 record"Number 33 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 34
    begin
    clear record"Exclusions"layout
    duplicate record"Number 34" record"Number 34 Temp"
    put 1 record"Number 34"data index
    put 1 record"Number 34 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 34 Temp"data index > record"Number 34 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 34"data < record"Number 34 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 34"data index
                if record"Number 34"data index > record"Number 34"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 34 Temp"data
                    duplicate record"Number 34 Temp" record"Number 34 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 34 Temp"data index
        put 1 record"Number 34"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 34 Temp"data index
        put 1 record"Number 34 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 34 Temp 2"data index > record"Number 34 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 34 Temp"data < record"Number 34 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 34 Temp"data index
                    if record"Number 34 Temp"data index > record"Number 34 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 34 Temp 2"data index
            put 1 record"Number 34 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 35
    begin
    clear record"Exclusions"layout
    duplicate record"Number 35" record"Number 35 Temp"
    put 1 record"Number 35"data index
    put 1 record"Number 35 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 35 Temp"data index > record"Number 35 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 35"data < record"Number 35 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 35"data index
                if record"Number 35"data index > record"Number 35"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 35 Temp"data
                    duplicate record"Number 35 Temp" record"Number 35 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 35 Temp"data index
        put 1 record"Number 35"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 35 Temp"data index
        put 1 record"Number 35 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 35 Temp 2"data index > record"Number 35 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 35 Temp"data < record"Number 35 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 35 Temp"data index
                    if record"Number 35 Temp"data index > record"Number 35 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 35 Temp 2"data index
            put 1 record"Number 35 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
if record"Last Number"layout = Number 36
    begin
    clear record"Exclusions"layout
    duplicate record"Number 36" record"Number 36 Temp"
    put 1 record"Number 36"data index
    put 1 record"Number 36 Temp"data index
    put 1 record"Single Layout"layout index
    loop until record"Number 36 Temp"data index > record"Number 36 Temp"data count
        begin
        loop until flag "Stop" true
            begin
            if record"Number 36"data < record"Number 36 Temp"data
                begin
                set flag "Stop" true
                end else begin
                add 1 record"Number 36"data index
                if record"Number 36"data index > record"Number 36"data count
                    begin
                    copy record"Single Layout"layout record"Exclusions"layout
                    add 99999999 record"Number 36 Temp"data
                    duplicate record"Number 36 Temp" record"Number 36 Temp 2"
                    add 1 record"Exclusions"layout index
                    set flag "Stop" true
                    end
                end
            end
        set flag "Stop" false
        add 1 record"Number 36 Temp"data index
        put 1 record"Number 36"data index
        add 1 record"Single Layout"layout index
        end
    if record"Exclusions"layout count = 1
        begin
        put 1 record"Number 36 Temp"data index
        put 1 record"Number 36 Temp 2"data index
        put 1 record"Single Layout"layout index
        loop until record"Number 36 Temp 2"data index > record"Number 36 Temp 2"data count
            begin
            loop until flag "Stop" true
                begin
                if record"Number 36 Temp"data < record"Number 36 Temp 2"data
                    begin
                    set flag "Stop" true
                    end else begin
                    add 1 record"Number 36 Temp"data index
                    if record"Number 36 Temp"data index > record"Number 36 Temp"data count
                        begin
                        copy record"Single Layout"layout record"Exclusions"layout
                        add 1 record"Exclusions"layout index
                        set flag "Stop" true
                        end
                    end
                end
            set flag "Stop" false
            add 1 record"Number 36 Temp 2"data index
            put 1 record"Number 36 Temp"data index
            add 1 record"Single Layout"layout index
            end
        end
    end
end

method "Update Database"
begin
if record"Last But 1"layout =  number 0
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 0"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 0"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 0"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 1
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 1"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 1"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 1"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 2
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 2"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 2"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 2"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 3
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 3"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 3"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 3"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 4
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 4"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 4"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 4"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 5
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 5"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 5"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 5"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 6
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 6"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 6"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 6"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 7
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 7"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 7"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 7"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 8
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 8"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 8"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 8"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 9
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 9"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 9"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 9"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 10
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 10"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 10"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 10"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 11
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 11"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 11"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 11"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 12
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 12"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 12"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 12"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 13
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 13"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 13"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 13"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 14
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 14"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 14"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 14"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 15
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 15"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 15"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 15"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 16
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 16"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 16"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 16"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 17
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 17"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 17"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 17"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 18
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 18"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 18"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 18"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 19
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 19"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 19"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 19"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 20
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 20"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 20"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 20"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 21
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 21"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 21"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 21"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 22
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 22"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 22"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 22"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 23
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 23"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 23"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 23"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 24
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 24"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 24"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 24"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 25
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 25"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 25"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 25"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 26
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 26"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 26"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 26"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 27
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 27"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 27"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 27"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 28
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 28"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 28"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 28"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 29
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 29"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 29"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 29"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 30
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 30"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 30"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 30"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 31
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 31"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 31"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 31"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 32
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 32"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 32"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 32"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 33
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 33"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 33"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 33"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 34
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 34"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 34"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 34"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 35
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 35"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 35"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 35"data index
        end
    set flag "Stop" false
    end
if record"Last But 1"layout =  number 36
    begin
    put 0 record"Single Layout"layout index
    put 0 record"Number 36"data index
    loop until flag "Stop" true
        begin
        if record"Single Layout"layout = record"Last Number"layout
            begin
            add 1 record"Number 36"data
            set flag "Stop" true
            end
        add 1 record"Single Layout"layout index
        add 1 record"Number 36"data index
        end
    set flag "Stop" false
    end
end

method "Init"
begin
copy list [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,
27,28,29,30,31,32,33,34,35,36] record"Single Layout"layout
end
