【个人整理系列之二】关于数组和DS数据结构定义

fairyboy

下面所有例子都是以RPGLE类型程序举例.

1:平时定义一个错误信息数组是经常做的

D    ERROR    S      60      DIM(6)   

上面的S===>声名类型:表示数组或表,60表示长度,DIM(6)表示数组元素的数量.

补充一下:上面S的位置,如果是C==>表示定义常量,DS==>数据结构

D EXTYES          C                   CONST('EXIT    ')


D                SDS    ====>系统结构数据定义           
D*           PROGRAM DATA STRUCTURE
D  QPROG            *PROC             ===>程序名
D  QJOBN                244    253     ===>工作站标识
D  QUSER                254    263    ====>用户名


D INFDS           DS                  
D*           DISPLAY DATA STRUCTURE   
D  QFSTA            *STATUS           
D  QFCURP               370    371B 0   ====>光标值(具体内容在光标取值帖子里面有说明)
D  SFLLOC               378    379B 0   ===>光标所在记录

fairyboy

下面是以前在网上找的关于 SDS和  INDFS的详细说明

一个附件,WORD版本的

具体DS的结构定义使用,等有空了再补上.

wnai

INFDS 有很多有用的信息，我记得有个记录着记录在member中的绝对RRN，用起来挺方便的

sz_lixlx

好东西,收藏

stick522

我记得还可以在DSPF里用RTNCSRLOC的，具体忘记了

audiotech

好东西 先收藏了再说

pipitang

我下载后，全是乱码

李海隽

本人翻译（V5R4版），因为不是在同一时间翻译，且间隔时间很长，还有本人外语和400水平十分有限，所以肯定有错误和前后矛盾的地方，将就着看吧。

fairyboy

恩，翻译的不错.真是热心哦。

给你加了2分，鼓励一下.