As operações LEAVE e ITER são permitidas somente dentro de loops DO, DOWxx e DOUxx.
Altere a operação ou remova a especificação. Compile novamente.
(C) Copyright IBM Corporation 1992, 2005. All Rights Reserved.