DCLGEN for COBOL - Additional comments

op · New User Joined: 31 Oct 2006 Posts: 48 Location: Chennai

Hi,
I am trying to create COBOL DCLGENs for few tables.

I am running the DSNTEP2 to get the DCLGEN, in batch.

When I mention LABEL (NO), the declaration are perfectly fine.

But, when I mention LABEL (YES), i get additional comment lines in the cobol declartion part.

i.e. for a table EMPDTL
EXEC SQL DECLARE DB2T.EMPDTL TABLE
( EMPNO DECIMAL(9, 0) NOT NULL,
* Employee number *
EMPNAME CHAR(40) NOT NULL,
* Employee name *
EMPGRADE DECIMAL(5, 0) NOT NULL
* Employee grade *
) END-EXEC.

01 EMPDTL.
************************************************************** Employee number
10 ADR-ID PIC S9(9)V USAGE COMP-3.
************************************************************** Employee name
10 SYS-ID PIC X(40).
************************************************************** Employee grade
10 TAB-ID PIC S9(5)V USAGE COMP-3.

An additional comment line appears (this doesn't happen when generating DCLGEN for PL1).
The other parameters are:
LANGUAGE (IBMCOB) -
STRUCTURE (EMPDTL) -
ACTION (REP) -
LABEL (YES)
Could you please let me know if any of the default parameters have to be over-written to remove the additional comment line.

Thanks,
OP

Manuneedhi K · Posted: Thu Jun 05, 2008 2:50 pm

I don't quite get the point in your question.

When LABEL(NO) gives the DCLGEN without the comments/column labels why do you use LABEL(YES) and try to remove the comments?

enrico-sorichetti · Posted: Thu Jun 05, 2008 2:57 pm

please, post ...

using the code tag
- makes reading easier by preserving the record format
without screaming
- red and larger font mean just that
using consistent data names ( use the same columns )
- the sql declare is for some columns, the cobol declarations are for different columns

post the two dclgens label(no)/label(yes) so that we all can undertand the reasons of Your complaints

my guess is that the TS complains about an additional line of asterisks,
but without seeing we cannot tell