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

9 lines
212 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04: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.