($title_img_alt)

こちらからの投稿は、先頭に表示されているコメントへの返信になります。
サブファイルについて TU さん [ 3月30日(金) 17時2分 ]
現在、サブファイルの学習をしています。
そこで、下記URLを参考にして、プログラムを作成してみました。

初回はいいのですが、次ページを押すと、1行しか表示されなくて、
また、次ページを押すとエラーになってしまいます。

コンパイル方法が悪いのでしょうか?
初歩的なことですいません。

教えて下さい。

■参考URL

http://www.as400-net.com/tips/rpg/103.html

■変更箇所

上記ソースを参考にして、下記部分を変更してコンパイルしました。

・DSPF
変更なし

・RPG
SFL001FM→自分の画面ID
SHOHIN→自分のテストファイル

■初回画面
                            商品マスター照会                         
          
                                                                     
          
                                                                     
          
                                                                     
          
                                                                     
          
                                                                     
          
   ?                商品名                   単価       品種コード   
         
 0001                                                                
          
 0002                                                                
          
 0003                                                                
          
 0004                                                                
          
 0005                                                                
          
 0006                                                                
          
 0007                                                                
          
 0008                                                                
          
 0009                                                                
          
 0010                                                                
          
 0011                                                                
          
 0012                                                                
          
 0013                                                                
          

■次ページボタン押下
                            商品マスター照会                         
         
                                                                     
         
                                                                     
         
                                                                     
         
                                                                     
         
                                                                     
         
   ?                商品名                   単価       品種コード   
        
 0014                                                                
     

■さらに次ページボタン押下

(C G D F) ファイル TESTDSP に重複しているレコードの書き出しが試みられた。
    
RE:サブファイルについて IKD さん [ 4月1日(日) 9時30分 ]
エラーはサブ・ファイル・レコードのRRN が
カウント・アップされていないことを示しています。
(重複レコードを書き出そうとした)
これ以外にも原因はあります。
ROLLUPキーを押した後の処理がもれていませんか?
たぶん TOPRRN が加算されていません。

コンパイルのやりようで SFLの動作が変わることは
絶対にありません。
エラーの原因をあてすっぽうで想像するのではなく
ご自分のコーディングをもう一度しっかり見直しましょう。
またエラー・メッセージを読めば理論的に問題は
解決します。
エラー・メッセージを繰返し読みましょう。
RE:サブファイルについて IKD さん [ 4月2日(月) 8時7分 ]
SFLPAG と SFLSIZ が同じ値になっている可能性もあります。
SFLSIZ > SFLPAG でないとサブ・ファイルは自動拡張されません。
RE:サブファイルについて TU さん [ 4月2日(月) 10時4分 ]
IKD様
返信ありがとうございます。

コーディングを確認ところ、
SFLSIZ(14)・SFLPAG(13)になっていましたので、
自働拡張されていると思います。

また、デバッグを行ってプログラムを確認してみました。
EXFMTのすぐ下のSETOFFで止めました。

1回目のROLLUPキーを押下しても、EXFMTのままで、
SETOFF行に止まりませんでした。
2回目にROLLUPキーを押下した時に、SETOFF行に止まりました。

なぜ、1回目のROLLUPキーが反応しないのでしょうか?
ROLLUPキーが反応しない為、カウント・アップされないと思います。

初歩的なことですいませんが、ご教示願います。
RE:サブファイルについて SAKI さん [ 4月2日(月) 10時59分 ]
1回目というのは、1画面目から2画面目にROLLUP
でしょうか?2回目は、2画面目から3画面へROLLUP
ではないでしょうか?
いずれにしても、自動拡張なので既に作成されている
ページ内はシステムで制御なのでデバッグにはかえって
来ません。
RE:サブファイルについて TU さん [ 4月2日(月) 11時52分 ]
SAKI様
返信ありがとうございます。

ページ内はシステム制御は返ってこないのですね。
勉強になります。

自働拡張機能を利用するということは、
10,000件のDBをサブファイルにする場合、
初回、10,000件全レコードをREADして、
サブファイルにWRITEしなければ、ならないということでしょうか?

すいませんが、ご教示願います。
RE:サブファイルについて SAKI さん [ 4月2日(月) 14時21分 ]
SFLSIZ(14)・SFLPAG(13)
RE:サブファイルについて SAKI さん [ 4月2日(月) 14時25分 ]
SFLSIZ(14)・SFLPAG(13) の場合
1画面13行分作成し表示(EXFMT)をしたら
ROLLUPを押すと標識がオンになるはずなので
(制御がPGに戻ってくる)次の画面分作成
する。次にEXFMTすると1から26行までは
システムが制御で、2画面からROLLUPすると
標識がオンになります。
RE:サブファイルについて TU さん [ 4月5日(木) 13時51分 ]
SAKI様
ご回答有難うございました。

お名前

パスワード

メールアドレス

タイトル

ホームページ

アドレス

項目