Amersc(oops) Database
(Amerscoop | Spin-dizzy) .
Amersc_oops Database.dgt
—
Xtreme,
111 KB (114187 bytes)
Contenuto del file
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
