AS400编译器伪指令

1、/FREE              编译器伪指令指定自由格式计算规范块的开始。（自由格式）

    /END-FREE       指定快的结束

2、/COPY （固定格式）           b编译器伪指令导致在所编译的文件内的伪指令出现位置插入来自其它文件的记录。

      不会打印在编译器列表中，而是将所指定文件的内容替换。赋值的所有文件都出现在编译器列表的COPY成员表中。

     从iSeries服务器中复制文件

     示例： 1.要复制源文件QRPGLESRC中的成员MBR1            C/COPY *REMOTE  MER1

                 2.要复制库SRCLIB中源文件SRCFIL中的成员MER1    O/COPY *REMOTE SRCLIB/SRCFIL,MER1

                3.要复制库“SRCLIB”中文件“SRCFIL”中的成员“MBR1”   O/COPY *REMOTE "SRCLIB"/"SRCFIL',"MBR1"

      复制工作站中的文件

      允许嵌套/COPY.必须确保嵌套的/COPY文件中没有无限地相互包括。

3、条件编译伪指令

      测试条件的规则：

      1./ELSEIF和/ELSE/在/IF组的外部无效。

      2./IF组最多仅可包含一个/ELSE伪指令，/ELSEIF伪指令不能跟随/ELSE伪指令

     3./ENDIF 在/IF /ELSEIF /ELSE组的外部无效。

    4.在任何一个/IF组相关的所有伪指令必须在同一源行中。/IF在一个文件中，而匹配的/ENDIF在另一个文件中是无效的，即使在第二个文件在嵌套的/COPY中亦如此。但是完整的/IF组可以嵌套在/COPY中。