Continuation in SYSIN card
Moderators: Frank Yaeger, DikDude, Moderator Group
Continuation in SYSIN card
Hi all,
//SYSIN DD *
COPY FROM(IN01) TO(OUT01,OUT02,OUT03,OUT04,OUT05,OUT06,OUT07,OUT08)
My Question is how to continue the function of SYSIN card on next line.
Jcl works fine, when the SYSIN card is in single line... i.e I can copy upto OUT08.. If I want to copy 20 more file means, how to conjecture it on next line?? please help me on this .
Thanks in advance
//SYSIN DD *
COPY FROM(IN01) TO(OUT01,OUT02,OUT03,OUT04,OUT05,OUT06,OUT07,OUT08)
My Question is how to continue the function of SYSIN card on next line.
Jcl works fine, when the SYSIN card is in single line... i.e I can copy upto OUT08.. If I want to copy 20 more file means, how to conjecture it on next line?? please help me on this .
Thanks in advance
-
- Active Member
- Posts: 732
- Joined: Thu May 24, 2012 4:07 am
-
- Active Member
- Posts: 732
- Joined: Thu May 24, 2012 4:07 am
Hi all,
Thank for your reply.
Below find the error, which I am getting.
ICE632I 0 SOURCE FOR ICETOOL STATEMENTS: TOOLIN
ICE630I 0 MODE IN EFFECT: STOP
COPY FROM(IN01) TO(OUT01,OUT02,OUT03,OUT04,OUT05,OUT06,OUT07,
$
ICE604A 0 ERROR IN KEYWORD, PARAMETER, OR DELIMITER
ICE602I 0 OPERATION RETURN CODE: 12
ICE630I 2 MODE IN EFFECT: SCAN
OUT08,OUT09,OUT10,OUT11,OUT12)
$
ICE614A 0 INVALID OPERATOR
ICE601I 0 DFSORT ICETOOL UTILITY RUN ENDED - RETURN CODE: 12
---------------------------------------
Thanks
Thank for your reply.
Below find the error, which I am getting.
ICE632I 0 SOURCE FOR ICETOOL STATEMENTS: TOOLIN
ICE630I 0 MODE IN EFFECT: STOP
COPY FROM(IN01) TO(OUT01,OUT02,OUT03,OUT04,OUT05,OUT06,OUT07,
$
ICE604A 0 ERROR IN KEYWORD, PARAMETER, OR DELIMITER
ICE602I 0 OPERATION RETURN CODE: 12
ICE630I 2 MODE IN EFFECT: SCAN
OUT08,OUT09,OUT10,OUT11,OUT12)
$
ICE614A 0 INVALID OPERATOR
ICE601I 0 DFSORT ICETOOL UTILITY RUN ENDED - RETURN CODE: 12
---------------------------------------
Thanks
-
- Active Member
- Posts: 732
- Joined: Thu May 24, 2012 4:07 am
willaim,
when I coded like this, it gives RC=12..
COPY FROM(IN01) TO(OUT01,OUT02,OUT03,OUT04,OUT05,OUT06,OUT07, -
OUT08,OUT09,OUT10,OUT11,OUT12)
but when I coded lke below, I get the exact result with RC=0,
COPY FROM(IN01) TO(OUT01,OUT02,OUT03,OUT04,OUT05,OUT06,OUT07)
COPY FROM(IN01) TO(OUT08,OUT09,OUT10,OUT11,OUT12)
Every line have to begin with COPY FROM(IN01) TO(XXXX,XXXY) ... is it so??
when I coded like this, it gives RC=12..
COPY FROM(IN01) TO(OUT01,OUT02,OUT03,OUT04,OUT05,OUT06,OUT07, -
OUT08,OUT09,OUT10,OUT11,OUT12)
but when I coded lke below, I get the exact result with RC=0,
COPY FROM(IN01) TO(OUT01,OUT02,OUT03,OUT04,OUT05,OUT06,OUT07)
COPY FROM(IN01) TO(OUT08,OUT09,OUT10,OUT11,OUT12)
Every line have to begin with COPY FROM(IN01) TO(XXXX,XXXY) ... is it so??
Hello,
The ICETOOL manual says,
Continuation can be indicated by a dash (-) after the operator or any operand. Each operand must be completely specified on one line.
In our case operator was "COPY" &
operands were "FROM" & "TO".
So it looks like operand(in this case "TO") has to be completely specified in a single line and thats the restriction enforced by ICETOOL.
Hope it helps.
The ICETOOL manual says,
Continuation can be indicated by a dash (-) after the operator or any operand. Each operand must be completely specified on one line.
Code: Select all
Example:
COPY FROM(IN1) -
TO(OUT1,OUT2,OUT3) -
USING(ABCD)
operands were "FROM" & "TO".
So it looks like operand(in this case "TO") has to be completely specified in a single line and thats the restriction enforced by ICETOOL.
Hope it helps.
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