Rocket® Enterprise Developer (formerly a product of Micro Focus or formerly a product of Open Text) documentation, created before Rocket Software acquired certain products from OpenText, may include outdated references to "Micro Focus" or "OpenText", both of which are trademarks of OpenText or its affiliates. Rocket Software is not affiliated with Micro Focus or OpenText and has since rebranded these products as Rocket® products. You may also encounter outdated links in this documentation. If you do, please contact Rocket Support (support@rocketsoftware.com) for assistance.
Explicit and Implicit Scope Terminators
Scope terminators delimit the scope of certain Procedure Division statements (delimited scope statements), and are of two types: explicit and implicit.
The explicit scope terminators are listed below:
- END-ADD
- END-PERFORM
END-ACCEPT - END-CALL
- END-CHAIN
- END-COMPUTE
- END-DELETE
- END-DISPLAY
- END-DIVIDE
- END-EVALUATE
- END-IF
- END-MULTIPLY
- END-READ
- END-RETURN
- END-REWRITE
- END-SEARCH
- END-START
- END-STRING
- END-SUBTRACT
- END-UNSTRING
- END-WRITE
Note:
In some cases the delimited scope statement with which an explicit scope delimiter is paired is determined differently for different COBOL language specifications.
Implicit scope termination occurs:
- At the end of any sentence, where the separator period terminates the scope of all previous statements not yet terminated
- Within any statement containing another statement. The next phrase of the containing statement (for example, ELSE, WHEN, AT END, and so on) following the contained statement terminates the scope of any unterminated contained statement.