Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
DCLGEN for COBOL - Additional comments

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DB2
View previous topic :: :: View next topic  
Author Message
op

New User


Joined: 31 Oct 2006
Posts: 48
Location: Chennai

PostPosted: Tue Jun 03, 2008 5:01 pm    Post subject: DCLGEN for COBOL - Additional comments
Reply with quote

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
Back to top
View user's profile Send private message

Manuneedhi K

Active User


Joined: 07 May 2008
Posts: 115
Location: Chennai

PostPosted: Thu Jun 05, 2008 2:50 pm    Post subject:
Reply with quote

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?
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10374
Location: italy

PostPosted: Thu Jun 05, 2008 2:57 pm    Post subject: Reply to: DCLGEN for COBOL - Additional comments
Reply with quote

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
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DB2 All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. Cobol to fetch the content by using s... arunc55 COBOL Programming 4 Fri Nov 17, 2017 1:25 pm
No new posts VBS and VB, COBOL syntax is the same ... natt.sut COBOL Programming 3 Sun Nov 12, 2017 6:36 am
No new posts COBOL - EXIT statement weird behavior anthony.pangestu COBOL Programming 0 Fri Oct 27, 2017 9:57 am
No new posts IEW2456E error when link-editing a C ... Senthilraj JCL & VSAM 0 Fri Oct 13, 2017 3:12 pm
No new posts Assembler Macro Copybook converted to... Ziquilix PL/I & Assembler 4 Tue Sep 26, 2017 3:07 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us