View previous topic :: View next topic
|
Author |
Message |
mahendrakariya
New User
Joined: 21 Jun 2011 Posts: 7 Location: India
|
|
|
|
My code is as follows:
Code: |
//SORTING DD *
1234567890 abcdeabcedabceda MAINFRAME
0987654321 abcdeacbdeabcdea COBOL
4587965140 abcdeabcdeabcdea JAVA
/*
//SORTOUT DD SYSOUT=*
//SYSIN DD*
SORT FIELDS=COPY
INREC FIELDS=(01:12,18,
19:01,10)
/*
|
When I submit the job, I am getting the following error.
Code: |
ICE201I G RECORD TYPE IS F - DATA STARTS IN POSITION 1
ICE126A 0 INCONSISTENT *INREC IFTHEN 0 REFORMATTING FIELD FOUND
|
How to solve this error? |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
well,
the first time I ran your jcl
i received this message:
Code: |
ICE000I 1 - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R10 - 12:51 ON T
SORT FIELDS=COPY
INREC FIELDS=(01:12,18,
19:01,10)
ICE201I G RECORD TYPE IS F - DATA STARTS IN POSITION 1
ICE023A 0 NO LENGTH OPERAND
ICE056A 0 SORTIN NOT DEFINED
ICE751I 0 C5-K51707 C6-K51707 C7-K54603 C8-K51707 E7-K51707
ICE052I 3 END OF DFSORT
|
after I removed the G from SORTING
my results were:
Code: |
ABCDEABCEDABCEDA M1234567890
ABCDEACBDEABCDEA C0987654321
ABCDEABCDEABCDEA J4587965140
|
|
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
Apart from the spelling of of input DD name, as Dick has pointed out; if you use
instead of
where "b" represents "a space" -- you're entitled to get a(n) JCL error. |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
good catch Anuj,
i have a macro that cleans up jcl (aligns on 12, 16, etc.) and did not notice
the error.
dbz |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
Thanks Dick.
I wonder if the OP didn't get:
Code: |
ICE056A 0 SORTIN NOT DEFINED |
...an error-definition cannot get more clear than this! |
|
Back to top |
|
|
mahendrakariya
New User
Joined: 21 Jun 2011 Posts: 7 Location: India
|
|
|
|
Thanks a lot Dick and Anuj...
Finally it works... |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
Glad to hear that!
have a good one, |
|
Back to top |
|
|
Bill Woodger
Moderator Emeritus
Joined: 09 Mar 2011 Posts: 7309 Location: Inside the Matrix
|
|
|
|
Anuj Dhawan wrote: |
Apart from the spelling of of input DD name, as Dick has pointed out; if you use
instead of
where "b" represents "a space" -- you're entitled to get a(n) JCL error. |
I wonder what the DD* did?
When there are cards in the JCL not preceded by a DD name with DD *, then the system will generate a //SYSIN DD * for free, so even if the above rejected without flushing the job (perhaps more likely a mistake with CODEing it?), there would still be a //SYSIN DD * preceding the sort cards. |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
you are correct, a '//SYSIN DD *' is generated
but after failing the job with a jcl error.
In my system it is:
Code: |
6 IEFC605I UNIDENTIFIED OPERATION FIELD
|
offending statement and generated statement:
Code: |
6 //SYSIN DD*
7 //SYSIN DD * GENERATED STATEMENT
|
|
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
Bill Woodger wrote: |
so even if the above rejected without flushing the job |
Actually it'll flush the Job out with JCL error. I'm with Dick, on this.... |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
Anuj,
glad you are with me on this, since I proved it with my earlier post.
and if you guys think I am going to let you be the last post, your nuts. |
|
Back to top |
|
|
Bill Woodger
Moderator Emeritus
Joined: 09 Mar 2011 Posts: 7309 Location: Inside the Matrix
|
|
|
|
My nuts, or I am nuts? |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
meant am, not is. |
|
Back to top |
|
|
Bill Woodger
Moderator Emeritus
Joined: 09 Mar 2011 Posts: 7309 Location: Inside the Matrix
|
|
|
|
There is a serious point to this.*
If the JCL error existed when TS ran the job initially, then there would not have been any messages from SORT. So one error, SORTING (perhaps a good alternative for SORTWK?) made in the JCL, the other error when making the post.
Copy/paste, better than typing and sending people astray with typos.
* and that is to be the last post in this topic |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
Bill, everyone lies
and no one replies with
Quote: |
oh, I found the problem, stupid coding error on my part. |
which we all can pretty well figure is the root cause in most of these cases.
(especially, since we have done it so many times ourselves.)
like talking to children,
they just never imagine that anyone has had their experience. |
|
Back to top |
|
|
|