指令

以下示例使用将数据添加到文件 T1520ASI的相同顺序，将数据从输入文件 T1520ASI 复制到输出文件 T1520ASO 。将使用 _Rreadn() 和 _Rwrite() 函数。

要创建输入文件，请输入:
```
CRTPF FILE(MYLIB/T1520ASI) RCDLEN(300)
```
这将创建物理文件 T1520ASI。
在 T1520ASI:
```
joe   5
fred  6
wilma 7
```
要创建输出文件，请输入:
```
CRTPF FILE(MYLIB/T1520ASO) RCDLEN(300)
```
这将创建物理文件 T1520ASO。
要创建程序，请输入:
```
CRTBNDC PGM(MYLIB/T1520ASP) SCRFILE(QCPPLE/QACSRC)
```
这将创建使用图 1中的源代码的程序 T1520ASP 。
要运行程序，请输入:
```
CALL PGM(MYLIB/T1520ASP)
```
物理文件 T1520ASO 包含以下数据:
```
joe   5
fred  6
wilma 7
```