Where are you seeing this S0C1?
When I do an ACCEPT and don't have SYSIN in my JCL I see the following on the
console:
IEC130I SYSIN DD STATEMENT MISSING
IEA995I SYMPTOM DUMP OUTPUT 559
USER COMPLETION CODE=4093 REASON CODE=0000001C
TIME=18.18.23 SEQ=05662 CPU=0000 ASID=0036
PSW AT TIME OF ERROR 078D1000 864B638C ILC 2 INTC 0D
NO ACTIVE MODULE FOUND
NAME=UNKNOWN
DATA AT PSW 064B6386 - 00181610 0A0DA7F4 001C1811
GR 0: 00010000_84000000 1: 00000000_84000FFD
2: 00000000_0000001C 3: 00000000_00000001
4: 00000000_0FD74C50 5: 00000000_0FD74118
6: 00000000_0FD73520 7: 00000000_0FD739D0
8: 00000000_80000000 9: 00000000_00008000
A: 00000000_00000001 B: 00000000_864B62B8
C: 00000000_0FD67018 D: 00000000_0FD63538
E: 00000000_86622032 F: 00000000_0000001C
END OF SYMPTOM DUMP
IEF450I MEMTEST ONE - ABEND=S000 U4038 REASON=00000001 561
TIME=18.18.23
And in CEEMSG I see:
IGZ0017S The open of DISPLAY or ACCEPT file with environment name SYSIN was
unsuccessful.
From compile unit ACC at entry point ACC at statement 7 at compile
unit offset +000002A6 at entry offset +000002A6 at
address 0E8002A6.
________________________________
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> on behalf of
Andy Wood <woo...@ozemail.com.au>
Sent: Monday, July 11, 2016 4:40 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Error in a simple COBOL program
On Mon, 11 Jul 2016 17:19:17 -0500, Bill Woodger <bill.wood...@gmail.com> wrote:
>It's a Severe run-time error. Nothing can be done about it (except make the
>appropriate correction). Well, possibly you could use an LE abend handler, but
>why?
>
>Plain ACCEPT does not have a SELECT statement, so you can't specify FILE
>STATUS. It is not a "file" to the COBOL program, I don't think you can get at
>it with DECLARATIVES (I should check).
>
>I think you meant S0C4, not S0C1.
No, I didn't mean S0C4:
> CEE3201S The system detected an operation exception (System Completion
> Code=0C1
Serve error or not, why confound things with an operation exception?
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
