COMP-1
一种指定内部浮点项的 4 字节、单精度浮点 Real 数据类型。 该符号包含在最左侧字节的第一位中，指数包含在该字节的其余七位中。 其余三个字节保留 mantissa。
COMP-2
指定内部浮点项的 8 字节、双精度浮点 Real 数据类型。 该符号包含在最左侧字节的第一位中，指数包含在第一个字节的剩余七位中。 其余七个字节保留 mantissa。
COMP-3 打包的十进制数
打包的十进制数据类型，指定以打包十进制格式存储的内部十进制项。 在打包的小数格式中，字段中的每个字节都表示两个数字数字，但最右边的字节除外。 最右侧的字节包含一个数字和符号。 换而言之，每个字符位置都有两个数字，但尾随字符位置由低序数字和符号占用。 该项可以包含 0 到 9 之间的任意数字，加上一个符号，表示不超过 18 位小数位数的值。 例如，十进制值 +123 以 2 个字节表示为 0001 0010 0011 1100，采用打包的小数格式。 有关详细信息，请参阅 Zoned Decimal 或 Packed Decimal 数据类型。
DISPLAY Zoned Decimal
一种未打包的十进制数据类型，指定以区域小数格式存储的内部十进制项。 区域十进制格式是未打包的小数格式的同义词，它是表示数字的格式，其中每个数字都包含在位 4 到 7 中，符号包含在最小有效字节的位 0 到 3 中。 除最小有效字节以外的所有字节中的 0 到 3 位包含 1（十六进制 F）。 例如，十进制值 +123 以三个字节表示为 1111 0001 1111 0010 1100 1100 0011（以带区域十进制格式）。 有关详细信息，请参阅 Zoned Decimal 或 Packed Decimal 数据类型。
日期和时间
通过使用两个 PIC 9（7） COMP-3 打包十进制值的组项指定日期和时间。
仅限时间
使用 PIC 9（7） COMP-3 打包的十进制值指定时间。
仅日期
使用 PIC 9（7） COMP-3 打包的十进制值指定日期。
PIC X
指定扩展二进制编码十进制交换代码（EBCDIC）字符串中的单个字符。 EBCDIC 是大型机和 IBM i 计算机上的字符数据的本机表示形式。 Unicode 是基于 Windows 的平台上的字符数据的本机表示形式。
PIC X 无翻译
在 EBCDIC 字符串中指定单个 COBOL 字符，该字符串的处理方式就像是二进制数据一样。 换句话说，没有从 EBCDIC 转换为 Unicode 或从 Unicode 转换为 EBCDIC。
PIC G
指定双字节 EBCDIC 字符串。
PIC S9（4） COMP （整数 16 位）
指定长度为 16 位或 2 字节的整数。
PIC S9（9） COMP （整数 32 位）
指定长度为 32 位或 4 个字节的整数。