* REGULAR COMMENT
USE SUB1DBF

DO CASE
CASE ITEM=1
TRY THIS
AND THIS
CASE ITEM=2
* comment in case
IF X=3
STOR X TO Y
ELSE
STOR X TO Z
ENDIF
OTHERWISE
TRY THIS
ENDCASE
RETURN
* comment at end