AS400 - DDS（PROTECTとWINDOWキーワード）のケース

Question

PROTECTキーワードとともにWINDOWキーワードを使用する際に問題があります。私はSCR01DSのすべてのフィールドをブロックしたい。この目的のために、私はPROTECTという名前のレコードを作成します（PROTECTキーワードは内部にあります）。

DDSにWINDOWキーワードがないと問題はありません。しかし、この方法では、レコードは「フルスクリーン」で表示されます。しかし、画面の選択された部分にレコードSCR01DSを表示したいのですが？この目的のために、私はWINDOWキーワードのコメントをつけなければなりません。

しかし、この操作を実行した後に何か問題があり、記録SCR01DSはまったく表示されません。

誰でも私を助けることができますどのようにPROTECT kewordと一緒にWINDOWキーワードを使用するには？

A* TEST01DF DSPLF           
A          CF03(03 'END')  
A   R SCR01DS          
A*          WINDOW(8 10 15 35) 
A         2 21'TEST'    
A          DSPATR(RI)   
A   CHECKNUM  2Y 0B 4 2MLTCHCFLD   
A          CHOICE(1 'Mushroom') 
A          CHCCTL(1 &TEST1_) 
A   TEST1_   1Y 0H       
A   R PROTECT          
A          OVERLAY    
A          PROTECT    

---

F* TEST01 RPGLE         
Ftest01df CF E    workstn prefix(w_) 
/free            
    *inlr = *on;          
    w_test1_ = 1;         
    dou *in03=*on;         
    write scr01ds;         
    exfmt protect;         
    enddo;           
/end-free           

Answer 1

あなたPROTECTレコードは 'ウィンドウ表示' レコードではありません。フルスクリーンのレコードです。

レコードにWINDOW（）キーワードを追加します。あなたが望むように見える何を与える必要があります

A   R PROTECT         
A          WINDOW(SCR01DS) 
A          OVERLAY   
A          PROTECT 

。