I have sort job in which i need to include the dataset member using Include statement.
INCLUDE : COMPTKEY
// DD DSN=AA.TEST.COMPLAIN.LIST1,DISP=SHR
Job
//idT JOB IGUCID0000,'EXTRACTS',
// CLASS=2,MSGCLASS=X,NOTIFY=&SYSUID
//*
//STEP JCLLIB ORDER=AA.TEST.TASKS.JCLCARD
//STEP4 EXEC PGM=SORT
//SORTIN INCLUDE MEMBER=COMPTKEY
//SORTOUT DD DSN=AA.TEST.COMPLAIN.LIST5,
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,
// SPACE=(CYL,(1,1),RLSE),
// DCB=(RECFM=FB,LRECL=23,BLKSIZE=0)
//SORTWK01 DD SPACE=(CYL,2),UNIT=TEMPDA
//SORTWK02 DD SPACE(CYL,2),UNIT=TEMPDA
//SYSOUT DD SYSOUT=*
//SYSIN DD *
OPTION COPY
/*
I have submitted this job.But its showing JCL ERROR 'EXPECTED CONTINUATION NOT RECEIVED' for the include statement.Here the include librarey is expanded but '\\' are not getting displayed .
Spool display
3 //STEP4 EXEC PGM=SORT
//*SORTIN DD DSN=AA.TEST.COMPLAIN.LIST1,DISP=SHR
4 // INCLUDE MEMBER=COMPTKEY
5 XXSORTIN DD DSN=AA.TEST.COMPLAIN.LIST1,DISP=SHR
6 //SORTOUT DD DSN=AA.TEST.COMPLAIN.LIST5,
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,
// SPACE=(CYL,(1,1),RLSE),
// DCB=(RECFM=FB,LRECL=23,BLKSIZE=0)
Can anyone help me out??????
Problem with INCLUDE
Moderators: Frank Yaeger, DikDude, Moderator Group
-
- Member
- Posts: 3
- Joined: Sun May 21, 2006 11:26 pm
Hi,
I tested the same case and is working fine.Here is the code.
Thank you
Krishy
[/code]
I tested the same case and is working fine.Here is the code.
Code: Select all
//PS020 EXEC PGM=ICETOOL
//SYSOUT DD SYSOUT=*
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//TEMP INCLUDE MEMBER=TEMP
//OUT1 DD DSN=XXX.OUT,
// DISP=(,CATLG,DELETE),
// UNIT=SYSDA,
// SPACE=(TRK,(25,25),RLSE),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
//TOOLIN DD *
SORT FROM(IN1) TO(OUT1) USING(CTL1)
//CTL1CNTL DD *
SORT FIELDS=COPY
THE MEMBER TEMP IS DEFINED LIKE THIS
//IN1 DD DSN=xxx.input,DISP=SHR
Krishy
[/code]
- dbzTHEdinosauer
- Moderator
- Posts: 981
- Joined: Mon Oct 02, 2006 8:31 pm
-
- Member
- Posts: 12
- Joined: Wed Nov 08, 2006 1:03 am
-
- Member
- Posts: 6
- Joined: Tue Jul 18, 2006 12:36 pm
Rahul
In your member COMPTKEY giveon command line..save it and then retry your JCL.
In your member COMPTKEY give
Code: Select all
C ALL 70 85 P'=' ' '
Thanks
justaprogrammer
justaprogrammer
FREE TUTORIALS
Tutorials
Free tutorials from mainframegurukul
- JCL Tutorial
Covers all important JCL concepts. - Cobol Tutorial
This tutorials covers all Cobol Topics from STRING to COMP-3. - DB2 Tutorial
DB2 Tutorial focuses on DB2 COBOL Programming. - SORT Tutorial
This Tutorial covers all important aspects of DFSORT with examples - CICS Tutorial
This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions
- Cobol Interview Questions
50+ Interview Questions - JCL Interview Questions
50+ Interview Questions - DB2 Interview Questions
100+ Interview Questions - CICS Interview Questions
70+ Interview Questions - VSAM Interview Questions
27 Interview Questions
Other References
Mainframe Tools and others
- XPEDITER Reference
Explains how we can debug a program - FILEAID Reference
Explains how to browse , edit and delete datasets - Change Man Reference
Quick Start tutorial on Changeman - Abend Reference
Important Abend codes explained - FaceBook Page
MainframeGurukul FaceBook Page - LinkedIn Page
MainframeGurkul Linkedin Page