次のレコードの処理

次のレコードに移動するには、LINKAGE SECTION 中のレコードのアドレスを、次のレコードのアドレスの値に設定してください。 この処理は、SALARY-REC 中の最初のフィールドとして送られるポインター・データ項目によって行われます。

     SET ADDRESS OF SALARY-REC TO PTR-NEXT-REC

次に、レコード処理ルーチンを繰り返すことにより、チェーン・リスト中の次のレコードが処理されます。