例 - テストケースの作成

ここでは、簡単なテストケースを作成する例を示します。これには、セットアップコード、データファイルへの書き込みを行う簡単なテスト、および最後にテストを整理するティアダウンが含まれます。メインのテストケースセクションに独自のテストアサーションを含めることで、このテストをさらに拡張することができます。

単体テストプロジェクトを作成します (下記のリンクを参照)。
COBOL エクスプローラーで、プロジェクトが選択されていることを確認し、[File > New > COBOL Unit Test] をクリックします。
[New COBOL Unit Test] ダイアログボックスが表示されます。
[Containing project] フィールドに単体テストプロジェクトの名前が表示されていることを確認します。
[New file name] フィールドにテストフィクスチャプログラムの名前を入力します。
[Create Unit Test from Template] を選択し、[Micro Focus template] を選択します。
[Finish] をクリックします。
1 つのテストケースに必要なスケルトンコードを含むテストフィクスチャファイルが単体テストプロジェクト内に作成されます。

この簡単なサンプルテストではデータファイルを使用するため、configuration section に次のコードを追加します。

input-output section.
       file-control.
       select cust assign to 'cust.txt'
       organization is line sequential.

さらに、data division の行の直後に次のコードを追加します。

       file section.
       fd cust.
       01 cust-file.
          03 customer-id    pic 9(5).
          03 customer-info  pic x(65).

entry MFU-TC-SETUP-PREFIX & TEST-program-name の行の直後に次の文を追加します。
```
       open output cust
```
これにより、ファイルを開くことでテストが設定され、テストケース自体で実行されるファイル操作の準備が整います。

MFU-TC-METADATA-SETUP-PREFIX & TEST-program-name エントリポイントには、テストケースに関する詳細が含まれています。
MFU-TC-METADATA-SETUP-PREFIX & TEST-program-name エントリポイントの最初の文を次のように編集します。
```
move "This is a simple test to write to a data file" to MFU-MD-TESTCASE-DESCRIPTION
```
テストケース内の entry MFU-TC-PREFIX & TEST-program-name の行の直後に次のコードを追加します。
```
       move 0 to customer-id
       perform 100 times
        add 1 to customer-id
        move "A customer" to customer-info
        write cust-file
       end-perform.
```
テストケースでファイルに対する簡単な書き込み操作が実行され、失敗するとテストケースが失敗としてマークされます。これは、独自のテストアサーションを追加するセクションでもあります。詳細については、「テスト結果の判定」を参照してください。
entry MFU-TC-TEARDOWN-PREFIX & TEST-program-name の行の直後に次の文を追加します。
```
       close cust.
```
ティアダウンセクションは環境を整理します。

テストケースが完成し、実行する準備ができました。「単体テストの実行」を参照してください。

例 - テスト ケースの作成

例 - テストケースの作成