Color save, async, set, end with multi key, COBOL key demo | 颜色保存,异步,多 key 结束,COBOL 关键字示例
This commit is contained in:
@@ -13,12 +13,12 @@
|
||||
IF if
|
||||
有些程序 THEN 没有换行所以要加这个关键字
|
||||
THEN
|
||||
NOT(?= ) !
|
||||
AND(?= ) &&
|
||||
OR(?= ) ||
|
||||
NOT(?= |$) !
|
||||
AND(?= |$) &&
|
||||
OR(?= |$) ||
|
||||
|
||||
兼容字符串字典
|
||||
\=(?! ?') =
|
||||
\=(?! ?'\d| '\w') =
|
||||
> >
|
||||
< <
|
||||
|
||||
|
||||
|
@@ -1,7 +1,7 @@
|
||||
|
||||
123456 INITIALIZE HELLO-WORLD
|
||||
IF (KEY NOT = '1' AND '2')
|
||||
AND KEY NOT = '1' THEN
|
||||
IF (KEY NOT = '1' AND '2') AND
|
||||
KEY NOT = '1' THEN
|
||||
MOVE WS-HELLO-WORLD TO HELLO-WORLD
|
||||
END IF
|
||||
TABLE(STRUCT)
|
||||
|
||||
Reference in New Issue
Block a user