background image

 

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 三个字段组成,每个字段都是两位长的字符