Hi Mark,

>         CLC   3(4,R2),=C'0000'   CHECK FOR STEP DEFAULT
>         BNE   NOTDEFLT              TIME=(0000,03) FROM
>         CLC   8(2,R2),=C'03'           JES2 PARMS JOBCLASS(Q)
>         BE    RETURN0            TIME OK, DONE WITH THIS TEXT-GET OUT


Looks like you "assumed" the default TIME value would never be changed, and 
your comment also indicates only one jobclass.

I couldn't make that assumption, as my EXIT6 code runs in multiple systems, 
each with different requirements. So I got the code to jump through the 
$DOGCAT hoops. I must say that I did enjoy getting that all to work.

Regards
Bruce Hewson

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to