* Comment
DEFINE DATA /* Inline comment
LOCAL
1 #VAR-NAME-1 (A10) INIT<'Hello'>
1 #I (I4)
END-DEFINE

IF #VAR-NAME-1 = 'Hello'
IGNORE
END-IF

PERFORM MY-SUBROUTINE

WRITE #VAR-NAME-1

DEFINE SUBROUTINE MY-SUBROUTINE
FOR #I = 1 TO 10
ESCAPE MODULE
END-FOR
END-SUBROUTINE

END