View previous topic :: View next topic
|
Author |
Message |
manjunathkv
New User
Joined: 23 May 2006 Posts: 9
|
|
|
|
Can any one please tell me how the null indicator is defined in the DCLGEN |
|
Back to top |
|
|
Bharath Bhat
Active User
Joined: 20 Mar 2008 Posts: 283 Location: chennai
|
|
|
|
Code: |
EXEC SQL DECLARE DEMO.ITEMS TABLE
( ORD_NO INTEGER NOT NULL
,ITEM_NO SMALLINT NOT NULL
,PROD_ID CHAR(4)
,QTY_ORDERED SMALLINT NOT NULL WITH DEFAULT
,QTY_SHIPPED SMALLINT NOT NULL WITH DEFAULT
,AMT_EACH DECIMAL(7, 2) NOT NULL WITH DEFAULT
,DATE_ENTERED TIMESTAMP NOT NULL WITH DEFAULT
,DATE_SHIPPED DATE
,ITEM_NOTES VARCHAR(560)
) END-EXEC.
The COBOL DECLARATION part of copybook file would look something like this:
************************************************************
* COBOL DECLARATION FOR TABLE DEMO.ITEMS
************************************************************
01 DCLITEMS.
10 ITEMS-ORD-NO PIC S9(09) COMP.
10 ITEMS-ITEM-NO PIC S9(04) COMP.
10 ITEMS-PROD-ID PIC X(4).
10 ITEMS-QTY-ORDERED PIC S9(04) COMP.
10 ITEMS-QTY-SHIPPED PIC S9(04) COMP.
10 ITEMS-AMT-EACH PIC S9(05)v9(02) COMP-3.
10 ITEMS-DATE-ENTERED PIC X(26).
10 ITEMS-DATE-SHIPPED PIC X(10).
10 ITEMS-ITEM-NOTES.
49 ITEMS-ITEM-NOTES-LEN PIC S9(04) COMP.
49 ITEMS-ITEM-NOTES-TEXT PIC X(560).
************************************************************
* COBOL INDICATOR VARIABLES FOR TABLE
************************************************************
01 DCLITEMS-NULL.
10 ITEMS-PROD-ID-NULL PIC S9(04) COMP.
10 ITEMS-DATE-SHIPPED-NULL PIC S9(04) COMP.
10 ITEMS-ITEM-NOTES-NULL PIC S9(04)COMP.
************************************************************
* THE NUMBER OF COLUMNS DESCRIBED BY THIS DECLARATION IS 9
************************************************************
|
|
|
Back to top |
|
|
Bharath Bhat
Active User
Joined: 20 Mar 2008 Posts: 283 Location: chennai
|
|
|
|
A little search can provide you with a lot of informations |
|
Back to top |
|
|
manjunathkv
New User
Joined: 23 May 2006 Posts: 9
|
|
|
|
Thanks Bharath |
|
Back to top |
|
|
tomehta
New User
Joined: 18 Aug 2008 Posts: 98 Location: India
|
|
|
|
Hello All,
I have a question related to the DCLGEN utility (as provided with DB2).
DCLGEN will not create specifically, NULL indicators for NULL able column of the table. It creates an array of S9(4) comp. something like below
Code: |
****************************************************************
* INDICATOR VARIABLE STRUCTURE
****************************************************************
01 ITGOVSEQUENCENR.
10 INDSTRUC PIC S9(4) USAGE COMP OCCURS 8 TIMES.
**************************************************************** |
However in the above post by Bharat, NULL indiacators for each nullable column are specified.
Code: |
************************************************************
* COBOL INDICATOR VARIABLES FOR TABLE
************************************************************
01 DCLITEMS-NULL.
10 ITEMS-PROD-ID-NULL PIC S9(04) COMP.
10 ITEMS-DATE-SHIPPED-NULL PIC S9(04) COMP.
10 ITEMS-ITEM-NOTES-NULL PIC S9(04)COMP.
************************************************************
* THE NUMBER OF COLUMNS DESCRIBED BY THIS DECLARATION IS 9 |
************************************************************
my question is how this can be achieved by DCLGEN, ?
Does some extra utility ( or rexx etc) has to used along with DCLGEN,
or
there is some extra parameter to be used in DCLGEN invoke.
regards
I referenced the below DB2 manual
http://publib.boulder.ibm.com/infocenter/dzichelp/v2r2/index.jsp?topic=/com.ibm.db29.doc.comref/db2z_cmd_dsn.htm
supplied below to TSO
Code: |
DSN SYSTEM(DD)
DCLGEN TABLE (CA.TABNAME) -
LIBRARY ('USERID.PDS.DCL(TEST2)') -
LANGUAGE (IBMCOB) -
ACTION (REPLACE) -
NAMES (XXXX-) -
COLSUFFIX (YES) -
LABEL (NO) -
INDVAR (YES) -
APOST
END
|
|
|
Back to top |
|
|
|