Colorful Life²⁰¹⁰

设计思路：

1、使用FNDSTRPDM进行查找，查找结果PRINT到SPOOL FILE里

2、将SPOOL FILE拷到PF-DTA内

3、使用SQL语句更新PF-DTA得到结果

对于S类型的参数，只要按照字符串的形式，在没有数字的位置补0，不用输入小数点，就可以得到正确的结果，如果是负数，在第一位输入负号 - 即可，但是会占用一个数字位，7位的负数就只能输入6位数字了。 

对于P类型的参数，数字部分按照S类型的一样输入，还需要在字符串前加 X，并且如果长度为奇数，需要给字符串加 F 后缀，如果长度为偶数，需要在字符串的前后都加 F。如果是负数的，需要把字符串后面的F变为E。（X表示按16进制取值，由于P类型的数据存储方式是半个字节存储一个数字，所以需要在前后加其它的字母补齐空位。）

只需要在子程序所使用的DSPF画面加入如下一个RECORD即可

A*********************************************        
A**DUMMY SCREEN                                       
A*********************************************        
A          R DUMMY                     TEXT('DUMY')   
A                                      ASSUME         
A                                  1  2' ' DSPATR(ND) 

很简单，只需要在相应的filed下面加上这个属性

ENTFLDATR((*DSPATR HI))

最近的项目中不段的用到配列（数组），二维配列以及DS等。将几种定义方式及区别列举如下：

变量定义以T@或W@开头，分别带表是数 组还是普通WK变量。

T@ARR        DS         DIM(10) QUALIFIED
 T@SUBARR        12A    DIM(20)

上 面这个就是一个二维数组，相当于DB中的横向20个字段，记录有10条。

必须加“QUALIFIED"关键字。

T@ARR       DS         DIM(10)
 W@SUB1           5A
 W@SUB2           5S 0

上 面这个是数组呢，相当于每条记录是由W@SUB1和W@SUB2组成的，也就是T@ARR的每条记录是一个10A的变量。

            DS
T@ARR             20A   DIM(10)
 T@ARR1            5A   OVERLAY(T@ARR:1)  */OR OVERLAY(T@ARR:*NEXT)
 T@ARR2            5A   OVERLAY(T@ARR:6)
 T@ARR3           10S 0 OVERLAY(T@ARR:11)

上 面的也是T@ARR的每条记录由三个变量组成，但上面这种定义方法，可以将三个变量也形成一个DIM(10)的数组，这样对于DB中有规律的重复字段来说 就很有用。

W@STR        DS      10A
 T@ARR                1A      DIM(10)

上 面这个就是将变量W@STR分成一个单个元素长度为1A的数组。