Yes I have as I was running under TESTAUTH Sent from my iPhone
> On May 15, 2014, at 2:30 PM, Gerhard Postpischil <[email protected]> wrote: > >> On 5/15/2014 9:41 AM, MichealButz wrote: >> After which my TSO terminal emulater gives me error invald buffer address >> 2260 as I have a 24 x 80 screen wih 1.920 postions the sba code is E3 D4 >> Listed below ithe code used to translate the the row and column > > Have you actually dumped the buffer when you got the error? Perhaps storage > got clobbered? Your code should work, but is horribly inefficient. Try: > > SET_BUFF L R0,ROW >> L R1,COL >> BCTR R0,0 >> BCTR R1,0 >> MH R0,=H'80' >> AR R0,R1 >> SRDL R0,6 >> SRL R1,2 >> SRDL R0,6 > > SRL R1,2 >> STCM R1,B'1100',SBACMD (or STH) >> TR SBACMD(2),TABLE >> BR XLNK > > Also I would replace the =H'80' by a variable, allowing you to use the code > for different geometries (e.g., 27*132) > > Gerhard Postpischil > Bradford, Vermont > > ---------------------------------------------------------------------- > 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
