データ部

レベル番号は、1から49の間の数字、または66、77、88のいずれかを指定することができます。

01および77は、領域Aで開始する必要があり、データ名、FILLER、またはその他のデータ記述節と空白文字で区切られる必要があります。

1桁のレベル番号1から9を指定した場合は、レベル番号01から09を指定した場合と同様に処理します。

データ記述項目は、最初の項目と同じ列から開始することも、またはレベル番号に合わせてインデントすることもできます。インデントはコードの可読性を高めるためのもので、インデントしてもレベル番号に変化はありません。インデントする列数は、領域Bのサイズを超えない限り、制限はありません。

data-name-1は、プログラム内のデータ項目を区分する識別子です。data-name-1は必ずレベル番号の直後に記述する必要があります。

data-name-1は、レベル66およびレベル88の項目に対しては必ず記述する必要があります。

FILLERは、メモリの境界を整列するために指定します。FILLERに指定された項目は、プログラム内で参照することができません。

FILLERキーワードはオプションです。FILLERを指定する場合は、レベル番号の直後に続けて指定する必要があります。

FILLERは条件変数には指定できますが、条件名には指定することができません。

MOVE CORRESPONDINGステートメント、ADD CORRESPONDINGステートメント、またはSUBTRACT CORESPONDINGステートメントを実行時には、FILLER項目は無視されます。また、INITIALIZEステートメントの実行時にも、FILLER項目は無視されます。

integer-2は、表のサイズを指定する値で、0より大きい正の整数値を指定します。

ASCENDINGまたはDESCENDINGの指定に応じて、データが昇順または降順に並べ替えられます。データの並べ替え順序は、data-name-2の値に基づいて決定されます。

以下は、data-name-2項目についての説明です。

ASCENDING KEY句またはDESCENDING KEY句を指定する場合は、次の規則に従います。

INDEXED BY句は、その表で使用される指標を指定します。

PICTURE文字列に 記号Aだけを指定できる項目です。項目の値には、ラテン・アルファベットと空白文字、表意定数の記号文字だけを含めることができます。

英字項目は、USAGE DISPLAYを明示的に指定するか、または暗黙的に指定されているとみなします。

PICTURE文字列に 9、P、V、S記号だけを指定できる項目です。

USAGE節に、2進数、パック10進数（内部10進数）、ゾーン10進数（外部10進数）が指定されている数字項目です。

数字項目のタイプは、次の表のとおりです。

内部10進数およびゾーン10進数タイプの場合、指定可能な桁数は最大31桁までです。

VALUE節で指定可能な項目は、数値リテラルまたは表意定数ZEROです。

以下は、PICTURE記号の有効範囲の例です。

PICTURE文字列として指定した記号によって、特定の位置に特定の文字を挿入したり、特定の文字を置き換えたりする項目です。

PICTURE文字列に、 B P V Z 9 0 / , . + - CR DB * cs記号を指定できます。

数字編集項目には、以下のような規則が適用されます。

最大31桁の数字を指定できます。

PICTURE文字列の最大文字数は、249を超えることができません。

USAGE DISPLAYを指定した場合、VALUE節には英数字リテラルまたは表意定数を指定する必要があります。

PICTURE文字列に、 Xだけが指定されているか、または X、A、9の組み合わせで指定されている項目です。項目の値は、コンピュータの文字セットで指定可能なすべての文字を含むことができます。項目は、すべての文字が記号Xで構成されているとみなされます。

英数字項目は、USAGE DISPLAYを明示的に指定するか、または暗黙的に指定されているとみなします。

VALUE節には、英数字リテラルを指定するか、またはZERO、SPACE、QUOTE、HIGH-VALUE、LOW-VALUE、記号文字、ALL英数字リテラルなどの表意定数を指定することができます。

PICTURE文字列に、A、X、9、B、0、/ を指定できます。

PICTURE文字列には、少なくとも1つのAまたはX、少なくとも1つのBまたは0または /が含まれている必要があります。

英数字編集項目は、USAGE DISPLAYを明示的に指定するか、または暗黙的に指定されているとみなします。

VALUE節には、英数字リテラルを指定するか、またはZERO、SPACE、QUOTE、HIGH-VALUE、LOW-VALUE、記号文字、ALL英数字リテラルなどの表意定数を指定することができます。

PICTURE文字列に、記号Gを指定する項目であり、1つの記号Gに対応する1文字は2バイトの記憶領域を占有します。

PICTURE記号Gを指定する場合は、USAGE DISPLAY-1を明示的に指定するか、または暗黙的に指定されているとみなします。

VALUE節には、DBCSリテラル、表意定数SPACE、または表意定数ALL DBCSリテラルを指定する必要があります。

外部浮動小数点項目は、符号、仮数、E、符号、指数で構成されます。

USAGE DISPLAYを指定すると、DISPLAY浮動小数点データ項目として定義します。

V以外のすべての文字は、実際の記憶領域を占有します。

OCCURS、REDEFINES、RENAME節は、外部浮動小数点項目と一緒に指定することができます。

BLANK WHEN ZERO、JUSTIFIED、VALUE節は、外部浮動小数点項目と一緒に指定することができません。

SIGN、SYNCHRONIZED節を指定した場合、その節は無視されます。

想定小数点を基準にデータを位置合わせします。必要に応じて、切り捨てや0埋めが行われます。

想定小数点が指定されていない場合は、データの右端に想定小数点が指定されていると仮定し、データの位置合わせをします。

小数点を基準にデータの位置合わせをします。必要に応じて、左端または右端から切り捨てや0埋めが行われます。

フィールドの左端に小数点があると仮定し、この小数点以下の数字を左揃えします。

データは左揃えされます。それに応じて、指数も調整されます。

データは左揃えされます。必要に応じて、切り捨てや0埋めが行われます。

JUSTIFIED節が指定されている場合、位置合わせ規則に基づいてデータの位置合わせが行われます。

単純挿入による編集

特別挿入による編集

固定挿入による編集

浮動挿入による編集

ゼロ抑制と置換による編集は、ゼロ以外の数字の左側にある0を空白またはアスタリスク（*）で置き換えます。PICTURE文字列にZ、*、+、-、cs記号を指定します。Z、*、+、-、cs記号は、組み合わせて指定することができません。

小数点の左側のすべての文字位置または一部をゼロ抑制記号で指定する場合、最も左端にある0​​以外の数字の直前までゼロ抑制が行われます。

小数点の左右をゼロ抑制記号で指定し、データ項目の値が0の場合は、指定したゼロ抑制記号が編集されます。

ゼロ抑制と置換による編集は、次の規則に従います。

以下は、ゼロ抑制の例です。（bは空白を示します）

data-name-2によって指定されたデータ領域の別のデータ記述です。data-name-1を再定義する項目、またはREDEFINES節のサブジェクトといいます。

data-name-1だけでなく、data-name-1に従属する項目は、VALUE節を設定してはなりません。

data-name-1またはFILLERを指定しない場合は、REDEFINES節はレベル番号の直後に指定する必要があります。

data-name-2を再定義される項目、またはREDEFINES節のオブジェクトといいます。

data-name-2は、REDEFINES節を指定することができます。しかし、OCCURS節は指定できません。ただし、data-name-2の上位項目にはOCCURS節を指定することができます。

新しくグループ化された項目を識別する識別子です。

レベル66の項目は、レベル01、レベル77、レベル88、または別のレベル66の項目を再定義することはできません。

data-name-1は、レベル01の項目により修飾することができますが、他の項目の修飾子としては使用できません。

data-name-2およびdata-name-3は、それぞれ新しくグループ化する最初のデータ項目と最後のデータ項目の識別子であり、基本データ項目または英数字グループ項目を指定することができます。

この2つのデータ名は、同じ項目を表すことはできません。両方とも修飾することはできます。

data-name-2、data-name-3、またその上位項目には、OCCURS節を指定することができません。また、data-name-2とdata-name-3の間にある項目には、OCCURS DEPENDING節を指定することができません。

THROUGHの略語です。

BINARY USAGEは、バイナリ・データ項目を表現します。負数は、同じ絶対値を持つ正数の2の補数法によって表現されます。

USAGE節に指定したBINARY、COMPUTATIONAL、COMP、COMPTATIONAL-4、COMP-4は、すべてバイナリ・データを表現する方法です。

バイナリ・データは、ビッグ・エンディアンです。符号付きバイナリ・データで、符号は左端ビットに含まれます。

バイナリ・データの記憶領域のサイズは、以下のようにPICTURE節の指定に基づいて決定されます。

パック10進数項目を指定します。1バイトの中に2つの数字が保存され、最後のバイトの4ビット内には、符号が保存されます。

PACKED-DECIAML、Computational-3、COMP-3はパック10進数データを表現する方法です。

単精度を持つ内部浮動小数点項目で、4バイトの記憶領域を占めます。

COMPUTATIONAL-1、COMP-1は、すべて内部浮動小数点データを表現する方法です。

長精度を持つ内部浮動小数点項目で、8バイトの記憶領域を占めます。

COMPUTATIONAL-2、COMP-2は、すべて長精度浮動小数点データを表現する方法です。

USAGE COMP-5に指定された項目は、バイナリ・データと同様に記憶領域に表現されます。

以下は、PICTURE文字列の指定に応じて、記憶領域と保存できる最大値および最小値をまとめた表です。

COMP-5タイプは、主にCOBOLプログラム以外のプログラムとデータをやり取りするときに使用されます。バイト順は、プログラムが実行されているコンピュータのバイト順と同じです。

COMP-5データ項目で位取り因数を表現することができます。たとえば、PICTURE S99V99 COMP-5というデータがある場合、範囲は-327.68 ~ +327.67です。

外部10進数項目はゾーン10進数項目とも呼ばれ、1つの数字は1バイトを占めます。各バイトの上位4ビットはゾーン・ビットであり、最下位バイトのゾーン・ビットは数字の符号を表します。各バイトの下位4ビットには数字を保存します。

外部10進数項目は最大31桁の数字を表現することができます。

外部10進数のPICTURE文字列には、9、S、V、Pのみを使用することができます。

SPACE、ZEROなどの表意定数は、その表意定数が意味する文字または数字で置き換えられます。

数字項目に指定するVALUE値のリテラルは、数字である必要があります。WORKING-STORAGEまたはLOCAL-STORAGEの項目にVALUE値を指定する場合、指定したリテラル値は数値の移動の規則に従って位置合わせされます。また、ゼロ以外の数字を切り捨てる必要のあるリテラル値は指定することができません。リテラル値が符号付きである場合は、PICTURE文字列に符号記号を指定する必要があります。

VALUE値に指定する数値リテラルは、その項目のPICTURE節に指定した範囲内の数値である必要があります。

USAGE DISPLAYが指定された英字、英数字、英数字編集、数字編集項目にVALUE値を指定する場合、指定可能なリテラル値は英数字リテラルまたは表意定数であり、指定した文字数は項目のサイズを超えてはなりません。

英数字グループにVALUE値を指定する場合、その値は英数字リテラルまたは表意定数である必要があり、指定した文字のサイズは、グループ項目のサイズを超えてはなりません。

DBCS項目にVALUE値を指定する場合、その値はDBCSリテラル、表意定数SPACE、または表意定数ALL DBCSリテラルである必要があります。また、指定した文字のサイズは、データ項目のサイズを超えてはなりません。

内部浮動小数点項目のCOMP-1、COMP-2項目にVALUE値を指定する場合、その値は浮動小数点リテラル、表意定数ZERO、または整数および10進数形式のリテラル0である必要があります。