Control structures and nesting in AdvPL

Overview

Nested loops require tracking each level’s delimiters. EXIT leaves the loop where it executes rather than returning from the function. The example has two FOR loops, stops the inner one at two and continues the outer loop. Its count demonstrates exit scope without external data. This is a foundation topic despite its historical class label in the queue. (TOTVS, n.d., refs. 1–2)

Commented example

#Include "Protheus.ch"
User Function Ed368()
    Local nOuter, nInner
    Local nCount := 0
    For nOuter := 1 To 2
        For nInner := 1 To 3
            // EXIT ends only this inner loop.
            If nInner == 2
                Exit
            EndIf
            nCount++
        Next nInner
    Next nOuter
Return nCount

Related content