IBM 拡張機能と COBOL 規格

DBCS 文字で書かれたコンピューター名

クラス名 (オブジェクト指向用)

メソッド名

下線をユーザー定義語に含めることはできますが、先頭文字には使用できません。

USAGE DISPLAY を使用した UTF-8 に対する許可

データ・カテゴリーが国別、国別編集、数字、数字編集、外部 10 進数、および外部浮動小数点の場合の USAGE NATIONAL

NATIONAL句を伴うGROUP-USAGE句

ナショナルリテラル （10進数および16進数）

比喩的な定数 SPACE、ZERO、QUOTE、HIGH-VALUES、LOW-VALUES、ALL リテラルに対する国民性値

データ変換のための組み込み関数

• DISPLAY-OF
• NATIONAL-OF

UPPER- CASE および LOWER- CASE 関数を使用した拡張ケースマッピング

• SELF
• SUPER

特殊レジスター

• ADDRESS OF
• JNIENVPTR
• JSON-CODE
• JSON-STATUS
• LENGTH OF
• RETURN-CODE
• SHIFT-IN
• SHIFT-OUT
• SORT-CONTROL
• SORT-CORE-SIZE
• SORT-FILE-SIZE
• SORT-MESSAGE
• SORT-MODE-SIZE
• SORT-RETURN
• TALLY
• WHEN-COMPILED
• XML-CODE
• XML-EVENT
• XML-INFORMATION
• XML-NAMESPACE
• XML-NAMESPACE-PREFIX
• XML-NNAMESPACE
• XML-NNAMESPACE-PREFIX
• XML-NTEXT
• XML-TEXT

ポインター用およびオブジェクト・リファレンス用の NULL および NULLS

英数字リテラル (混合リテラル) での 1 バイト文字と 2 バイト文字 の混合

英数字リテラルの16進表記は、開始デリミタ X" で定義される。 X'

ヌル文字で終端する英数字リテラルは、開始デリミタ Z" で定義され、 Z'

DBCS リテラルは、開始デリミタ N" 、 N' 、 G" 、 G' で定義されます。 NSYMBOL(DBCS) コンパイラー・オプションが有効な場合、N" と N' は DBCS として定義されます。

連続した英数字リテラル (最初のリテラルを継続される行の列 72 で終了し、次のリテラルを継続行内で引用符を使用して開始することにより、2 つの連続した英数字リテラルをコーディングします)。

国語リテラルN"、 N'、 NX"、 NX'リテラルコンテンツを国別文字として保存します。 NSYMBOL(NATIONAL) コンパイラー・オプションが有効な場合、N" と N' は国別として定義されます。

19 (から 31) 桁の固定小数点数字リテラル。 [ 85 COBOL 規格では、最大18桁を規定しています。]

浮動小数点数字リテラル。

マルチバイト文字を含むコメント行およびコメント項目

インライン・コメント

• END CLASS
• END FACTORY
• END METHOD
• END OBJECT

相対添え字付けにおける演算子 + または - の後の正符号付き整数リテラルの指定。

RECURSIVE 節

PROGRAM-ID、AUTHOR、INSTALLATION、DATE-WRITTEN、および SECURITY 段落ヘッダーの後のオプショナル分離文字ピリオド。 [ 85 COBOL 規格では、これらの段落見出しの後にそれぞれピリオドを付けることが要求されています。]

PROGRAM-ID 段落内のプログラム名の後のオプショナル分離文字ピリオド。 [ 85 COBOL 規格では、プログラム名の後にピリオドを付けることが要求されます。]

PROGRAM-ID 段落内のプログラム名を示す英数字リテラル。最外部プログラムの名前に 文字 $、#、および @ を使用可能。下線を先頭文字にすることが可能。プログラム名の長さは最大 160 文字。 [ 85 COBOL 標準は、プログラム名をユーザー定義語として指定することを要求する。]

• CLASS-ID 段落
• INHERITS 節
• END CLASS マーカー

メソッド定義内:

• METHOD-ID 段落
• EXIT METHOD ステートメント
• END METHOD マーカー

節がコーディングされていない場合に、最後の節の後にピリオドを加えるかどうかのオプション。 [ 85 COBOL 規格では、句がコード化されていない場合でもピリオドが必要です。]

複数の通貨記号に関する条項。 [ 85 COBOL 標準では、単一の通貨記号句を許可します。]

CURRENCY SIGN 節の WITH PICTURE SYMBOL 句

CURRENCY SIGN 節での複数文字および大/小文字混合の通貨符号 (WITH PICTURE SYMBOL 句が指定されている場合)。 [ 85 COBOL 規格では、通貨記号と通貨図形記号の両方を兼ねた単一文字のみが許可されています。 標準通貨符号は、以下のものであってはなりません。

• 標準ピクチャー・シンボルのいずれかと同じ文字
• 0 から 9 桁
• いずれかの特殊文字 * + - , ; ( ) " = /
• スペース ]

通貨符号としての小文字の英字の使用。 [ 85 COBOL 標準は、大文字のみを許可します。]

「FILE CONTROL」の場合の file-control-paragraph のオプション。 構文が指定されていますが、コンパイル単位にファイルが定義されていません。 [ 85 COBOL 規格では、「INPUT-OUTPUT SECTION」の場合、ファイル制御段落を符号化することが要求される。] がコーディングされます。]

PASSWORD 節

FILE STATUS節の 2番目のデータ名

ALTERNATE RECORD KEY節における RECORDのオプション性。 [ 85 COBOL 規格では「RECORD」という語の使用が要求される。]

数字、数字編集、英数字編集、英字、内部浮動小数点、外部浮動小数点、国別、国別編集、または DBCS の基本項目あるいは代替レコード・キー・データ項目。 [ 85 COBOL 規格では、キーが英数字であることが要求されます。]

可変長レコードを含む索引ファイル用の最小レコード・サイズの範囲外で定義された基本または代替レコード・キー。 [ 85 COBOL 規格では、主レコードキーと代替レコードキーは最小レコードサイズ内に収めることが要求される。]

FILE STATUS節で DISPLAYまたはNATIONALとして使用される数値データ項目。 [ 85 COBOL 規格では、英数字のファイルステータスデータ項目が要求される。]

「ORGANIZATION IS LINE SEQUENTIAL」節と行順ファイル制御形式

パディング文字句における全角文字

順次、索引付き、およびソート・マージ形式の I-O-control 項目の SAME 節に 1 つのファイル名のみを指定。 [ COBOL 85 標準は、少なくとも2つのファイル名を要求します。]

RERUN 節のキーワード ON のオプション。 [ 85 COBOL 規格では、ON をコード化することが要求されます。]

行順次形式の I-O-control 項目

ソート・マージ I-O-control 項目の RERUN 節

LINKAGE SECTIONのGLOBAL 節

データ記述項目の同じ階層レベルにある他のレベル番号よりも低いレベル番号の指定。 [ 85 COBOL 標準では、階層構造において同一レベルにあるすべての基本項目またはグループ項目には、同一のレベル番号を割り当てることを要求している。]

内部浮動小数点、外部浮動小数点、DBCS、国別、および国別編集のデータ・カテゴリー

USAGE NATIONAL の数字データ・カテゴリー

USAGE NATIONAL の数字編集データ・カテゴリー

RECORDING MODE 節

行順次形式ファイル記述項目

• BLOCK CONTAINS
• LABEL RECORDS
• VALUE OF
• LINAGE
• CODE-SET
• 脚注付き
• 列

複合 OCCURS DEPENDING ON。 [ 85 COBOL 標準では、OCCURS DEPENDING ON を含むエントリは従属エントリのみが続くこと、また OCCURS DEPENDING ON を含むエントリは OCCURS DEPENDING ON を含むエントリの従属エントリになってはならないと規定している。]

キー名が固有でない場合の、修飾子なしで指定されたキーの暗黙の修飾

INDEXED BY 句の指定がないテーブルの索引付けによる参照

ASCENDING/DESCENDING KEY 句の、 USAGE COMPUTATIONAL-1、 COMPUTATIONAL-2、 COMPUTATIONAL-3、 COMPUTATIONAL-4、 および COMPUTATIONAL-5 のキー

参照されない固有でない索引名の受け入れ

無制限のテーブルとグループ

ピクチャー・シンボル G および N

ピクチャー・シンボル E および外部浮動小数点ピクチャー・フォーマット

PICTURE 節がデータ記述項目の最後の節ではない場合の、 直後に分離文字コンマまたは分離文字セミコロンが付く末尾コンマ挿入文字または末尾ピリオド挿入文字のコーディング [ 85 COBOL 規格では、カンマまたはピリオドで終わる画像を含む PICTURE 節がエントリの最後の節であり、その直後に区切りピリオドが続くことが要求される。]

CURRENCY コンパイラー・オプションを使用した通貨符号および通貨記号の選択

大文字小文字が区別される通貨記号

USAGE DISPLAY および PACKED-DECIMAL の数値項目および USAGE DISPLAY の数字編集項目に対する最大 31 桁の指定

BINARY、COMPUTATIONAL、または COMPUTATIONAL-4 の使用法で記述されたデータ項目の値に対する TRUNC コンパイラー・オプション の影響

従属レベルでの、再定義データ項目よりサイズが大きいデータ項目の再定義の指定

• NATIVE
• COMP-1 および COMPUTATIONAL-1
• COMP-2 および COMPUTATIONAL-2
• COMP-3 および COMPUTATIONAL-3
• COMP-4 および COMPUTATIONAL-4
• COMP-5 および COMPUTATIONAL-5
• DISPLAY-1
• OBJECT REFERENCE
• NATIONAL
• POINTER
• PROCEDURE-POINTER
• FUNCTION-POINTER

USAGE INDEX の項目に対する SYNCHRONIZED 節の使用

DISPLAY 以外の USAGE を持つグループでの条件名項目に対する VALUE 節

VALUE IS NULL および VALUE IS NULLS

セクション名が省略されている場合の段落名の省略

メソッド、ファクトリー、またはオブジェクトの手続き部

PROCEDURE DIVISION のヘッダーで USING 句を使用しない LINKAGE SECTION のデータ項目の参照 (それらのデータ名 が ADDRESS OF 句または ADDRESS OF 特殊レジスターのオペランドである場合)

以下のステートメント:

• エントリー
• EXIT METHOD
• GOBACK
• INVOKE
• JSON PARSE
• JSON GENERATE
• XML PARSE
• XML GENERATE

RETURNING句

データ項目が記述にREDEFINES節を持つ場合 、USING句でデータ項目を指定する

USING句で指定する、あるデータ項目の複数のインスタンス

メソッド、ファクトリ、オブジェクト定義のフォーマット

宣言型プロシージャーからの非宣言型プロシージャーの実行

宣言型プロシージャーの GO TO ステートメントにおける宣言型プロシージャーまたは非宣言型プロシージャーの参照。 [ 85 COBOL 標準は、宣言的プロシージャが非宣言的プロシージャを参照してはならないと規定している。 別の宣言型プロシージャーまたは非宣言型プロシージャーからの宣言型プロシージャーの参照は、PERFORM ステートメントを使用した場合のみ許可されます。]

アクティブ宣言の実行

宣言の後、または宣言がない場合のセクション・ヘッダーの省略。 [ 85 COBOL 規格では、「宣言部」の後にセクション見出しを配置することが要求される。] 構文および「END DECLARATIVES」の後に記述します。 構文.]

宣言がない場合の初期段落名 の省略。 [ 85 COBOL 規格では、以下の状況において段落名が必要です：

• 宣言型プロシージャーにステートメントがある場合は、USE ステートメントの後
• 宣言型プロシージャーの外部のセクション・ヘッダーの後ろ
• 宣言がない場合は、プロシージャー・ステートメント (ある場合) の前

また、 85 COBOL 規格では、手続き文は段落内に記述することが求められています

セクション内に含まれていない段落の指定 (セクション内に含まれている段落がある場合でも指定できる)。 [ 85 COBOL 規格では、宣言文が存在しない場合を除き、段落はセクション内に配置されなければならない。] COBOL 85標準は、すべての段落がセクションに含まれるか、あるいは一切含まれないかのいずれかを要求する

NUMERIC クラス・テストにおける USAGE COMPUTATIONAL-3 または USAGE PACKED-DECIMAL データ項目の指定

データ・ポインター・フォーマット、プロシージャー・ポインターおよび関数ポインター・フォーマット、 およびオブジェクト・リファレンス・フォーマット

索引名の演算式との比較

簡略複合比較条件内の括弧の使用

DATE YYYYMMDD 句

DAY YYYYDDD 句

以下の句 およびパラメーター:

• ADDRESS OF
• LENGTH OF
• OMITTED
• BY VALUE
• RETURNING

引数としての ファイル名 の指定

英字またはゾーン 10 進数データ項目での呼び出されるプログラム名の指定

従属グループ項目として定義された引数の指定。 [ 85 COBOL 標準では、引数は基本データ項目、またはレベル01で定義されたグループ項目であることが要求される。]

取り消すプログラムの名前に対する PGMNAME コンパイラー・オプションの影響

行順次形式

符号付き数字リテラルおよび非整数数字リテラルの表示

• プロシージャー名が指定されていない場合は、単一ステートメント段落内でのみコーディングする
• それ以外の場合は、文の最後のステートメントとしてコーディングする。]

OCCURS 節の DEPENDING 句を含むデータ項目の初期化

LINAGE 節を持つファイルに対する EXTEND 句の指定

複数のアクティブな PERFORMS に対する共通出口

INVALID KEY 句および適当な宣言型プロシージャーの省略

グループ項目ではなく基本英数字項目でもない項目の読み取り

再書き込みされるレコードの中の文字位置の数以外の文字位置の数によるレコードの再書き込み

二分探索フォーマットにおける NEXT SENTENCE 句と命令ステートメントの省略

プロシージャー・ポインターおよび関数ポインター・フォーマット

オブジェクト・リファレンス・フォーマット

英数字以外のカテゴリーのキーの使用

文の最後のステートメント以外のステートメントとしての STOP のコーディング

行順次形式

相対ファイルに対する、置き換えられるレコード内の文字位置の数以外の文字位置の数の書き込み

単一の WRITE ステートメントでの ADVANCING PAGE 句と END-OF-PAGE 句の指定

ファイルに書き込まれるレコードの長さに対する ADV コンパイラー・オプションの影響

カード・パンチ・ファイルに対するスタッカー選択と共に WRITE ADVANCING を使用

相対ファイルまたは索引付きファイルに対する、INVALID KEY 句と適当な例外プロシージャーの省略

関数:

• BIT-OF
• BIT-TO-CHAR
• DATE-TO-YYYYMMDD
• DAY-TO-YYYYDDD
• DISPLAY-OF
• HEX-OF
• HEX-TO-CHAR
• NATIONAL-OF
• ULENGTH
• UPOS
• USUBSTR
• USUPPLEMENTARY
• UUID4
• UVALID
• UWIDTH
• YEAR-TO-YYYY

• BASIS
• CBL(プロセス)
• *CONTROLと*CBL
• DELETE
• EJECT
• INSERT
• READYまたはRESET TRACE
• SERVICE LABEL
• SERVICE RELOAD
• SKIP1、 SKIP2、および SKIP3
• TITLE

テキスト名およびライブラリー名 を指定するためのリテラル

SUPPRESS 句

ネストされた COPY ステートメント

REPLACING オペランドのワード ・フォーム内の最初または最後の文字としてのハイフンの使用

REPLACING オペランドのワード ・フォーム内での任意の文字の使用 (COBOL 区切り文字を除く)。 [ 85 COBOL 標準は、ユーザー定義語の形成に使用される文字のみを受け入れます。]