Hey! Someone from Dassell, I drove through there yesterday on my way to New Ulm for Easter. Anyways, the problem with your program is that when it first enters the commecnted "DO" loop the current work area is 1, and and before the ENDDO you select 2, the second time around, since it is on a different table than the first, it can't find the fields.
Change the last line of the procedure to:
SELECT 2
ENDDO