Rational Developer for System z
Enterprise COBOL for z/OS バージョン 4.1 コンパイラーおよびランタイム 移行ガイド


位取り整数と非数字との比較に対する修正処置:

CMPR2 での動作を保持するために、位取りされた整数を構造内に定義することができま す。FILLER は、整数の位取り位置のプレースホルダーとしての役割を果たすものであり、ゼロ に初期設定する必要があります。FILLER には、NUM の位取り位置と同じ数だけ英数字位置を定義する必要があります。非数字項目との比較に NUM を使用するときには、NUM を CHARVAL に置き換えてください。
01  CHARVAL.
  05  NUM     PIC 99PP  VALUE 2300.
  05  FILLER  PIC XX    VALUE "00".

      IF CHARVAL EQUAL ALPHA1 DISPLAY "ALPHA1".
      IF CHARVAL EQUAL ALPHA2 DISPLAY "ALPHA2".
      IF CHARVAL EQUAL ALPHA3 DISPLAY "ALPHA3".

ご利用条件 | フィードバック

このインフォメーション・センターでは Eclipse テクノロジーが採用されています。(http://www.eclipse.org)