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

6 lines
98 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
DEFINE VARIABLE cc AS CHARACTER INITIAL "12345".
MESSAGE
INTEGER( cc ) + 1
VIEW-AS ALERT-BOX.