Problem gelöst!

Zur Info:
Es fehlt eine Zuweisung zu G_ANZ!
Füge ich - z.B. nach Statement 39 - die Anweisung "SET G_ANZ = 0;" ein, dann funktioniert die Routine.