I don't know that you can do it with pure JCL. Do you have any assembler 
capability? I think the following program is sufficient.

    MVI   0,0
    END

Rexx? Try foo = Storage('7E000000',1)

Charles


-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf 
Of Peter
Sent: Thursday, May 25, 2017 8:43 PM
To: [email protected]
Subject: S0C4 Sample program

Hello

I am training my colleague on SLIP trap. Are there any sample S0C4 program  
that I can run and capture SLIP to demonstrate ?

Can someone please help me with any sample program and a JCL.

Regards
Peter

----------------------------------------------------------------------
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

Reply via email to