On Thu, 25 Feb 2021 14:56:36 +0000, Jeremy Nicoll wrote:
> 
>> signal on NOVALUE
>> do CheckRC = 1
>>     Address TSO “LISTBC” 
>>     If rc == 0 then  Address tso “submit *”
>>                Else address SYSCALL sleep 10
>> End CheckRC
>>  
Oops!  I left an endless loop.  I leave the termination condition
as an exercise for the student.

>The thing that worries me most about this is why it's thought that rc=0  
>from LISTBC tells you anything useful.
>
>    ...  Better, use several trailing steps and conditional jcl ...
>
That's *so* 20th Century.  Better, wrap the payload in a Rexx program
that can do a SELECT on the completion code.

-- gil

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to