RosettaCodeData/Task/Empty-string/OpenEdge-Progress/empty-string.openedge

9 lines
212 B
Text
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
DEFINE VARIABLE cc AS CHARACTER.
IF cc > '' THEN
MESSAGE 'not empty' VIEW-AS ALERT-BOX.
ELSE IF cc = ? THEN
MESSAGE 'unknown' VIEW-AS ALERT-BOX.
ELSE /* IF cc = '' */
MESSAGE 'empty' VIEW-AS ALERT-BOX.