私の状況は次のとおりです。
ファイルから次の作業領域フィールドに入力を読み込んでいます:
WORKING-STORAGE SECTION.
01 WORK-FIELDS.
05 W1-INPUT.
10 TESTCASE-NUMBER PIC X(02).
10 PIC X(01).
10 TESTCASE-ID PIC X(18).
10 PIC X(01).
10 TESTCASE-CONTENT PIC X(20).
TESTCASE-ID の内容に応じて、最終的に TESTCASE-CONTENT フィールドの内容を、次のコピーブックの AMOUNT-DECIMAL-FORMAT または AMOUNT-DECIMAL-NUMBER フィールドに移動する必要があります。
05 (*)AMOUNT.
10 AMOUNT-DECIMAL-FORMAT PIC S9(18) COMP-3.
10 AMOUNT-DECIMAL-NUMBER PIC S9(01) COMP-3.
10 AMOUNT-IN-XML-FORMAT PIC N(20).
次に、これらのパラメーターを処理して AMOUNT-IN-XML-FORMAT フィールドに入力する別のプログラムを呼び出す必要があります。
とにかく、私の質問は次のとおりです。PIC X フィールドの内容を S9 COMP-3 フィールドに移動する最良の方法は何ですか?
お時間をいただきありがとうございます。