Cobol Mainframe - さまざまなインデックスを実行 - ディスプレイ

Question

私はZ/OS上でCOBOLを学び始めました。私はビジュアルコブルを使用してかなりしました。しかし、これはまだかなり異なっています。私は現在、私も

 PERFORM VARYING W03-SUBJ-INDX FROM 1 BY 1 
UNTIL W03-SUBJ-INDX = 50     
DISPLAY W03-SUBJ-TABLE(w03-subj-indx)     
END-PERFORM 

上部表示例を試してみましたものであり、指数が50

 PERFORM VARYING W03-SUBJ-INDX FROM 1 BY 1 
UNTIL W03-SUBJ-INDX = 50     
DISPLAY W03-SUBJ-TABLE     
END-PERFORM 

になるまで私は1のインデックスから開始して表示テーブルを表示する必要が

最初の索引項目のみ（予定） - 2番目の例では、 "）"が予期せぬエラーが表示されます。

任意の助けをいただければ幸いです..私は、私はあなたが上であるコンパイラバージョン言及し、そこに一度だったしていないインデックス

Answer 1

だからあなたの既存のコードについて....いくつかの妙は、エンタープライズコボルのパーサのバージョンのいくつかにあった...

DISPLAY W03-SUBJ-TABLE(w03-subj-indx) 

は、このように動作可能性があります

DISPLAY W03-SUBJ-TABLE (w03-subj-indx) 

一部Enterprise Cobolコンパイラのバージョンのうち、スペースを取らずに解析することはできませんでした。これは参照の変更を行うときに特に重要でしたが、テーブルにも適用されました。

YMMVを試してみてください。

Answer 2

を使用する必要が言われた - と私は思い出すことができませんバージョン - それは下付き文字と参照の修正とのフレークでした。

は、いくつかのスペースを接続してみてください。

DISPLAY W03-SUBJ-TABLE (w03-subj-indx) 

また、W03-SUBJ-TABLEが配列ではなく配列を含むグループ項目であることを確認してください。