Gotcha! There's a subtle difference between BUTTBJBNI and ASCBJNI. The former is defined as a 'D' (bogusly), and contains the actual jobname. The latter points to the jobname, possibly to the former, but who knows. You can't do a 1-byte test on that address, only on the character field.
sas On Fri, Jan 12, 2018 at 3:20 PM, Ed Jaffe <[email protected]> wrote: > On 1/12/2018 4:49 AM, Peter Relson wrote: >> >> If ASSBJBNI first byte is not x'00' then use ASSBJBNI >> else use ASSBJBNS > > > This is the first I've heard of the "first byte test" trick. All of our code > does this (or something very similar): > > | LLGT R14,PSAAOLD > | LLGT R14,ASCBJBNI > | IF LTGR,R14,R14,Z > | LLGT R14,ASCBJBNS > | ENDIF , > > -- > Phoenix Software International > Edward E. Jaffe > 831 Parkview Drive North > El Segundo, CA 90245 > http://www.phoenixsoftware.com/ > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: INFO IBM-MAIN -- sas ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
