0

FB の長さが 80 のファイルがあります。1位置 80 の値の場合、位置 81 に固定値の数値を追加したい='Y'

この追加された値はS9(9) BINARY、コピーブックから見たときに想定されます。

追加されたフィールドはSUM FIELDS、別のステップで使用されます。

カードをどのようにコーディングしSORT SYSINますか?

4

1 に答える 1

0 
OPTION COPY
INREC IFTHEN=(WHEN=(80,1,CH,EQ,C'Y'),OVERLAY=(81:+1,TO=BI,LENGTH=2))

これを SUM を使用するステップから分離する必要はありません。明らかに、OPTION COPY は使用しません。

列 80 の Y 以外のレコードを合計する場合は、最初にすべてをゼロに設定するために IFTHEN=(WHEN=INIT が必要です。

これはメインフレームのタスクであるため、そのタグを使用していれば、より早く応答できたはずです。

于 2013-01-31T15:12:33.593 に答える