RPG编程同C语言编程的比较.docVIP

PAGE PAGE 15 用法 ile rpg例子 变量声明 整数 （i(整数)、b（二进制）、s(区位十进制)、p（压缩十进制）） i(整数)只可为3、5、10、20个字节长。 dpos1 s 5i 0 inz(*zero) dpos2 s 10i 0 inz(*zero) dpos3 s 3i 0 inz(*zero) dpos4 s 20i 0 inz(*zero) 注意 s(区位十进制) dpos5 s 16s 0 inz(*zero) 浮点数 只能定义为4字节和8字节 df1 s 4f inz(*zero) df2 s 8f inz(*zero) c eval f2=121212c f2 dsply c eval f1=121212c f1 dsply 注意在小数点位数必须为blank。 8字节相当于double dsply +1.212121212121200e+005 4字节相当于float dsply +1.2121212e+05 字符串 da s 30a inz(*blank) a 单字节或多字节 n 指示符，单字节 数组 这里只说明运行时数组 darray s 2s 0 dim(12) 引用array(下标),下标从1开始。 dcharr s 5a dim(12) 基指针 基指针必须为4字节，且必须与 4 字节边界对齐。 结构 D ParmDS DS 1024 D SFld1 5 0 D SFld2 200 D … … C *ENTRY PList C Parm ParmDS C* 这是我们经常使用的一种结构定义方式和使用方式，这种用于传递入口参数的数据结构，一定不能使用INZ关键字。 C* 但是，如果该结构不是作为程序入口参数或是作为下级调用的接口参数，一般要在工程中约定使用INZ关键字。INZ关键字会让系统在程序被激活时，自动按结 C* 构各子字段的类型自动初始化，否则上述结构中SFld1字段的值将是一个非法的空格值而不是数字零。 Dmystru ds D name 20a D age 3s 0 D memo 44 D addr 1 20a D tel1 21 32a D tel2 33 42a 或 Dmystru ds 68 D name 20a D age 3s 0 D memo 44a D addr 20a overlay(memo:1) D tel1 12a overlay(memo:21) D tel2 12a ov