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

Senior Member


Joined: 14 Mar 2007
Posts: 10478
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. Issue in suppressing leading zeros &a... Vijay_Sirisha COBOL Programming 21 Thu Jun 07, 2018 8:01 pm
No new posts VBS to VB in COBOL and JCL srajendran2 COBOL Programming 12 Fri Jun 01, 2018 3:04 am
This topic is locked: you cannot edit posts or make replies. Rexx code to find greater then symobl... Bharath Vikraman CLIST & REXX 8 Tue May 29, 2018 9:40 am
No new posts How to convert 2 bytes into single by... pkmurali DB2 6 Fri May 25, 2018 1:41 pm
No new posts SYSADATA - COBOL - Structure displace... ganasrinivasan COBOL Programming 3 Thu May 24, 2018 9:45 pm

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