IBM Support

IT11512: DB2DCLGN -Z OS390 WRITES 05 LEVEL FOR GRAPHIC DATA TYPE

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error 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.
    

Local fix

Problem summary

  • ****************************************************************
    * USERS AFFECTED:                                              *
    * ALL                                                          *
    ****************************************************************
    * PROBLEM DESCRIPTION:                                         *
    * See Error Description                                        *
    ****************************************************************
    * RECOMMENDATION:                                              *
    * Upgrade to DB2 10.5 Fix Pack 9                               *
    ****************************************************************
    

Problem conclusion

  • First Fixed in DB2 10.5 Fix Pack 9
    

Temporary fix

Comments

APAR Information

  • APAR number

    IT11512

  • Reported component name

    DB2 FOR LUW

  • Reported component ID

    DB2FORLUW

  • Reported release

    A50

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2015-09-30

  • Closed date

    2017-05-09

  • Last modified date

    2017-05-09

  • APAR is sysrouted FROM one or more of the following:

  • APAR is sysrouted TO one or more of the following:

Fix information

  • Fixed component name

    DB2 FOR LUW

  • Fixed component ID

    DB2FORLUW

Applicable component levels

[{"Business Unit":{"code":"BU053","label":"Cloud & Data Platform"},"Product":{"code":"SSEPGG","label":"Db2 for Linux, UNIX and Windows"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"10.5","Line of Business":{"code":"LOB10","label":"Data and AI"}}]

Document Information

Modified date:
29 June 2020