Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Not able to increase the record length

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

New User


Joined: 20 Jun 2007
Posts: 3
Location: Chennai

PostPosted: Thu May 28, 2009 8:35 pm    Post subject: Not able to increase the record length
Reply with quote

Hi ya,

Below is my JCL from running a datamining query, but when i see the output in sysprint or dataset the output is given in two pages because of selecting many fields. I mean in 2 rows split with the field headers.

Is there any way to bring the headers in a single line and results to be underneath them.


//SYSPRINT DD DSN=TEST.MASAG.SPUFI1,
// DISP=(NEW,CATLG,DELETE),
// SPACE=(CYL,(1,10),RLSE),UNIT=DISK,
// DCB=(RECFM=FB,LRECL=300)
//SYSUDUMP DD SYSOUT=*
//SYSTSIN DD *
DSN SYSTEM(DSND)
RUN PROGRAM(DSNTEP2) PLAN(DSNTEP2) LIB('DEVDB2.SAMPLE.RUNLIB.LOAD')
END
/*
//SYSIN DD *
SELECT A.ABC_NR, A.ABC_STATUS_KODE,
A.ABC_KODE,
B.ABC_NR, B.ABC_KODE, B.ABC_DAT,
C.ABCD_KODE, C.ABCGR_KODE,
D.DEFA_CODE, D.DEFA_CODE, D.DEF_TO_DATE,
E.RRR,
F. QQQQQ, F.EEEEEE
FROM CREATORID. TABLE1 A,
CREATORID.TABLE1S B,
CREATORID.TABLE1T C,
CREATORID.TABLE1A D,
CREATORID.TTABLE1L E,
CREATORID.TABLE1T F
Back to top
View user's profile Send private message

bipinpeter

Active User


Joined: 18 Jun 2007
Posts: 210
Location: Cochin/Kerala/India

PostPosted: Fri May 29, 2009 11:16 am    Post subject:
Reply with quote

Can you try with out giving the LRECL?
Back to top
View user's profile Send private message
Arun Raj

Moderator


Joined: 17 Oct 2006
Posts: 2276
Location: @my desk

PostPosted: Fri May 29, 2009 1:23 pm    Post subject:
Reply with quote

bipinpeter wrote:
Can you try with out giving the LRECL?
bipinpeter,

What makes you believe that this will solve the OP's problem? Have you tried this before posting?

arularasang,

Welcome to the forums.

If you're running the program-DSNTEP2 , output will be in report format and the output dataset must be of LRECL=133.
Instead you can use the unload program-DSNTIAUL which unloads the table data as is to your output file which can have a maximum of 32760 bytes.
See this previous thread for more details.
http://ibmmainframes.com/viewtopic.php?t=35857&highlight=dsntep2
Back to top
View user's profile Send private message
arularasang

New User


Joined: 20 Jun 2007
Posts: 3
Location: Chennai

PostPosted: Mon Jun 01, 2009 7:38 pm    Post subject:
Reply with quote

Thanks Arun,

Its unloading but its giving warning message(RC=0004) that its not a unload from single table though its a join select query.

Please see the message below



DSNT490I SAMPLE DATA UNLOAD PROGRAM
DSNT505I DSNTIAUL OPTIONS USED: SQL
DSNT503I UNLOAD DATA SET SYSPUNCH RECORD LENGTH SET TO 80
DSNT504I UNLOAD DATA SET SYSPUNCH BLOCK SIZE SET TO 80
DSNT506I INPUT STATEMENT WAS NOT A FULL SELECT ON A SINGLE TABLE. LOAD STATEMEN
DSNT503I UNLOAD DATA SET SYSREC00 RECORD LENGTH SET TO 85
DSNT504I UNLOAD DATA SET SYSREC00 BLOCK SIZE SET TO 27965
DSNT495I SUCCESSFUL UNLOAD 100 ROWS OF TABLE TBLNAME
Back to top
View user's profile Send private message
Arun Raj

Moderator


Joined: 17 Oct 2006
Posts: 2276
Location: @my desk

PostPosted: Mon Jun 01, 2009 8:09 pm    Post subject:
Reply with quote

It's just a warning message since your unload does not contain a 'SELECT *' or it does have SELECT FROM multiple tables and hence DSNTIAUL is unable to generate the corresponding LOAD card. See what the manual says about this here

http://publib.boulder.ibm.com/infocenter/dzichelp/v2r2/index.jsp?topic=/com.ibm.db29.doc.msgs/dsnt506i.htm
Back to top
View user's profile Send private message
arularasang

New User


Joined: 20 Jun 2007
Posts: 3
Location: Chennai

PostPosted: Mon Jun 01, 2009 8:54 pm    Post subject:
Reply with quote

Thanks a lot Arun...

Good work...

Keep up the sprit
Back to top
View user's profile Send private message
Arun Raj

Moderator


Joined: 17 Oct 2006
Posts: 2276
Location: @my desk

PostPosted: Mon Jun 01, 2009 9:12 pm    Post subject:
Reply with quote

You're welcome. icon_smile.gif
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
No new posts Adding big TEXT lines to each record ... bshkris SYNCSORT 4 Sat May 06, 2017 1:40 am
This topic is locked: you cannot edit posts or make replies. Merge two files and update Trailer re... Yashashri JCL & VSAM 1 Thu May 04, 2017 12:54 pm
No new posts Length of Tape file Mohan Kothakota JCL & VSAM 9 Thu Apr 20, 2017 10:24 pm
No new posts Sort Large record length cmsmoon DFSORT/ICETOOL 14 Tue Apr 11, 2017 5:49 pm
No new posts Format record to remove Leading zeroes Learncoholic DFSORT/ICETOOL 14 Wed Apr 05, 2017 2:43 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us