操作码

操作码为:

• ACQ（获取）
• ADD（添加）
• ADDDUR（添加持续时间）
• ALLOC（分配存储器）
• ANDxx（与）
• BEGSR（开始子例程）
• BITOFF（关闭位）
• BITON（打开位）
• CABxx（比较并转移）
• CALL（调用程序）
• CALLB（调用绑定的过程）
• CALLP（调用原型过程或程序）
• CASxx（有条件地调用子例程）
• CAT（并置两个字符串）
• CHAIN（从文件中随机检索）
• CHECK（检查字符）
• CHECKR（反向检查）
• CLEAR（清除）
• CLOSE（关闭文件）
• COMMIT（落实）
• COMP（比较）
• DATA-GEN (根据变量生成文档)
• DATA-INTO (将文档解析为变量)
• DEALLOC（释放存储器）
• DEFINE（字段定义）
• DELETE（删除记录）
• DIV（除）
• DO（Do）
• DOU（Do Until）
• DOUxx（Do Until）
• DOW（Do While）
• DOWxx（Do While）
• DSPLY（显示消息）
• DUMP（程序转储）
• ELSE（否则）
• ELSEIF（Else If）
• ENDyy（结束结构化组）
• ENDSR（结束子例程）
• EVAL（计算表达式的值）
• EVALR（计算表达式的值，右边对齐）
• EVAL-CORR（给对应的子字段分配）
• EXCEPT（计算时间输出）
• EXFMT（写/然后读格式）
• EXSR（调用子例程）
• EXTRCT（抽取日期/时间/时间戳记）
• FEOD（强制数据结束）
• FOR（For）
• FOR-EACH (针对每个)
• FORCE（强制下一个循环时读取某个文件）
• GOTO（转至）
• IF（如果）
• IFxx（如果）
• IN（检索数据区）
• ITER（迭代）
• KFLD（定义键的各个部分）
• KLIST（定义组合键）
• LEAVE（离开 Do/For 组）
• LEAVESR（离开子例程）
• LOOKUP（查找表或数组元素）
• MHHZO（从高区移至高区）
• MHLZO（从高区移至低区）
• MLHZO（从低区移至高区）
• MLLZO（从低区移至低区）
• MONITOR（开始一个监视器组）
• MOVE（移动）
• MOVEA（移动数组）
• MOVEL（左移）
• MULT（乘）
• MVR（移动余数）
• NEXT（下一步）
• OCCUR（设置/获取数据结构的出现）
• ON-ERROR（发生错误时）
• ON-EXCP (发生异常)
• ON-EXIT (退出时)
• OPEN（打开文件进行处理）
• ORxx（或）
• OTHER（否则选择）
• OUT（写数据区）
• PARM（标识参数）
• PLIST（标识参数列表）
• POST（记入）
• READ（读记录）
• READC（读下一个已更改的记录）
• READE（读相等的键）
• READP（读上一个记录）
• READPE（读上一个相等的记录）
• REALLOC（使用新长度重新分配存储器）
• REL（释放）
• RESET（复位）
• RETURN（返回到调用程序）
• ROLBK（回滚）
• SCAN（扫描字符串）
• SELECT（开始一个选择组）
• SETGT（设置大于）
• SETLL（设置下限）
• SETOFF（关闭指示符）
• SETON（打开指示符）
• SHTDN（关闭）
• SND-MSG (向作业日志发送消息)
• SORTA（排序数组）
• SQRT（平方根）
• SUB（减）
• SUBDUR（减去持续时间）
• SUBST（子串）
• TAG（标记）
• TEST（测试日期/时间/时间戳记）
• TESTB（测试位）
• TESTN（测试数字）
• TESTZ（测试区域）
• TIME（检索时间和日期）
• UNLOCK（将数据区解锁或释放记录）
• UPDATE（修改现有记录）
• WHEN（条件成立时则选择）
• WHEN-IN (当 SELECT 操作数在 WHEN-IN 操作数中时)
• WHEN-IS (当 SELECT 操作数等于 WHEN-IS 操作数时)
• WHENxx（条件成立时则选择）
• WRITE（创建新的记录）
• XFOOT（数组元素求和）
• XLATE（转换）
• XML-INTO（将 XML 文档解析为变量）
• XML-SAX（解析 XML 文档）
• Z-ADD（置零并添加）
• Z-SUB（置零并减去）