0 ADD 1910 XXXXXXXXXXXXXXXXXXX (if p(v910) then v910 fi/) XXXXXXXXXXXXXXXXXXX REPEAT XXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXX ADD 317 XXXXXXXXXXXXXXXXXXX if p(v1910) then (if &uf('1*R; ?@',&uf('Av1910#1'))<>'' then if p(v317) then if p(v1910^q) and v317^!<>v1910^b then '^A'&uf(|Kcoll.mnu!|v1910^q),'^!'v1910^b fi else if p(v1910^q) then '^A'&uf(|Kcoll.mnu!|v1910^q),'^!'v1910^b fi fi else break fi/) fi XXXXXXXXXXXXXXXXXXX DEL 1910 1 XXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXX UNTIL if p(v1910) then '1' else '0' fi XXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXX