Tony, Thank you so much
Scott ford www.idmworks from my IPAD > On Oct 2, 2015, at 2:11 PM, Tony Thigpen <[email protected]> wrote: > > You forgot to BCTR after the compare fails. > > Tony Thigpen > > Randy Schafer wrote on 10/02/2015 02:02 PM: >> You probably meant 'L R14,6(R4)' before the BALR. >> >> -----Original Message----- >> From: IBM Mainframe Assembler List [mailto:[email protected]] >> On Behalf Of Scott Ford >> Sent: Friday, October 02, 2015 12:58 PM >> To: [email protected] >> Subject: Branch table >> >> All: >> >> I am building a branch table like this: >> >> FUNC DS CL10 >> >> FUNCTBL DS 0H >> DC 'INIT 'A(INIT_DSP) >> ......etc >> TBLENT DS F'5' >> >> ------------------------------------------------------------------------------ >> >> LA R4,FUNCTBL >> L R5,TBLENT >> LOOPTBL DS 0H >> CLC FUNC,0(R4) >> BE FOUND_IT >> >> FOUND_IT DS 0H >> LA R4,10(R4) >> L R14,R4 >> BALR R14,R15 >> >> >> Is my logic correct ? or did i miss something ? >> >> Regards, >> Scott >> >>
