DATA:
MY-NAME IS EXTERNAL TEXT

PROCEDURE:

CALL EXTERNAL HELLO
DISPLAY "What's your name, friend? "
ACCEPT MY-NAME
CALL EXTERNAL GREET