1 简单说明
内部交流、或可作培训使用。对用户作如下假定:
1、 能 COPY、修改、编译源代码(RPGLE、CLP)
,并能运行编译后的程序
2、 能 COPY、修改、编译文件(PF、LF、PRTF、DSPF)
;
3、 对数据文件(PF)有简单的认识(FIELD RECORD PF)
,并知道 LF 与 PF 的
对应关系。
2 程序代码行的编写
2.1 最简单的RPGLE程序
为便于理解,这里写一个最简单的 RPGLE 程序
CL0N01Factor1+++++++Opcode&ExtFactor2+++++++Result++++++++Len++D+HiLoEq
*************** Beginning of data *************************************
0001.00
C 'HELLO WORLD' DSPLY
0002.00
C RETURN
****************** End of data ****************************************
这个程序编译成功,并调用(CALL 程序名),就是在屏幕上反白显示“HELLO
WORLD”字样。
(其中,绿色字样,是系统自动显示的,下同)
与自由风格的 C 语言不同,RPGLE 中的编码,是有一定的格式,如果写错,将会在当
前代码行上高亮反绿显示。初学者如果不太清楚从何处开始下手,可以使用“F4”键查看
(F4 键只有用 2 进入的编辑状态才有效,用 5 进入的查看状态是无效的)
Level N01 Factor 1
Operation Factor 2 Result
'HELLO WORLD' DSPLY
Decimal
Length Positions HI LO EQ Comment
关于每一项所对应的内容代表什么意思,该如何填写,即如何写程序,将会在下面的具
体讲解。
2.2 举例准备
列出表名,字段,以方便下面的举例。
假设有 PF 文件叫 PFFHS,文件的记录格式叫 FMTFHS
每条记录,都是由 FHS01、FHS02、FHS03 三个字段组成,每个字段都是两位长的字符