1 、CRTLIB TEMPLIB

新建一个TEMPLIB库

 

2、 CRTSRCPF FILE(TEMPLIB/TEMPSRC) RCDLEN(100)

创建源码文件

如何从零开始创建RPGLE源码

 

3、创建后如下, 发现templib库下面多了一个TEMPSRC:

如何从零开始创建RPGLE源码

 

4、Option 里输入12进入库,如下图

如何从零开始创建RPGLE源码

5、源文件下上面源码都还没有

如何从零开始创建RPGLE源码

 

接下来通过  F6  新建源码 如下图

如何从零开始创建RPGLE源码

执行后

如何从零开始创建RPGLE源码

6、编辑源码

如何从零开始创建RPGLE源码

发现输入不了汉字 ‘金额’,这是因为在创建tempsrc时没有设置IGCDTA(*YES)参数。

 

F3保存退出,我们重新建一个。

如何从零开始创建RPGLE源码

 

 

 

如何从零开始创建RPGLE源码

 

 

 

 

7、重新新建一个PFSRC

CRTSRCPF FILE(TEMPLIB/TEMPSRC1) RCDLEN(120) IGCDTA(*YES)

 

如何从零开始创建RPGLE源码

 

F6 在TEMPSRC1 下面新建源码成员 TEMP1,发现可以输入中文。

 

如何从零开始创建RPGLE源码

 

修改参数后可以在源码里可以输入中文。

 

 

 

 

相关文章: