COBOL support = ('A' OR 'B')
This commit is contained in:
@@ -1,6 +1,7 @@
|
||||
|
||||
123456 INITIALIZE HELLO-WORLD
|
||||
IF (KEY NOT = '1' AND '2') AND
|
||||
KEY NOT = ('1' OR '2') AND
|
||||
KEY NOT = '1' THEN
|
||||
MOVE WS-HELLO-WORLD TO HELLO-WORLD
|
||||
END IF
|
||||
|
||||
Reference in New Issue
Block a user