关于DDS中定义PF的字段闪烁的问题

www607

有没有高手知道如何让DDS中定义PF的字段可以闪烁,一闪一闪的,并且加颜色?
很好奇这个是怎么做出来的,需要怎么设置?

www607

     等待中........

xuguopeng

那是在DSPF中做的吧

www607

不是DSPF,而是在PF的SOURCE 里面的字段会一闪一闪的.只是看SOURCE的时候看到闪烁,其他地方比如查看数据的时候是看不到的.

passthru

如果用Client Access访问AS400，定义打开方式和属性，就可以做到。

如果用傻终端，在as400端定义终端类型和属性时进行定义，并要写个小程序。

问一下：为什么提这样的问题？没有任何意义。好奇？或想学学此招，show一下？

xuguopeng

可以通过程序来做到 不过改变颜色后的代码好象就无法编译成功了

UNIXwlc

用SQL：

update *FILE set srcdta=x'40404040402a' concat substr(srcdta,7,80) where srcseq=1

*FILE为你要操作的member所在的file

不过好像只能操作file中最先建的那个member。拷到自己新建的file里操作，这就是我的笨方法！

部分EBCDIC控制码：
x20 Green front     
x21 Green Bg
x22 White front     
x23 White Bg
x24 Green Underline
x26 White Underline
x28 Red Front
x2a Red Blight   (这是你要的效果)
x38 Pink Front
x3a Blue Front
这些只是我试出来的，请大家指正.

此贴另一出处：http://it.sinru.com/bbs/read.php?tid=1203&fpage=1

www607

是很好奇,在看别人写的PF的SOURCE的时候,有个字段一闪一闪,觉得很有意思,就想研究一下它是如何实现的.嘿嘿....   
原来还要写程序啊,我还以为在什么地方设置一下就好了呢!

UNIXwlc

[quote]原帖由 "xuguopeng"]可以通过程序来做到 不过改变颜色后的代码好象就无法编译成功了[/quote 发表：


可以编译成功，对于代码行的话，只要不覆盖srcdta：6：80就行了。不过这样的话就看不出效果来了，因为终端显示的就是6：80行。所以要看效果的话F19切换到1：75行。

对于注释行的话，只要将该行的第六个字符设为颜色控制符就可以了，而且刚好屏幕可以显示出来，具体设置如楼上贴

www607

如下是PF的代码  ,其中只有字段D00AYY会不停闪烁,颜色是红色.
        A        R RECORD
         A            D00ASQ    R                                 
         A                                      REFFLD(CALSEQ)     
         A                                      COLHDG('ADD-SEQ')  
DTE*A            D00AYY    R                                 
         A                                      REFFLD(YEAR)      
         A            D00AMM    R                                 
         A                                      REFFLD(MONTH)
先用楼上的方法试试先