解決済み: ファイルの読み取り

COBOL は Common Business-Oriented Language の頭字語で、数十年にわたりビジネスおよび金融分野で永続的な存在となっています。 その存続期間が長くなっているということは、プログラミングの世界におけるその重要性を意味しています。 XNUMX 世紀半ばに作成されたにもかかわらず、現代のビジネス アプリケーション、特にファイルの読み取りを伴うタスクにおいて依然として重要な役割を果たしています。 ファイルは主要な記憶媒体であり、ファイル データの読み取りはほとんどのビジネス アプリケーションで一般的に必要なタスクであるため、この操作は不可欠です。

この記事では、COBOL でファイルを読み取るプロセスを詳しく掘り下げ、関連するコードを分析します。そして最も重要なこととして、認識されている複雑さを解体するためにコードを関連性のある形式で提示します。

**COBOL でのファイルの読み取り**は簡単なプロセスです。 重要な部分は、シーケンシャル読み取りかランダム読み取りかにかかわらず、ファイルの読み取り時に COBOL が提供する柔軟性です。

OPEN INPUT ファイル名。
READ ファイル名
最後に
MOVE 'YES' TO ファイル終了インジケーター
読み終わり。

最初の行では、ファイルが開かれ、後続のファイル操作の準備が行われます。 READ ステートメントは、ファイルから次のレコードを取得します。 利用可能なレコードがもうない場合、つまりファイルの終わりに到達した場合、AT END 句がトリガーされ、end-of-file-indicator の値を 'YES' に変更することでそのことを示します。

コードを分解する

ファイルを読み取るための Cobol コードの重要な部分を段階的に見てみましょう。

**OPEN INPUT** ステートメントは、読み取り操作の準備ができたファイルを開きます。 ファイルの宣言時に使用したファイル名 (file-name) を指定する必要があります。

**READ** ステートメントは、ファイルから次のレコードをメモリに読み取ります。 ここでも、宣言されたファイル名が使用されます。

**AT END** 句は、READ 操作でファイルの終わり (読み取るレコードがなくなった) が発生したときに実行されます。 ここでは、フラグ変数 (ファイル終了インジケーター) が「YES」に設定され、読み取るデータがもう残っていないことを示します。

[h2]COBOL ファイルを処理する主要な動詞

  • OPEN: 後続のファイル操作のためにファイルを準備します。
  • お客様の声は: ファイルから次のレコードを読み取ります。
  • レビューを: レコードをファイルに書き込みます。
  • 閉じる: ファイルに関するすべての操作を終了します。
  • リライト: ファイル内のレコードを変更します。
  • DELETE: ファイルからレコードを削除します。

ファイル操作とも呼ばれる COBOL ファイル処理動詞は、ファイルに格納されているデータを操作する場合に重要です。

ファイルの読み取りの代替手段

COBOL には、**START** および **READ NEXT** オプションを使用してファイルを読み取るための別のオプションが用意されており、特にインデックス付きファイルや相対ファイルの場合に、より柔軟なファイル読み取り戦略が可能になります。

START ファイル名の KEY は ws-key と同じです。
READ NEXT ファイル名。

ファイル読み取りに関する説明の締めくくりとして、COBOL のパワーが光ります。 この能力と、その堅牢性およびビジネス要件への準拠の組み合わせによって、COBOL はビジネスおよび財務業務の重要な言語として存続することができました。 COBOL プログラマーとして、私たちは組織のために効率的かつ効果的なシステムを作成するために、これらのファイル処理操作を理解し、習得するよう努めなければなりません。

関連記事:

コメント