DE is pointing to the wrong thing. Try DE=NAME instead.

Bill

On Wed, 9 Oct 2013 18:44:52 -0400, MichealButz wrote:

>Binyamin
>
>The program is a TSO command processor so..... using a TSOLIB is analogous
>to ?
>I did a TSOLIB ACTIVATE dataset right before running my code under test
>
>*
>         BLDL 0,LIST_ADDR
>*
>         LTR R15,R15            q. Prog Fou
>         BZ  PROG_FOUND
>NO_PROG  DS  0H
>         LA  R15,4
>*        MVC VAL_MSG,=A(NOTFND)
>         B   PROG_RETURN
>PROG_FOUND DS  0H
>         LOAD DE=LIST_ADDR,LSEARCH=YES
>         XR  R15,R15
>
>LIST_ADDR DS  0H
>          DC   X'0001'
>          DC   X'003C'
> NAME     DS   CL8
>          Dc   100X'00'
>

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to