紧急求助各位高手一个RPG 编程问题

shiner

我现有一物理文件如下：

0001.00 A               R WJDPF                                                
0002.00 A                 SNO            8P 0                                      
0003.00 A                 CNO           4P 0                                       
0004.00 A                 CNAME     20O                                         
0005.00 A                 GRADE        3P 0
0006.00 A              K SNO                                    
0007.00 A              K CNO

我想要一RPG 程序，如果查询到的 WJDPF 记录中如果GRADE字段的值 小与　６０　的话，在屏幕上此字段值就红色闪烁！（显示文件定义的显示文件名为：SCRN)

求各位高手程序应该怎么写啊，本人非常感激！！！

[ 本帖最后由 shiner 于 2006-7-21 18:31 编辑 ]

pantierui

你可以在显示字段加上属性DSPATR（BL）和COLOR(RED)然后用标识控制

居士

发帖标题请注意，下次标题不明会被删帖

shiner

谢谢楼上的这位大侠了，但我是刚开始学 RPG 编程的，程序里具体怎么用标识控制，还望

大侠能给我一个范例好吗？

谢谢了！！

[ 本帖最后由 shiner 于 2006-7-21 18:33 编辑 ]

arishy

其实这个表示颜色，就是在RPG中可以设置一个indicator，然后当你在执行时遇到你所设置的名称，即ｓｅｔ　ｏｎ　ｏｒ　ｓｅｔ　ｏｆｆ　上述的ｉｎｄｉｃａｔｏｒ即可，同时在ｄｓｐｆ中使用上边同仁告诉你的ｄｓｐａｔｒ（ＢＬ）就ｏｋ！

快乐狗

F     XXXPF IF   E     K DISK  -----物理文件
F     SCRN  CF         K WORKSTN
C     *LOVELSETLLWJDPF
C     WJDPF READ WJDPF          60
C     *IN60 DOWEQ *OFF
C     WJDPF IFLQ 60                   如果还有记录,则读
C           SETON                          80 SRCN设置标志，灯亮
C           ENDIF
C     WJDPF READ WJDPF          60
C           END
C           SETON                          LR

shiner

真是太谢谢了！！！