Sample PDL for select

Sample PDL for select

SET prompt

SELECT from list of characters

CHOOSE from value returned

CHOICE Bart

PUT message

END CHOICE

CHOICE Homer

PUT message

END CHOICE

DEFAULT CHOICE

BREAK out of loop

END CHOICE

END CHOOSE

END SELECT