RosettaCodeData/Task/Increment-a-numerical-string/OpenEdge-Progress/increment-a-numerical-string.openedge

6 lines
98 B
Text
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
DEFINE VARIABLE cc AS CHARACTER INITIAL "12345".
MESSAGE
INTEGER( cc ) + 1
VIEW-AS ALERT-BOX.