PIC 1 == Program Interrupt Code 1. Occurs when one attempts to
execute a Hex value that is not an instruction. Example: X'0000'.
If executable code falls into that (or branches to it, or jumps
to it) one will get a PIC 1.
This then gets converted to a S0C1 on a MVS system (or z/OS for
today).
HTH
Steve Thompson
On 07/12/2016 03:48 PM, Bill Woodger wrote:
Just to add, I have absolutely no clue (outside of ICL COBOL) what PIC 1 is.
I'm just an applications person. The world of sysprogs is beyond me, and whilst
I always enjoy the conversations here, mostly it is metres above my head :-)
In ICL COBOL, PIC 1 defines a bit. PIC 1(3) is three bits, etc. You may also have to define it as
COMP-5, but it is not "our" COMP-5. One of those COBOL things. "COMPUTATIONAL"
means a numeric definition, implementor-defined. Fortunately up as far as COMP-3, there is general
agreement. Mostly.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
