Answered Exit a 'For-Each' loop

[fuji36]

I would like to exit a 'for each' loop early if conditions are met, not sure of the syntax.

 

[TomBascom]

Leave.

 

[Stefan]

or while:

DEF VAR lok AS LOGICAL NO-UNDO.
 
FOR EACH whatever WHILE lok:
  IF condition THEN
      lok = TRUE.
END.

 

[GregTomkins]

This is awesome code but I get this error ' Unable to understand after -- "EACH whatever"' PLEASE HELP!!!! WHAT DOES IT MEAN ?!?!?!?

 

[Stefan]

sorry about the typo - it should have been WHILE and not WHLE (post adjusted)...

 

[RealHeavyDude]

If you want to be more particular about what to leave you can also use block labels. Something like that:

MY-BLOCK-LABEL:
DO :
  FOR EACH something:
 
    IF condition is met THEN LEAVE MY-BLOCK-LABEL.
 
  END.
END.

That way, if you don't want to just exit a loop you can have more control about what block is left ...

Heavy Regards, RealHeavyDude.