1* Comment 2DEFINE DATA /* Inline comment 3LOCAL 41 #VAR-NAME-1 (A10) INIT<'Hello'> 51 #I (I4) 6END-DEFINE 7 8IF #VAR-NAME-1 = 'Hello' 9IGNORE 10END-IF 11 12PERFORM MY-SUBROUTINE 13 14WRITE #VAR-NAME-1 15 16DEFINE SUBROUTINE MY-SUBROUTINE 17FOR #I = 1 TO 10 18ESCAPE MODULE 19END-FOR 20END-SUBROUTINE 21 22END 23