5.2.2 COBOL2002のレコード定義を生成するときの規則
COBOL2002のレコード定義を生成するとき，01レベルのデータ名称は表名になります。02レベル以降の変換規則については，次に示すSQLのデータ型から生成されるCOBOL2002のレコード定義に従います。
表5‒2 SQLのデータ型から生成されるCOBOL2002のレコード定義
|
SQLデータ型
|
符号付き／
符号なし
|
生成されるCOBOL2002のレコード定義
|
|
CHAR(n)
|
−
|
02 列名 PIC X(n). |
|
VARCHAR(n)
|
−
|
02 列名.
03 ODBC-length PIC S9(9)
USAGE BINARY.
03 ODBC-char PIC X(n). |
|
LONG VARCHAR
|
−
|
02 列名.
03 ODBC-length PIC S9(9)
USAGE BINARY.
03 ODBC-char PIC X(2000). |
|
DECIMAL(p，s)
|
−
|
02 列名 PIC S9(p-s)V9(s)
SIGN LEADING SEPARATE. |
|
NUMERIC(p，s)
|
−
|
02 列名 PIC S9(p-s)V9(s)
SIGN LEADING SEPARATE. |
|
SMALLINT
|
符号付き
|
02 列名 PIC S9(4) USAGE BINARY. |
|
符号なし
|
02 列名 PIC 9(4) USAGE BINARY. |
|
INTEGER
|
符号付き
|
02 列名 PIC S9(9) USAGE BINARY. |
|
符号なし
|
02 列名 PIC 9(9) USAGE BINARY. |
|
REAL
|
−
|
02 列名 USAGE COMP-1. |
|
FLOAT
|
−
|
02 列名 USAGE COMP-2. |
|
DOUBLE PRECISION
|
−
|
02 列名 USAGE COMP-2. |
|
BIT
|
−
|
02 列名.
03 FILLER PIC 1(7)
USAGE BIT VALUE ZERO.
03 ODBC-bit PIC 1(1) USAGE BIT. |
|
TINYINT
|
−
|
02 列名 PIC X(1). |
|
BIGINT
|
−
|
02 列名 PIC X(20). |
|
BINARY(n)
|
−
|
02 列名 PIC X(n). |
|
VARBINARY(n)
|
−
|
02 列名.
03 ODBC-length PIC S9(9)
USAGE BINARY.
03 ODBC-binary PIC X(n). |
|
LONG VARBINARY
|
−
|
02 列名.
03 ODBC-length PIC S9(9)
USAGE BINARY.
03 ODBC-binary PIC X(2000). |
|
DATE
|
−
|
02 列名.
03 ODBC-year PIC S9(4)
USAGE BINARY.
03 ODBC-month PIC 9(4)
USAGE BINARY.
03 ODBC-day PIC 9(4)
USAGE BINARY. |
|
TIME
|
−
|
02 列名.
03 ODBC-hour PIC 9(4)
USAGE BINARY.
03 ODBC-minute PIC 9(4)
USAGE BINARY.
03 ODBC-second PIC 9(4)
USAGE BINARY. |
|
TIMESTAMP
|
−
|
02 列名.
03 ODBC-year PIC S9(4)
USAGE BINARY.
03 ODBC-month PIC 9(4)
USAGE BINARY.
03 ODBC-day PIC 9(4)
USAGE BINARY.
03 ODBC-hour PIC 9(4)
USAGE BINARY.
03 ODBC-minute PIC 9(4)
USAGE BINARY.
03 ODBC-second PIC 9(4)
USAGE BINARY.
03 ODBC-fraction PIC 9(9)
USAGE BINARY. |
- （凡例）
-
n：長さ（LENGTH）
p：精度（PRECISION）
s：位取り（SCALE）
−：該当しない
- 注
-
「表5‒2 SQLのデータ型から生成されるCOBOL2002のレコード定義」以外のSQLデータ型には対応していません。
ページの先頭へ
