|
Problem IT11512
|
Status: Closed |
DB2DCLGN -Z OS390 WRITES 05 LEVEL FOR GRAPHIC DATA TYPE |
| product: |
DB2 FOR LUW / DB2FORLUW / A50 - DB2 |
| Problem description: |
db2dclgn -z OS390 writes unexpected cobol 05 level for GRAPHIC
data type
Problem Reproducible steps:
1. $ repro.sh
----- repro.sh ----------------------
#!/bin/sh
table=test01
schemaname=`echo ${USER} | awk '{print toupper($0)}'`
db2stop force
db2start
db2level
db2diag -A
db2 -v "drop db sample"
db2 -v "create db sample"
db2 -v "connect to sample"
db2 -v "CREATE TABLE ${table} (a INTEGER, b VARCHAR(5), c
GRAPHIC(8) )"
db2 -v "terminate"
rm dclgn105.cbl
db2dclgn -d sample -t ${table} -l cobol -s tdcl -z OS390 -a
REPLACE -o dclgn105.cbl
echo ----- cat dclgn105.cbl -----
cat dclgn105.cbl
---------------------------
Here is the output file dclgn105.cbl
-----
01 TDCL.
10 A PIC S9(9) COMP-5.
10 B.
49 B-LEN PIC S9(4) COMP-5.
49 B-DAT PIC X(5).
05 C PIC G(8) DISPLAY-1.
-----
* The last line 05 is not an expected level. Should be 10. |
| Problem Summary: |
****************************************************************
* USERS AFFECTED: *
* ALL *
****************************************************************
* PROBLEM DESCRIPTION: *
* See Error Description *
****************************************************************
* RECOMMENDATION: *
* Upgrade to DB2 10.5 Fix Pack 9 *
**************************************************************** |
| Local Fix: |
|
| available fix packs: |
DB2 Version 11.1 Mod1 Fix Pack1 iFix001 for Linux, UNIX, and Windows
DB2 Version 11.1 Mod 2 Fix Pack 2 for Linux, UNIX, and Windows
DB2 Version 10.5 Fix Pack 9 for Linux, UNIX, and Windows
Db2 Version 11.1 Mod2 Fix Pack2 iFix001 for Linux, UNIX, and Windows
Db2 Version 11.1 Mod2 Fix Pack2 iFix002 for Linux, UNIX, and Windows
Db2 Version 11.1 Mod 3 Fix Pack 3 for Linux, UNIX, and Windows
Db2 Version 11.1 Mod3 Fix Pack3 iFix001 for Linux, UNIX, and Windows
Db2 Version 11.1 Mod3 Fix Pack3 iFix002 for Linux, UNIX, and Windows
|
| Solution |
First Fixed in DB2 10.5 Fix Pack 9 |
| Workaround |
not known / see Local fix |
| Timestamps |
Date - problem reported :
Date - problem closed :
Date - last modified :
| 30.09.2015
09.05.2017
09.05.2017 |
| Problem solved at the following versions (IBM BugInfos) |
9.0.
|
| Problem solved according to the fixlist(s) of the following version(s) |
| 11.1.1.1
|
 |
