定義數據結構有什麼用?

zhoumochi

在RPG中, 感覺定義一個數據結構就如定義一些變量, 沒有太大的用處, 哪位說說定義數據結構的方便之處?

红像

有很大的用处。

比如，有个字段12个字符长，格式是AB123456CDEF，中间的123456是你关心的信息，那么你要把它取出来，普通方案是
MOVEL 12CHAR    8CHAR
MOVE   8CHAR     6CHAR

如果用一个结构
DS
    2CHAR
    6CHAR
    4CHAR
那么你MOVE一下就可以把6CHAR拿出来用了。

这个只是简单的情况，实际当中一个字段长80CHAR的情况多的是。如果你用普通的方案取中间的信息，那需要多少中间变量？

zhoumochi

謝謝樓上的, 但如果是取一段字符,可用SUBSTR取也很方便拉.另外, 在RPG400中, IDS 和 UDS 定義有甚麼區別?

zhoumochi

還有一點:

I                   UDS   
I                                                           901  902  LDACMP
I                                                           903  904  LDACON
I                                                           905  906  FRM1FR
I                                                           907  908  FRM2FR


上面的901,903... 是不可以隨意定義?

红像

901 902 ldabadgsd

是说LDA.. 这个域从901字符开始，902结束，长度为2CHAR.
当然可以随便定义，只要符合你需要。

dave2004

Define the DS is the only way you can get file and program infomation in your RPG code.

aeiou

就像一个数据库一样，为什么不是直接定义一个长串，所有的字段都按照第几位到第几位来访问？为什么一定要分成一个一个的字段？为什么每个字段还要起个有意义的名字？直接用123按顺序记下去也可以啊？

数据结构和这个是一样的，都是为了方便。直接写第几位到第几位的话，写程序读程序都不方便，也容易出错。